switchxt.red 258 B

123456789101112
  1. module switchxt;
  2. switch distribute;
  3. flag('(!*factor !*mcd !*div !*exp !*gcd !*rat !*rational !*rationalize
  4. !*intstr !*reduced !*ratpri !*revpri !*distribute
  5. !*ezgcd !*complex !*reduced !*lcm !*precise),'share)$
  6. endmodule;
  7. end;