Changeset 66 for trunk/libf/dyn3dpar/etat0_netcdf.F90
- Timestamp:
- Feb 16, 2011, 4:57:45 PM (14 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/libf/dyn3dpar/etat0_netcdf.F90
r1 r66 1 1 ! 2 ! $Id: etat0_netcdf.F90 14 25 2010-09-02 13:45:23Z lguez$2 ! $Id: etat0_netcdf.F90 1486 2011-02-11 12:07:39Z fairhead $ 3 3 ! 4 4 !------------------------------------------------------------------------------- … … 98 98 REAL :: dummy 99 99 LOGICAL :: ok_newmicro, ok_journe, ok_mensuel, ok_instan, ok_hf 100 LOGICAL :: ok_LES, ok_ade, ok_aie, aerosol_couple, new_aod 100 LOGICAL :: ok_LES, ok_ade, ok_aie, aerosol_couple, new_aod, callstats 101 101 INTEGER :: iflag_radia, flag_aerosol 102 102 REAL :: bl95_b0, bl95_b1, fact_cldcon, facttemps, ratqsbas, ratqshaut … … 130 130 !--- CONSTRUCT A GRID 131 131 CALL conf_phys( ok_journe, ok_mensuel, ok_instan, ok_hf, ok_LES, & 132 callstats, & 132 133 solarlong0,seuil_inversion, & 133 134 fact_cldcon, facttemps,ok_newmicro,iflag_radia, &
Note: See TracChangeset
for help on using the changeset viewer.