Changeset 700

Timestamp:

May 9, 2006, 11:47:42 AM (19 years ago)

Author:

Laurent Fairhead

Message:

Probleme de coherence entre la cle CPP VEGET et le flag ok_veget, on pouvait
avoir des infos contradictoires et ne pas comprendre le plantage qui s'en
suivait
LF

File:

• LMDZ4/trunk/libf/phylmd/interface_surf.F90 (modified) (1 diff)

LMDZ4/trunk/libf/phylmd/interface_surf.F90

@@ -508 +508 @@
 ! mise a jour de l'humidite saturante calculee par ORCHIDEE
       qsurf(1:knon) = qsurf_new(1:knon)
+#else
+      abort_message='Pb de coherence: ok_veget = .t. mais CPP_VEGET = .f.'
+      call abort_gcm(modname,abort_message,1)
 #endif