Skip to content

Instantly share code, notes, and snippets.

@pazworld
Last active February 13, 2016 07:04
Show Gist options
  • Save pazworld/2d0e19e54a19e32f12b7 to your computer and use it in GitHub Desktop.
Save pazworld/2d0e19e54a19e32f12b7 to your computer and use it in GitHub Desktop.

not written yet.

-module(prog).
-export([main/0]).
main()->io:format(p(2,[],"a")).
p(1301,_,A)->lists:reverse(A);p(X,P,A)->C=97+(X-1)rem 26,case lists:any(fun(Y)->X rem Y==0 end,P)of true->p(X+1,P,[C|A]);_->D=string:chr(integer_to_list(X),$3)>0,p(X+1,[X|P],[if D->0;true->-32 end+C|A])end.
erlc prog.erl && erl -noshell -s prog main -s init stop
aBcdEfGhijKlmnopQrStuvwxyzabCdefghijklmnOpqrstUvwxyzabcdefGhIjklmnOpqrStuvwxyzAbcdefghijKlmnopqrStuvWxyzabCdEfghijklmnopqrstuvWxyzabcdefghijklmnopqrStUvwxyzAbcdefghijKlmnopqrstuvWxYzabcdefghIjklmnOpQrstuvwxyzabCdefghijklmnopqrStUvwxyzabcdefGhijklmnopQrstuvWxyzabcdefghIjKlmnopQrstUvwxyzabcdefghijklmnopqrstuvwxyzabcdefghijklmnopqrstuvwxyzabcdefghijklmnopqrstuvwxyzabcdefghijklmnopqrstuvwxyzabcdefghijKlmnopqrStuvwxyzabCdEfghijklmnopqrstuvwxyzabcdefGhijklmnOpqrStuvwxYzabcdefghijKlmnopqrStuvWxyzabcdEfghijklmnOpqrstuvwxyzAbcdefghijklmnopqrstUvwxyzAbcdefghijKlmnopqrstuvWxYzabcdEfghijklmnOpqrstuvwxyzAbCdefghIjklmnopqrStUvwxyzabcdefghijklmnopQrstuvWxyzabcdefghIjKlmnopqrstuvwxyzAbcdefghijklmnOpqrstuvwxYzabcdefGhijklmnopQrstuvwxYzabcdefghijklmnopqrstuvWxyzabCdefGhijklmnOpqrstuvwxyzabcdefGhijklmnopQrstuvwxyzabCdEfghijklmnOpqrstUvWxyzabcdefghijklmnopqrstuvwxYzAbcdefghijklmnopqrStuvWxyzabCdefghijklmnopqrstuvWxyzAbcdefghIjklmnopqrStuvwxyzabcdEfghijKlmnopqrstuvwxyzabcdEfghIjklmnOpqrstuvwxyzabCdefghIjklmnopqrstUvwxyzabcdEfGhijklmnopqrstuvwxyzabcdefghIjKlmnopqrstUvwxyzabCdefghijklmnopqrstUvwxYzabcdEfghijklmnopQrstuvwxYzabcdefghijKlmnopqrstuvwxyzabcdefGhijklmnopqrstuvwxyzAbcdefghijKlmnopQrstuvwxyzabcdEfghijklmnopqrstUvwxyzabcdefGhijklmnopqrstuvwxyzAbcdefghijKlmnopqrstuvwxyzabCdEfghijklmnOpQrstuvWxyz
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment