Changeset 5134 for LMDZ6/branches/Amaury_dev/libf/misc
- Timestamp:
- Jul 26, 2024, 5:56:37 PM (4 months ago)
- Location:
- LMDZ6/branches/Amaury_dev/libf/misc
- Files:
-
- 2 edited
Legend:
- Unmodified
- Added
- Removed
-
LMDZ6/branches/Amaury_dev/libf/misc/lmdz_vampir.F90
r5119 r5134 19 19 20 20 #ifdef USE_VT 21 include'VT.inc'21 INCLUDE 'VT.inc' 22 22 INTEGER :: ierr 23 23 … … 32 32 33 33 #ifdef USE_MPE 34 include 'mpe_logf.h'34 INCLUDE 'mpe_logf.h' 35 35 INTEGER :: ierr,i 36 36 … … 53 53 INTEGER :: number 54 54 #ifdef USE_VT 55 include'VT.inc'55 INCLUDE 'VT.inc' 56 56 INTEGER :: ierr 57 57 … … 59 59 #endif 60 60 #ifdef USE_MPE 61 include 'mpe_logf.h'61 INCLUDE 'mpe_logf.h' 62 62 INTEGER :: ierr,i 63 63 ierr = MPE_Log_event( MPE_begin(number), 0, '' ) … … 70 70 INTEGER :: Number 71 71 #ifdef USE_VT 72 include'VT.inc'72 INCLUDE 'VT.inc' 73 73 INTEGER :: ierr 74 74 … … 77 77 78 78 #ifdef USE_MPE 79 include 'mpe_logf.h'79 INCLUDE 'mpe_logf.h' 80 80 INTEGER :: ierr,i 81 81 ierr = MPE_Log_event( MPE_end(number), 0, '' ) -
LMDZ6/branches/Amaury_dev/libf/misc/lmdz_xer.f90
r5123 r5134 1045 1045 ! 891214 Prologue converted to Version 4.0 format. (BAB) 1046 1046 ! 900206 Routine changed from user-callable to subsidiary. (WRB) 1047 ! 900510 Changed calling sequence to includeLIBRARY and SUBROUTINE1047 ! 900510 Changed calling sequence to INCLUDE LIBRARY and SUBROUTINE 1048 1048 ! names, changed routine name from XERCTL to XERCNT. (RWC) 1049 1049 ! 920501 Reformatted the REFERENCES section. (WRB)
Note: See TracChangeset
for help on using the changeset viewer.