FORTRAN code describing the geometry in the inelastic proton scattering via an isobaric analog resonance

FORTRAN functions calculating 3j, 6j, 9j Wigner-symbols and Racah- and Z-coefficients are given by SS3J, SS6J, SS9J, RAC, ZQ in libCollectionExtract.for The code starts with FAK3NJ calculating all faculty numbers !N up to N=500 The geometrical factor needed to describe the inelastic proton scattering via and isobaric analog resonance are provided by TRIX The FORTRAN code phIK_WZbarAdapted.for does the calculation. The complete table of all needed geometrical factors for 208Pb(p,pÄ) via any IAR in 209Bi is provided in phIK_WZbar.table The definition of ZQ is shown in ZQ-definition.pdf