Changeset 2197 for LMDZ5/trunk/libf/phylmd/ini_wake.F90
- Timestamp:
- Feb 9, 2015, 8:13:05 AM (10 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
LMDZ5/trunk/libf/phylmd/ini_wake.F90
r1992 r2197 4 4 SUBROUTINE ini_wake(wape, fip, it_wape_prescr, wape_prescr, fip_prescr, & 5 5 alp_bl_prescr, ale_bl_prescr) 6 IMPLICIT NONE 6 7 ! ************************************************************** 7 8 ! * … … 39 40 include 'iniprint.h' 40 41 ! declarations 42 REAL wape, fip, wape_prescr, fip_prescr 43 INTEGER it_wape_prescr 41 44 REAL ale_bl_prescr 42 45 REAL alp_bl_prescr 43 46 REAL it 47 REAL w,f,alebl,alpbl 44 48 45 49 ! FH A mettre si besoin dans physiq.def
Note: See TracChangeset
for help on using the changeset viewer.