GRIDMAN
grid managment library
Functions/Subroutines
addsurf.f File Reference

Reading Additional Surfaces from EIRENE input file. More...

Go to the source code of this file.

Functions/Subroutines

subroutine gridman_addsurf2d_read_array (FNAME, NSURF, X, Y, ISRF, IERR)
 Read planar (2D) Additional Surfaces from EIRENE input file. More...
 
subroutine gridman_addsurf3d_read_array (FNAME, NSURF, X, Y, Z, ISRF, IERR)
 Read triangular Additional Surfaces (3.0<=RLBND<4) from EIRENE input file. More...
 

Detailed Description

Reading Additional Surfaces from EIRENE input file.

Definition in file addsurf.f.

Function/Subroutine Documentation

subroutine gridman_addsurf2d_read_array ( character(*), intent(in)  FNAME,
integer(gridman_sp), intent(out)  NSURF,
real(gridman_dp), dimension(:,:), allocatable  X,
real(gridman_dp), dimension(:,:), allocatable  Y,
integer(gridman_sp), dimension(:), allocatable  ISRF,
integer, intent(out)  IERR 
)

Read planar (2D) Additional Surfaces from EIRENE input file.

This subroutine only reads surfaces defined as interval on (X,Y) plane: 2.0<=RLBND<3.0

WARNING: arrays X, Y, ISURF must NOT be allocated in advance, they are allocated in the subroutine itself. Arrays which already exist will be re-allocated

GRIDMAN_ADDSURF2D_READ_ARRAY and GRIDMAN_ADDSURF2D_READ_GRID are combined in the interface GRIDMAN_ADDSURF2D_READ

Parameters
[in]fnameString containing the name of input file
[out]nsurfNumber of read plane edges
xX coordinates of the edge vertices, X(2,NSURF)
yY coordinates of the edge vertices, Y(2,NSURF)
isrfIndex of EIRENE surface, ISRF(NSURF)

ISRF(I) is the index of EIRENE surface which corresponds to edge I in arrays X,Y

Parameters
[out]ierrError code

Definition at line 37 of file addsurf.f.

References gridman::gridman_dbg, gridman::gridman_dp, gridman::gridman_sp, and gridman::gridman_unit.

Referenced by gridman_addsurf2d_read_grid().

Here is the caller graph for this function:

subroutine gridman_addsurf3d_read_array ( character(*), intent(in)  FNAME,
integer(gridman_sp), intent(out)  NSURF,
real(gridman_dp), dimension(:,:), allocatable  X,
real(gridman_dp), dimension(:,:), allocatable  Y,
real(gridman_dp), dimension(:,:), allocatable  Z,
integer(gridman_sp), dimension(:), allocatable  ISRF,
integer, intent(out)  IERR 
)

Read triangular Additional Surfaces (3.0<=RLBND<4) from EIRENE input file.

Todo:
To add reader for ABAQUS format

WARNING: arrays X, Y, Z, ISURF must NOT be allocated in advance, they are allocated in the subroutine itself. Arrays which already exist will be re-allocated

GRIDMAN_ADDSURF3D_READ_ARRAY and GRIDMAN_ADDSURF3D_READ_GRID are combined in the interface GRIDMAN_ADDSURF_READ

Parameters
[in]fnameString containing the name of input file
[out]nsurfNumber of triangles read
xX coordinates of the triangle vertices, X(3,NSURF)
yY coordinates ... , Y(3,NSURF)
zZ coordinates ... , Z(3,NSURF)
isrfIndex of EIRENE surface, ISRF(NSURF)

ISRF(I) is the index of EIRENE surface which corresponds to edge I in arrays X,Y,Z

Parameters
[out]ierrError code

Definition at line 237 of file addsurf.f.

References gridman::gridman_dbg, gridman::gridman_dp, gridman::gridman_sp, and gridman::gridman_unit.

Referenced by gridman_addsurf3d_read_grid().

Here is the caller graph for this function: