ROMPIN — A relativistic optical model program for pion-nucleus scattering