#65 closed Enhancement (fixed)
dev_001_SBC: move one part on changeset #783 from domain.F90 into sbcmod.F90
| Reported by: | ctlod | Owned by: | ctlod |
|---|---|---|---|
| Priority: | low | Milestone: | |
| Component: | OCE | Version: | v1 |
| Severity: | Keywords: | surface | |
| Cc: |
Description (last modified by ctlod)
The following part:
IF( lk_ice_lim )
IF(lwp) WRITE(numout,*) ' ice model coupling frequency nfice = ',
IF( MOD( nitend - nit000 + 1, nfice) /= 0 )
WRITE(ctmp1,*) 'experiment length (', nitend - nit000 + 1, ') is NOT a multiple of nfice (',
CALL ctl_stop( ctmp1, 'Impossible to do proper restart
ENDIF
IF( MOD( nstock , nfice) /= 0 ) THEN
WRITE(ctmp1,*) 'nstock (' , nstock , ') is NOT a multiple of nfice (', nfice, ')'
CALL ctl_stop( ctmp1, 'Impossible to do proper restart files' )
ENDIF
nfbulk = nfice
IF( MOD( rday, nfice*rdt ) /= 0 ) CALL ctl_warn( 'nfice is NOT a multiple of the number of time steps in a day' )
IF(lwp) WRITE(numout,*) ' bulk computation frequency nfbulk = ', nfbulk, ' = nfice if ice model used'
IF(lwp) WRITE(numout,*) ' flag closed sea or not nclosea = ', nclosea
ENDIF
is moved for coherence into sbcmod.F90 in replacing nfice with nn_fsbc
parameter and
lk_ice_lim with nn_ice ... for the test IF ( lk_ice_lim ) THEN ....
Commit History (3)
| Changeset | Author | Time | ChangeLog |
|---|---|---|---|
| 7848 | cetlod | 2017-03-30T15:32:57+02:00 | trunk:Minor improvment to handle land processor removal, see shaconemo ticket #65 |
| 7846 | cetlod | 2017-03-30T15:25:01+02:00 | Minor improvment to handle land processor removal, see shaconemo ticket #65 |
| 813 | ctlod | 2008-02-07T18:49:36+01:00 | dev_001_SBC: move one part on changeset #783 from domain.F90 into sbcmod.F90, see ticket #65 |
Change History (8)
comment:1 Changed 16 years ago by ctlod
- Description modified (diff)
- Owner changed from NEMO team to ctlod
- Status changed from new to assigned
comment:2 Changed 16 years ago by ctlod
- Resolution set to fixed
- Status changed from assigned to closed
comment:3 Changed 8 years ago by nicolasmartin
- Keywords New Surface module added
comment:4 Changed 8 years ago by nicolasmartin
- Keywords new added; New removed
comment:5 Changed 8 years ago by nicolasmartin
- Keywords surface added; Surface removed
comment:6 Changed 8 years ago by nicolasmartin
- Milestone New Surface Module deleted
comment:7 Changed 8 years ago by nicolasmartin
- Keywords new surface added; NSM removed
comment:8 Changed 8 years ago by nicolasmartin
- Keywords new removed
Note: See
TracTickets for help on using
tickets.
Milestone New Surface Module deleted