Origin for each line in src/rules.red from check-in 5ce5316a33:

5ce5316a33 2021-03-01 jeff@gridfini: % Rules
5ce5316a33 2021-03-01 jeff@gridfini: %trig1:={sin(~x)^2+cos(~x)^2=>1, cos(~x)^2+sin(~x)^2=>1};
5ce5316a33 2021-03-01 jeff@gridfini: trig1:={sin(~x)^2=>(1-cos(x)^2)};
5ce5316a33 2021-03-01 jeff@gridfini: let trig1;
5ce5316a33 2021-03-01 jeff@gridfini: trig2:={tan (~x)=>(sin (x)/cos (x))};
5ce5316a33 2021-03-01 jeff@gridfini: let trig2;
5ce5316a33 2021-03-01 jeff@gridfini: end;