made source code of model_crust_2_0.f90 closer to that of model_crust_1_...

...0.f90