Jon.hs

{- ___ -}import Data.Char;main=putStr$do{c<-"/1 AA A A;9+ )11929 )1191A 2C9A ";e
{-  |  -}    .(`divMod`8).(+(-32)).ord$c};e(0,0)="\n";e(m,n)=m?"  "++n?"_/"
{-  |  -}n?x=do{[1..n];x}                                    --- obfuscated
{-\_/ on Fairbairn, with apologies to Chris Brown. Above is / Haskell 98 -}