LMDZ
MAR________BUG.f90
Go to the documentation of this file.
1  subroutine mar________bug
2 
3 !-----------------------------------------------------------------------------+
4 ! subroutine MAR________BUG FORCES a PREMATURE END of YOUR JOB |
5 !-----------------------------------------------------------------------------+
6 
7  write(6,*) ' . '
8  write(6,*) ' /|\ '
9  write(6,*) ' // \\ '
10  write(6,*) ' // _ \\ '
11  write(6,*) ' // | | \\ '
12  write(6,*) ' // | | \\ '
13  write(6,*) ' // | | \\ '
14  write(6,*) ' // |_| \\ '
15  write(6,*) ' // 0 \\ '
16  write(6,*) ' /=================\ '
17  write(6,*) ' '
18  write(6,*) ' #~@è€~#^@}æ@#â€êþÿûîœôäßë‘’ðüïŀö»©@@@ ↓¬¿×÷¡ !!???'
19  write(6,*) ' '
20  write(6,*) ' '
21  write(6,*) ' le capitaine HADDOCK'
22  write(6,*) ' '
23 
24 ! print *, char(7)
25 
26  stop
27  END subroutine mar________bug
mar________bug
subroutine mar________bug
Definition: MAR________BUG.f90:2