- Timestamp:
- Jul 19, 2024, 5:41:58 PM (4 months ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
LMDZ6/branches/Amaury_dev/libf/dynphy_lonlat/phylmd/iniphysiq_mod.F90
r4389 r5082 129 129 slab_ekman=0 130 130 CALL getin_p('slab_ekman',slab_ekman) 131 IF ((type_ocean=='slab').AND.(slab_hdiff.OR.(slab_ekman .GT.0))) THEN131 IF ((type_ocean=='slab').AND.(slab_hdiff.OR.(slab_ekman>0))) THEN 132 132 CALL ini_slab_transp_geom(ip1jm,ip1jmp1,unsairez,fext,unsaire,& 133 133 cu,cuvsurcv,cv,cvusurcu, &
Note: See TracChangeset
for help on using the changeset viewer.