- Timestamp:
- Nov 5, 2018, 3:24:59 PM (6 years ago)
- Location:
- LMDZ6/branches/DYNAMICO-conv
- Files:
-
- 2 edited
Legend:
- Unmodified
- Added
- Removed
-
LMDZ6/branches/DYNAMICO-conv
- Property svn:mergeinfo changed
/LMDZ6/trunk removed
- Property svn:mergeinfo changed
-
LMDZ6/branches/DYNAMICO-conv/libf/phylmd/cv3_enthalpmix.F90
r3356 r3411 50 50 REAL :: cpn 51 51 REAL :: x, y, p0, p0m1, zdelta, zcor 52 REAL , SAVE:: dpmin=1.52 REAL :: dpmin=1. 53 53 !$OMP THREADPRIVATE(dpmin) 54 54 REAL, DIMENSION(len) :: plim2p ! = min(plim2(:),plim1(:)-dpmin)
Note: See TracChangeset
for help on using the changeset viewer.