Changeset 541 for XIOS/trunk/src/test
- Timestamp:
- 12/16/14 12:55:59 (9 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
XIOS/trunk/src/test/test_new_features.f90
r540 r541 13 13 TYPE(xios_time) :: dtime 14 14 TYPE(xios_context) :: ctx_hdl 15 INTEGER,PARAMETER :: ni_glo= 516 INTEGER,PARAMETER :: nj_glo= 515 INTEGER,PARAMETER :: ni_glo=100 16 INTEGER,PARAMETER :: nj_glo=100 17 17 INTEGER,PARAMETER :: llm=5 18 18 DOUBLE PRECISION :: lval(llm)=1 … … 80 80 CALL xios_set_context_attr("test",calendar_type="Gregorian") 81 81 CALL xios_set_axis_attr("axis_A",size=llm ,value=lval) ; 82 CALL xios_set_axis_attr("axis_B",size=llm ,value=lval2) ;82 ! CALL xios_set_axis_attr("axis_B",size=llm ,value=lval2) ; 83 83 CALL xios_set_domain_attr("domain_A",ni_glo=ni_glo, nj_glo=nj_glo, ibegin=ibegin, ni=ni,jbegin=jbegin,nj=nj) 84 84 CALL xios_set_domain_attr("domain_A",data_dim=2, data_ibegin=-1, data_ni=ni+2, data_jbegin=-2, data_nj=nj+4)
Note: See TracChangeset
for help on using the changeset viewer.