fortran code for restart capabilities and user input