fricas
(1) -> f := x/(x^3-x+1)
Type: Fraction(Polynomial(Integer))
fricas
)set output tex off
 
fricas
)set output algebra on
i := integrate(f, x)
   (2)
             +--------------+
             |         2
             |- 69 %%E0  - 4
         (-  |--------------  - %%E0)
            \|      23
      *
                             +--------------+
                             |         2
                             |- 69 %%E0  - 4            2
         log((207 %%E0 + 23) |--------------  - 207 %%E0  + 23 %%E0 + 50 x - 6)
                            \|      23
     + 
           +--------------+
           |         2
           |- 69 %%E0  - 4
         ( |--------------  - %%E0)
          \|      23
      *
                             +--------------+
                             |         2
                             |- 69 %%E0  - 4            2
       log((- 207 %%E0 - 23) |--------------  - 207 %%E0  + 23 %%E0 + 50 x - 6)
                            \|      23
     + 
                          2
       2 %%E0 log(207 %%E0  - 23 %%E0 + 25 x + 6)
  /
     2
Type: Union(Expression(Integer),...)
fricas
)set output tex on
 
fricas
)set output algebra off
D(i, x)
Type: Expression(Integer)
fricas
ks := kernels i
Type: List(Kernel(Expression(Integer)))
fricas
[definingPolynomial(k::Expression(Integer)) for k in ks | name operator k = 'rootOf]
Type: List(Expression(Integer))
fricas
definingPolynomial(%%E0)
Type: Expression(Integer)
fricas
s:=radicalSolve(%::Fraction Polynomial Integer)
Type: List(Equation(Expression(Integer)))
fricas
i0 := integrate(f, x=1..2)
Type: Union(f1: OrderedCompletion
?(Expression(Integer)),
...)
 
fricas
eval(i0,%%E0=rhs s(1));
Type: Expression(Integer)
fricas
complexNumeric %
Type: Complex(Float)
fricas
eval(i0,%%E0=rhs s(2));
Type: Expression(Integer)
fricas
complexNumeric %
Type: Complex(Float)
fricas
eval(i0,%%E0 = rhs s(3));
Type: Expression(Integer)
fricas
complexNumeric %
Type: Complex(Float)