Changeset 1030 for XIOS/dev/dev_olga/src/test/test_client.f90

Timestamp:

01/20/17 16:17:57 (7 years ago)

Author:

oabramkina

Message:

dev: intermediate commit.

File:

• XIOS/dev/dev_olga/src/test/test_client.f90 (modified) (2 diffs)

XIOS/dev/dev_olga/src/test/test_client.f90

@@ -19 +19 @@
   INTEGER,PARAMETER :: ni_glo=4
   INTEGER,PARAMETER :: nj_glo=4
-  INTEGER,PARAMETER :: llm=5
+  INTEGER,PARAMETER :: llm=2
   DOUBLE PRECISION  :: lval(llm)=1
   TYPE(xios_field) :: field_hdl
@@ -133 +133 @@
   DO ts=1,40
     CALL xios_update_calendar(ts)
-    ! CALL xios_send_field("field_A",field_A)
+    CALL xios_send_field("field_A",field_A)
     ! CALL xios_send_field("field_Axis",axisValue)
     ! CALL xios_send_field("field_Axis",lval)