The TELEMAC-MASCARET system  trunk
Functions/Subroutines
sd_strssd.f File Reference

Go to the source code of this file.

Functions/Subroutines

subroutine sd_strssd (NPBLK, NSEGBLK, GLOSEG1, GLOSEG2, IN, IP, ISEGIP, IW)
 

Function/Subroutine Documentation

◆ sd_strssd()

subroutine sd_strssd ( integer, intent(in)  NPBLK,
integer, intent(in)  NSEGBLK,
integer, dimension(nsegblk), intent(in)  GLOSEG1,
integer, dimension(nsegblk), intent(in)  GLOSEG2,
integer, dimension(npblk+1), intent(inout)  IN,
integer, dimension(nsegblk*2), intent(inout)  IP,
integer, dimension(nsegblk*2), intent(inout)  ISEGIP,
integer, dimension(npblk), intent(inout)  IW 
)
Parameters
[in]nsegblkGLOSEG1 First point of segments
[in]GLOSEG2Second point of segments
[out]IN(in, ip) compact storage of extradiagonal terms
[out]IP(in, ip) compact storage of extradiagonal terms
[out]ISEGIPInverse table of connectivity: point–>segment
[out]IWNumber of neighbours of points
[in]NPBLKNumber of points
[in]NSEGBLKNumber of segments
[in]npblkGLOSEG1 First point of segments
[in]GLOSEG2Second point of segments
[out]IN(in, ip) compact storage of extradiagonal terms
[out]IP(in, ip) compact storage of extradiagonal terms
[out]ISEGIPInverse table of connectivity: point–>segment
[out]IWNumber of neighbours of points
[in]NPBLKNumber of points
[in]NSEGBLKNumber of segments

Definition at line 7 of file sd_strssd.f.

+ Here is the caller graph for this function: