%0 Table {all.Relation Any Any Any;apply.Relation Relation Functor;applyCatch.Relation Relation Functor Relation;applyOnce.Relation Relation Functor Relation;evalFile.Relation Any;exec.Relation Any;exit.Relation;forall.Relation Any Any Any Any;foreach.Relation Any Any Any;functor.Relation Any Any Any;get.Relation Any Any Any;halt.Relation;instantiated.Relation Any;iterate.Relation Relation Any Any Any;listOf.Relation Any Relation Any Functor;pause.Relation;range.Relation Any Any Any;size.Relation Any Any;throw.Relation Any;toString.Relation Any Any;type.Any} % % module % 16 logic_16(_p,_n,_x,_y,_upvals):-_upvals=[_iterate],(((_n = 0.0,_y = _x);(dif(_n,0.0),{_n-1.0=T26},call_cl(_iterate,[_p,T26,_x2,_y])))). % 15 logic_15(_x,_name,_n,_upvals):-_upvals=[],(functor(_x,_name2,_n),atom_string(_name2,_name)). % 14 logic_14(_x,_upvals):-_upvals=[],(throw(_x)). % 13 logic_13(_s,_upvals):-_upvals=[],(str(_s,T22),shell(T22)). % 12 logic_12(_upvals):-_upvals=[],(read(_x)). % 11 logic_11(_x,_s,_upvals):-_upvals=[_toString],(call_cl(_toString,[_x,_s])). % 10 logic_10(_upvals):-_upvals=[],(halt). % 9 logic_9(_upvals):-_upvals=[],(halt). % 8 logic_8(_x,_p,_l,_upvals):-_upvals=[],(forall_cl(_p,_l,_p2,_l2)). % 7 logic_7(_i,_j,_x,_upvals):-_upvals=[],(range(_i,_j,_x)). % 6 logic_6(_p,_l,_p2,_l2,_upvals):-_upvals=[],(forall_cl(_p,_l,_p2,_l2)). % 5 logic_5(_x,_p,_args,_l,_upvals):-_upvals=[],(list_of(_x,_p,_args,_l)). % 4 logic_4(_p,_l,_q,_upvals):-_upvals=[],(apply_catch(_p,_l,_q)). % 3 logic_3(_p,_l,_q,_upvals):-_upvals=[],(apply_catch(_p,_l,_q)). % 2 logic_2(_i,_j,_p2,_upvals):-_upvals=[_foreach],((((le(_i,_j)),(_x = _i,call_cl(_p2,[_x]),calc(_i+1.0,T10),{X1 = T10},call_cl(_foreach,[X1,_j,_p2]));true))). % eval logic_eval(_fname,_upvals):-_upvals=[],(ensure_loaded(_fname),atom_string(_X,_fname),call(_X,_)). % applyOnce logic_applyOnce(_p,_l,_upvals):-_upvals=[],(apply_once(_p,_l)). % apply logic_apply(_p,_l,_upvals):-_upvals=[],(apply2(_p,_l)). % get logic_get(_f,_i,_o2,_upvals):-_upvals=[],(fcget(_f,_i,_o2)). % size logic_size(_f,_n,_upvals):-_upvals=[],(fcsize(_f,_n)). % instantiated logic_instantiated(_x,_upvals):-_upvals=[],(def(_x)). % main logic(X):-creq1("list",_list,T1),call(T1,_list),creq1("string",_string,T2),call(T2,_string),_instantiated = clos([],logic_instantiated),_size = clos([],logic_size),_get = clos([],logic_get),_apply = clos([],logic_apply),_applyOnce = clos([],logic_applyOnce),_eval = clos([],logic_eval),new(T3),set_(T3,"type",_type,T5),set_(T5,"instantiated",_instantiated,T6),set_(T6,"apply",_apply,T7),set_(T7,"evalFile",_eval,T8),set_(T8,"foreach",clos([_foreach],logic_2),T9),set_(T9,"applyOnce",clos([],logic_3),T11),set_(T11,"applyCatch",clos([],logic_4),T12),set_(T12,"listOf",clos([],logic_5),T13),set_(T13,"forall",clos([],logic_6),T14),set_(T14,"range",clos([],logic_7),T15),set_(T15,"all",clos([],logic_8),T16),set_(T16,"exit",clos([],logic_9),T17),set_(T17,"halt",clos([],logic_10),T18),set_(T18,"toString",clos([_toString],logic_11),T19),set_(T19,"pause",clos([],logic_12),T20),set_(T20,"exec",clos([],logic_13),T21),set_(T21,"throw",clos([],logic_14),T23),set_(T23,"functor",clos([],logic_15),T24),set_(T24,"iterate",clos([_iterate],logic_16),T25),set_(T25,"get",_get,T27),set_(T27,"size",_size,T4),_t = T4,X=_t.