FrontISTR  5.7.0
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 }
hecmw_init.h
HECMW_LOG_DEBUG
#define HECMW_LOG_DEBUG
Definition: hecmw_log.h:21
HECMW_log
int HECMW_log(int loglv, const char *fmt,...)
Definition: hecmw_log.c:260
HECMW_ctrl_init_ex
int HECMW_ctrl_init_ex(const char *ctrlfile)
Definition: hecmw_control.c:2021
HECMW_init_ex
int HECMW_init_ex(int *argc, char ***argv, const char *ctrlfile)
I/O and Utility.
Definition: hecmw_init.c:14
HECMW_CTRL_FILE
#define HECMW_CTRL_FILE
Definition: hecmw_control.h:9
HECMW_init
int HECMW_init(int *argc, char ***argv)
Definition: hecmw_init.c:24
NULL
#define NULL
Definition: hecmw_io_nastran.c:30
HECMW_comm_init
int HECMW_comm_init(int *argc, char ***argv)
Definition: hecmw_comm.c:666
hecmw_util.h