FrontISTR  5.2.0
Large-scale structural analysis program with finit element method
fstr_ctrl_util_f.inc
Go to the documentation of this file.
1 ! external functions implemented in fstr_ctr_util.c
2 
4 
5 external fstr_ctrl_dump
6 
7 external fstr_ctrl_open
9 external fstr_ctrl_get_line
10 external fstr_ctrl_seek_header
14 external fstr_ctrl_get_c_h_pos
15 external fstr_ctrl_get_param
18 ! external fstr_ctrl_copy_data_line
22 external fstr_ctrl_get_data
23 ! external fstr_ctrl_get_data_v
24 external fstr_ctrl_get_data_ex
25 ! external fstr_ctrl_get_data_array
26 ! external fstr_ctrl_get_data_array_v
28 external fstr_ctrl_close
29 external fstr_ctrl_rewind
30 
31 integer(kind=kint) :: fstr_ctrl_open
32 integer(kind=kint) :: fstr_ctrl_get_rec_number
33 integer(kind=kint) :: fstr_ctrl_get_line
34 integer(kind=kint) :: fstr_ctrl_seek_header
35 integer(kind=kint) :: fstr_ctrl_seek_next_header
36 integer(kind=kint) :: fstr_ctrl_get_c_h_name
37 integer(kind=kint) :: fstr_ctrl_get_c_h_line_no
38 integer(kind=kint) :: fstr_ctrl_get_c_h_pos
39 integer(kind=kint) :: fstr_ctrl_get_param
40 integer(kind=kint) :: fstr_ctrl_get_param_ex
41 integer(kind=kint) :: fstr_ctrl_get_data_line_n
42 ! integer(kind=kint) :: fstr_ctrl_copy_data_line
43 integer(kind=kint) :: fstr_ctrl_get_data_n_in_line
44 integer(kind=kint) :: fstr_ctrl_get_data_error_pos
45 integer(kind=kint) :: fstr_ctrl_get_data_error_line
46 integer(kind=kint) :: fstr_ctrl_get_data
47 ! integer(kind=kint) :: fstr_ctrl_get_data_v
48 integer(kind=kint) :: fstr_ctrl_get_data_ex
49 ! integer(kind=kint) :: fstr_ctrl_get_data_array
50 ! integer(kind=kint) :: fstr_ctrl_get_data_array_v
51 integer(kind=kint) :: fstr_ctrl_get_data_array_ex
52 integer(kind=kint) :: fstr_ctrl_close
53 integer(kind=kint) :: fstr_ctrl_rewind
54 
55 private :: fstr_ctrl_get_err_msg
56 private :: fstr_ctrl_dump
57 
58 private :: fstr_ctrl_open
59 private :: fstr_ctrl_get_rec_number
60 private :: fstr_ctrl_get_line
61 private :: fstr_ctrl_seek_header
63 private :: fstr_ctrl_get_c_h_name
65 private :: fstr_ctrl_get_c_h_pos
66 private :: fstr_ctrl_get_param
67 private :: fstr_ctrl_get_param_ex
69 ! private :: fstr_ctrl_copy_data_line
73 private :: fstr_ctrl_get_data
74 ! private :: fstr_ctrl_get_data_v
75 private :: fstr_ctrl_get_data_ex
76 ! private :: fstr_ctrl_get_data_array
77 ! private :: fstr_ctrl_get_data_array_v
79 private :: fstr_ctrl_close
80 private :: fstr_ctrl_rewind
81 
82 
83 
84 
int fstr_ctrl_get_param_ex(int *ctrl, const char *param_name, const char *value_list, int *necessity, char *type, void *val)
int fstr_ctrl_get_c_h_line_no(int *ctrl)
int fstr_ctrl_close(int *ctrl)
int fstr_ctrl_get_rec_number(int *ctrl)
int fstr_ctrl_get_data_n_in_line(int *ctrl, int *line_no, const char *delim)
int fstr_ctrl_get_data_line_n(int *ctrl)
int fstr_ctrl_seek_next_header(int *ctrl)
void fstr_ctrl_get_err_msg(char *f_buff, int *len)
int fstr_ctrl_get_data_error_pos(void)
int fstr_ctrl_get_line(int *ctrl, int *rec_no, char *buff, int *buff_size)
int fstr_ctrl_get_data_error_line(void)
int fstr_ctrl_get_data_array_ex(int *ctrl, const char *format,...)
int fstr_ctrl_seek_header(int *ctrl, const char *header_name)
int fstr_ctrl_open(char *filename)
void fstr_ctrl_dump(int *ctrl)
int fstr_ctrl_get_data(int *ctrl, int *line_no, const char *format,...)
int fstr_ctrl_get_c_h_name(int *ctrl, char *header_name, int *buff_size)
int fstr_ctrl_get_data_ex(int *ctrl, int *line_no, const char *format,...)
int fstr_ctrl_get_c_h_pos(int *ctrl)
int fstr_ctrl_rewind(int *ctrl)
int fstr_ctrl_get_param(int *ctrl, const char *param_name, const char *value_list, char *type, void *val)
integer(kind=4), parameter kint