Made several changes.  Cheif among the changes is that the shaping filter is now normalized by the integral of the filter to have an area of unity.  This fixes the problem we had before with increasing the noise power.  I also needed to adjust the way the threshold is set and the way the amplitude quantization works to accomodate this.