Changeset 313 for codes/icosagcm/branches/SATURN_DYNAMICO/LMDZ.COMMON/libf/phystd/profile.F

Timestamp:

12/15/14 17:04:28 (10 years ago)

Author:

ymipsl

Message:

• implement splitting of XIOS file for lmdz physics
• Termination is done properly in parallel by calling MPI_ABORT instead of abort or stop

YM

File:

• codes/icosagcm/branches/SATURN_DYNAMICO/LMDZ.COMMON/libf/phystd/profile.F (modified) (1 diff)

codes/icosagcm/branches/SATURN_DYNAMICO/LMDZ.COMMON/libf/phystd/profile.F

@@ -184 +184 @@
 
       GOTO 201
-101   STOP'fichier profile inexistant'
+101   PRINT*, 'fichier profile inexistant'
+      CALL abort_physiq
 201   CONTINUE
       CLOSE(10)