FrontISTR  5.7.1
Large-scale structural analysis program with finit element method
hecmw_system.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  *****************************************************************************/
5 
6 #include <stdio.h>
7 #include <stdlib.h>
8 #include <math.h>
9 #include "hecmw_geometric.h"
10 #include "hecmw_system.h"
11 
12 int HECMW_system(struct hecmw_system_param *param, struct hecmw_coord *coord,
13  struct hecmw_coord *result) {
14  if (param == NULL) {
15  /* do nothing */
16  *result = *coord;
17  return 0;
18  }
19  if (coord == NULL) return -1;
20  if (result == NULL) return -1;
21 
22  *result = *coord;
23 
24  return 0;
25 }
#define NULL
int HECMW_system(struct hecmw_system_param *param, struct hecmw_coord *coord, struct hecmw_coord *result)
Definition: hecmw_system.c:12