gibuu is hosted by Hepforge, IPPP Durham
GiBUU

TABLE OF CONTENTS


/argonnev18 [ Modules ]

[ Top ] [ Modules ]

NAME

module argonnev18

PURPOSE

This module implements the Argonne V18 NN-potential for Deuterium and Deuterium wave functions


argonnev18/argonne_WF_kSpace [ Functions ]

[ Top ] [ argonnev18 ] [ Functions ]

NAME

function argonne_WF_kSpace (k_GeV, noPWave_in) result(wf)

PURPOSE

This function calculates the square of the momentum space wave function of a deuteron according to the Argonne V18 potential.

INPUTS

  • real :: k_GeV -- momentum in units of GeV

OUTPUT

  • real :: wf --momentum space wave function**2 in units of [GeV^-3]

NOTES

  • Normalization : integral(wf(k)*k**2 dk)=1


argonnev18/argonne_WF_rSpace [ Functions ]

[ Top ] [ argonnev18 ] [ Functions ]

NAME

function argonne_WF_rSpace (r, noPWave_in) result(wf)

PURPOSE

This function calculates the square of the position space wave function of a deuteron according to the Argonne V18 potential.

INPUTS

  • real :: r -- relative distance in units of [fm]

OUTPUT

  • real :: wf -- position space wave function**2 in units of [fm^-1]

NOTES


argonnev18/argonne_deuteriumPot [ Subroutines ]

[ Top ] [ argonnev18 ] [ Subroutines ]

NAME

real function argonne_deuteriumPot(r)

PURPOSE

  • This function returns the AV18 potential for deuterium.

INPUTS

  • real,intent(in) :: r ! distance berween of proton and neutron [fm]

OUTPUT

  • Potential in [GeV]