1% Regression test for a sensible error message 2 3% Added by Rainer Schöpf, 30 Aug 2011 4 5% The substitution at the end of this test file causes 0/0 to be formed. 6% This file tests that a sensible error message is printed. 7 8zz2 := (z*(z-2*pi*i)*(z-pi*i/2)^2)/(sinh z-i); 9 10dz2 := df(zz2,z); 11 12z0 := pi*i/2; 13 14sub(z=z0,dz2); 15 16end; 17