Changeset 1823 for LMDZ5/trunk/libf/dyn3dpar/getparam.F90
- Timestamp:
- Jul 31, 2013, 12:38:37 PM (11 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
LMDZ5/trunk/libf/dyn3dpar/getparam.F90
r1279 r1823 18 18 CONTAINS 19 19 SUBROUTINE ini_getparam(fichier) 20 USE parallel 20 USE parallel_lmdz 21 21 ! 22 22 IMPLICIT NONE … … 28 28 29 29 SUBROUTINE fin_getparam 30 USE parallel 30 USE parallel_lmdz 31 31 ! 32 32 IMPLICIT NONE … … 37 37 38 38 SUBROUTINE getparamr(TARGET,def_val,ret_val,comment) 39 USE parallel 39 USE parallel_lmdz 40 40 ! 41 41 IMPLICIT NONE … … 63 63 64 64 SUBROUTINE getparami(TARGET,def_val,ret_val,comment) 65 USE parallel 65 USE parallel_lmdz 66 66 ! 67 67 IMPLICIT NONE … … 90 90 91 91 SUBROUTINE getparaml(TARGET,def_val,ret_val,comment) 92 USE parallel 92 USE parallel_lmdz 93 93 ! 94 94 IMPLICIT NONE
Note: See TracChangeset
for help on using the changeset viewer.