Changeset 2311 for LMDZ5/trunk/libf/phylmd/init_be.F90
- Timestamp:
- Jun 25, 2015, 9:45:24 AM (9 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
LMDZ5/trunk/libf/phylmd/init_be.F90
r1907 r2311 65 65 ! la source est maintenant définie independemment de la valeur de klev. 66 66 !!! Source actuellement definie pour klev = 19 et klev >= 39 67 !! IF (klev /= 19 .AND. klev<39) CALL abort_ gcm("init_be","Source du be7 necessite klev=19 ou klev>=39",1)67 !! IF (klev /= 19 .AND. klev<39) CALL abort_physic("init_be","Source du be7 necessite klev=19 ou klev>=39",1) 68 68 !!! 69 69 ! Definition des constantes
Note: See TracChangeset
for help on using the changeset viewer.