login  home  contents  what's new  discussion  bug reports     help  links  subscribe  changes  refresh  edit

Edit detail for SandBox Integration revision 3 of 19

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19
Editor: amca01
Time: 2010/01/05 15:10:19 GMT-8
Note: Oops - try again

added:

From amca01 Tue Jan 5 15:10:12 -0800 2010
From: amca01
Date: Tue, 05 Jan 2010 15:10:12 -0800
Subject: Oops - try again
Message-ID: <20100105151012-0800@axiom-wiki.newsynthesis.org>

\begin{axiom}integrate(sqrt(x+sqrt(1+x^2))/x,x)\end{axiom}

Integration

Let's do some integration examples:

fricas
(1) -> integrate(%e**x, x)
There are no library operations named ** Use HyperDoc Browse or issue )what op ** to learn if there is any operation containing " ** " in its name.
Cannot find a definition or applicable library operation named ** with argument type(s) Expression(Integer) Variable(x)
Perhaps you should use "@" to indicate the required return type, or "$" to specify which version of the function you need.

load_package SPECFN;
reduce

on ROUNDED,ADJPREC;
reduce

Ei(1.00000000000000000001);
*** precision increased to 21
reduce
\displaylines{\qdd
1.89511781635593675549
\cr}
 
Ei(1.0);
reduce
\displaylines{\qdd
1.89511781635593675547
\cr}
 
Ei(2.0);
reduce
\displaylines{\qdd
4.95423435600189016338
\cr}
 

Can Reduce compute Ei in arbitrary precision?

See http://www.uni-koeln.de/REDUCE/3.6/doc/specfn/

Also http://homepages.inf.ed.ac.uk/mtoussai/publications/toussaint-99-mexico.pdf

Reset

off ROUNDED,ADJPREC;
reduce

int(cos(x),x,0,pi);
reduce
\displaylines{\qdd
0
\cr}
 

fricas
integrate(x^2/sqrt(4-x^2),x)

\label{eq1}\frac{{{\left(-{{32}\ {\sqrt{-{{x}^{2}}+ 4}}}-{8 \ {{x}^{2}}}+{64}\right)}\ {\arctan \left({\frac{{\sqrt{-{{x}^{2}}+ 4}}- 2}{x}}\right)}}+{{\left(-{{x}^{3}}+{8 \  x}\right)}\ {\sqrt{-{{x}^{2}}+ 4}}}+{4 \ {{x}^{3}}}-{{16}\  x}}{{8 \ {\sqrt{-{{x}^{2}}+ 4}}}+{2 \ {{x}^{2}}}-{16}}(1)
Type: Union(Expression(Integer),...)

fricas
integrate(exp(-a*x**2),x=0..%plusInfinity)
There are no library operations named ** Use HyperDoc Browse or issue )what op ** to learn if there is any operation containing " ** " in its name.
Cannot find a definition or applicable library operation named ** with argument type(s) Variable(x) PositiveInteger
Perhaps you should use "@" to indicate the required return type, or "$" to specify which version of the function you need.

The following won't "work", see CommonMistakes?:

fricas
integrate(exp(-a::PositiveInteger*x**2),x=0..%plusInfinity)
Cannot convert the value from type Variable(a) to PositiveInteger .

fricas
integrate((x^3+x^2+2)/(x*(x^2-1)^2), x)

\label{eq2}\frac{{{\left(-{5 \ {{x}^{2}}}+ 5 \right)}\ {\log \left({x + 1}\right)}}+{{\left({8 \ {{x}^{2}}}- 8 \right)}\ {\log \left({x}\right)}}+{{\left(-{3 \ {{x}^{2}}}+ 3 \right)}\ {\log \left({x - 1}\right)}}-{2 \  x}- 6}{{4 \ {{x}^{2}}}- 4}(2)
Type: Union(Expression(Integer),...)

fricas
integrate(2*x/sin(x)^2,x)

\label{eq3}\frac{{2 \ {\sin \left({x}\right)}\ {\log \left({\frac{\sin \left({x}\right)}{2}}\right)}}-{2 \  x \ {\cos \left({x}\right)}}}{\sin \left({x}\right)}(3)
Type: Union(Expression(Integer),...)

Comparing Axiom and Reduce:

fricas
integrate(sin(1/x),x)

\label{eq4}{x \ {\sin \left({\frac{1}{x}}\right)}}-{Ci \left({\frac{1}{x}}\right)}(4)
Type: Union(Expression(Integer),...)

int(sin(1/x),x);
reduce
\displaylines{\qdd
\int {\sin 
      \(\frac{1}{
              x}
       

Hell, why does the following blow MathAction??:

  \begin{reduce}
  load_package algint;
  int(sin(1/x),x);
  \end{reduce}

A different problem, where Axiom has to give up:

fricas
integrate(sqrt(sin(1/x)),x)
>> Error detected within library code: integrate: implementation incomplete (has polynomial part)

However, in Reduce: Again, why does the following blow MathAction??:

  \begin{reduce}
  load_package algint;
  int(sqrt(sin(1/x)),x);
  \end{reduce}

fricas
integrate(exp(-x^2),x)

\label{eq5}\frac{{\erf \left({x}\right)}\ {\sqrt{\pi}}}{2}(5)
Type: Union(Expression(Integer),...)

fricas
integrate(sin(x)/x,x)

\label{eq6}Si \left({x}\right)(6)
Type: Union(Expression(Integer),...)
fricas
differentiate(%,x)

\label{eq7}\frac{\sin \left({x}\right)}{x}(7)
Type: Expression(Integer)

fricas
integrate(sin(1/x),x=%minusInfinity..%plusInfinity,"noPole")
>> Error detected within library code: integrate: pole in path of integration

fricas
integrate(2*x/sin(x)^2,x=1/2..1);
Type: Union(pole: "potentialPole",...)

fricas
integrate(sin(x),x=0..%pi/2)

\label{eq8}1(8)
Type: Union(f1: OrderedCompletion?(Expression(Integer)),...)

fricas
integrate(atan(x/a)/x,x)

\label{eq9}\int^{
\displaystyle
x}{{\frac{\arctan \left({\frac{\%A}{a}}\right)}{\%A}}\ {d \%A}}(9)
Type: Union(Expression(Integer),...)

fricas
integrate(1/(a+z^3), z=0..1,"noPole")

\label{eq10}\frac{-{{\sqrt{3}}\ {\log \left({{3 \ {{a}^{2}}\ {{\root{3}\of{{a}^{2}}}^{2}}}+{{\left(-{2 \ {{a}^{3}}}+{{a}^{2}}\right)}\ {\root{3}\of{{a}^{2}}}}+{{a}^{4}}-{2 \ {{a}^{3}}}}\right)}}+{2 \ {\sqrt{3}}\ {\log \left({{{\root{3}\of{{a}^{2}}}^{2}}+{2 \  a \ {\root{3}\of{{a}^{2}}}}+{{a}^{2}}}\right)}}+{{12}\ {\arctan \left({\frac{{2 \ {\sqrt{3}}\ {\root{3}\of{{a}^{2}}}}-{a \ {\sqrt{3}}}}{3 \  a}}\right)}}+{{\sqrt{3}}\ {\log \left({{a}^{4}}\right)}}-{2 \ {\sqrt{3}}\ {\log \left({{a}^{2}}\right)}}+{2 \  \pi}}{{12}\ {\sqrt{3}}\ {\root{3}\of{{a}^{2}}}}(10)
Type: Union(f1: OrderedCompletion?(Expression(Integer)),...)

fricas
integrate(x^3+x^2/4+x,x)

\label{eq11}{{\frac{1}{4}}\ {{x}^{4}}}+{{\frac{1}{12}}\ {{x}^{3}}}+{{\frac{1}{2}}\ {{x}^{2}}}(11)
Type: Polynomial(Fraction(Integer))

You cannot integrate Expression Float

fricas
integrate(50*%e^(-0.02*t),t)
There are 9 exposed and 11 unexposed library operations named integrate having 2 argument(s) but none was determined to be applicable. Use HyperDoc Browse, or issue )display op integrate to learn more about the available operations. Perhaps package-calling the operation or using coercions on the arguments will allow you to apply the operation.
Cannot find a definition or applicable library operation named integrate with argument type(s) Expression(Float) Variable(t)
Perhaps you should use "@" to indicate the required return type, or "$" to specify which version of the function you need.

But symbolic integration works with integer expressions

fricas
integrate(50*%e^(-0.02*t)::Expression Fraction Integer,t)

\label{eq12}-{{2500}\ {{e}^{-{{\frac{1}{50}}\  t}}}}(12)
Type: Union(Expression(Fraction(Integer)),...)

fricas
integrate(exp(cos(x)),x)

\label{eq13}\int^{
\displaystyle
x}{{{e}^{\cos \left({\%A}\right)}}\ {d \%A}}(13)
Type: Union(Expression(Integer),...)

fricas
integrate(sin(x),x)
  integrate(%,x)
There are 29 exposed and 5 unexposed library operations named elt having 2 argument(s) but none was determined to be applicable. Use HyperDoc Browse, or issue )display op elt to learn more about the available operations. Perhaps package-calling the operation or using coercions on the arguments will allow you to apply the operation.
Cannot find a definition or applicable library operation named elt with argument type(s) Expression(Integer) Expression(Integer)
Perhaps you should use "@" to indicate the required return type, or "$" to specify which version of the function you need.

fricas
integrate(a/h - c*h/12 + (b/h)*r + (c/h)*r^2,r)

\label{eq14}\frac{{4 \  c \ {{r}^{3}}}+{6 \  b \ {{r}^{2}}}+{{\left(-{c \ {{h}^{2}}}+{{12}\  a}\right)}\  r}}{{12}\  h}(14)
Type: Union(Expression(Integer),...)

fricas
integrate(exp(-(a+b*t)^2/2),t)

\label{eq15}\frac{{\sqrt{\pi}}\ {\erf \left({\frac{{\left({b \  t}+ a \right)}\ {\sqrt{\frac{{b}^{2}}{2}}}}{b}}\right)}}{2 \ {\sqrt{\frac{{b}^{2}}{2}}}}(15)
Type: Union(Expression(Integer),...)

fricas
integrate(exp(-(a+b*t)^2/t),t)

\label{eq16}\int^{
\displaystyle
t}{{{e}^{\frac{-{{{\%A}^{2}}\ {{b}^{2}}}-{2 \  \%A \  a \  b}-{{a}^{2}}}{\%A}}}\ {d \%A}}(16)
Type: Union(Expression(Integer),...)

fricas
integrate(exp(-1/t),t)

\label{eq17}{t \ {{e}^{-{\frac{1}{t}}}}}+{Ei \left({-{\frac{1}{t}}}\right)}(17)
Type: Union(Expression(Integer),...)

fricas
integrate(exp(-1/t),t=1..x)

\label{eq18}\verb#"potentialPole"#(18)
Type: Union(pole: "potentialPole",...)

Unfortunately, there is currently no easy way to make "assumptions" about variables. Thus, The following won't work:

  \begin{axiom}
   assume(x, real)
   integrate(exp(-1/t),t=1..x)
   \end{axiom}

fricas
integrate(t*exp(-(a+b*t)^2/2),t)

\label{eq19}\frac{-{a \  b \ {\sqrt{\pi}}\ {\erf \left({\frac{{\left({b \  t}+ a \right)}\ {\sqrt{\frac{{b}^{2}}{2}}}}{b}}\right)}}-{2 \ {{e}^{\frac{-{{{b}^{2}}\ {{t}^{2}}}-{2 \  a \  b \  t}-{{a}^{2}}}{2}}}\ {\sqrt{\frac{{b}^{2}}{2}}}}}{2 \ {{b}^{2}}\ {\sqrt{\frac{{b}^{2}}{2}}}}(19)
Type: Union(Expression(Integer),...)

fricas
integrate(1/(a+z^3), z=0..1,"noPole")

\label{eq20}\frac{-{{\sqrt{3}}\ {\log \left({{3 \ {{a}^{2}}\ {{\root{3}\of{{a}^{2}}}^{2}}}+{{\left(-{2 \ {{a}^{3}}}+{{a}^{2}}\right)}\ {\root{3}\of{{a}^{2}}}}+{{a}^{4}}-{2 \ {{a}^{3}}}}\right)}}+{2 \ {\sqrt{3}}\ {\log \left({{{\root{3}\of{{a}^{2}}}^{2}}+{2 \  a \ {\root{3}\of{{a}^{2}}}}+{{a}^{2}}}\right)}}+{{12}\ {\arctan \left({\frac{{2 \ {\sqrt{3}}\ {\root{3}\of{{a}^{2}}}}-{a \ {\sqrt{3}}}}{3 \  a}}\right)}}+{{\sqrt{3}}\ {\log \left({{a}^{4}}\right)}}-{2 \ {\sqrt{3}}\ {\log \left({{a}^{2}}\right)}}+{2 \  \pi}}{{12}\ {\sqrt{3}}\ {\root{3}\of{{a}^{2}}}}(20)
Type: Union(f1: OrderedCompletion?(Expression(Integer)),...)

From the ReduceProblem? (what does axiom do?):

fricas
int(1/sqrt(2*PI)*exp(-1/2*log(x)**2),x,0,INFINITY);
There are 31 exposed and 44 unexposed library operations named * having 2 argument(s) but none was determined to be applicable. Use HyperDoc Browse, or issue )display op * to learn more about the available operations. Perhaps package-calling the operation or using coercions on the arguments will allow you to apply the operation.
Cannot find a definition or applicable library operation named * with argument type(s) PositiveInteger Type
Perhaps you should use "@" to indicate the required return type, or "$" to specify which version of the function you need.

Well, you should use Axiom syntax. Note that PI is a domain, spelled out: PositiveInteger in Axiom, the constant \pi is denoted %pi. Furthermore, the operation you want is called integrate. Finally, infinity is denoted %infinity, but in fact, I wouldn't know how to do such integrals in Axiom anyway. Thus, the best I get is:

fricas
integrate(1/sqrt(2*%pi)*exp(-1/2*log(x)**2),x=0..k)
There are no library operations named ** Use HyperDoc Browse or issue )what op ** to learn if there is any operation containing " ** " in its name.
Cannot find a definition or applicable library operation named ** with argument type(s) Expression(Integer) PositiveInteger
Perhaps you should use "@" to indicate the required return type, or "$" to specify which version of the function you need.

If you would get a result, you could use limit afterwards, of course.

Mathematical Paradox?
Thu, 10 Feb 2005 17:45:57 -0600 reply
Area under the curve:
fricas
integrate(1/x,x=1..%plusInfinity)

\label{eq21}+ \infty(21)
Type: Union(f1: OrderedCompletion?(Expression(Integer)),...)
Paradox Part2:
Thu, 10 Feb 2005 17:47:59 -0600 reply
Volume under that curve:
fricas
integrate(%pi*((1/x)^2), x=1..%plusInfinity)

\label{eq22}\pi(22)
Type: Union(f1: OrderedCompletion?(Expression(Integer)),...)

Curve has an infinite area...but a finite volume (I think I did this correctly)!

fricas
integrate(1/x,x)

\label{eq23}\log \left({x}\right)(23)
Type: Union(Expression(Integer),...)

fricas
integrate(sqrt(x),x)

\label{eq24}\frac{2 \  x \ {\sqrt{x}}}{3}(24)
Type: Union(Expression(Integer),...)

fricas
integrate(sqrt(x^3+x),x)

\label{eq25}\frac{-{4 \ {weierstrassZeta \left({- 4, \: 0, \:{weierstrassPInverse \left({- 4, \: 0, \: x}\right)}}\right)}}+{2 \  x \ {\sqrt{{{x}^{3}}+ x}}}}{5}(25)
Type: Union(Expression(Integer),...)

a turning moving body --unknown, Sun, 19 Jun 2005 20:16:03 -0500 reply
fricas
integrate(( a*sin( m + n*t + o*t*t/2 ) )/( n + ot ) + ( b*cos( m + n*t + o*t*t/2 ) )/( n + ot ), t)

\label{eq26}\frac{{{\left(-{b \ {\sin \left({\frac{{2 \  m \  o}-{{n}^{2}}}{2 \  o}}\right)}}+{a \ {\cos \left({\frac{{2 \  m \  o}-{{n}^{2}}}{2 \  o}}\right)}}\right)}\ {fresnelS \left({\frac{{\left({o \  t}+ n \right)}\ {\sqrt{\frac{o}{\pi}}}}{o}}\right)}}+{{\left({a \ {\sin \left({\frac{{2 \  m \  o}-{{n}^{2}}}{2 \  o}}\right)}}+{b \ {\cos \left({\frac{{2 \  m \  o}-{{n}^{2}}}{2 \  o}}\right)}}\right)}\ {fresnelC \left({\frac{{\left({o \  t}+ n \right)}\ {\sqrt{\frac{o}{\pi}}}}{o}}\right)}}}{{\left(ot + n \right)}\ {\sqrt{\frac{o}{\pi}}}}(26)
Type: Union(Expression(Integer),...)

a turning accelerating body --unknown, Sun, 19 Jun 2005 23:16:48 -0500 reply
fricas
integrate(( a*cos( m + n*t + o*t*t/2 ) )- ( b*sin( m + n*t + o*t*t/2 ) ), t)

\label{eq27}\frac{{{\left(-{a \ {\sin \left({\frac{{2 \  m \  o}-{{n}^{2}}}{2 \  o}}\right)}}-{b \ {\cos \left({\frac{{2 \  m \  o}-{{n}^{2}}}{2 \  o}}\right)}}\right)}\ {fresnelS \left({\frac{{\left({o \  t}+ n \right)}\ {\sqrt{\frac{o}{\pi}}}}{o}}\right)}}+{{\left(-{b \ {\sin \left({\frac{{2 \  m \  o}-{{n}^{2}}}{2 \  o}}\right)}}+{a \ {\cos \left({\frac{{2 \  m \  o}-{{n}^{2}}}{2 \  o}}\right)}}\right)}\ {fresnelC \left({\frac{{\left({o \  t}+ n \right)}\ {\sqrt{\frac{o}{\pi}}}}{o}}\right)}}}{\sqrt{\frac{o}{\pi}}}(27)
Type: Union(Expression(Integer),...)

fricas
integrate(-2*(3-3*t)^2*(3*t),t)

\label{eq28}-{{\frac{27}{2}}\ {{t}^{4}}}+{{36}\ {{t}^{3}}}-{{27}\ {{t}^{2}}}(28)
Type: Polynomial(Fraction(Integer))

integrate(1/(1+x**2),x=-u..u)

fricas
integrate(1/(1+x**2),x=-u..u)
There are no library operations named ** Use HyperDoc Browse or issue )what op ** to learn if there is any operation containing " ** " in its name.
Cannot find a definition or applicable library operation named ** with argument type(s) Variable(x) PositiveInteger
Perhaps you should use "@" to indicate the required return type, or "$" to specify which version of the function you need.

fricas
integrate(x**6*exp(-x**2), x=0..%plusInfinity)
There are no library operations named ** Use HyperDoc Browse or issue )what op ** to learn if there is any operation containing " ** " in its name.
Cannot find a definition or applicable library operation named ** with argument type(s) Variable(x) PositiveInteger
Perhaps you should use "@" to indicate the required return type, or "$" to specify which version of the function you need.

integrate(1/sqrt(1/x+1),x)

fricas
integrate(1/sqrt(1/x+1),x)

\label{eq29}\frac{-{\log \left({{\sqrt{\frac{x + 1}{x}}}+ 1}\right)}+{\log \left({{\sqrt{\frac{x + 1}{x}}}- 1}\right)}+{2 \  x \ {\sqrt{\frac{x + 1}{x}}}}}{2}(29)
Type: Union(Expression(Integer),...)

integrate(sin(sin x), x)

integrate(a/2(1-cos(bt)),t)

yet another test that shall work but not in maple ? --unknown, Thu, 09 Mar 2006 09:21:47 -0600 reply
integrate(tan(arctan(x)/3),x)

integrate(tan(arctan(x)/3),x);

integrate(x, x)

fricas
integrate(x, x)

\label{eq30}{\frac{1}{2}}\ {{x}^{2}}(30)
Type: Polynomial(Fraction(Integer))

fricas
integrate((1/(2*z))*z^2), z)
Line 1: integrate((1/(2*z))*z^2), z) ...........................A * Error A: Improper syntax. 1 error(s) parsing

fricas
integrate((1/(2*z))*z^2, z)

\label{eq31}\frac{{z}^{2}}{4}(31)
Type: Union(Expression(Integer),...)

fricas
simplify((1/(2*z))*z^2)

\label{eq32}\frac{z}{2}(32)
Type: Expression(Integer)
fricas
integrate((1/(2*z))*z^2, z)

\label{eq33}\frac{{z}^{2}}{4}(33)
Type: Union(Expression(Integer),...)

integrate(ln(x),x)

integrate(1/x,x)

fricas
integrate(0**0,x)
There are no library operations named ** Use HyperDoc Browse or issue )what op ** to learn if there is any operation containing " ** " in its name.
Cannot find a definition or applicable library operation named ** with argument type(s) NonNegativeInteger NonNegativeInteger
Perhaps you should use "@" to indicate the required return type, or "$" to specify which version of the function you need.

from fr.sci.maths --unknown, Tue, 09 May 2006 09:56:50 -0500 reply
fricas
integrate( ln(y)^3/(y*(y-1)),y)
There are no library operations named ln Use HyperDoc Browse or issue )what op ln to learn if there is any operation containing " ln " in its name.
Cannot find a definition or applicable library operation named ln with argument type(s) Variable(y)
Perhaps you should use "@" to indicate the required return type, or "$" to specify which version of the function you need.

from fr.sci.maths --unknown, Tue, 09 May 2006 09:58:11 -0500 reply
fricas
integrate( log(y)^3/(y*(y-1)),y)

\label{eq34}\int^{
\displaystyle
y}{{\frac{{\log \left({\%A}\right)}^{3}}{{{\%A}^{2}}- \%A}}\ {d \%A}}(34)
Type: Union(Expression(Integer),...)

fricas
integrate(exp(-x^2),x=0..%plusInfinity)

\label{eq35}\frac{\sqrt{\pi}}{2}(35)
Type: Union(f1: OrderedCompletion?(Expression(Integer)),...)

integrate(x*2exp(-x^2),x=0..%plusInfinity)

No ; after command or else output is supressed.
fricas
integrate(exp(%i*2*%pi*f*t), t=0..T)

\label{eq36}\frac{-{i \ {{e}^{2 \  i \  T \  f \  \pi}}}+ i}{2 \  f \  \pi}(36)
Type: Union(f1: OrderedCompletion?(Expression(Complex(Integer))),...)

Axiom and Maxima not capable of this integrand --WinnieThePooh?, Tue, 29 May 2007 17:24:44 -0500 reply
int(exp(sin(x)),x)
reduce

An integral which Maxima can't do, but Axiom can --amca01, Tue, 05 Jan 2010 15:08:53 -0800 reply
fricas
integrate(sqrt(x+sqrt(1+x^2))/x,x
Line 1: integrate(sqrt(x+sqrt(1+x^2))/x,x .........A......................B * Error A: Missing mate. * Error B: syntax error at top level * Error B: Possibly missing a ) 3 error(s) parsing

Oops - try again --amca01, Tue, 05 Jan 2010 15:10:12 -0800 reply
fricas
integrate(sqrt(x+sqrt(1+x^2))/x,x)

\label{eq37}\begin{array}{@{}l}
\displaystyle
-{\log \left({{\sqrt{{\sqrt{{{x}^{2}}+ 1}}+ x}}+ 1}\right)}+{\log \left({{\sqrt{{\sqrt{{{x}^{2}}+ 1}}+ x}}- 1}\right)}- 
\
\
\displaystyle
{2 \ {\arctan \left({\sqrt{{\sqrt{{{x}^{2}}+ 1}}+ x}}\right)}}+{2 \ {\sqrt{{\sqrt{{{x}^{2}}+ 1}}+ x}}}
(37)
Type: Union(Expression(Integer),...)