Changeset 1074 for XIOS/dev/branch_yushan/src/test/test_omp.f90

Timestamp:

03/15/17 18:29:03 (7 years ago)

Author:

yushan

Message:

save modif

File:

• XIOS/dev/branch_yushan/src/test/test_omp.f90 (modified) (1 diff)

XIOS/dev/branch_yushan/src/test/test_omp.f90

@@ -79 +79 @@
   print*, "xios init OK", rank, size
 
-  CALL xios_context_initialize("test",comm)
+!   CALL xios_context_initialize("test",comm)
 
-   print*, "xios_context init OK", rank, size  
+!   print*, "xios_context init OK", rank, size 
+
+  !CALL xios_context_finalize()
+
+  
+  !print*, "xios_context finalize OK", rank, size 
 
   !$omp end parallel
+
+
   
   CALL xios_context_initialize("test",comm)