- Timestamp:
- 2020-05-29T11:31:16+02:00 (4 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
NEMO/branches/2020/dev_r12558_HPC-08_epico_Extra_Halo/src/OCE/DYN/dynspg_ts.F90
r12738 r12989 972 972 END_2D 973 973 ! 974 zcmax = MAXVAL( zcu( :,:) )974 zcmax = MAXVAL( zcu(Nis1:Nie1,Njs1:Nje1) ) 975 975 CALL mpp_max( 'dynspg_ts', zcmax ) 976 976
Note: See TracChangeset
for help on using the changeset viewer.