Changeset 1491 for XIOS/dev/branch_openmp/src/test/test_remap_omp.f90
- Timestamp:
- 04/23/18 11:18:05 (6 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
XIOS/dev/branch_openmp/src/test/test_remap_omp.f90
r1468 r1491 144 144 ENDDO 145 145 146 print*, "ID = ", rank, "src_ni = ", "src_nvertex = ", src_nvertex, "src_ni_glo = ", src_ni_glo146 print*, "ID = ", rank, "src_ni = ", src_ni, "src_nvertex = ", src_nvertex, "src_ni_glo = ", src_ni_glo 147 147 148 148 ierr=NF90_OPEN(dst_file, NF90_NOWRITE, ncid) … … 228 228 229 229 DO ts=1,1 230 CALL xios_recv_field("src_field_regular", tmp_field_0)231 !CALL xios_recv_field("src_field_curvilinear", tmp_field_1)232 !CALL xios_recv_field("src_field_unstructured", tmp_field_2)233 230 CALL xios_recv_field("src_field_regular", tmp_field_0) 234 231 !CALL xios_recv_field("src_field_curvilinear", tmp_field_1)
Note: See TracChangeset
for help on using the changeset viewer.