Go to the source code of this file.
|
subroutine | get_bnd_value (FFORMAT, FID, TYP_BND_ELEM, NELEBD, LIHBOR, LIUBOR, LIVBOR, HBOR, UBOR, VBOR, CHBORD, TRAC, LITBOR, TBOR, ATBOR, BTBOR, NPTFR, IERR) |
|
◆ get_bnd_value()
subroutine get_bnd_value |
( |
character(len=8), intent(in) |
FFORMAT, |
|
|
integer, intent(in) |
FID, |
|
|
integer, intent(in) |
TYP_BND_ELEM, |
|
|
integer, intent(in) |
NELEBD, |
|
|
integer, dimension(nptfr), intent(inout) |
LIHBOR, |
|
|
integer, dimension(nptfr), intent(inout) |
LIUBOR, |
|
|
integer, dimension(nptfr), intent(inout) |
LIVBOR, |
|
|
double precision, dimension(nptfr), intent(inout) |
HBOR, |
|
|
double precision, dimension(*), intent(inout) |
UBOR, |
|
|
double precision, dimension(*), intent(inout) |
VBOR, |
|
|
double precision, dimension(nptfr), intent(inout) |
CHBORD, |
|
|
logical, intent(in) |
TRAC, |
|
|
integer, dimension(*), intent(inout) |
LITBOR, |
|
|
double precision, dimension(*), intent(inout) |
TBOR, |
|
|
double precision, dimension(*), intent(inout) |
ATBOR, |
|
|
double precision, dimension(*), intent(inout) |
BTBOR, |
|
|
integer, intent(in) |
NPTFR, |
|
|
integer, intent(out) |
IERR |
|
) |
| |
- Parameters
-
[in] | fformat | NPTFR Number of boundary points |
[out] | IERR | 0 if no error during the execution |
Definition at line 9 of file get_bnd_value.f.