m_tetrahedron_20170325.F File Reference

Go to the source code of this file.

Modules
module	m_tetrahedron
Functions/Subroutines
subroutine	m_tetrahedron::ttrhdrn_simple (dmna, dmnr, n1, n2, n3, imt1, fk, gk, xo)
subroutine	m_tetrahedron::ttrhdrn_sum (dmna, dmnr, n1, n2, n3, imt1, fk, gk, ne, em, ca1, xo)
subroutine	m_tetrahedron::ttrhdrn_chi0 (dmna, dmnr, n1, n2, n3, imt1, e1, e2, f1, f2, delt, dsgn, ne, em, ca1, xo)
subroutine	m_tetrahedron::ttrhdrn_sub1simple (g0, g1, g2, g3, ne, em, x0)
subroutine	m_tetrahedron::ttrhdrn_sub1g30g21 (g0, g1, g2, g3, ne, em, x0)
subroutine	m_tetrahedron::ttrhdrn_sub1g30g20 (g0, g1, g2, g3, ne, em, x0)
subroutine	m_tetrahedron::ttrhdrn_sub1g30 (g0, g1, g2, g3, ne, em, x0)
subroutine	m_tetrahedron::ttrhdrn_sub1normal (g0, g1, g2, g3, ne, em, x0)
subroutine	m_tetrahedron::ttrhdrn_sub2simple (g0, g1, g2, g3, ne, em, x0)
subroutine	m_tetrahedron::ttrhdrn_sub2g30g20 (g0, g1, g2, g3, ne, em, x0)
subroutine	m_tetrahedron::ttrhdrn_sub2g30g21 (g0, g1, g2, g3, ne, em, x0)
subroutine	m_tetrahedron::ttrhdrn_sub2g30g10 (g0, g1, g2, g3, ne, em, x0)
subroutine	m_tetrahedron::ttrhdrn_sub2g10 (g0, g1, g2, g3, ne, em, x0)
subroutine	m_tetrahedron::ttrhdrn_sub2g30 (g0, g1, g2, g3, ne, em, x0)
subroutine	m_tetrahedron::ttrhdrn_sub2normal (g0, g1, g2, g3, ne, em, x0)
subroutine	m_tetrahedron::ttrhdrn_mkidx (n1, n2, n3, idx1, bvec1, bvec2, bvec3)
Variables
integer, parameter	m_tetrahedron::ttrhdrn_vtx = 4
integer, parameter	m_tetrahedron::ttrhdrn_div = 6
integer, parameter	m_tetrahedron::nvtx = ttrhdrn_vtx
integer, parameter	m_tetrahedron::ndiv = ttrhdrn_div
integer, dimension(/nvtx, ndiv/), parameter	m_tetrahedron::ttrhdrn_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/)