/usr/share/axiom-20120501/input/unittest4.input is in axiom-test 20120501-8.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 | )set break resume
)sys rm -f unittest4.output
)spool unittest4.output
)set mes auto off
)clear all
--S 1 of 4
gcdPolynomial((3*x^2+6)::SUP(FRAC(INT)),(9*x^3+12)::SUP(FRAC(INT)))$FRAC(POLY(INT))
--E 1
--S 2 of 4
)lisp (trace |FRAC;gcdPolynomial;3Sup;35!0|)
--R
--RValue = (|FRAC;gcdPolynomial;3Sup;35!0|)
--E 2
--S 3 of 4
)lisp (trace |FRAC;gcdPolynomial;3Sup;35!1|)
--R
--RValue = (|FRAC;gcdPolynomial;3Sup;35!1|)
--E 3
--S 4 of 4
gcdPolynomial((3*x^2+6)::SUP(FRAC(INT)),(9*x^3+12)::SUP(FRAC(INT)))$FRAC(POLY(INT))
--R
--I 1> (|FRAC;gcdPolynomial;3Sup;35!0| ((0 . 3) 0 . 1) #<vector 0918c524>)
--R <1 (|FRAC;gcdPolynomial;3Sup;35!0| (0 . 3))
--I 1> (|FRAC;gcdPolynomial;3Sup;35!0| ((0 . 6) 0 . 1) #<vector 0918c524>)
--R <1 (|FRAC;gcdPolynomial;3Sup;35!0| (0 . 6))
--I 1> (|FRAC;gcdPolynomial;3Sup;35!1| ((0 . 9) 0 . 1) #<vector 0918c508>)
--R <1 (|FRAC;gcdPolynomial;3Sup;35!1| (0 . 9))
--I 1> (|FRAC;gcdPolynomial;3Sup;35!1| ((0 . 12) 0 . 1) #<vector 0918c508>)
--R <1 (|FRAC;gcdPolynomial;3Sup;35!1| (0 . 12))
--R
--R (2) 1
--R Type: SparseUnivariatePolynomial(Fraction(Polynomial(Integer)))
--E 4
)spool
)lisp (bye)
|