Changeset 4990 for trunk/NEMOGCM/NEMO/LIM_SRC_3/limrst.F90
- Timestamp:
- 2014-12-15T17:42:49+01:00 (9 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/NEMOGCM/NEMO/LIM_SRC_3/limrst.F90
r4688 r4990 308 308 INTEGER :: ji, jj, jk, jl, indx 309 309 REAL(wp) :: zfice, ziter 310 REAL(wp) :: zs_inf, z_slope_s, zsmax, zsmin, zalpha , zindb! local scalars used for the salinity profile311 REAL(wp), POINTER, DIMENSION(:) :: zs_zero310 REAL(wp) :: zs_inf, z_slope_s, zsmax, zsmin, zalpha ! local scalars used for the salinity profile 311 REAL(wp), POINTER, DIMENSION(:) :: zs_zero 312 312 REAL(wp), POINTER, DIMENSION(:,:) :: z2d 313 313 CHARACTER(len=15) :: znam
Note: See TracChangeset
for help on using the changeset viewer.