Go to the source code of this file.
|
subroutine | comp_fac (ELTSEG, ORISEG, IFABOR, NELEM, NPOIN, IFAC) |
|
◆ comp_fac()
subroutine comp_fac |
( |
integer, dimension(nelem,3), intent(in) |
ELTSEG, |
|
|
integer, dimension(nelem,3), intent(in) |
ORISEG, |
|
|
integer, dimension(nelem,3), intent(in) |
IFABOR, |
|
|
integer, intent(in) |
NELEM, |
|
|
integer, intent(in) |
NPOIN, |
|
|
type(bief_obj), intent(inout) |
IFAC |
|
) |
| |
- Parameters
-
[in] | nelem | ELTSEG Gives the segment number of edges of elements |
[in] | ORISEG | Orientation of segments (1 or 2). |
[in,out] | FAC | Coefficient for computing dot products in // |
[in] | IFABOR | -2 means interface with another sub-domain |
[in] | NELEM | Number of elements |
[in] | NPOIN | Number of points |
[in] | npoin | ELTSEG Gives the segment number of edges of elements |
[in] | ORISEG | Orientation of segments (1 or 2). |
[in,out] | FAC | Coefficient for computing dot products in // |
[in] | IFABOR | -2 means interface with another sub-domain |
[in] | NELEM | Number of elements |
[in] | NPOIN | Number of points |
Definition at line 7 of file comp_fac.f.