origen_beta Module Reference

beta emission calculations More...

Data Types
type	origen_beta_class
	Beta source calculation and printout class. Use this class to evaluate beta source and beta spectra based on the nuclide concentrations. More...
type	origen_beta_options
	options for beta printout More...

Functions/Subroutines
real(c_double) function	cosimp (a, b, aux, eps, isub, emax, z)
	cosimp is a routine for evaluating definite integrals using an adaptive simpsons algorithm. integral estimated over interval (a,b) of function aux, where eps is the error tolerance and isub is the number of subdivisions within (a,b) used in evaluation. cosimp makes two evaluations using isub and isub+1 and and compares values for agreement within eps. estimates made using est1 = f(a)+4*f(a+b/2)+f(b) and est2 = f(a)+4*f(3a+b/4)+ 2*f(a+b/2)+4*f(a+3b/4)+f(b) More...
subroutine	normalize (v1, v2, a, b, dist2, dist1, eps, isub, emax, z)
	return normalizing factors v1 and v2 More...
real(c_double) function	dist1f (e, emax, z)
	beta energy distribution for first forbidden transitions More...
real(c_double) function	dist2f (e, emax, z)
	beta energy distribution of second forbidden transitions More...
real(c_double) function	dist3f (e, emax, z)
	beta energy distribution of third forbidden transitions More...
real(c_double) function	dista (e, emax, z)
	beta energy distribution for allowed transitions More...
real(c_double) function	diste1f (e, emax, z)
	energy-weighted distribution first forbidden unique transition More...
real(c_double) function	diste2f (e, emax, z)
	energy-weighted distribution second forbidden unique transition More...
real(c_double) function	diste3f (e, emax, z)
	energy-weighted dist for third forbidden unique transitions More...
real(c_double) function	distea (e, emax, z)
	energy-weighted distribution for allowed transitions More...

Variables
real(c_double), dimension(100, 3)	aaa
integer	iii
integer	jjj
character(1024), dimension(256), private	rbuffer
	buffer for Reporter More...

Detailed Description

beta emission calculations

Function/Subroutine Documentation

real(c_double) function origen_beta::cosimp	(	real(c_double), intent(in)	a,
		real(c_double), intent(in)	b,
		real(c_double), external	aux,
		real(c_double), intent(in)	eps,
		integer, intent(inout)	isub,
		real(c_double), intent(in)	emax,
		integer, intent(in)	z
	)

cosimp is a routine for evaluating definite integrals using an adaptive simpsons algorithm. integral estimated over interval (a,b) of function aux, where eps is the error tolerance and isub is the number of subdivisions within (a,b) used in evaluation. cosimp makes two evaluations using isub and isub+1 and and compares values for agreement within eps. estimates made using est1 = f(a)+4*f(a+b/2)+f(b) and est2 = f(a)+4*f(3a+b/4)+ 2*f(a+b/2)+4*f(a+3b/4)+f(b)

Parameters

[in]	a	lower integration limit
[in]	b	upper integration limit
	aux	the integrand f(x, emax, z)
[in]	eps	required relative error tolerance
[in]	emax	integrand parameter
[in]	z	integrand parameter

Referenced by distea(), and normalize().

subroutine origen_beta::normalize	(	real(c_double), intent(out)	v1,
		real(c_double), intent(out)	v2,
		real(c_double), intent(in)	a,
		real(c_double), intent(in)	b,
		real(c_double), external	dist2,
		real(c_double), external	dist1,
		real(c_double), intent(in)	eps,
		integer, intent(inout)	isub,
		real(c_double), intent(in)	emax,
		integer, intent(in)	z
	)

return normalizing factors v1 and v2

References cosimp().

Referenced by distea(), and CompManager::finalizeComp().

real(c_double) function origen_beta::dist1f	(	real(c_double), intent(in)	e,
		real(c_double), intent(in)	emax,
		integer, intent(in)	z
	)

beta energy distribution for first forbidden transitions

References aaa.

Referenced by diste1f(), and distea().

real(c_double) function origen_beta::dist2f	(	real(c_double), intent(in)	e,
		real(c_double), intent(in)	emax,
		integer, intent(in)	z
	)

beta energy distribution of second forbidden transitions

References aaa.

Referenced by diste2f(), and distea().

real(c_double) function origen_beta::dist3f	(	real(c_double), intent(in)	e,
		real(c_double), intent(in)	emax,
		integer, intent(in)	z
	)

beta energy distribution of third forbidden transitions

References aaa.

Referenced by diste3f(), and distea().

real(c_double) function origen_beta::dista	(	real(c_double), intent(in)	e,
		real(c_double), intent(in)	emax,
		integer, intent(in)	z
	)

beta energy distribution for allowed transitions

References aaa.

Referenced by distea().

real(c_double) function origen_beta::diste1f	(	real(c_double), intent(in)	e,
		real(c_double), intent(in)	emax,
		integer, intent(in)	z
	)

energy-weighted distribution first forbidden unique transition

References dist1f().

Referenced by distea().

real(c_double) function origen_beta::diste2f	(	real(c_double), intent(in)	e,
		real(c_double), intent(in)	emax,
		integer, intent(in)	z
	)

energy-weighted distribution second forbidden unique transition

References dist2f().

Referenced by distea().

real(c_double) function origen_beta::diste3f	(	real(c_double), intent(in)	e,
		real(c_double), intent(in)	emax,
		integer, intent(in)	z
	)

energy-weighted dist for third forbidden unique transitions

References dist3f().

Referenced by distea().

real(c_double) function origen_beta::distea	(	real(c_double), intent(in)	e,
		real(c_double), intent(in)	emax,
		integer, intent(in)	z
	)

energy-weighted distribution for allowed transitions

References origen_definitions_m::avogadro, cosimp(), dist1f(), dist2f(), dist3f(), dista(), diste1f(), diste2f(), diste3f(), origen_definitions_m::err, normalize(), origen_definitions_m::origen_sublib_1lt, origen_definitions_m::origen_sublib_2ac, and origen_definitions_m::origen_sublib_3fp.

Variable Documentation

real(c_double), dimension(100,3) aaa

Referenced by dist1f(), dist2f(), dist3f(), and dista().

integer iii

Examples:

tstTransitionSystemAdapter_AmpxN.cpp.

Referenced by TEST_F().

integer jjj

character(1024), dimension(256), private rbuffer

buffer for Reporter