Changeset 1438 for trunk/NEMO/OPA_SRC/DYN/dynspg_oce.F90
- Timestamp:
- 2009-05-11T16:34:47+02:00 (15 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/NEMO/OPA_SRC/DYN/dynspg_oce.F90
r1152 r1438 43 43 !! ------------------------ 44 44 REAL(wp), PUBLIC, DIMENSION(jpi,jpj) :: & ! variables averaged over the barotropic loop 45 sshn_b, sshb_b, & ! sea surface heigth (now, before)46 u n_b , vn_b ! vertically integrated horizontal velocities (now)45 un_e , vn_e, & ! vertically integrated horizontal velocities (now) 46 ua_e , va_e ! vertically integrated horizontal velocities (after) 47 47 REAL(wp), PUBLIC, DIMENSION(jpi,jpj) :: & ! variables of the explicit barotropic loop 48 sshb_e, sshn_e, ssha_e, & ! sea surface heigth (before,now,after) 49 ua_e , va_e, & ! vertically integrated horizontal velocities (after) 50 hu_e , hv_e ! depth arrays for the barotropic solution 48 sshn_e, ssha_e, & ! sea surface heigth (now, after) 49 hu_e , hv_e ! depth arrays for the barotropic solution 51 50 #endif 52 51
Note: See TracChangeset
for help on using the changeset viewer.