TABLE OF CONTENTS
- 1. /initSRC
- 1.1. initSRC/DoInit_pnSRC
/initSRC [ Modules ]
NAME
module initSRC
PURPOSE
Contains a routine which samples a short-range-correlated pn pair within the target nucleus
initSRC/DoInit_pnSRC [ Subroutines ]
[ Top ] [ initSRC ] [ Subroutines ]
NAME
subroutine DoInit_pnSRC(r1,r2)
PURPOSE
Samples positions of the proton and neutron of the SRC pair
OUTPUT
- real, dimension(3), intent(out) :: r1, r2 ! p and n position vectors (fm)