m_tetrainteg Module Reference

Functions/Subroutines

subroutine ttritg_search (dmna, dmnr, n1, n2, n3, n4, imt1, fk, gk, xo, dtgt, drg1, drg2, dout)
subroutine ttritg_simple (dmna, dmnr, n1, n2, n3, imt1, fk, gk, xo)
subroutine ttritg_sum (dmna, dmnr, n1, n2, n3, imt1, fk, gk, ne, em, ca1, xo)
subroutine ttritg_sub1simple (h0, h1, h2, h3, ne, em, x0)
subroutine ttritg_sub1g30g21 (h0, h1, h2, h3, ne, em, x0)
subroutine ttritg_sub1g30g20 (h0, h1, h2, h3, ne, em, x0)
subroutine ttritg_sub1g30 (h0, h1, h2, h3, ne, em, x0)
subroutine ttritg_sub1normal (h0, h1, h2, h3, ne, em, x0)
subroutine ttritg_sub2simple (h0, h1, h2, h3, ne, em, x0)
subroutine ttritg_sub2g30g20 (h0, h1, h2, h3, ne, em, x0)
subroutine ttritg_sub2g30g21 (h0, h1, h2, h3, ne, em, x0)
subroutine ttritg_sub2g30g10 (h0, h1, h2, h3, ne, em, x0)
subroutine ttritg_sub2g10 (h0, h1, h2, h3, ne, em, x0)
subroutine ttritg_sub2g30 (h0, h1, h2, h3, ne, em, x0)
subroutine ttritg_sub2normal (h0, h1, h2, h3, ne, em, x0)
subroutine ttritg_mkidx (n1, n2, n3, idx1, bvec1, bvec2, bvec3)

Variables

integer, parameter ttritg_vtx = 4
integer, parameter ttritg_div = 6
integer, parameter nvtx = ttritg_vtx
integer, parameter ndiv = ttritg_div
integer, dimension(/nvtx, ndiv/),
parameter 		ttritg_tbl1 = reshape((/1,2,3,6 ,1,3,5,6 ,3,5,6,7 ,2,3,4,6 ,3,4,6,8 ,3,6,7,8/)

Function/Subroutine Documentation

subroutine m_tetrainteg::ttritg_mkidx ( integer,intent(in)  n1,
integer,intent(in)  n2,
integer,intent(in)  n3,
integer,dimension(nvtx,n1*n2*n3*ndiv),intent(out)  idx1,
real(8),dimension(3),intent(in),optional  bvec1,
real(8),dimension(3),intent(in),optional  bvec2,
real(8),dimension(3),intent(in),optional  bvec3 
)

Definition at line 538 of file m_tetrainteg.F.

Referenced by m_dmx::make_xow().

Here is the caller graph for this function:

subroutine m_tetrainteg::ttritg_search ( real(8),intent(in)  dmna,
real(8),intent(in)  dmnr,
integer,intent(in)  n1,
integer,intent(in)  n2,
integer,intent(in)  n3,
integer,intent(in)  n4,
integer,dimension(nvtx,n1*n2*n3*ndiv),intent(in)  imt1,
complex(8),dimension(n1*n2*n3,n4),intent(in)  fk,
complex(8),dimension(n1*n2*n3,n4),intent(in)  gk,
complex(8),dimension(n1*n2*n3),intent(inout)  xo,
real(8),intent(in)  dtgt,
real(8),intent(in)  drg1,
real(8),intent(in)  drg2,
real(8),intent(out)  dout 
)

Definition at line 76 of file m_tetrainteg.F.

References ttritg_sum().

Here is the call graph for this function:

subroutine m_tetrainteg::ttritg_simple ( real(8),intent(in)  dmna,
real(8),intent(in)  dmnr,
integer,intent(in)  n1,
integer,intent(in)  n2,
integer,intent(in)  n3,
integer,dimension(nvtx,n1*n2*n3*ndiv),intent(in)  imt1,
complex(8),dimension(n1*n2*n3),intent(in)  fk,
complex(8),dimension(n1*n2*n3),intent(in)  gk,
complex(8),dimension(n1*n2*n3),intent(inout)  xo 
)

Definition at line 146 of file m_tetrainteg.F.

References ttritg_sum().

Here is the call graph for this function:

subroutine m_tetrainteg::ttritg_sub1g30 ( complex(8),intent(in)  h0,
complex(8),intent(in)  h1,
complex(8),intent(in)  h2,
complex(8),intent(in)  h3,
integer,intent(in)  ne,
complex(8),dimension(ne),intent(in)  em,
complex(8),dimension(ne),intent(out)  x0 
)

Definition at line 318 of file m_tetrainteg.F.

subroutine m_tetrainteg::ttritg_sub1g30g20 ( complex(8),intent(in)  h0,
complex(8),intent(in)  h1,
complex(8),intent(in)  h2,
complex(8),intent(in)  h3,
integer,intent(in)  ne,
complex(8),dimension(ne),intent(in)  em,
complex(8),dimension(ne),intent(out)  x0 
)

Definition at line 304 of file m_tetrainteg.F.

subroutine m_tetrainteg::ttritg_sub1g30g21 ( complex(8),intent(in)  h0,
complex(8),intent(in)  h1,
complex(8),intent(in)  h2,
complex(8),intent(in)  h3,
integer,intent(in)  ne,
complex(8),dimension(ne),intent(in)  em,
complex(8),dimension(ne),intent(out)  x0 
)

Definition at line 284 of file m_tetrainteg.F.

subroutine m_tetrainteg::ttritg_sub1normal ( complex(8),intent(in)  h0,
complex(8),intent(in)  h1,
complex(8),intent(in)  h2,
complex(8),intent(in)  h3,
integer,intent(in)  ne,
complex(8),dimension(ne),intent(in)  em,
complex(8),dimension(ne),intent(out)  x0 
)

Definition at line 343 of file m_tetrainteg.F.

subroutine m_tetrainteg::ttritg_sub1simple ( complex(8),intent(in)  h0,
complex(8),intent(in)  h1,
complex(8),intent(in)  h2,
complex(8),intent(in)  h3,
integer,intent(in)  ne,
complex(8),dimension(ne),intent(in)  em,
complex(8),dimension(ne),intent(out)  x0 
)

Definition at line 276 of file m_tetrainteg.F.

subroutine m_tetrainteg::ttritg_sub2g10 ( complex(8),intent(in)  h0,
complex(8),intent(in)  h1,
complex(8),intent(in)  h2,
complex(8),intent(in)  h3,
integer,intent(in)  ne,
complex(8),dimension(ne),intent(in)  em,
complex(8),dimension(ne),intent(out)  x0 
)

Definition at line 417 of file m_tetrainteg.F.

Referenced by ttritg_sum().

Here is the caller graph for this function:

subroutine m_tetrainteg::ttritg_sub2g30 ( complex(8),intent(in)  h0,
complex(8),intent(in)  h1,
complex(8),intent(in)  h2,
complex(8),intent(in)  h3,
integer,intent(in)  ne,
complex(8),dimension(ne),intent(in)  em,
complex(8),dimension(ne),intent(out)  x0 
)

Definition at line 435 of file m_tetrainteg.F.

Referenced by ttritg_sum().

Here is the caller graph for this function:

subroutine m_tetrainteg::ttritg_sub2g30g10 ( complex(8),intent(in)  h0,
complex(8),intent(in)  h1,
complex(8),intent(in)  h2,
complex(8),intent(in)  h3,
integer,intent(in)  ne,
complex(8),dimension(ne),intent(in)  em,
complex(8),dimension(ne),intent(out)  x0 
)

Definition at line 402 of file m_tetrainteg.F.

Referenced by ttritg_sum().

Here is the caller graph for this function:

subroutine m_tetrainteg::ttritg_sub2g30g20 ( complex(8),intent(in)  h0,
complex(8),intent(in)  h1,
complex(8),intent(in)  h2,
complex(8),intent(in)  h3,
integer,intent(in)  ne,
complex(8),dimension(ne),intent(in)  em,
complex(8),dimension(ne),intent(out)  x0 
)

Definition at line 377 of file m_tetrainteg.F.

Referenced by ttritg_sub2g30g21(), and ttritg_sum().

Here is the caller graph for this function:

subroutine m_tetrainteg::ttritg_sub2g30g21 ( complex(8),intent(in)  h0,
complex(8),intent(in)  h1,
complex(8),intent(in)  h2,
complex(8),intent(in)  h3,
integer,intent(in)  ne,
complex(8),dimension(ne),intent(in)  em,
complex(8),dimension(ne),intent(out)  x0 
)

Definition at line 394 of file m_tetrainteg.F.

References ttritg_sub2g30g20().

Referenced by ttritg_sum().

Here is the call graph for this function:

Here is the caller graph for this function:

subroutine m_tetrainteg::ttritg_sub2normal ( complex(8),intent(in)  h0,
complex(8),intent(in)  h1,
complex(8),intent(in)  h2,
complex(8),intent(in)  h3,
integer,intent(in)  ne,
complex(8),dimension(ne),intent(in)  em,
complex(8),dimension(ne),intent(out)  x0 
)

Definition at line 456 of file m_tetrainteg.F.

Referenced by ttritg_sum().

Here is the caller graph for this function:

subroutine m_tetrainteg::ttritg_sub2simple ( complex(8),intent(in)  h0,
complex(8),intent(in)  h1,
complex(8),intent(in)  h2,
complex(8),intent(in)  h3,
integer,intent(in)  ne,
complex(8),dimension(ne),intent(in)  em,
complex(8),dimension(ne),intent(out)  x0 
)

Definition at line 369 of file m_tetrainteg.F.

Referenced by ttritg_sum().

Here is the caller graph for this function:

subroutine m_tetrainteg::ttritg_sum ( real(8),intent(in)  dmna,
real(8),intent(in)  dmnr,
integer,intent(in)  n1,
integer,intent(in)  n2,
integer,intent(in)  n3,
integer,dimension(nvtx,n1*n2*n3*ndiv),intent(in)  imt1,
complex(8),dimension(n1*n2*n3),intent(in)  fk,
complex(8),dimension(n1*n2*n3),intent(in)  gk,
integer,intent(in)  ne,
complex(8),dimension(ne),intent(in)  em,
complex(8),dimension(ne*nvtx),intent(out)  ca1,
complex(8),dimension(ne,n1*n2*n3),intent(inout)  xo 
)

Definition at line 161 of file m_tetrainteg.F.

References ttritg_sub2g10(), ttritg_sub2g30(), ttritg_sub2g30g10(), ttritg_sub2g30g20(), ttritg_sub2g30g21(), ttritg_sub2normal(), and ttritg_sub2simple().

Referenced by m_dmx::make_xow(), ttritg_search(), and ttritg_simple().

Here is the call graph for this function:

Here is the caller graph for this function:

Variable Documentation

integer,parameter m_tetrainteg::ndiv = ttritg_div

Definition at line 64 of file m_tetrainteg.F.

integer,parameter m_tetrainteg::nvtx = ttritg_vtx

Definition at line 63 of file m_tetrainteg.F.

integer,parameter m_tetrainteg::ttritg_div = 6

Definition at line 62 of file m_tetrainteg.F.

integer,dimension(/nvtx,ndiv/),parameter m_tetrainteg::ttritg_tbl1 = reshape((/1,2,3,6 ,1,3,5,6 ,3,5,6,7 ,2,3,4,6 ,3,4,6,8 ,3,6,7,8/)

Definition at line 65 of file m_tetrainteg.F.

integer,parameter m_tetrainteg::ttritg_vtx = 4

Definition at line 61 of file m_tetrainteg.F.

Generated on 17 Nov 2020 for respack by  doxygen 1.6.1