- Timestamp:
- 2018-08-08T17:12:35+02:00 (6 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/NERC/dev_r5518_GO6_under_ice_relax/NEMOGCM/NEMO/TOP_SRC/trcrst.F90
r9385 r10047 726 726 !!---------------------------------------------------------------------- 727 727 INTEGER :: ji, jj, jk, jn 728 REAL(wp) :: zsum3d, zsum2d, zinvt, zdelta, zratio, loc_vol, loc_are 729 REAL(wp) :: zq1, zq2, loc_vol, loc_area 728 REAL(wp) :: zsum3d, zsum2d, zinvt, zdelta, zratio 730 729 REAL(wp), DIMENSION(jpi,jpj,jpk) :: z3d, zvol 731 730 REAL(wp), DIMENSION(jpi,jpj) :: z2d, zarea
Note: See TracChangeset
for help on using the changeset viewer.