% Null % Cons Functor % test1 % main test1(X):-writeln_(_t),calc(""+1.0,T1),_s = T1,writeln_(_s),dif(_i,2.0),writeln_(1.0).