Changeset 6130
- Timestamp:
- 2015-12-18T14:50:33+01:00 (8 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/2015/dev_r5546_CNRS19_HPC_scalability/NEMOGCM/NEMO/LIM_SRC_3/ice.F90
r6126 r6130 234 234 REAL(wp), PUBLIC, ALLOCATABLE, SAVE, DIMENSION(:,:) :: u_oce, v_oce !: surface ocean velocity used in ice dynamics 235 235 REAL(wp), PUBLIC, ALLOCATABLE, SAVE, DIMENSION(:,:) :: ahiu , ahiv !: hor. diffusivity coeff. at U- and V-points [m2/s] 236 REAL(wp), PUBLIC, ALLOCATABLE, SAVE, DIMENSION(:,:) :: pahu , pahv !: ice hor. eddy diffusivity coef. at U- and V-points237 236 REAL(wp), PUBLIC, ALLOCATABLE, SAVE, DIMENSION(:,:) :: ust2s, hicol !: friction velocity, ice collection thickness accreted in leads 238 237 REAL(wp), PUBLIC, ALLOCATABLE, SAVE, DIMENSION(:,:) :: strp1, strp2 !: strength at previous time steps … … 425 424 ALLOCATE( u_oce (jpi,jpj) , v_oce (jpi,jpj) , & 426 425 & ahiu (jpi,jpj) , ahiv (jpi,jpj) , & 427 & pahu (jpi,jpj) , pahv (jpi,jpj) , &428 426 & ust2s (jpi,jpj) , hicol (jpi,jpj) , & 429 427 & strp1 (jpi,jpj) , strp2 (jpi,jpj) , strength (jpi,jpj) , &
Note: See TracChangeset
for help on using the changeset viewer.