improved the source code for attenuation models: fixed a double to singl...

...e precision conversion statement, replaced Qmu = 0 with Qmu = 4999 in model_1dref.f90 because Qmu = 0 makes no sense