Changeset 179 for LMDZ.3.3/branches/rel-LF/libf/phylmd/param_cou.h

Timestamp:

Mar 20, 2001, 4:14:30 PM (24 years ago)

Author:

lmdzadmin

Message:

Synchronisation avec version MAFO:

ajout sortie netcdf des champs echanges avec le coupleur
quelques save sur les variables (pb stack/static sur le nec)

LF

File:

• LMDZ.3.3/branches/rel-LF/libf/phylmd/param_cou.h (modified) (2 diffs)

LMDZ.3.3/branches/rel-LF/libf/phylmd/param_cou.h

@@ -1 @@
-C $Id$
-C
-C -- param_cou.h
-C
+! $Id$
+!
+! -- param_cou.h
+!
         INTEGER jpmaxfld
         PARAMETER(jpmaxfld = 40)        ! Maximum number of fields exchanged
@@ -10 +10 @@
                                          ! atmosphere to ocean via flx.F
         INTEGER jpflda2o2
-        PARAMETER(jpflda2o2 = 4)         ! Number of fields exchanged from
+        PARAMETER(jpflda2o2 = 6)         ! Number of fields exchanged from
                                          ! atmosphere to ocean via tau.F
-C
+!
         INTEGER jpfldo2a
         PARAMETER(jpfldo2a = 4)          ! Number of fields exchanged from
                                          ! ocean to atmosphere
-C
+!