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. Minimizing Intersymbol Interference in a readwrite channel for disc drives by shaping and slimming an isolated readback pulse was the main objective for writing this program.For more info see Kost R. and P. Brubaker Arbitrary equalization with simple LC structures IEEE Transactions on Magnetics Nov. 1981 pp 3346-3348 or visit fortranCalculus.infoappsmatched-filter.html .Another improved productivity example do to using Calculus (level) Problem-Solving.Industry problems with solutions over the past twenty plus years have been put into a textbook to show the power of Calculus (level) Problem-Solving. The textbook as on our website at fortranCalculus.infotextbookwelcome . The software architect behind Calculus Compilers is Joe Thames (read about Joe on our About page).Help improve science and engineering productivity by supporting Joe Thames MetaCalculus University Rollout efforts visit metaCalculus.comcampaigns.html in developing MC Fortran. (There has been little if any corporate funding of Joes work for many years!) Help future science & engineers get jobs upon graduation. With MC Fortran one increases their productivity by a factor of twenty!Please visit our textbook at fortranCalculus.infotextbookwelcome and help support Calculus level compilers at metaCalculus.comcampaigns.html. Thanks!