Changeset 956 for trunk/NEMO/OFF_SRC/phycst.F90

Timestamp:

2008-05-14T18:46:05+02:00 (16 years ago)

Author:

cetlod

Message:

phasing the OFFLINE module to the new version of NEMO, see ticket 146

File:

• trunk/NEMO/OFF_SRC/phycst.F90 (modified) (1 diff)

trunk/NEMO/OFF_SRC/phycst.F90

@@ -15 +15 @@
 
    !! * Shared module variables
-   INTEGER, PUBLIC, DIMENSION(12) ::   &  !:
-      nbiss = (/ 31, 29, 31, 30, 31, 30,      &  !: number of days per month
-         &       31, 31, 30, 31, 30, 31 /) ,  &  !  (leap-year)
-      nobis = (/ 31, 28, 31, 30, 31, 30,      &  !: number of days per month
-         &       31, 31, 30, 31, 30, 31 /)       !  (365 days a year)
-   
    REAL(wp), PUBLIC ::                        &  !:
       rpi = 3.141592653589793_wp           ,  &  !: pi