Ignore:
Timestamp:
Mar 22, 2011, 5:25:44 PM (14 years ago)
Author:
slebonnois
Message:

Serie de modifs SL pour homogeneisation des phytitan et phyvenus
Ca touche aussi aux liens phy/dyn (surtout a propos de clesphy0),
a verifier avec les autres, donc...

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/libf/phyvenus/clmain.simple

    r3 r97  
    128128c
    129129#include "YOMCST.h"
    130 #include "YOETHF.h"
    131 #include "FCTTRE.h"
    132130      REAL u1lay(klon), v1lay(klon)
    133131      REAL delp(klon,klev)
     
    370368#include "dimphy.h"
    371369#include "YOMCST.h"
    372 #include "YOETHF.h"
    373 #include "FCTTRE.h"
    374370#include "dimsoil.h"
    375371#include "iniprint.h"
     
    865861      PARAMETER (zxli=.FALSE.)
    866862c
    867 #include "YOETHF.h"
    868 #include "FCTTRE.h"
    869863      fsta(x) = 1.0 / (1.0+10.0*x*(1+8.0*x))
    870864      fins(x) = SQRT(1.0-18.0*x)
Note: See TracChangeset for help on using the changeset viewer.