Changeset 5260 for branches/2014/dev_r4650_UKMO10_Tidally_Meaned_Diagnostics/NEMOGCM/NEMO/TOP_SRC/PISCES/P4Z/p4zsbc.F90
- Timestamp:
- 2015-05-12T12:37:15+02:00 (9 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/2014/dev_r4650_UKMO10_Tidally_Meaned_Diagnostics/NEMOGCM/NEMO/TOP_SRC/PISCES/P4Z/p4zsbc.F90
- Property svn:keywords set to Id
r4624 r5260 80 80 REAL(wp), PUBLIC :: rivdininput, rivdipinput, rivdsiinput 81 81 82 REAL(wp) :: ryyss !: number of seconds per year83 82 84 83 !!* Substitution … … 86 85 !!---------------------------------------------------------------------- 87 86 !! NEMO/TOP 3.3 , NEMO Consortium (2010) 88 !! $ Header:$87 !! $Id$ 89 88 !! Software governed by the CeCILL licence (NEMOGCM/NEMO_CeCILL.txt) 90 89 !!---------------------------------------------------------------------- … … 207 206 ! 208 207 IF( nn_timing == 1 ) CALL timing_start('p4z_sbc_init') 209 !210 ryyss = nyear_len(1) * rday ! number of seconds per year and per month211 208 ! 212 209 ! !* set file information
Note: See TracChangeset
for help on using the changeset viewer.