fix gfortran 4.9.2 -fbounds-check runtime error
fix gfortran 4.9.2 -fbounds-check runtime error

when the dummy argument is fixed length it must be less than or equal to the actual arguments length, change the dummy arg to have dynamic length

matthb2/phasta,SCOREC/phasta,matthb2/phasta,SCOREC/phasta,matthb2/phasta,yangf4/phasta,yangf4/phasta,cwsmith/phasta,PHASTA/phasta,cwsmith/phasta,PHASTA/phasta,SCOREC/phasta,cwsmith/phasta,PHASTA/phasta,yangf4/phasta