MODULE Restar_Module
   USE Numeric_Kinds_Module
   IMPLICIT NONE
   SAVE
   LOGICAL:: lrestar=.FALSE.   !
END MODULE Restar_Module