Count diamonds level 3 by Lost_dog

main=interact(0#)
i#(s:u)|[s,u!!1,u!!41]=="***"=(i+1)#u|s>'*'&&i>0=show i++"\n"++0#u|1>0=i#u
i#u=u

Note that non-ascii characters in the above source code will be escaped (such as \x9f).

download

return to the top page