Programs to compute kappa from corrected FAS and to plot section for P and S arrival times