%0 Table {it.Relation Any Any;next.Relation Any Any Any Any Any}
% Pair Functor
% module
% double
test22_double(_x,_y,_upvals):-_upvals=[],(_y = 2.0).
% fold
test22_fold(_l,_p,_a,_result,_upvals):-_upvals=[_next],(call_cl(_next,[_l,_l1,_k,_b,_i]),((_i = 1.0,call_cl(_p,[_a,_b,_c]),call(test22_fold(_l1,_p,_c,_result),_upvals));(dif(_i,1.0),_a = _result))).
% map
test22_map(_t,_p,_l,_upvals):-_upvals=[_next],(call_cl(_next,[_t,_t1,_k,_v,_i]),((_i = 1.0,writeln_('[|]'(_k,'[|]'(_v,[]))),call_cl(_p,[_k,_v,_x]),_l = '[|]'(_x,_l2),call(test22_map(_t1,_p,_l2),_upvals));(dif(_i,1.0),writeln_('[|]'("end",'[|]'(_i,'[|]'(_k,'[|]'(_v,[]))))),_l = []))).
% join
test22_join(_l,_sep,_s2,_upvals):-_upvals=[_next],(call_cl(_next,[_l,_l1,_k,_s,_i]),((_i = 1.0,writeln_(_s),calc(_s+_sep,T15),calc(T15+_s1,T16),_s2 = T16,writeln_(_s2),call(test22_join(_l1,_sep,_s1),_upvals));(dif(_i,1.0),_s2 = ""))).
% next2
test22_next2(_t,_t2,_k,_v,_upvals):-_upvals=[_toList],(call_cl(_toList,[_t,_l])).
% iter
test22_iter(_t,_l,_upvals):-_upvals=[_toList],(call_cl(_toList,[_t,_l])).
% toList
test22_toList(_t,_l,_upvals):-_upvals=[],(assoc_to_list2(_t,_l)).
% next
test22_next(_l,_l2,_k,_v,_i,_upvals):-_upvals=[],(((_l = [],_i = 0.0);(dif(_l,[]),_l = '[|]'(_a,_l2),_a = fc_Pair(_k,_v),_i = 1.0))).
% pairs
test22_pairs(_arr,_o,_upvals):-_upvals=[_array,_table],(get_(_table,"set",T14),_T13 = T14,call_cl(_T13,[_array,"data",_arr,_o]),writeln_(_o)).
% 3
test22_3(_l,_l2,_k,_v,_i,_upvals):-_upvals=[],(_l = '[|]'(_t,'[|]'(_i,[])),((get_(_t,_i,T10),_e = T10,_i = 1.0,{_i+1.0=T11},_l2 = '[|]'(_t,'[|]'(T11,[])));(dif(_e,T12),_i = 0.0)),true).
% 2
test22_2(_t,_l,_upvals):-_upvals=[],(_l = '[|]'(_t,'[|]'(0.0,[]))).
% main
test22(X):-creq1("math",_math,T1),call(T1,_math),creq1("table",_table,T2),call(T2,_table),creq1("list",_list,T3),call(T3,_list),creq1("io",_io,T4),call(T4,_io),get_(_table,"set",T5),_set = T5,get_(_table,"concat",T6),_concat = T6,new(T7),set_(T7,"it",clos([],test22_2),T9),set_(T9,"next",clos([],test22_3),T8),_array = T8,_pairs = clos([_array,_table],test22_pairs),_next = clos([],test22_next),_toList = clos([],test22_toList),_iter = clos([_toList],test22_iter),_next2 = clos([_toList],test22_next2),_join = clos([_next],test22_join),_map = clos([_next],test22_map),_fold = clos([_next],test22_fold),new(T17),set_(T17,0.0,1.0,T18),set_(T18,1.0,2.0,T19),set_(T19,2.0,3.0,T20),set_(T20,3.0,4.0,T21),_t = T21,writeln_(_t),writeln_(_t2),_double = clos([],test22_double),get_(_t,1.0,T22),writeln_(T22),call_cl(_iter,[_t,_T23]),_it = _T23,writeln_(_l),writeln_("-"),call_cl(_join,[_it,",",_s]),str(_s,T24),writeln_(T24),writeln_("-"),writeln_(_result),X=_array.