Changeset 3531 for LMDZ6/trunk/libf/phylmd/mod_synchro_omp.F90
- Timestamp:
- Jun 6, 2019, 5:08:45 PM (5 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
LMDZ6/trunk/libf/phylmd/mod_synchro_omp.F90
-
Property
svn:keywords
changed from
Author Date Id Revision
toId
r1907 r3531 1 ! 2 ! $Id$ 3 ! 1 4 MODULE mod_synchro_omp 2 5 … … 21 24 IMPLICIT NONE 22 25 LOGICAL :: out 26 CHARACTER (LEN=20) :: modname='synchro_omp' 27 CHARACTER (LEN=80) :: abort_message 23 28 24 29 out=.FALSE. … … 46 51 47 52 IF (exit_omp/=0) THEN 48 STOP 'synchro_omp' 53 abort_message='synchro_omp' 54 CALL abort_physic(modname,abort_message,1) 49 55 ENDIF 50 56 -
Property
svn:keywords
changed from
Note: See TracChangeset
for help on using the changeset viewer.