TABLE OF CONTENTS
/determine_fmbybE [ Modules ]
NAME
module determine_fmbybE
PURPOSE
determine the fermi momentum
"fmbybE" stands for "fermi momentum by binding energy"
NOTES
[KG]: I cut this out of "initNucPhaseSpase.f90" and brought it to the code format we all agreed on. I do not guarantee full functionality and meaningful documentation.
determine_fmbybE/teilchen_fermi [ Global module-variables ]
[ Top ] [ determine_fmbybE ] [ Global module-variables ]
SOURCE
type(particle), save, PUBLIC :: teilchen_fermi
PURPOSE
???
determine_fmbybE/determine_fermimomentum [ Subroutines ]
[ Top ] [ determine_fmbybE ] [ Subroutines ]
NAME
subroutine determine_fermimomentum(baryondens,fermimomentum)
PURPOSE
...
INPUTS
- real :: baryondens -- ???
OUTPUT
- real :: fermimomentum -- ???
NOTES
- one should better define this as function. (?)
- one should add documentation. (!)
determine_fmbybE/determine_fermiNucDLDA [ Subroutines ]
[ Top ] [ determine_fmbybE ] [ Subroutines ]
NAME
subroutine determine_fermiNucDLDA(baryonplace,rhocent,baryonpFermi)
PURPOSE
...
INPUTS
- real, dimension(1:3) :: baryonplace -- ???
- real :: rhocent -- ???
OUTPUT
- real :: baryonpFermi -- ???
NOTES
- one should better define this as function. (?)
- one should add documentation. (!)
determine_fmbybE/func [ Functions ]
[ Top ] [ determine_fmbybE ] [ Functions ]
NAME
double precision function func
PURPOSE
function used to find a zero in determine_fermimomentum