Changeset 9962
- Timestamp:
- 2018-07-18T11:53:34+02:00 (7 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/UKMO/dev_r5518_NIWA_fix_plus/NEMOGCM/NEMO/OPA_SRC/SBC/sbc_ice.F90
r9961 r9962 180 180 IF( ln_cpl ) ALLOCATE( u_ice(jpi,jpj) , fr1_i0(jpi,jpj) , tn_ice (jpi,jpj,jpl) , & 181 181 & v_ice(jpi,jpj) , fr2_i0(jpi,jpj) , alb_ice(jpi,jpj,1) , & 182 & emp_ice(jpi,jpj) , qns_ice(jpi,jpj, 1), dqns_ice(jpi,jpj,1) , &182 & emp_ice(jpi,jpj) , qns_ice(jpi,jpj,jpl) , dqns_ice(jpi,jpj,1) , & 183 183 & a_p(jpi,jpj,jpl) , ht_p(jpi,jpj,jpl) , tsfc_ice(jpi,jpj,jpl) , & 184 184 & kn_ice(jpi,jpj,jpl) , STAT=ierr(2) )
Note: See TracChangeset
for help on using the changeset viewer.