fem2d.F90 File Reference

Functions/Subroutines
subroutine	helm2delem (alpha, beta, ul, xl, ss, pp, isw)
subroutine	diff2delem (D, xl, tri_center_r, psi_hat, ss, mass_flag)
	Computes the matrix elements of the diffusion operator div(D_ij.grad(...)) with linear, triangular finite elements. More...
subroutine	bdotgradelem (ul, xl, bb, pp, area)
subroutine	new_thfx2d (alpha, ul, shp, gradpot, pot, dd)
subroutine	new_tint2d (l, lint, el)
subroutine	new_trishp (el, xl, xsj, shp)

Function/Subroutine Documentation

subroutine bdotgradelem	(	real*8, dimension(3), intent(in)	ul,
		real*8, dimension(2,3), intent(in)	xl,
		real*8, dimension(3,2), intent(in)	bb,
		real*8, dimension(3), intent(out)	pp,
		real*8, dimension(3), intent(out)	area
	)

Here is the call graph for this function:

Here is the caller graph for this function:

subroutine diff2delem	(	intent(in)	D,
		dimension(2,3), intent(in)	xl,
		intent(in)	tri_center_r,
		dimension(2), intent(in)	psi_hat,
		real (kind=8), dimension(3,3), intent(out)	ss,
		integer, intent(in)	mass_flag
	)

Computes the matrix elements of the diffusion operator div(D_ij.grad(...)) with linear, triangular finite elements.

Parameters

[in]	D	Diffusion coefficient, real(8)
[in]	xl	R,Z coordinates of the current triangle vertices, real(8)
[in]	tri_center	R coordinate of the triangle center (or mag. axis for cyl. limit)
[in]	psi_hat	grad(psi)/|grad(psi)|, real(8)
[out]	ss	FEM coefficients
[in]	mass_flag	Whether a mass matrix is to be computed

Here is the call graph for this function:

Here is the caller graph for this function:

subroutine helm2delem	(	real*8, intent(in)	alpha,
		real*8, intent(in)	beta,
		real*8, dimension(*), intent(in)	ul,
		real*8, dimension(2,*), intent(in)	xl,
		real*8, dimension(3,3)	ss,
		real*8, dimension(3), intent(out)	pp,
		integer, intent(in)	isw
	)

Here is the call graph for this function:

Here is the caller graph for this function:

subroutine new_thfx2d	(	real*8, intent(in)	alpha,
		real*8, dimension(3), intent(in)	ul,
		real*8, dimension(3,*), intent(in)	shp,
		real*8, dimension(2), intent(out)	gradpot,
		real*8, intent(out)	pot,
		real*8, dimension(2,2), intent(out)	dd
	)

Here is the caller graph for this function:

subroutine new_tint2d	(	integer	l,
		integer	lint,
		real*8, dimension(4,*)	el
	)

Here is the caller graph for this function:

subroutine new_trishp	(	real*8, dimension(3)	el,
		real*8, dimension(2,*)	xl,
		real*8	xsj,
		real*8, dimension(3,*)	shp
	)

Here is the caller graph for this function: