- Timestamp:
- 2013-05-03T14:35:21+02:00 (11 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/2013/dev_r3853_CNRS9_ConfSetting/NEMOGCM/NEMO/OPA_SRC/SBC/tideini.F90
r3875 r3901 26 26 ftide 27 27 28 LOGICAL, PUBLIC :: ln_tide_pot = .false., ln_tide_ramp = .false.28 LOGICAL, PUBLIC :: ln_tide_pot , ln_tide_ramp 29 29 REAL(wp), PUBLIC :: rdttideramp 30 30 INTEGER, PUBLIC :: nb_harmo … … 60 60 ! 61 61 CALL tide_init_Wave 62 !63 clname(:)=''64 62 ! 65 63 ! Read Namelist nam_tide
Note: See TracChangeset
for help on using the changeset viewer.