FrontISTR  5.7.1
Large-scale structural analysis program with finit element method
hecmw_init.c
Go to the documentation of this file.
1 /*****************************************************************************
2  * Copyright (c) 2019 FrontISTR Commons
3  * This software is released under the MIT License, see LICENSE.txt
4  *****************************************************************************/
9 #include <stdio.h>
10 #include "hecmw_util.h"
11 #include "hecmw_init.h"
12 /* #include "hecmw_couple_info.h" 2007/12/27 S.Ito */
13 
14 int HECMW_init_ex(int *argc, char ***argv, const char *ctrlfile) {
15  if (HECMW_comm_init(argc, argv)) return -1;
16  HECMW_log(HECMW_LOG_DEBUG, "Initilalizing...");
17  if (ctrlfile == NULL) ctrlfile = HECMW_CTRL_FILE;
18  if (HECMW_ctrl_init_ex(ctrlfile)) return -1;
19  /* if(HECMW_couple_comm_init() != HECMW_SUCCESS) return -1; 2007/12/27
20  * S.Ito */
21  return 0;
22 }
23 
24 int HECMW_init(int *argc, char ***argv) {
25  return HECMW_init_ex(argc, argv, HECMW_CTRL_FILE);
26 }
int HECMW_comm_init(int *argc, char ***argv)
Definition: hecmw_comm.c:666
int HECMW_ctrl_init_ex(const char *ctrlfile)
#define HECMW_CTRL_FILE
Definition: hecmw_control.h:9
int HECMW_init(int *argc, char ***argv)
Definition: hecmw_init.c:24
int HECMW_init_ex(int *argc, char ***argv, const char *ctrlfile)
I/O and Utility.
Definition: hecmw_init.c:14
#define NULL
int HECMW_log(int loglv, const char *fmt,...)
Definition: hecmw_log.c:260
#define HECMW_LOG_DEBUG
Definition: hecmw_log.h:21