Changeset 10352
- Timestamp:
- 2018-11-21T16:59:24+01:00 (6 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
NEMO/branches/2018/dev_r9947_SI3_advection/tests/ICEADV/MY_SRC/usrdef_nam.F90
r10277 r10352 98 98 ! 99 99 ! ! Set the lateral boundary condition of the global domain 100 kperio = 7! ICEADV configuration : bi-periodic basin100 kperio = 0 ! ICEADV configuration : bi-periodic basin 101 101 ! 102 102 WRITE(ldtxt(ii),*) ' ' ; ii = ii + 1 103 103 WRITE(ldtxt(ii),*) ' Lateral boundary condition of the global domain' ; ii = ii + 1 104 WRITE(ldtxt(ii),*) ' ICEADV : bi-periodic basinjperio = ', kperio ; ii = ii + 1104 WRITE(ldtxt(ii),*) ' ICEADV : closed basin jperio = ', kperio ; ii = ii + 1 105 105 ! 106 106 END SUBROUTINE usr_def_nam
Note: See TracChangeset
for help on using the changeset viewer.