fricas
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
4\|69%%F0 + 4
*
atan
+-----------+
+--+ +--+ | 2
(9\|23 %%F0 + \|23 )\|69%%F0 + 4
/
+---------------------------------------------------+
| 2 2
10\|(- 207x + 46)%%F0 + (23x - 69)%%F0 + 25x - 6x - 7
+
2
- 207%%F0 + 23%%F0 + 50x - 6
+
+--+ 2
2\|23 %%F0 log(207%%F0 - 23%%F0 + 25x + 6)
+
+--+ 2 2
- \|23 %%F0 log((- 207x + 46)%%F0 + (23x - 69)%%F0 + 25x - 6x - 7)
/
+--+
2\|23
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(%%F0)
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,%%F0=rhs s(1));
Type: Expression(Integer)
fricas
complexNumeric %
Type: Complex(Float)
fricas
eval(i0,%%F0=rhs s(2));
Type: Expression(Integer)
fricas
complexNumeric %
Type: Complex(Float)
fricas
eval(i0,%%F0 = rhs s(3));
Type: Expression(Integer)
fricas
complexNumeric %
Type: Complex(Float)