Nuclear penetrability and phase shift subroutine - CPC, Mendeley (Mendeley, 1970)