28 calls from
INIT_DIAG

APERIOD  1
CLOSEUNIT  1
CONSTANT  1
DAGCOM  1
DAILY_DIAG  1
DEF_ACC  1
DIAG_LOC  1
FILEMANAGER  1
GEOM    1
GETDTE  3
IO_RSF  1
LAKES_COM  1
MODEL_COM  1
OPENUNIT  1
PARAM   1
RESET_DIAG  1
SEAICE_COM  1
SET_CON  4
SIG     2
STOP_MODEL  3