Changeset 2674 for branches/dev_r2586_dynamic_mem/NEMOGCM/NEMO/OPA_SRC/SBC
- Timestamp:
- 2011-03-08T18:30:16+01:00 (13 years ago)
- Location:
- branches/dev_r2586_dynamic_mem/NEMOGCM/NEMO/OPA_SRC/SBC
- Files:
-
- 2 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/dev_r2586_dynamic_mem/NEMOGCM/NEMO/OPA_SRC/SBC/sbcapr.F90
r2636 r2674 41 41 REAL(wp) :: r1_grau ! = 1.e0 / (grav * rau0) 42 42 43 TYPE(FLD), ALLOCATABLE, SAVE,DIMENSION(:) :: sf_apr ! structure of input fields (file informations, fields read)43 TYPE(FLD), ALLOCATABLE, DIMENSION(:) :: sf_apr ! structure of input fields (file informations, fields read) 44 44 45 45 !! * Substitutions -
branches/dev_r2586_dynamic_mem/NEMOGCM/NEMO/OPA_SRC/SBC/sbcblk_clio.F90
r2636 r2674 52 52 INTEGER , PARAMETER :: jp_tair = 6 ! index of 10m air temperature (Kelvin) 53 53 INTEGER , PARAMETER :: jp_prec = 7 ! index of total precipitation (rain+snow) (Kg/m2/s) 54 TYPE(FLD),ALLOCATABLE, SAVE,DIMENSION(:) :: sf ! structure of input fields (file informations, fields read)54 TYPE(FLD),ALLOCATABLE,DIMENSION(:) :: sf ! structure of input fields (file informations, fields read) 55 55 56 56 INTEGER, PARAMETER :: jpintsr = 24 ! number of time step between sunrise and sunset
Note: See TracChangeset
for help on using the changeset viewer.