SUBROUTINE start
!
!   Start or restart the run
!
  IMPLICIT NONE
!
!   Local vars and arrays
!________________________________________________________________________________
  WRITE(*,'(a/)') '=== Start or restart the run ==='
!________________________________________________________________________________
! 
END SUBROUTINE start
