FrontISTR 5.2.0
Large-scale structural analysis program with finit element method
Loading...
Searching...
No Matches
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
12int 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