34 |
#include "gridalt_mapping.h" |
#include "gridalt_mapping.h" |
35 |
#include "GRID.h" |
#include "GRID.h" |
36 |
#include "PARAMS.h" |
#include "PARAMS.h" |
37 |
|
#ifdef ALLOW_MNC |
38 |
|
#include "MNC_PARAMS.h" |
39 |
|
#endif |
40 |
|
|
41 |
integer myThid |
integer myThid |
42 |
|
|
58 |
nymdb = nymd0 |
nymdb = nymd0 |
59 |
nhmsb = nhms0 |
nhmsb = nhms0 |
60 |
|
|
61 |
|
#ifdef ALLOW_MNC |
62 |
|
if (useMNC) then |
63 |
|
call fizhi_mnc_init(myThid) |
64 |
|
endif |
65 |
|
#endif |
66 |
|
|
67 |
call fizhi_alarms(nymdb,nhmsb,deltaTClock) |
call fizhi_alarms(nymdb,nhmsb,deltaTClock) |
68 |
|
|
69 |
do bj = myByLo(myThid), myByHi(myThid) |
do bj = myByLo(myThid), myByHi(myThid) |