Changeset 3759
- Timestamp:
- Jul 15, 2020, 10:14:34 PM (4 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
LMDZ6/branches/Optimisation_LMDZ/libf/phylmd/cv3_routines.F90
r3708 r3759 4944 4944 !inputs: 4945 4945 INTEGER, INTENT (IN) :: ncum, nd, na, nloc, len 4946 INTEGER, DIMENSION ( len), INTENT (IN) :: icb, inb4947 REAL, DIMENSION ( len, na, na), INTENT (IN) :: ment, sigij, elij4948 REAL, DIMENSION ( len, nd), INTENT (IN) :: clw4949 REAL, DIMENSION ( len, na), INTENT (IN) :: ep4950 REAL, DIMENSION ( len, nd+1), INTENT (IN) :: Vprecip4946 INTEGER, DIMENSION (nloc), INTENT (IN) :: icb, inb 4947 REAL, DIMENSION (nloc, na, na), INTENT (IN) :: ment, sigij, elij 4948 REAL, DIMENSION (nloc, nd), INTENT (IN) :: clw 4949 REAL, DIMENSION (nloc, na), INTENT (IN) :: ep 4950 REAL, DIMENSION (nloc, nd+1), INTENT (IN) :: Vprecip 4951 4951 !ouputs: 4952 REAL, DIMENSION ( len, na, na), INTENT (OUT) :: phi, phi2, epmlmMm4953 REAL, DIMENSION ( len, na), INTENT (OUT) :: da, d1a, dam, eplaMm4952 REAL, DIMENSION (nloc, na, na), INTENT (OUT) :: phi, phi2, epmlmMm 4953 REAL, DIMENSION (nloc, na), INTENT (OUT) :: da, d1a, dam, eplaMm 4954 4954 ! 4955 4955 ! variables pour tracer dans precip de l'AA et des mel
Note: See TracChangeset
for help on using the changeset viewer.