begin: base_replace(A,Rule)
It rewrites {A} by using {Rule}.
example:  base_replace([x^2+a^2,a],[[a,1],[x,y]]);
ref: taka_base_replace, hoge
end:
begin: print_input_form(A|xml)
It outputs the object {A}.
example:  print_input_form(quote(sin(x)+2));
ref: taka_print_input_form
end: