File: Jon.hs

package info (click to toggle)
haskell-ghc-exactprint 1.7.1.0-1
  • links: PTS
  • area: main
  • in suites: forky, sid, trixie
  • size: 6,044 kB
  • sloc: haskell: 32,076; makefile: 7
file content (4 lines) | stat: -rw-r--r-- 309 bytes parent folder | download | duplicates (3) 
1
2
3
4
 
{- ___ -}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 -}