-module(s). -export([m/0]). m()->io:write(f()). f()->case io:fread('',"~d")of{_,[X]}->X+f();_->0end.
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page