subroutine MAR________BUG !-----------------------------------------------------------------------------+ ! subroutine MAR________BUG FORCES a PREMATURE END of YOUR JOB | !-----------------------------------------------------------------------------+ write(6,*) ' . ' write(6,*) ' /|\ ' write(6,*) ' // \\ ' write(6,*) ' // _ \\ ' write(6,*) ' // | | \\ ' write(6,*) ' // | | \\ ' write(6,*) ' // | | \\ ' write(6,*) ' // |_| \\ ' write(6,*) ' // 0 \\ ' write(6,*) ' /=================\ ' write(6,*) ' ' write(6,*) ' #~@è€~#^@}æ@#â€êþÿûîœôäßë‘’ðüïŀö»©@@@ ↓¬¿×÷¡ !!???' write(6,*) ' ' write(6,*) ' ' write(6,*) ' le capitaine HADDOCK' write(6,*) ' ' ! print *, char(7) STOP END subroutine MAR________BUG