Fortran语法错误，这个声明语句位置应该怎么放

风平老涡

定义的parameter Ps， Psref 不能改变数值。