Tråd: Hello World.
View Single Post
Og siste.

Kode

import Data.Char;
(?)(??)=(??)((??)????(?));(+++)=(\a->null.flip const a);
(-^-)=(div);(????)(?)(??)=(??)(?);(?:)=(\(?)(??)(???)->if(?)then(??)else(???));
(???)=[(\(?)->((+56)????id)$(?)-^-2),
 (\(???)->(?:)((((9????(^))2)+14)==(???))((???)*(???)`mod`194)((???)*(???)`mod`9001)),
 (\(?)->(?)*(?)`mod`1091),(\(?)->(?)*(?)`mod`2089),(\a->a+22),((+)(-53)),(\110->0x20),
 (((+).(+1))10),(\(*?)->(?)(\f(??)->(??)+4)(*?)),(+10),(+8),(\_->100)];
main = putStr $ map chr $ (???)????(??)
(??)=(?)(\(?)((??):(???))->(?:)(256+++(???))((1-^-0)????(??):[])(((??)(sum((?)(???))-^-((???)????length))):(?)(???)))