?? mf_timemgrf.c
字號:
#ifdef MPI_BUILD_PROFILING#ifdef FORTRANCAPS#define mf_timemgrgetcurrdate_ PMF_TIMEMGRGETCURRDATE#elif defined(FORTRANDOUBLEUNDERSCORE)#define mf_timemgrgetcurrdate_ pmf_timemgrgetcurrdate__#elif !defined(FORTRANUNDERSCORE)#define mf_timemgrgetcurrdate_ pmf_timemgrgetcurrdate#else#define mf_timemgrgetcurrdate_ pmf_timemgrgetcurrdate_#endif#else#ifdef FORTRANCAPS#define mf_timemgrgetcurrdate_ MF_TIMEMGRGETCURRDATE#elif defined(FORTRANDOUBLEUNDERSCORE)#define mf_timemgrgetcurrdate_ mf_timemgrgetcurrdate__#elif !defined(FORTRANUNDERSCORE)#define mf_timemgrgetcurrdate_ mf_timemgrgetcurrdate#endif#endif#ifdef MPI_BUILD_PROFILING#ifdef FORTRANCAPS#define mf_timemgrsetcurrdateis_ PMF_TIMEMGRSETCURRDATEIS#elif defined(FORTRANDOUBLEUNDERSCORE)#define mf_timemgrsetcurrdateis_ pmf_timemgrsetcurrdateis__#elif !defined(FORTRANUNDERSCORE)#define mf_timemgrsetcurrdateis_ pmf_timemgrsetcurrdateis#else#define mf_timemgrsetcurrdateis_ pmf_timemgrsetcurrdateis_#endif#else#ifdef FORTRANCAPS#define mf_timemgrsetcurrdateis_ MF_TIMEMGRSETCURRDATEIS#elif defined(FORTRANDOUBLEUNDERSCORE)#define mf_timemgrsetcurrdateis_ mf_timemgrsetcurrdateis__#elif !defined(FORTRANUNDERSCORE)#define mf_timemgrsetcurrdateis_ mf_timemgrsetcurrdateis#endif#endif#ifdef MPI_BUILD_PROFILING#ifdef FORTRANCAPS#define mf_timemgrgetprevdate_ PMF_TIMEMGRGETPREVDATE#elif defined(FORTRANDOUBLEUNDERSCORE)#define mf_timemgrgetprevdate_ pmf_timemgrgetprevdate__#elif !defined(FORTRANUNDERSCORE)#define mf_timemgrgetprevdate_ pmf_timemgrgetprevdate#else#define mf_timemgrgetprevdate_ pmf_timemgrgetprevdate_#endif#else#ifdef FORTRANCAPS#define mf_timemgrgetprevdate_ MF_TIMEMGRGETPREVDATE#elif defined(FORTRANDOUBLEUNDERSCORE)#define mf_timemgrgetprevdate_ mf_timemgrgetprevdate__#elif !defined(FORTRANUNDERSCORE)#define mf_timemgrgetprevdate_ mf_timemgrgetprevdate#endif#endif#ifdef MPI_BUILD_PROFILING#ifdef FORTRANCAPS#define mf_timemgrrestartwriteis_ PMF_TIMEMGRRESTARTWRITEIS#elif defined(FORTRANDOUBLEUNDERSCORE)#define mf_timemgrrestartwriteis_ pmf_timemgrrestartwriteis__#elif !defined(FORTRANUNDERSCORE)#define mf_timemgrrestartwriteis_ pmf_timemgrrestartwriteis#else#define mf_timemgrrestartwriteis_ pmf_timemgrrestartwriteis_#endif#else#ifdef FORTRANCAPS#define mf_timemgrrestartwriteis_ MF_TIMEMGRRESTARTWRITEIS#elif defined(FORTRANDOUBLEUNDERSCORE)#define mf_timemgrrestartwriteis_ mf_timemgrrestartwriteis__#elif !defined(FORTRANUNDERSCORE)#define mf_timemgrrestartwriteis_ mf_timemgrrestartwriteis#endif#endif#ifdef MPI_BUILD_PROFILING#ifdef FORTRANCAPS#define mf_timemgrrestartreadis_ PMF_TIMEMGRRESTARTREADIS#elif defined(FORTRANDOUBLEUNDERSCORE)#define mf_timemgrrestartreadis_ pmf_timemgrrestartreadis__#elif !defined(FORTRANUNDERSCORE)#define mf_timemgrrestartreadis_ pmf_timemgrrestartreadis#else#define mf_timemgrrestartreadis_ pmf_timemgrrestartreadis_#endif#else#ifdef FORTRANCAPS#define mf_timemgrrestartreadis_ MF_TIMEMGRRESTARTREADIS#elif defined(FORTRANDOUBLEUNDERSCORE)#define mf_timemgrrestartreadis_ mf_timemgrrestartreadis__#elif !defined(FORTRANUNDERSCORE)#define mf_timemgrrestartreadis_ mf_timemgrrestartreadis#endif#endif#ifdef MPI_BUILD_PROFILING#ifdef FORTRANCAPS#define mf_timemgrdelete_ PMF_TIMEMGRDELETE#elif defined(FORTRANDOUBLEUNDERSCORE)#define mf_timemgrdelete_ pmf_timemgrdelete__#elif !defined(FORTRANUNDERSCORE)#define mf_timemgrdelete_ pmf_timemgrdelete#else#define mf_timemgrdelete_ pmf_timemgrdelete_#endif#else#ifdef FORTRANCAPS#define mf_timemgrdelete_ MF_TIMEMGRDELETE#elif defined(FORTRANDOUBLEUNDERSCORE)#define mf_timemgrdelete_ mf_timemgrdelete__#elif !defined(FORTRANUNDERSCORE)#define mf_timemgrdelete_ mf_timemgrdelete#endif#endif/* Definitions of Fortran Wrapper routines */#if defined(__cplusplus)extern "C" {#endifvoid mf_timemgrinit_(MF_TimeMgr this, MF_Time stepSize, MF_Date startDate, MF_Date stopDate, MF_Date baseDate, int *rc){ *rc = MF_TimeMgrConstruct(this, stepSize, startDate, stopDate, baseDate);}void mf_timemgrinitis_(MF_TimeMgr this, int *stepDays, int *stepSecs, int *startCalendarDate, int *startTOD, int *stopCalendarDate, int *stopTOD, int *baseCalendarDate, int *baseTOD, MF_CalendarType *type, int *rc){ *rc = MF_TimeMgrConstructIS(this, *stepDays, *stepSecs, *startCalendarDate, *startTOD, *stopCalendarDate, *stopTOD, *baseCalendarDate, *baseTOD, *type);}void mf_timemgrinitnobase_(MF_TimeMgr this, MF_Time stepSize, MF_Date startDate, MF_Date stopDate, int *rc){ *rc = MF_TimeMgrConstructNoBase(this, stepSize, startDate, stopDate);}void mf_timemgrinitnobaseis_(MF_TimeMgr this, int *stepDays, int *stepSecs, int *startCalendarDate, int *startTOD, int *stopCalendarDate, int *stopTOD, int *baseCalendarDate, int *baseTOD, MF_CalendarType *type, int *rc){ *rc = MF_TimeMgrConstructNoBaseIS(this, *stepDays, *stepSecs, *startCalendarDate, *startTOD, *stopCalendarDate, *stopTOD, *type);}void mf_timemgradvance_(MF_TimeMgr this, int *rc){ *rc = MF_TimeMgrAdvance(this);}void mf_timemgrlaststep_(MF_TimeMgr this, MF_Bool *lastStep, int *rc){ *rc = MF_TimeMgrLastStep(this, lastStep);}void mf_timemgrsetstepsizestd_(MF_TimeMgr this, MF_Time stepSize, int *rc){ *rc = MF_TimeMgrSetStepSize(this, stepSize);}void mf_timemgrgetstepsizestd_(MF_TimeMgr this, MF_Time stepSize, int *rc){ *rc = MF_TimeMgrGetStepSize(this, stepSize);}void mf_timemgrsetstepsizeis_(MF_TimeMgr this, int *days, int *seconds, int *rc){ *rc = MF_TimeMgrSetStepSizeIS(this, *days, *seconds);}void mf_timemgrgetstepsizeis_(MF_TimeMgr this, int *days, int *seconds, int *rc){ *rc = MF_TimeMgrGetStepSizeIS(this, days, seconds);}void mf_timemgrgetnstep_(MF_TimeMgr this, int *nstep, int *rc){ *rc = MF_TimeMgrGetNStep(this, nstep);}void mf_timemgrsetnstep_(MF_TimeMgr this, int *nstep, int *rc){ *rc = MF_TimeMgrSetNStep(this, *nstep);}void mf_timemgrgetstartdate_(MF_TimeMgr this, MF_Date startDate, int *rc){ *rc = MF_TimeMgrGetStartDate(this, startDate);}void mf_timemgrgetstopdate_(MF_TimeMgr this, MF_Date stopDate, int *rc){ *rc = MF_TimeMgrGetStopDate(this, stopDate);}void mf_timemgrgetbasedate_(MF_TimeMgr this, MF_Date baseDate, int *rc){ *rc = MF_TimeMgrGetBaseDate(this, baseDate);}void mf_timemgrgetcurrdate_(MF_TimeMgr this, MF_Date currDate, int *rc){ *rc = MF_TimeMgrGetCurrDate(this, currDate);}void mf_timemgrsetcurrdateis_(MF_TimeMgr this, int *dateYYMMDD, int *tod, int *rc){ *rc = MF_TimeMgrSetCurrDateIS(this, *dateYYMMDD, *tod);}void mf_timemgrgetprevdate_(MF_TimeMgr this, MF_Date prevDate, int *rc){ *rc = MF_TimeMgrGetPrevDate(this, prevDate);}void mf_timemgrrestartwriteis_(MF_TimeMgr this, MF_CalendarType *type, int *nstep, int *stepDays, int *stepSec, int *startYYMMDD, int *startSec, int *stopYYMMDD, int *stopSec, int *baseYYMMDD, int *baseSec, int *currYYMMDD, int *currSec, int *rc){ *rc = MF_TimeMgrRestartWriteIS(this, type, nstep, stepDays, stepSec, startYYMMDD, startSec, stopYYMMDD, stopSec, baseYYMMDD, baseSec, currYYMMDD, currSec);}void mf_timemgrrestartreadis_(MF_TimeMgr this, MF_CalendarType *type, int *nstep, int *stepDays, int *stepSec, int *startYYMMDD, int *startSec, int *stopYYMMDD, int *stopSec, int *baseYYMMDD, int *baseSec, int *currYYMMDD, int *currSec, int *rc){ *rc = MF_TimeMgrRestartReadIS(this, *type, *nstep, *stepDays, *stepSec, *startYYMMDD, *startSec, *stopYYMMDD, *stopSec, *baseYYMMDD, *baseSec, *currYYMMDD, *currSec);}#if defined(__cplusplus)}#endif
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -