Changeset 4699 for trunk/NEMOGCM/NEMO/OPA_SRC/BDY/bdy_oce.F90
- Timestamp:
- 2014-07-02T13:39:48+02:00 (10 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/NEMOGCM/NEMO/OPA_SRC/BDY/bdy_oce.F90
r4689 r4699 104 104 REAL(wp), DIMENSION(jp_bdy) :: rn_time_dmp_out !: Damping time scale in days at radiation outflow points 105 105 106 #if ( defined key_lim2 || defined key_lim3 )107 106 CHARACTER(len=20), DIMENSION(jp_bdy) :: cn_ice_lim ! Choice of boundary condition for sea ice variables 108 107 INTEGER, DIMENSION(jp_bdy) :: nn_ice_lim_dta !: = 0 use the initial state as bdy dta ; 109 108 !: = 1 read it in a NetCDF file 110 #endif 111 #if defined key_lim3 112 REAL, DIMENSION(jp_bdy) :: rn_ice_tem !: choice of the temperature of incoming sea ice 113 REAL, DIMENSION(jp_bdy) :: rn_ice_sal !: choice of the salinity of incoming sea ice 114 REAL, DIMENSION(jp_bdy) :: rn_ice_age !: choice of the age of incoming sea ice 115 #endif 109 REAL(wp), DIMENSION(jp_bdy) :: rn_ice_tem !: choice of the temperature of incoming sea ice 110 REAL(wp), DIMENSION(jp_bdy) :: rn_ice_sal !: choice of the salinity of incoming sea ice 111 REAL(wp), DIMENSION(jp_bdy) :: rn_ice_age !: choice of the age of incoming sea ice 116 112 ! 117 113
Note: See TracChangeset
for help on using the changeset viewer.