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/dyn3dpar/ce0l.F90

    r66 r97  
    4242#include "temps.h"
    4343#include "logic.h"
    44   INTEGER, PARAMETER            :: longcles=20
    45   REAL,    DIMENSION(longcles)  :: clesphy0
    4644  REAL,    DIMENSION(iip1,jjp1) :: masque
    4745  CHARACTER(LEN=15)             :: calnd
    4846!-------------------------------------------------------------------------------
    49   CALL conf_gcm( 99, .TRUE. , clesphy0 )
     47  CALL conf_gcm( 99, .TRUE. )
    5048
    5149  CALL init_mpi
Note: See TracChangeset for help on using the changeset viewer.