Updated routine to use error codes and strings rather than write statements.
Updated routine to use error codes and strings rather than write
statements.


geodynamics/lithomop,geodynamics/lithomop,geodynamics/lithomop,geodynamics/lithomop