Go to the source code of this file.
|
| subroutine | get_msh_data |
| |
| subroutine | skip (FILE_UNIT, N_SKIP) |
| |
| subroutine | text_hex2int (STRING, INT) |
| |
| subroutine | text_dec2int (STRING, INT) |
| |
| subroutine | get_stl_data |
| |
| subroutine | eval_stl_fct_at (TYPE_OF_CELL, IJK, NODE, f_stl, CLIP_FLAG, B |
| |
| subroutine | intersect_line_with_facet (xa, ya, za, xb, yb, zb, FACET, INTERSECT |
| |
| subroutine | is_point_inside_facet (Px, Py, Pz, FACET, INSIDE_FACET) |
| |
| subroutine eval_stl_fct_at |
( |
character (len=*) |
TYPE_OF_CELL, |
|
|
integer |
IJK, |
|
|
integer |
NODE, |
|
|
double precision |
f_stl, |
|
|
logical |
CLIP_FLAG, |
|
|
|
B |
|
) |
| |
| subroutine get_msh_data |
( |
| ) |
|
| subroutine get_stl_data |
( |
| ) |
|
| subroutine intersect_line_with_facet |
( |
double precision |
xa, |
|
|
double precision |
ya, |
|
|
double precision |
za, |
|
|
double precision |
xb, |
|
|
double precision |
yb, |
|
|
double precision |
zb, |
|
|
integer |
FACET, |
|
|
|
INTERSECT |
|
) |
| |
| subroutine is_point_inside_facet |
( |
double precision |
Px, |
|
|
double precision |
Py, |
|
|
double precision |
Pz, |
|
|
integer |
FACET, |
|
|
logical |
INSIDE_FACET |
|
) |
| |
| subroutine skip |
( |
integer, intent(in) |
FILE_UNIT, |
|
|
integer, intent(in) |
N_SKIP |
|
) |
| |
| subroutine text_dec2int |
( |
character(len=*) |
STRING, |
|
|
integer |
INT |
|
) |
| |
| subroutine text_hex2int |
( |
character(len=*) |
STRING, |
|
|
integer |
INT |
|
) |
| |