Changeset 1053 for XIOS/dev/branch_yushan/src/test
- Timestamp:
- 02/17/17 17:55:37 (7 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
XIOS/dev/branch_yushan/src/test/test_client.f90
r1037 r1053 42 42 43 43 CALL MPI_COMM_RANK(comm,rank,ierr) 44 print*, "test_client MPI_COMM_RANK OK" 44 print*, "test_client MPI_COMM_RANK OK", rank 45 45 CALL MPI_COMM_SIZE(comm,size,ierr) 46 print*, "test_client MPI_COMM_SIZE OK", size 46 47 47 48 … … 138 139 PRINT*,"field field_A is active ? ",xios_field_is_active("field_A") 139 140 !DO ts=1,24*10 140 DO ts=1, 24141 DO ts=1,6 141 142 CALL xios_update_calendar(ts) 142 143 print*, "xios_update_calendar OK, ts = ", ts
Note: See TracChangeset
for help on using the changeset viewer.