subroutine ROP_StartUp use sROP_Other_Variables use sROP_Variables !Rate_of_Penetration = 0. end subroutine