Update parameters.f90