- Timestamp:
- Apr 15, 2015, 6:49:07 PM (10 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
dynamico_lmdz/aquaplanet/LMDZ5/libf/phylmd/cv3p1_closure.F90
r3809 r3814 551 551 , il, alp2(il), alp(il), cin(il) 552 552 abort_message = '' 553 CALL abort_ gcm(modname, abort_message, 1)553 CALL abort_physic(modname, abort_message, 1) 554 554 END IF 555 555 cbmfmax(il) = sigmax*wb2(il)*100.*p(il, icb(il))/(rrd*tv(il,icb(il)))
Note: See TracChangeset
for help on using the changeset viewer.