old easter egg

[Ronald Kuwawi]

open text editor, type
hash :: [Char] -> Int
hash = (foldl (+) 0) . (map ord)

save as hash.hs

load script, type:
hash "MSDOS 6.000"

or 

hash "SYSTEM 7.0"


:-)
Ronald

_______________________________________________
Haskell mailing list
[EMAIL PROTECTED]
http://www.haskell.org/mailman/listinfo/haskell