Return Styles: Pseud0ch, Terminal, Valhalla, NES, Geocities, Blue Moon. Entire thread

Let's write some code.

Name: Anonymous 2008-02-22 5:28

try {

Name: Anonymous 2008-02-26 13:48

>>84

data T = C

    deriving (Eq, Ord)



instance Show T where

    show C = "\ESC[1mEXPERT HASKELL PROGRAMMER\ESC[m"



instance Num T where

    fromInteger x = C

    c + x = C

    C - c = C

    x * C = C

    abs x = C

    signum c = C



x = negate



c = 42



main = print$

    

    C-x C-c

Newer Posts