Mercurial > octave

comparison scripts/polynomial/polygcd.m @ 23084:ef4d915df748

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
maint: Merge stable to default.
author John W. Eaton <jwe@octave.org>
date Mon, 23 Jan 2017 14:27:48 -0500
parents 3a2b891d0b33 e9a0469dedd9
children 092078913d54
comparison
equal deleted inserted replaced
23081:7485462a6924 23084:ef4d915df748
100 %! p1 = p(3:end); 100 %! p1 = p(3:end);
101 %! p2 = p(1:end-2); 101 %! p2 = p(1:end-2);
102 %! assert (polygcd (poly (-p1), poly (-p2)), 102 %! assert (polygcd (poly (-p1), poly (-p2)),
103 %! poly (- intersect (p1, p2)), sqrt (eps)); 103 %! poly (- intersect (p1, p2)), sqrt (eps));
104 %! endfor 104 %! endfor
105