pharpend/kek
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

[wip] well it all looks fine but it is incorrect

Browse Source
This commit is contained in:
pharpend
2022-12-25 03:24:35 -07:00
parent 6533b43067
commit 9474f58361
2 changed files with 108 additions and 7 deletions
Download Patch File Download Diff File Expand all files Collapse all files
rc.erl
+20
View File
@@ -176,3 +176,23 @@ print64_(<<N:64>>) ->
iolist_to_list(IoList) ->
binary_to_list(iolist_to_binary(IoList)).
%% print out big_rc(N) -> RC(N)
print_big_rcs() ->
pbr(0).
% 1 digit numbers
pbr(N) when 0 =< N, N =< 9 ->
<<ThisRC_int:64>> = big_rc(N),
io:format("round_constant_int( ~p) -> ~p;~n", [N, ThisRC_int]),
pbr(N + 1);
% 2 digit numbers
pbr(N) when 10 =< N, N =< 22 ->
<<ThisRC_int:64>> = big_rc(N),
io:format("round_constant_int(~p) -> ~p;~n", [N, ThisRC_int]),
pbr(N + 1);
% terminal case
pbr(N) when N =:= 23 ->
<<ThisRC_int:64>> = big_rc(N),
io:format("round_constant_int(~p) -> ~p.~n", [N, ThisRC_int]).