This module stores all the root-mean square radii (rrms) of atomic nuclei that were tabulated by (Angeli et al.) as a function of the atomic number Z and atomic mass A. More...

Functions/Subroutines
real(8) function	rrms_value (z, a)
	This function returns the tabulated value for the give charge Z and mass A, if available, and from the formula proposed by Johnson and Soff (Johnson et al.) otherwise. More...

character(len=7) function	rrms_source (z, a)
	This function returns the source of the value for the give charge Z and mass A, name "a" for Angeli et al and "d" otherwise. More...

Variables
integer, parameter	n_atoms = 120
	the number of atoms in the table ordered by atomic number More...

integer, parameter	n_range = 35
	a parameter that defines the range of atomic masses (a_min, a_min +n_range -1)to be incuded More...

integer, dimension(n_atoms)	a_min
	For each atomic number, the smallest atomic mass for a given nuclear charge included in the Angeli et al. table. More...

integer, dimension(n_atoms)	a_max
	For each atomic number, the largest atomic mass for a given nuclear charge included in the Angeli et al. table. More...

real(8), dimension(n_atoms, n_range)	rr
	an array containing the tabulated values of rrms, such that, More...

Detailed Description

This module stores all the root-mean square radii (rrms) of atomic nuclei that were tabulated by (Angeli et al.) as a function of the atomic number Z and atomic mass A.

When values are not available the defaut formula is taken to be

    rrms = 0.836*a**(1/3) + 0.570

shown to be a good approximation for Z < 91 by (Johnson et al.)

References:

I. Angeli and K.P. Marinova, Atomic Data and Nuclear Data Tables 99 (2013) 69–95,

W.R. Johnson, G.Soff, Atomic Data and Nuclear Data Tables { 33}, p.405 (1985)

Function/Subroutine Documentation

◆ rrms_source()

character(len=7) function nucleus_m::rrms_source	(	integer, intent(in)	z,
		integer, intent(in)	a
	)

This function returns the source of the value for the give charge Z and mass A, name "a" for Angeli et al and "d" otherwise.

Here is the caller graph for this function:

◆ rrms_value()

real(8) function nucleus_m::rrms_value	(	integer, intent(in)	z,
		integer, intent(in)	a
	)

This function returns the tabulated value for the give charge Z and mass A, if available, and from the formula proposed by Johnson and Soff (Johnson et al.) otherwise.

Here is the caller graph for this function:

Variable Documentation

◆ a_max

integer, dimension(n_atoms) nucleus_m::a_max

For each atomic number, the largest atomic mass for a given nuclear charge included in the Angeli et al. table.

◆ a_min

integer, dimension(n_atoms) nucleus_m::a_min

For each atomic number, the smallest atomic mass for a given nuclear charge included in the Angeli et al. table.

◆ n_atoms

integer, parameter nucleus_m::n_atoms = 120

the number of atoms in the table ordered by atomic number

◆ n_range

integer, parameter nucleus_m::n_range = 35

a parameter that defines the range of atomic masses (a_min, a_min +n_range -1)to be incuded

◆ rr

real(8), dimension(n_atoms, n_range) nucleus_m::rr

an array containing the tabulated values of rrms, such that,

for 0 < j <= n_range,

rr(z, j) = rrms(z, a_min(z) + j-1)

A value of 0.0000 is stored for values of j when the corresponding rrms has not been tabulated.

Functions/Subroutines

Variables