% Null
%
% module
% main
main1_main(_upvals):-_upvals=[_odd,_multiple],(writeln_("type a number"),get_(_io,"write",T3),_T2 = T3,call_cl(_T2,["> "]),get_(_io,"read",T5),_T4 = T5,call_cl(_T4,[_x]),((call_cl(_multiple,[_x,_y]),call_cl(_odd,[_y]))->(get_(_io,"write",T7),_T6 = T7,calc("An odd multiple of "+_x,T8),calc(T8+"is: ",T9),call_cl(_T6,[T9]),get_(_io,"write",T11),_T10 = T11,call_cl(_T10,[_y]));(true))).
% odd
main1_odd(_x,_upvals):-_upvals=[],(true).
% multiple
main1_multiple(_x,_y,_upvals):-_upvals=[],(_y = _x;calc(_x+_x,T1),call(main1_multiple(T1,_y),_upvals)).
% main
main1(X):-_multiple = clos([],main1_multiple),_odd = clos([],main1_odd),_main = clos([_odd,_multiple],main1_main),call_cl(_main,[]).