The TELEMACMASCARET system
trunk

Go to the source code of this file.
Functions/Subroutines  
subroutine  matriy (FORMUL, XM, TYPDIA, TYPEXT, XMUL, SF, SG, SH, SU, SV, SW, F, G, H, U, V, W, T, LEGO, XEL, YEL, ZEL, XPT, YPT, ZPT, SURFAC, LGSEG, IKLE, IKLBOR, NBOR, NELBOR, NULONE, NELEM, NELMAX, NELEB, NELEBX, IELM1, IELM2, S, NPLAN, MESH, SIZEXMT, STOX) 
subroutine matriy  (  character(len=16), intent(in)  FORMUL, 
double precision, dimension(sizexmt,*), intent(inout)  XM,  
character(len=1), intent(inout)  TYPDIA,  
character(len=1), intent(inout)  TYPEXT,  
double precision, intent(in)  XMUL,  
type(bief_obj), intent(in)  SF,  
type(bief_obj), intent(in)  SG,  
type(bief_obj), intent(in)  SH,  
type(bief_obj), intent(in)  SU,  
type(bief_obj), intent(in)  SV,  
type(bief_obj), intent(in)  SW,  
double precision, dimension(*), intent(in)  F,  
double precision, dimension(*), intent(in)  G,  
double precision, dimension(*), intent(in)  H,  
double precision, dimension(*), intent(in)  U,  
double precision, dimension(*), intent(in)  V,  
double precision, dimension(*), intent(in)  W,  
double precision, dimension(sizexmt,*), intent(inout)  T,  
logical, intent(inout)  LEGO,  
double precision, dimension(*), intent(in)  XEL,  
double precision, dimension(*), intent(in)  YEL,  
double precision, dimension(*), intent(in)  ZEL,  
double precision, dimension(*), intent(in)  XPT,  
double precision, dimension(*), intent(in)  YPT,  
double precision, dimension(*), intent(in)  ZPT,  
double precision, dimension(nelmax), intent(in)  SURFAC,  
double precision, dimension(nelebx), intent(in)  LGSEG,  
integer, dimension(nelmax,*), intent(in)  IKLE,  
integer, dimension(nelebx,*), intent(in)  IKLBOR,  
integer, dimension(*), intent(in)  NBOR,  
integer, dimension(nelebx), intent(in)  NELBOR,  
integer, dimension(nelebx,*), intent(in)  NULONE,  
integer, intent(in)  NELEM,  
integer, intent(in)  NELMAX,  
integer, intent(in)  NELEB,  
integer, intent(in)  NELEBX,  
integer, intent(in)  IELM1,  
integer, intent(in)  IELM2,  
integer, intent(in)  S,  
integer, intent(in)  NPLAN,  
type(bief_mesh), intent(inout)  MESH,  
integer, intent(in)  SIZEXMT,  
integer, intent(inout)  STOX  
) 
[in]  nelmax  F Function used in the formula 
[in]  FORMUL  Formula describing the resulting matrix 
[in]  G  Function used in the formula 
[in]  H  Function used in the formula 
[in]  IELM1  Type of element for lines 
[in]  IELM2  Type of element for columns 
[in]  IKLBOR  Boundary elements connectivity table. 
[in]  IKLE  Connectivity table. 
[in]  LEGO  If yes: assemble the diagonal 
[in]  LGSEG  Length of segments on 2d boundaries 
[in]  NBOR  Global number of boundary points 
[in]  NELBOR  Adjacent element number 
[in]  NELEB  Number of boundary elements 
[in]  NELEBX  Maximum number of boundary elements 
[in]  NELEM  Number of elements 
[in]  NELMAX  Maximum number of elements 
[in]  NULONE  Local numbering of boundary element in adjacent ELEMENT. 
[in]  S  Type of matrix storage 
[in]  SF  Structure of functions f 
[in]  SG  Structure of functions g 
[in]  SH  Structure of functions h 
[in]  SU  Structure of functions u 
[in]  SV  Structure of functions v 
[in]  SW  Structure of functions w 
[out]  STOX  Storage option of offdiagonal terms 1=(NELMAX,NDP) 2=(NDP,NELMAX) 
[in]  SURFAC  Area of 2d elements 
[in,out]  T  Work array for element by element diagonal 
[out]  TYPDIA  Type of diagonal 
[out]  TYPEXT  Type of offdiagonal terms 
[in]  U  Function used in the formula (component of vector) 
[in]  V  Function used in the formula (component of vector) 
[in]  W  Function used in the formula (component of vector) 
[in]  XEL  Abscissae of points, per element 
[in]  YEL  Ordinates of points, per element 
[in]  ZEL  Elevations of points, per element 
[in,out]  XM  Offdiagonal terms 
[in]  XMUL  Coefficient for multiplication 
[in]  nelem  F Function used in the formula 
[in]  FORMUL  Formula describing the resulting matrix 
[in]  G  Function used in the formula 
[in]  H  Function used in the formula 
[in]  IELM1  Type of element for lines 
[in]  IELM2  Type of element for columns 
[in]  IKLBOR  Boundary elements connectivity table. 
[in]  IKLE  Connectivity table. 
[in]  LEGO  If yes: assemble the diagonal 
[in]  LGSEG  Length of segments on 2d boundaries 
[in]  NBOR  Global number of boundary points 
[in]  NELBOR  Adjacent element number 
[in]  NELEB  Number of boundary elements 
[in]  NELEBX  Maximum number of boundary elements 
[in]  NELEM  Number of elements 
[in]  NELMAX  Maximum number of elements 
[in]  NULONE  Local numbering of boundary element in adjacent ELEMENT. 
[in]  S  Type of matrix storage 
[in]  SF  Structure of functions f 
[in]  SG  Structure of functions g 
[in]  SH  Structure of functions h 
[in]  SU  Structure of functions u 
[in]  SV  Structure of functions v 
[in]  SW  Structure of functions w 
[out]  STOX  Storage option of offdiagonal terms 1=(NELMAX,NDP) 2=(NDP,NELMAX) 
[in]  SURFAC  Area of 2d elements 
[in,out]  T  Work array for element by element diagonal 
[out]  TYPDIA  Type of diagonal 
[out]  TYPEXT  Type of offdiagonal terms 
[in]  U  Function used in the formula (component of vector) 
[in]  V  Function used in the formula (component of vector) 
[in]  W  Function used in the formula (component of vector) 
[in]  XEL  Abscissae of points, per element 
[in]  YEL  Ordinates of points, per element 
[in]  ZEL  Elevations of points, per element 
[in,out]  XM  Offdiagonal terms 
[in]  XMUL  Coefficient for multiplication 
[in]  ielm1  F Function used in the formula 
[in]  FORMUL  Formula describing the resulting matrix 
[in]  G  Function used in the formula 
[in]  H  Function used in the formula 
[in]  IELM1  Type of element for lines 
[in]  IELM2  Type of element for columns 
[in]  IKLBOR  Boundary elements connectivity table. 
[in]  IKLE  Connectivity table. 
[in]  LEGO  If yes: assemble the diagonal 
[in]  LGSEG  Length of segments on 2d boundaries 
[in]  NBOR  Global number of boundary points 
[in]  NELBOR  Adjacent element number 
[in]  NELEB  Number of boundary elements 
[in]  NELEBX  Maximum number of boundary elements 
[in]  NELEM  Number of elements 
[in]  NELMAX  Maximum number of elements 
[in]  NULONE  Local numbering of boundary element in adjacent ELEMENT. 
[in]  S  Type of matrix storage 
[in]  SF  Structure of functions f 
[in]  SG  Structure of functions g 
[in]  SH  Structure of functions h 
[in]  SU  Structure of functions u 
[in]  SV  Structure of functions v 
[in]  SW  Structure of functions w 
[out]  STOX  Storage option of offdiagonal terms 1=(NELMAX,NDP) 2=(NDP,NELMAX) 
[in]  SURFAC  Area of 2d elements 
[in,out]  T  Work array for element by element diagonal 
[out]  TYPDIA  Type of diagonal 
[out]  TYPEXT  Type of offdiagonal terms 
[in]  U  Function used in the formula (component of vector) 
[in]  V  Function used in the formula (component of vector) 
[in]  W  Function used in the formula (component of vector) 
[in]  XEL  Abscissae of points, per element 
[in]  YEL  Ordinates of points, per element 
[in]  ZEL  Elevations of points, per element 
[in,out]  XM  Offdiagonal terms 
[in]  XMUL  Coefficient for multiplication 
[in]  ielm2  F Function used in the formula 
[in]  FORMUL  Formula describing the resulting matrix 
[in]  G  Function used in the formula 
[in]  H  Function used in the formula 
[in]  IELM1  Type of element for lines 
[in]  IELM2  Type of element for columns 
[in]  IKLBOR  Boundary elements connectivity table. 
[in]  IKLE  Connectivity table. 
[in]  LEGO  If yes: assemble the diagonal 
[in]  LGSEG  Length of segments on 2d boundaries 
[in]  NBOR  Global number of boundary points 
[in]  NELBOR  Adjacent element number 
[in]  NELEB  Number of boundary elements 
[in]  NELEBX  Maximum number of boundary elements 
[in]  NELEM  Number of elements 
[in]  NELMAX  Maximum number of elements 
[in]  NULONE  Local numbering of boundary element in adjacent ELEMENT. 
[in]  S  Type of matrix storage 
[in]  SF  Structure of functions f 
[in]  SG  Structure of functions g 
[in]  SH  Structure of functions h 
[in]  SU  Structure of functions u 
[in]  SV  Structure of functions v 
[in]  SW  Structure of functions w 
[out]  STOX  Storage option of offdiagonal terms 1=(NELMAX,NDP) 2=(NDP,NELMAX) 
[in]  SURFAC  Area of 2d elements 
[in,out]  T  Work array for element by element diagonal 
[out]  TYPDIA  Type of diagonal 
[out]  TYPEXT  Type of offdiagonal terms 
[in]  U  Function used in the formula (component of vector) 
[in]  V  Function used in the formula (component of vector) 
[in]  W  Function used in the formula (component of vector) 
[in]  XEL  Abscissae of points, per element 
[in]  YEL  Ordinates of points, per element 
[in]  ZEL  Elevations of points, per element 
[in,out]  XM  Offdiagonal terms 
[in]  XMUL  Coefficient for multiplication 
[in]  s  F Function used in the formula 
[in]  FORMUL  Formula describing the resulting matrix 
[in]  G  Function used in the formula 
[in]  H  Function used in the formula 
[in]  IELM1  Type of element for lines 
[in]  IELM2  Type of element for columns 
[in]  IKLBOR  Boundary elements connectivity table. 
[in]  IKLE  Connectivity table. 
[in]  LEGO  If yes: assemble the diagonal 
[in]  LGSEG  Length of segments on 2d boundaries 
[in]  NBOR  Global number of boundary points 
[in]  NELBOR  Adjacent element number 
[in]  NELEB  Number of boundary elements 
[in]  NELEBX  Maximum number of boundary elements 
[in]  NELEM  Number of elements 
[in]  NELMAX  Maximum number of elements 
[in]  NULONE  Local numbering of boundary element in adjacent ELEMENT. 
[in]  S  Type of matrix storage 
[in]  SF  Structure of functions f 
[in]  SG  Structure of functions g 
[in]  SH  Structure of functions h 
[in]  SU  Structure of functions u 
[in]  SV  Structure of functions v 
[in]  SW  Structure of functions w 
[out]  STOX  Storage option of offdiagonal terms 1=(NELMAX,NDP) 2=(NDP,NELMAX) 
[in]  SURFAC  Area of 2d elements 
[in,out]  T  Work array for element by element diagonal 
[out]  TYPDIA  Type of diagonal 
[out]  TYPEXT  Type of offdiagonal terms 
[in]  U  Function used in the formula (component of vector) 
[in]  V  Function used in the formula (component of vector) 
[in]  W  Function used in the formula (component of vector) 
[in]  XEL  Abscissae of points, per element 
[in]  YEL  Ordinates of points, per element 
[in]  ZEL  Elevations of points, per element 
[in,out]  XM  Offdiagonal terms 
[in]  XMUL  Coefficient for multiplication 
>>>
Definition at line 11 of file matriy.f.