crypto.lib
LIB "crypto.lib"; ring r = 0,x,lp; list binary_list = 1,0,1,1,1; binary_add(binary_list); ==> [1]: ==> 1 ==> [2]: ==> 1 ==> [3]: ==> 0 ==> [4]: ==> 0 ==> [5]: ==> 0