- Timestamp:
- 2010-04-14T15:28:04+02:00 (14 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/dev_r1821_mixed_ldfdyn/NEMO/OPA_SRC/LDF/ldfdyn_c3d.h90
r1694 r1839 122 122 IF(lwp) WRITE(numout,*) ' maximum grid-spacing = ', zd_max, ' maximum value for ahm = ', ahm0 123 123 124 za00 = ahm0 / ( zd_max * zd_max * zd_max )124 za00 = ahm0_blp / ( zd_max * zd_max * zd_max ) 125 125 DO jj = 1, jpj 126 126 DO ji = 1, jpi
Note: See TracChangeset
for help on using the changeset viewer.