Changeset 205 for LMDZ.3.3/branches/rel-LF/makegcm

Timestamp:

Apr 13, 2001, 4:58:01 PM (23 years ago)

Author:

lmdzadmin

Message:

Rajout date0 dans physiq pour interface avec ORCHIDEE
Fermeture des fichiers restart par restclo dans abort_gcm
LF

File:

• LMDZ.3.3/branches/rel-LF/makegcm (modified) (1 diff)

LMDZ.3.3/branches/rel-LF/makegcm

@@ -77 +77 @@
 #Force/couple
 set COUPLE=0
-set ocean=`grep '^      parameter (ocean' libf/phylmd/physiq.F | awk -F\' '{print $2}'`
+set ocean=`grep '^      parameter (ocean' $LMDGCM/libf/phylmd/physiq.F | awk -F\' '{print $2}'`
 banner $ocean
 if ($ocean == couple) then
   set COUPLE=1
 endif
-
-
+#veget ou non
+set veget=`grep '^      parameter (ok_veget' $LMDGCM/libf/phylmd/physiq.F | awk -F. '{print $2}'`
+if ($veget == true) then
+  banner orchidee
+endif
 ########################################################################
 #  Les differentes platformes reconnues