Pulse shaping filter program that finds the pole-zero locations of a transfer function, H(s), for a matched filter. H(s) equals a -desired- signal (Yout) divided by a given input signal (Yin). Both Yout and Yin are functions of frequency. Group delay may also be calculated to compliment a given data set, thus, providing a flat group delay. This is a Fortran Calculus demo application.