- Timestamp:
- 2010-10-29T10:33:02+02:00 (14 years ago)
- Location:
- branches/nemo_v3_3_beta/NEMOGCM/NEMO/OPA_SRC
- Files:
-
- 2 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/nemo_v3_3_beta/NEMOGCM/NEMO/OPA_SRC/DIA/diahsb.F90
r2334 r2337 15 15 USE domvvl ! vertical scale factors 16 16 USE traqsr ! penetrative solar radiation 17 USE trabbc ! bottom boundary condition 17 18 USE lib_mpp ! distributed memory computing library 18 19 USE trabbc ! bottom boundary condition -
branches/nemo_v3_3_beta/NEMOGCM/NEMO/OPA_SRC/TRA/trabbc.F90
r2325 r2337 33 33 34 34 INTEGER , DIMENSION(:,:), ALLOCATABLE :: nbotlevt ! ocean bottom level index at T-pt 35 REAL(wp), DIMENSION(:,:), ALLOCATABLE :: qgh_trd0 ! geothermal heating trend35 REAL(wp), PUBLIC, DIMENSION(:,:), ALLOCATABLE :: qgh_trd0 ! geothermal heating trend 36 36 37 37 !! * Substitutions
Note: See TracChangeset
for help on using the changeset viewer.