Go to the source code of this file.
|
subroutine | centre_mass_seg (X, Y, COORD_G, IKLE, NPOIN, ELTSEG, ORISEG, NELEM, NSEG, JMI, CMI, GLOSEG, IFABOR, MESH) |
|
◆ centre_mass_seg()
subroutine centre_mass_seg |
( |
double precision, dimension(npoin), intent(in) |
X, |
|
|
double precision, dimension(npoin), intent(in) |
Y, |
|
|
double precision, dimension(nseg,4), intent(inout) |
COORD_G, |
|
|
integer, dimension(nelem,3), intent(in) |
IKLE, |
|
|
integer, intent(in) |
NPOIN, |
|
|
integer, dimension(nelem,3), intent(in) |
ELTSEG, |
|
|
integer, dimension(nelem,3), intent(in) |
ORISEG, |
|
|
integer, intent(in) |
NELEM, |
|
|
integer, intent(in) |
NSEG, |
|
|
integer, dimension(nseg), intent(inout) |
JMI, |
|
|
double precision, dimension(2,nseg), intent(inout) |
CMI, |
|
|
integer, dimension(nseg,2), intent(in) |
GLOSEG, |
|
|
integer, dimension(nelem,3), intent(in) |
IFABOR, |
|
|
type(bief_mesh), intent(inout) |
MESH |
|
) |
| |
- Parameters
-
[in] | nseg | ORISEG Orientation of segments forming an ELEMENT 1:ANTI 2:CLOCKWISE |
[in] | X | Abscissae of points in the mesh |
[in] | Y | Ordinates of points in the mesh |
[in] | nelem | ORISEG Orientation of segments forming an ELEMENT 1:ANTI 2:CLOCKWISE |
[in] | X | Abscissae of points in the mesh |
[in] | Y | Ordinates of points in the mesh |
[in] | npoin | ORISEG Orientation of segments forming an ELEMENT 1:ANTI 2:CLOCKWISE |
[in] | X | Abscissae of points in the mesh |
[in] | Y | Ordinates of points in the mesh |
Definition at line 8 of file centre_mass_seg.f.