|
Last change
on this file since 5450 was
5302,
checked in by abarral, 2 months ago
|
|
Turn compar1d.h date_cas.h into module
Move fcg_racmo.h to obsolete
|
|
File size:
499 bytes
|
| Line | |
|---|
| 1 | MODULE date_cas_mod_h |
|---|
| 2 | IMPLICIT NONE; PRIVATE |
|---|
| 3 | PUBLIC year_ini_cas, mth_ini_cas, day_deb, heure_ini_cas, pdt_cas, day_ju_ini_cas |
|---|
| 4 | |
|---|
| 5 | INTEGER :: year_ini_cas ! initial year of the case |
|---|
| 6 | INTEGER :: mth_ini_cas ! initial month of the case |
|---|
| 7 | INTEGER :: day_deb ! initial day of the case |
|---|
| 8 | REAL :: heure_ini_cas ! start time of the case |
|---|
| 9 | REAL :: pdt_cas ! forcing_frequency |
|---|
| 10 | REAL :: day_ju_ini_cas ! julian day of initial day of the case |
|---|
| 11 | END MODULE date_cas_mod_h |
|---|
| 12 | |
|---|
Note: See
TracBrowser
for help on using the repository browser.
