Changeset 2193 for LMDZ5/trunk/libf/phylmd
- Timestamp:
- Feb 4, 2015, 7:48:02 AM (10 years ago)
- Location:
- LMDZ5/trunk/libf/phylmd
- Files:
-
- 2 edited
Legend:
- Unmodified
- Added
- Removed
-
LMDZ5/trunk/libf/phylmd/physiq.F90
r2188 r2193 2622 2622 enddo 2623 2623 2624 ELSE IF (iflag_trig_bl. eq.2) then2624 ELSE IF (iflag_trig_bl.ge.2) then 2625 2625 2626 2626 do i=1,klon -
LMDZ5/trunk/libf/phylmd/thermcell_main.F90
r2079 r2193 976 976 enddo 977 977 978 ! Ale sec (max de wmax/2 sous la zone d'inhibition) dans 979 ! le cas iflag_trig_bl=3 980 IF (iflag_trig_bl==3) Ale_bl(:)=0.5*wmax_sec(:)**2 981 978 982 !test:calcul de la ponderation des couches pour KE 979 983 !initialisations
Note: See TracChangeset
for help on using the changeset viewer.