TABLE OF CONTENTS
/vertices [ Modules ]
NAME
module vertices
PURPOSE
Provides vertex functions
vertices/debug [ Global module-variables ]
[ Top ] [ vertices ] [ Global module-variables ]
SOURCE
logical, parameter :: debug=.false.
PURPOSE
switch on/off debugging output
vertices/vertex_gammaN_to_spin3_2_negParity [ Functions ]
[ Top ] [ vertices ] [ Functions ]
NAME
function vertex_gammaN_to_spin3_2(q,p,resID,resCharge) result(vertex)
PURPOSE
- Provides the vertex for gamma N -> spin 3/2 resonance
INPUTS
- real, dimension(0:3), intent(in) :: q,p -- photon and nucleon momenta
- integer , intent(in) :: resID -- ID of the resonance
- integer , intent(in) :: resCharge -- Charge of the resonance
OUTPUT