Changeset 621 for XIOS/trunk/src/test


Ignore:
Timestamp:
06/22/15 13:36:21 (9 years ago)
Author:
mhnguyen
Message:

Implementing generic transformation algorithm (local commit)

+) Change a little bit to make sure everything work in order

Test
+) test_new_features passe with inverse

File:
1 edited

Legend:

Unmodified
Added
Removed
  • XIOS/trunk/src/test/test_new_features.f90

    r620 r621  
    1717  INTEGER,PARAMETER :: ni_glo=5 
    1818  INTEGER,PARAMETER :: nj_glo=5 
    19   INTEGER,PARAMETER :: llm=5 
     19  INTEGER,PARAMETER :: llm=2 
    2020  DOUBLE PRECISION  :: lval(llm)=1, tsTemp 
    2121  TYPE(xios_field) :: field_hdl 
     
    155155  DO ts=1,24*10 
    156156    CALL xios_update_calendar(ts) 
    157 !    CALL xios_send_field("field_A",field_A) 
     157    CALL xios_send_field("field_A",field_A) 
    158158    CALL xios_send_field("field_Axis",field_Axis) 
    159159 
    160160    CALL xios_send_field("field_Two_Axis",field_Two_Axis) 
    161 !    CALL xios_send_field("field_All_Axis",field_All_Axis) 
     161    CALL xios_send_field("field_All_Axis",field_All_Axis) 
    162162!    tsTemp = ts 
    163163!    CALL xios_send_scalar("field_Scalar", tsTemp) 
Note: See TracChangeset for help on using the changeset viewer.