try_again Subroutine

public subroutine try_again()

FIXME : Add documentation

Arguments

None

Contents

Source Code


Source Code

  subroutine try_again 
    implicit none
    write (6, *) '*****************'
    write (6, *) 'Please try again.'
    write (6, *) '*****************'

  end subroutine try_again