Changeset 631 for trunk/NEMO/OPA_SRC/DOM
- Timestamp:
- 2007-03-02T17:40:54+01:00 (18 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/NEMO/OPA_SRC/DOM/domain.F90
r592 r631 107 107 hur(:,:) = fse3u(:,:,1) ! Lower bound : thickness of the first model level 108 108 hvr(:,:) = fse3v(:,:,1) 109 109 110 110 DO jk = 2, jpk ! Sum of the vertical scale factors 111 111 hur(:,:) = hur(:,:) + fse3u(:,:,jk) * umask(:,:,jk) … … 144 144 NAMELIST/namrun/ no , cexper , ln_rstart , nrstdt , nit000, & 145 145 & nitend, ndate0 , nleapy , ninist , nstock, & 146 & nwrite, nrunoff 146 & nwrite, nrunoff , ln_dimgnnn 147 147 148 148 NAMELIST/namdom/ ntopo , e3zps_min, e3zps_rat, ngrid , nmsh , & … … 176 176 WRITE(numout,*) ' frequency of output file nwrite = ', nwrite 177 177 WRITE(numout,*) ' runoff option nrunoff = ', nrunoff 178 WRITE(numout,*) ' multi file dimgout ln_dimgnnn = ', ln_dimgnnn 178 179 ENDIF 179 180
Note: See TracChangeset
for help on using the changeset viewer.