Changeset 9961
- Timestamp:
- 2018-07-17T15:05:15+02:00 (6 years ago)
- Location:
- branches/UKMO/dev_r5518_NIWA_fix_plus/NEMOGCM/NEMO/OPA_SRC
- Files:
-
- 2 edited
-
SBC/sbc_ice.F90 (modified) (1 diff)
-
oce.F90 (modified) (1 diff)
Legend:
- Unmodified
- Added
- Removed
-
branches/UKMO/dev_r5518_NIWA_fix_plus/NEMOGCM/NEMO/OPA_SRC/SBC/sbc_ice.F90
r8400 r9961 167 167 168 168 #if defined key_cice 169 ALLOCATE( qla_ice(jpi,jpj,ncat) , qlw_ice(jpi,jpj,1) , qsr_ice(jpi,jpj, 1), &169 ALLOCATE( qla_ice(jpi,jpj,ncat) , qlw_ice(jpi,jpj,1) , qsr_ice(jpi,jpj,jpl) , & 170 170 wndi_ice(jpi,jpj) , tatm_ice(jpi,jpj) , qatm_ice(jpi,jpj) , & 171 171 wndj_ice(jpi,jpj) , nfrzmlt(jpi,jpj) , ss_iou(jpi,jpj) , & -
branches/UKMO/dev_r5518_NIWA_fix_plus/NEMOGCM/NEMO/OPA_SRC/oce.F90
r8280 r9961 101 101 INTEGER :: ierr(5) 102 102 !!---------------------------------------------------------------------- 103 ierr(:) = 0 103 104 ! 104 105 ALLOCATE( ub (jpi,jpj,jpk) , un (jpi,jpj,jpk) , ua(jpi,jpj,jpk) , &
Note: See TracChangeset
for help on using the changeset viewer.
