$SPAD/src/input rich24a.input

Albert Rich and Timothy Daly

December 3, 2016

Abstract

Exponential Functions

Contents

2

— * —

)set break resume
)sys rm -f rich24a.output
)spool rich24a.output
)set message test on
)set message auto off
)clear all
--S 1 of 1000
t0:=F^(c*(a+b*x))*(d+e*x)^m
--R
--R
--R         b c x + a c         m
--R   (1)  F           (e x + d)
--R                                                    Type: Expression(Integer)
--E 1
--S 2 of 1000
--r0:=-F^(c*(a-b*d/e))*(d+e*x)^(1+m)*GAMMA(1+m,-b*c*(d+e*x)*log(F)/e)*_
--  (-b*c*(d+e*x)*log(F)/e)^(-1-m)/e
--E 2
--S 3 of 1000
--a0:=integrate(t0,x)
--E 3
--S 4 of 1000
--m0:=a0-r0
--E 4
--S 5 of 1000
--d0:=normalize(D(m0,x))
--E 5
)clear all
--S 6 of 1000
t0:=F^(c*(a+b*x))*(d+e*x)^5
--R
--R
--R          5 5       4 4      2 3 3      3 2 2     4       5  b c x + a c
--R   (1)  (e x  + 5d e x  + 10d e x  + 10d e x  + 5d e x + d )F
--R                                                    Type: Expression(Integer)
--E 6
--S 7 of 1000
--r0:=-e^5*F^(c*(a-b*d/e))*GAMMA(6,-b*c*(d+e*x)*log(F)/e)/(b^6*c^6*log(F)^6)
--E 7

--S 8 of 1000
--a0:=integrate(t0,x)
--E 8
--S 9 of 1000
--m0:=a0-r0
--E 9
--S 10 of 1000
--d0:=normalize(D(m0,x))
--E 10
)clear all
--S 11 of 1000
t0:=F^(c*(a+b*x))*(d+e*x)^4
--R
--R
--R          4 4       3 3     2 2 2     3       4  b c x + a c
--R   (1)  (e x  + 4d e x  + 6d e x  + 4d e x + d )F
--R                                                    Type: Expression(Integer)
--E 11
--S 12 of 1000
--r0:=e^4*F^(c*(a-b*d/e))*GAMMA(5,-b*c*(d+e*x)*log(F)/e)/(b^5*c^5*log(F)^5)
--E 12
--S 13 of 1000
--a0:=integrate(t0,x)
--E 13
--S 14 of 1000
--m0:=a0-r0
--E 14
--S 15 of 1000
--d0:=normalize(D(m0,x))
--E 15
)clear all
--S 16 of 1000
t0:=F^(c*(a+b*x))*(d+e*x)^3
--R
--R
--R          3 3       2 2     2       3  b c x + a c
--R   (1)  (e x  + 3d e x  + 3d e x + d )F
--R                                                    Type: Expression(Integer)
--E 16

--S 17 of 1000
r0:=-6*e^3*F^(c*(a+b*x))/(b^4*c^4*log(F)^4)+6*e^2*F^(c*(a+b*x))*_
   (d+e*x)/(b^3*c^3*log(F)^3)-3*e*F^(c*(a+b*x))*(d+e*x)^2/(b^2*c^2*_
   log(F)^2)+F^(c*(a+b*x))*(d+e*x)^3/(b*c*log(F))
--R
--R
--R   (2)
--R           3 3 3 3     3 3   2 2     3 3 2       3 3 3       3
--R         (b c e x  + 3b c d e x  + 3b c d e x + b c d )log(F)
--R       +
--R              2 2 3 2     2 2   2      2 2 2        2
--R         (- 3b c e x  - 6b c d e x - 3b c d e)log(F)
--R       +
--R                3            2            3
--R         (6b c e x + 6b c d e )log(F) - 6e
--R    *
--R        b c x + a c
--R       F
--R  /
--R      4 4      4
--R     b c log(F)
--R                                                    Type: Expression(Integer)
--E 17
--S 18 of 1000
a0:=integrate(t0,x)
--R
--R
--R   (3)
--R           3 3 3 3     3 3   2 2     3 3 2       3 3 3       3
--R         (b c e x  + 3b c d e x  + 3b c d e x + b c d )log(F)
--R       +
--R              2 2 3 2     2 2   2      2 2 2        2
--R         (- 3b c e x  - 6b c d e x - 3b c d e)log(F)
--R       +
--R                3            2            3
--R         (6b c e x + 6b c d e )log(F) - 6e
--R    *
--R         (b c x + a c)log(F)
--R       %e
--R  /
--R      4 4      4
--R     b c log(F)
--R                                         Type: Union(Expression(Integer),...)
--E 18
--S 19 of 1000
m0:=a0-r0
--R

--R
--R   (4)
--R             3 3 3 3     3 3   2 2     3 3 2       3 3 3       3
--R           (b c e x  + 3b c d e x  + 3b c d e x + b c d )log(F)
--R         +
--R                2 2 3 2     2 2   2      2 2 2        2
--R           (- 3b c e x  - 6b c d e x - 3b c d e)log(F)
--R         +
--R                  3            2            3
--R           (6b c e x + 6b c d e )log(F) - 6e
--R      *
--R           (b c x + a c)log(F)
--R         %e
--R     +
--R               3 3 3 3     3 3   2 2     3 3 2       3 3 3       3
--R           (- b c e x  - 3b c d e x  - 3b c d e x - b c d )log(F)
--R         +
--R              2 2 3 2     2 2   2      2 2 2        2
--R           (3b c e x  + 6b c d e x + 3b c d e)log(F)
--R         +
--R                    3            2            3
--R           (- 6b c e x - 6b c d e )log(F) + 6e
--R      *
--R          b c x + a c
--R         F
--R  /
--R      4 4      4
--R     b c log(F)
--R                                                    Type: Expression(Integer)
--E 19
--S 20 of 1000
d0:=normalize(D(m0,x))
--R
--R
--R   (5)  0
--R                                                    Type: Expression(Integer)
--E 20
)clear all
--S 21 of 1000
t0:=F^(c*(a+b*x))*(d+e*x)^2
--R
--R
--R          2 2             2  b c x + a c
--R   (1)  (e x  + 2d e x + d )F
--R                                                    Type: Expression(Integer)
--E 21

--S 22 of 1000
r0:=2*e^2*F^(c*(a+b*x))/(b^3*c^3*log(F)^3)-2*e*F^(c*(a+b*x))*(d+e*x)/_
   (b^2*c^2*log(F)^2)+F^(c*(a+b*x))*(d+e*x)^2/(b*c*log(F))
--R
--R
--R   (2)
--R           2 2 2 2     2 2         2 2 2       2            2
--R         (b c e x  + 2b c d e x + b c d )log(F)  + (- 2b c e x - 2b c d e)log(F)
--R       +
--R           2
--R         2e
--R    *
--R        b c x + a c
--R       F
--R  /
--R      3 3      3
--R     b c log(F)
--R                                                    Type: Expression(Integer)
--E 22
--S 23 of 1000
a0:=integrate(t0,x)
--R
--R
--R   (3)
--R           2 2 2 2     2 2         2 2 2       2            2
--R         (b c e x  + 2b c d e x + b c d )log(F)  + (- 2b c e x - 2b c d e)log(F)
--R       +
--R           2
--R         2e
--R    *
--R         (b c x + a c)log(F)
--R       %e
--R  /
--R      3 3      3
--R     b c log(F)
--R                                         Type: Union(Expression(Integer),...)
--E 23
--S 24 of 1000
m0:=a0-r0
--R
--R
--R   (4)
--R             2 2 2 2     2 2         2 2 2       2
--R           (b c e x  + 2b c d e x + b c d )log(F)
--R         +
--R                    2                        2
--R           (- 2b c e x - 2b c d e)log(F) + 2e
--R      *

--R           (b c x + a c)log(F)
--R         %e
--R     +
--R               2 2 2 2     2 2         2 2 2       2
--R           (- b c e x  - 2b c d e x - b c d )log(F)
--R         +
--R                  2                        2
--R           (2b c e x + 2b c d e)log(F) - 2e
--R      *
--R          b c x + a c
--R         F
--R  /
--R      3 3      3
--R     b c log(F)
--R                                                    Type: Expression(Integer)
--E 24
--S 25 of 1000
d0:=normalize(D(m0,x))
--R
--R
--R   (5)  0
--R                                                    Type: Expression(Integer)
--E 25
)clear all
--S 26 of 1000
t0:=F^(c*(a+b*x))*(d+e*x)
--R
--R
--R                  b c x + a c
--R   (1)  (e x + d)F
--R                                                    Type: Expression(Integer)
--E 26
--S 27 of 1000
r0:=-e*F^(c*(a+b*x))/(b^2*c^2*log(F)^2)+F^(c*(a+b*x))*(d+e*x)/(b*c*log(F))
--R
--R
--R                                      b c x + a c
--R        ((b c e x + b c d)log(F) - e)F
--R   (2)  -----------------------------------------
--R                        2 2      2
--R                       b c log(F)
--R                                                    Type: Expression(Integer)
--E 27
--S 28 of 1000
a0:=integrate(t0,x)

--R
--R
--R                                       (b c x + a c)log(F)
--R        ((b c e x + b c d)log(F) - e)%e
--R   (3)  --------------------------------------------------
--R                             2 2      2
--R                            b c log(F)
--R                                         Type: Union(Expression(Integer),...)
--E 28
--S 29 of 1000
m0:=a0-r0
--R
--R
--R   (4)
--R                                      (b c x + a c)log(F)
--R       ((b c e x + b c d)log(F) - e)%e
--R     +
--R                                       b c x + a c
--R       ((- b c e x - b c d)log(F) + e)F
--R  /
--R      2 2      2
--R     b c log(F)
--R                                                    Type: Expression(Integer)
--E 29
--S 30 of 1000
d0:=normalize(D(m0,x))
--R
--R
--R   (5)  0
--R                                                    Type: Expression(Integer)
--E 30
)clear all
--S 31 of 1000
t0:=F^(c*(a+b*x))
--R
--R
--R         b c x + a c
--R   (1)  F
--R                                                    Type: Expression(Integer)
--E 31
--S 32 of 1000
r0:=F^(c*(a+b*x))/(b*c*log(F))
--R
--R
--R         b c x + a c

--R        F
--R   (2)  ------------
--R         b c log(F)
--R                                                    Type: Expression(Integer)
--E 32
--S 33 of 1000
a0:=integrate(t0,x)
--R
--R
--R          (b c x + a c)log(F)
--R        %e
--R   (3)  ---------------------
--R              b c log(F)
--R                                         Type: Union(Expression(Integer),...)
--E 33
--S 34 of 1000
m0:=a0-r0
--R
--R
--R          (b c x + a c)log(F)    b c x + a c
--R        %e                    - F
--R   (4)  ------------------------------------
--R                     b c log(F)
--R                                                    Type: Expression(Integer)
--E 34
--S 35 of 1000
d0:=normalize(D(m0,x))
--R
--R
--R   (5)  0
--R                                                    Type: Expression(Integer)
--E 35
)clear all
--S 36 of 1000
t0:=F^(c*(a+b*x))/(d+e*x)
--R
--R
--R         b c x + a c
--R        F
--R   (1)  ------------
--R           e x + d
--R                                                    Type: Expression(Integer)
--E 36
--S 37 of 1000

r0:=F^(c*(a-b*d/e))*Ei(b*c*(d+e*x)*log(F)/e)/e
--R
--R
--R         a c e - b c d
--R         -------------
--R               e         (b c e x + b c d)log(F)
--R        F             Ei(-----------------------)
--R                                    e
--R   (2)  -----------------------------------------
--R                            e
--R                                                    Type: Expression(Integer)
--E 37
--S 38 of 1000
a0:=integrate(t0,x)
--R
--R
--R           x  (%D b + a)c
--R         ++  F
--R   (3)   |   ------------ d%D
--R        ++     %D e + d
--R                                         Type: Union(Expression(Integer),...)
--E 38
--S 39 of 1000
m0:=a0-r0
--R
--R
--R                                   a c e - b c d
--R            x  (%D b + a)c         -------------
--R          ++  F                          e         (b c e x + b c d)log(F)
--R        e |   ------------ d%D  - F             Ei(-----------------------)
--R         ++     %D e + d                                      e
--R   (4)  -------------------------------------------------------------------
--R                                         e
--R                                                    Type: Expression(Integer)
--E 39
--S 40 of 1000
d0:=normalize(D(m0,x))
--R
--R
--R   (5)  0
--R                                                    Type: Expression(Integer)
--E 40
)clear all
--S 41 of 1000
t0:=F^(c*(a+b*x))/(d+e*x)^2

--R
--R
--R            b c x + a c
--R           F
--R   (1)  ------------------
--R         2 2             2
--R        e x  + 2d e x + d
--R                                                    Type: Expression(Integer)
--E 41
--S 42 of 1000
r0:=-F^(c*(a+b*x))/(e*(d+e*x))+b*c*F^(c*(a-b*d/e))*Ei(b*c*(d+e*x)*_
   log(F)/e)*log(F)/e^2
--R
--R
--R   (2)
--R                               a c e - b c d
--R                               -------------
--R                                     e         (b c e x + b c d)log(F)
--R       (b c e x + b c d)log(F)F             Ei(-----------------------)
--R                                                          e
--R     +
--R            b c x + a c
--R       - e F
--R  /
--R      3       2
--R     e x + d e
--R                                                    Type: Expression(Integer)
--E 42
--S 43 of 1000
a0:=integrate(t0,x)
--R
--R
--R           x      (%D b + a)c
--R         ++      F
--R   (3)   |   -------------------- d%D
--R        ++     2 2              2
--R             %D e  + 2%D d e + d
--R                                         Type: Union(Expression(Integer),...)
--E 43
--S 44 of 1000
m0:=a0-r0
--R
--R
--R   (4)
--R                      x      (%D b + a)c
--R         3       2  ++      F
--R       (e x + d e ) |   -------------------- d%D

--R                   ++     2 2              2
--R                        %D e  + 2%D d e + d
--R     +
--R                                 a c e - b c d
--R                                 -------------
--R                                       e         (b c e x + b c d)log(F)
--R       (- b c e x - b c d)log(F)F             Ei(-----------------------)
--R                                                            e
--R     +
--R          b c x + a c
--R       e F
--R  /
--R      3       2
--R     e x + d e
--R                                                    Type: Expression(Integer)
--E 44
--S 45 of 1000
d0:=normalize(D(m0,x))
--R
--R
--R   (5)  0
--R                                                    Type: Expression(Integer)
--E 45
)clear all
--S 46 of 1000
t0:=F^(c*(a+b*x))/(d+e*x)^3
--R
--R
--R                 b c x + a c
--R                F
--R   (1)  ----------------------------
--R         3 3       2 2     2       3
--R        e x  + 3d e x  + 3d e x + d
--R                                                    Type: Expression(Integer)
--E 46
--S 47 of 1000
r0:=-1/2*F^(c*(a+b*x))/(e*(d+e*x)^2)-1/2*b*c*F^(c*(a+b*x))*_
   log(F)/(e^2*(d+e*x))+1/2*b^2*c^2*F^(c*(a-b*d/e))*Ei(b*c*(d+e*x)*_
   log(F)/e)*log(F)^2/e^3
--R
--R
--R   (2)
--R                                                 a c e - b c d
--R                                                 -------------
--R           2 2 2 2     2 2         2 2 2       2       e
--R         (b c e x  + 2b c d e x + b c d )log(F) F

--R      *
--R            (b c e x + b c d)log(F)
--R         Ei(-----------------------)
--R                       e
--R     +
--R                2                      2  b c x + a c
--R       ((- b c e x - b c d e)log(F) - e )F
--R  /
--R       5 2       4      2 3
--R     2e x  + 4d e x + 2d e
--R                                                    Type: Expression(Integer)
--E 47
--S 48 of 1000
a0:=integrate(t0,x)
--R
--R
--R           x            (%D b + a)c
--R         ++            F
--R   (3)   |   ------------------------------- d%D
--R        ++     3 3      2   2        2     3
--R             %D e  + 3%D d e  + 3%D d e + d
--R                                         Type: Union(Expression(Integer),...)
--E 48
--S 49 of 1000
m0:=a0-r0
--R
--R
--R   (4)
--R                                  x            (%D b + a)c
--R          5 2       4      2 3  ++            F
--R       (2e x  + 4d e x + 2d e ) |   ------------------------------- d%D
--R                               ++     3 3      2   2        2     3
--R                                    %D e  + 3%D d e  + 3%D d e + d
--R     +
--R                                                   a c e - b c d
--R                                                   -------------
--R             2 2 2 2     2 2         2 2 2       2       e
--R         (- b c e x  - 2b c d e x - b c d )log(F) F
--R      *
--R            (b c e x + b c d)log(F)
--R         Ei(-----------------------)
--R                       e
--R     +
--R              2                      2  b c x + a c
--R       ((b c e x + b c d e)log(F) + e )F
--R  /
--R       5 2       4      2 3
--R     2e x  + 4d e x + 2d e

--R                                                    Type: Expression(Integer)
--E 49
--S 50 of 1000
d0:=normalize(D(m0,x))
--R
--R
--R   (5)  0
--R                                                    Type: Expression(Integer)
--E 50
)clear all
--S 51 of 1000
t0:=F^(c*(a+b*x))/(d+e*x)^4
--R
--R
--R                      b c x + a c
--R                     F
--R   (1)  --------------------------------------
--R         4 4       3 3     2 2 2     3       4
--R        e x  + 4d e x  + 6d e x  + 4d e x + d
--R                                                    Type: Expression(Integer)
--E 51
--S 52 of 1000
r0:=-1/3*F^(c*(a+b*x))/(e*(d+e*x)^3)-1/6*b*c*F^(c*(a+b*x))*log(F)/(e^2*_
   (d+e*x)^2)-1/6*b^2*c^2*F^(c*(a+b*x))*log(F)^2/(e^3*(d+e*x))+_
   1/6*b^3*c^3*F^(c*(a-b*d/e))*Ei(b*c*(d+e*x)*log(F)/e)*log(F)^3/e^4
--R
--R
--R   (2)
--R                                                               a c e - b c d
--R                                                               -------------
--R           3 3 3 3     3 3   2 2     3 3 2       3 3 3       3       e
--R         (b c e x  + 3b c d e x  + 3b c d e x + b c d )log(F) F
--R      *
--R            (b c e x + b c d)log(F)
--R         Ei(-----------------------)
--R                       e
--R     +
--R               2 2 3 2     2 2   2     2 2 2        2
--R           (- b c e x  - 2b c d e x - b c d e)log(F)
--R         +
--R                   3           2            3
--R           (- b c e x - b c d e )log(F) - 2e
--R      *
--R          b c x + a c
--R         F
--R  /

--R       7 3        6 2      2 5      3 4
--R     6e x  + 18d e x  + 18d e x + 6d e
--R                                                    Type: Expression(Integer)
--E 52
--S 53 of 1000
a0:=integrate(t0,x)
--R
--R
--R           x                 (%D b + a)c
--R         ++                 F
--R   (3)   |   ------------------------------------------ d%D
--R        ++     4 4      3   3      2 2 2        3     4
--R             %D e  + 4%D d e  + 6%D d e  + 4%D d e + d
--R                                         Type: Union(Expression(Integer),...)
--E 53
--S 54 of 1000
m0:=a0-r0
--R
--R
--R   (4)
--R            7 3        6 2      2 5      3 4
--R         (6e x  + 18d e x  + 18d e x + 6d e )
--R      *
--R            x                 (%D b + a)c
--R          ++                 F
--R          |   ------------------------------------------ d%D
--R         ++     4 4      3   3      2 2 2        3     4
--R              %D e  + 4%D d e  + 6%D d e  + 4%D d e + d
--R     +
--R                                                                 a c e - b c d
--R                                                                 -------------
--R             3 3 3 3     3 3   2 2     3 3 2       3 3 3       3       e
--R         (- b c e x  - 3b c d e x  - 3b c d e x - b c d )log(F) F
--R      *
--R            (b c e x + b c d)log(F)
--R         Ei(-----------------------)
--R                       e
--R     +
--R             2 2 3 2     2 2   2     2 2 2        2         3           2
--R           (b c e x  + 2b c d e x + b c d e)log(F)  + (b c e x + b c d e )log(F)
--R         +
--R             3
--R           2e
--R      *
--R          b c x + a c
--R         F
--R  /
--R       7 3        6 2      2 5      3 4

--R     6e x  + 18d e x  + 18d e x + 6d e
--R                                                    Type: Expression(Integer)
--E 54
--S 55 of 1000
d0:=normalize(D(m0,x))
--R
--R
--R   (5)  0
--R                                                    Type: Expression(Integer)
--E 55
)clear all
--S 56 of 1000
t0:=F^(c*(a+b*x))/(d+e*x)^5
--R
--R
--R                            b c x + a c
--R                           F
--R   (1)  --------------------------------------------------
--R         5 5       4 4      2 3 3      3 2 2     4       5
--R        e x  + 5d e x  + 10d e x  + 10d e x  + 5d e x + d
--R                                                    Type: Expression(Integer)
--E 56
--S 57 of 1000
--r0:=-b^4*c^4*F^(c*(a-b*d/e))*GAMMA(-4,-b*c*(d+e*x)*log(F)/e)*log(F)^4/e^5
--E 57
--S 58 of 1000
--a0:=integrate(t0,x)
--E 58
--S 59 of 1000
--m0:=a0-r0
--E 59
--S 60 of 1000
--d0:=normalize(D(m0,x))
--E 60
)clear all
--S 61 of 1000
t0:=F^(c*(a+b*x))/(d+e*x)^6
--R
--R
--R                                  b c x + a c
--R                                 F

--R   (1)  -------------------------------------------------------------
--R         6 6       5 5      2 4 4      3 3 3      4 2 2     5       6
--R        e x  + 6d e x  + 15d e x  + 20d e x  + 15d e x  + 6d e x + d
--R                                                    Type: Expression(Integer)
--E 61
--S 62 of 1000
--r0:=b^5*c^5*F^(c*(a-b*d/e))*GAMMA(-5,-b*c*(d+e*x)*log(F)/e)*log(F)^5/e^6
--E 62
--S 63 of 1000
--a0:=integrate(t0,x)
--E 63
--S 64 of 1000
--m0:=a0-r0
--E 64
--S 65 of 1000
--d0:=normalize(D(m0,x))
--E 65
)clear all
--S 66 of 1000
t0:=F^(c*(a+b*x))*(d^5+5*d^4*e*x+10*d^3*e^2*x^2+10*d^2*e^3*x^3+_
   5*d*e^4*x^4+e^5*x^5)
--R
--R
--R          5 5       4 4      2 3 3      3 2 2     4       5  b c x + a c
--R   (1)  (e x  + 5d e x  + 10d e x  + 10d e x  + 5d e x + d )F
--R                                                    Type: Expression(Integer)
--E 66
--S 67 of 1000
--r0:=-e^5*F^(c*(a-b*d/e))*GAMMA(6,-b*c*(d+e*x)*log(F)/e)/(b^6*c^6*log(F)^6)
--E 67
--S 68 of 1000
--a0:=integrate(t0,x)
--E 68
--S 69 of 1000
--m0:=a0-r0
--E 69
--S 70 of 1000
--d0:=normalize(D(m0,x))
--E 70

)clear all
--S 71 of 1000
t0:=F^(c*(a+b*x))*(d^4+4*d^3*e*x+6*d^2*e^2*x^2+4*d*e^3*x^3+e^4*x^4)
--R
--R
--R          4 4       3 3     2 2 2     3       4  b c x + a c
--R   (1)  (e x  + 4d e x  + 6d e x  + 4d e x + d )F
--R                                                    Type: Expression(Integer)
--E 71
--S 72 of 1000
--r0:=e^4*F^(c*(a-b*d/e))*GAMMA(5,-b*c*(d+e*x)*log(F)/e)/(b^5*c^5*log(F)^5)
--E 72
--S 73 of 1000
--a0:=integrate(t0,x)
--E 73
--S 74 of 1000
--m0:=a0-r0
--E 74
--S 75 of 1000
--d0:=normalize(D(m0,x))
--E 75
)clear all
--S 76 of 1000
t0:=F^(c*(a+b*x))*(d^3+3*d^2*e*x+3*d*e^2*x^2+e^3*x^3)
--R
--R
--R          3 3       2 2     2       3  b c x + a c
--R   (1)  (e x  + 3d e x  + 3d e x + d )F
--R                                                    Type: Expression(Integer)
--E 76
--S 77 of 1000
r0:=-6*e^3*F^(c*(a+b*x))/(b^4*c^4*log(F)^4)+6*e^2*F^(c*(a+b*x))*(d+e*x)/_
   (b^3*c^3*log(F)^3)-3*e*F^(c*(a+b*x))*(d+e*x)^2/(b^2*c^2*log(F)^2)+_
   F^(c*(a+b*x))*(d+e*x)^3/(b*c*log(F))
--R
--R
--R   (2)
--R           3 3 3 3     3 3   2 2     3 3 2       3 3 3       3
--R         (b c e x  + 3b c d e x  + 3b c d e x + b c d )log(F)
--R       +
--R              2 2 3 2     2 2   2      2 2 2        2
--R         (- 3b c e x  - 6b c d e x - 3b c d e)log(F)

--R       +
--R                3            2            3
--R         (6b c e x + 6b c d e )log(F) - 6e
--R    *
--R        b c x + a c
--R       F
--R  /
--R      4 4      4
--R     b c log(F)
--R                                                    Type: Expression(Integer)
--E 77
--S 78 of 1000
a0:=integrate(t0,x)
--R
--R
--R   (3)
--R           3 3 3 3     3 3   2 2     3 3 2       3 3 3       3
--R         (b c e x  + 3b c d e x  + 3b c d e x + b c d )log(F)
--R       +
--R              2 2 3 2     2 2   2      2 2 2        2
--R         (- 3b c e x  - 6b c d e x - 3b c d e)log(F)
--R       +
--R                3            2            3
--R         (6b c e x + 6b c d e )log(F) - 6e
--R    *
--R         (b c x + a c)log(F)
--R       %e
--R  /
--R      4 4      4
--R     b c log(F)
--R                                         Type: Union(Expression(Integer),...)
--E 78
--S 79 of 1000
m0:=a0-r0
--R
--R
--R   (4)
--R             3 3 3 3     3 3   2 2     3 3 2       3 3 3       3
--R           (b c e x  + 3b c d e x  + 3b c d e x + b c d )log(F)
--R         +
--R                2 2 3 2     2 2   2      2 2 2        2
--R           (- 3b c e x  - 6b c d e x - 3b c d e)log(F)
--R         +
--R                  3            2            3
--R           (6b c e x + 6b c d e )log(F) - 6e
--R      *
--R           (b c x + a c)log(F)
--R         %e

--R     +
--R               3 3 3 3     3 3   2 2     3 3 2       3 3 3       3
--R           (- b c e x  - 3b c d e x  - 3b c d e x - b c d )log(F)
--R         +
--R              2 2 3 2     2 2   2      2 2 2        2
--R           (3b c e x  + 6b c d e x + 3b c d e)log(F)
--R         +
--R                    3            2            3
--R           (- 6b c e x - 6b c d e )log(F) + 6e
--R      *
--R          b c x + a c
--R         F
--R  /
--R      4 4      4
--R     b c log(F)
--R                                                    Type: Expression(Integer)
--E 79
--S 80 of 1000
d0:=normalize(D(m0,x))
--R
--R
--R   (5)  0
--R                                                    Type: Expression(Integer)
--E 80
)clear all
--S 81 of 1000
t0:=F^(c*(a+b*x))*(d^2+2*d*e*x+e^2*x^2)
--R
--R
--R          2 2             2  b c x + a c
--R   (1)  (e x  + 2d e x + d )F
--R                                                    Type: Expression(Integer)
--E 81
--S 82 of 1000
r0:=2*e^2*F^(c*(a+b*x))/(b^3*c^3*log(F)^3)-2*e*F^(c*(a+b*x))*(d+e*x)/_
   (b^2*c^2*log(F)^2)+F^(c*(a+b*x))*(d+e*x)^2/(b*c*log(F))
--R
--R
--R   (2)
--R           2 2 2 2     2 2         2 2 2       2            2
--R         (b c e x  + 2b c d e x + b c d )log(F)  + (- 2b c e x - 2b c d e)log(F)
--R       +
--R           2
--R         2e
--R    *
--R        b c x + a c

--R       F
--R  /
--R      3 3      3
--R     b c log(F)
--R                                                    Type: Expression(Integer)
--E 82
--S 83 of 1000
a0:=integrate(t0,x)
--R
--R
--R   (3)
--R           2 2 2 2     2 2         2 2 2       2            2
--R         (b c e x  + 2b c d e x + b c d )log(F)  + (- 2b c e x - 2b c d e)log(F)
--R       +
--R           2
--R         2e
--R    *
--R         (b c x + a c)log(F)
--R       %e
--R  /
--R      3 3      3
--R     b c log(F)
--R                                         Type: Union(Expression(Integer),...)
--E 83
--S 84 of 1000
m0:=a0-r0
--R
--R
--R   (4)
--R             2 2 2 2     2 2         2 2 2       2
--R           (b c e x  + 2b c d e x + b c d )log(F)
--R         +
--R                    2                        2
--R           (- 2b c e x - 2b c d e)log(F) + 2e
--R      *
--R           (b c x + a c)log(F)
--R         %e
--R     +
--R               2 2 2 2     2 2         2 2 2       2
--R           (- b c e x  - 2b c d e x - b c d )log(F)
--R         +
--R                  2                        2
--R           (2b c e x + 2b c d e)log(F) - 2e
--R      *
--R          b c x + a c
--R         F
--R  /
--R      3 3      3

--R     b c log(F)
--R                                                    Type: Expression(Integer)
--E 84
--S 85 of 1000
d0:=normalize(D(m0,x))
--R
--R
--R   (5)  0
--R                                                    Type: Expression(Integer)
--E 85
)clear all
--S 86 of 1000
t0:=F^(c*(a+b*x))*(d+e*x)
--R
--R
--R                  b c x + a c
--R   (1)  (e x + d)F
--R                                                    Type: Expression(Integer)
--E 86
--S 87 of 1000
r0:=-e*F^(c*(a+b*x))/(b^2*c^2*log(F)^2)+F^(c*(a+b*x))*(d+e*x)/(b*c*log(F))
--R
--R
--R                                      b c x + a c
--R        ((b c e x + b c d)log(F) - e)F
--R   (2)  -----------------------------------------
--R                        2 2      2
--R                       b c log(F)
--R                                                    Type: Expression(Integer)
--E 87
--S 88 of 1000
a0:=integrate(t0,x)
--R
--R
--R                                       (b c x + a c)log(F)
--R        ((b c e x + b c d)log(F) - e)%e
--R   (3)  --------------------------------------------------
--R                             2 2      2
--R                            b c log(F)
--R                                         Type: Union(Expression(Integer),...)
--E 88
--S 89 of 1000
m0:=a0-r0
--R

--R
--R   (4)
--R                                      (b c x + a c)log(F)
--R       ((b c e x + b c d)log(F) - e)%e
--R     +
--R                                       b c x + a c
--R       ((- b c e x - b c d)log(F) + e)F
--R  /
--R      2 2      2
--R     b c log(F)
--R                                                    Type: Expression(Integer)
--E 89
--S 90 of 1000
d0:=normalize(D(m0,x))
--R
--R
--R   (5)  0
--R                                                    Type: Expression(Integer)
--E 90
)clear all
--S 91 of 1000
t0:=F^(c*(a+b*x))
--R
--R
--R         b c x + a c
--R   (1)  F
--R                                                    Type: Expression(Integer)
--E 91
--S 92 of 1000
r0:=F^(c*(a+b*x))/(b*c*log(F))
--R
--R
--R         b c x + a c
--R        F
--R   (2)  ------------
--R         b c log(F)
--R                                                    Type: Expression(Integer)
--E 92
--S 93 of 1000
a0:=integrate(t0,x)
--R
--R
--R          (b c x + a c)log(F)
--R        %e
--R   (3)  ---------------------

--R              b c log(F)
--R                                         Type: Union(Expression(Integer),...)
--E 93
--S 94 of 1000
m0:=a0-r0
--R
--R
--R          (b c x + a c)log(F)    b c x + a c
--R        %e                    - F
--R   (4)  ------------------------------------
--R                     b c log(F)
--R                                                    Type: Expression(Integer)
--E 94
--S 95 of 1000
d0:=normalize(D(m0,x))
--R
--R
--R   (5)  0
--R                                                    Type: Expression(Integer)
--E 95
)clear all
--S 96 of 1000
t0:=F^(c*(a+b*x))/(d+e*x)
--R
--R
--R         b c x + a c
--R        F
--R   (1)  ------------
--R           e x + d
--R                                                    Type: Expression(Integer)
--E 96
--S 97 of 1000
r0:=F^(c*(a-b*d/e))*Ei(b*c*(d+e*x)*log(F)/e)/e
--R
--R
--R         a c e - b c d
--R         -------------
--R               e         (b c e x + b c d)log(F)
--R        F             Ei(-----------------------)
--R                                    e
--R   (2)  -----------------------------------------
--R                            e
--R                                                    Type: Expression(Integer)
--E 97

--S 98 of 1000
a0:=integrate(t0,x)
--R
--R
--R           x  (%D b + a)c
--R         ++  F
--R   (3)   |   ------------ d%D
--R        ++     %D e + d
--R                                         Type: Union(Expression(Integer),...)
--E 98
--S 99 of 1000
m0:=a0-r0
--R
--R
--R                                   a c e - b c d
--R            x  (%D b + a)c         -------------
--R          ++  F                          e         (b c e x + b c d)log(F)
--R        e |   ------------ d%D  - F             Ei(-----------------------)
--R         ++     %D e + d                                      e
--R   (4)  -------------------------------------------------------------------
--R                                         e
--R                                                    Type: Expression(Integer)
--E 99
--S 100 of 1000
d0:=normalize(D(m0,x))
--R
--R
--R   (5)  0
--R                                                    Type: Expression(Integer)
--E 100
)clear all
--S 101 of 1000
t0:=F^(c*(a+b*x))/(d^2+2*d*e*x+e^2*x^2)
--R
--R
--R            b c x + a c
--R           F
--R   (1)  ------------------
--R         2 2             2
--R        e x  + 2d e x + d
--R                                                    Type: Expression(Integer)
--E 101
--S 102 of 1000
r0:=-F^(c*(a+b*x))/(e*(d+e*x))+b*c*F^(c*(a-b*d/e))*Ei(b*c*(d+e*x)*_
   log(F)/e)*log(F)/e^2

--R
--R
--R   (2)
--R                               a c e - b c d
--R                               -------------
--R                                     e         (b c e x + b c d)log(F)
--R       (b c e x + b c d)log(F)F             Ei(-----------------------)
--R                                                          e
--R     +
--R            b c x + a c
--R       - e F
--R  /
--R      3       2
--R     e x + d e
--R                                                    Type: Expression(Integer)
--E 102
--S 103 of 1000
a0:=integrate(t0,x)
--R
--R
--R           x      (%D b + a)c
--R         ++      F
--R   (3)   |   -------------------- d%D
--R        ++     2 2              2
--R             %D e  + 2%D d e + d
--R                                         Type: Union(Expression(Integer),...)
--E 103
--S 104 of 1000
m0:=a0-r0
--R
--R
--R   (4)
--R                      x      (%D b + a)c
--R         3       2  ++      F
--R       (e x + d e ) |   -------------------- d%D
--R                   ++     2 2              2
--R                        %D e  + 2%D d e + d
--R     +
--R                                 a c e - b c d
--R                                 -------------
--R                                       e         (b c e x + b c d)log(F)
--R       (- b c e x - b c d)log(F)F             Ei(-----------------------)
--R                                                            e
--R     +
--R          b c x + a c
--R       e F
--R  /
--R      3       2

--R     e x + d e
--R                                                    Type: Expression(Integer)
--E 104
--S 105 of 1000
d0:=normalize(D(m0,x))
--R
--R
--R   (5)  0
--R                                                    Type: Expression(Integer)
--E 105
)clear all
--S 106 of 1000
t0:=F^(c*(a+b*x))/(d^3+3*d^2*e*x+3*d*e^2*x^2+e^3*x^3)
--R
--R
--R                 b c x + a c
--R                F
--R   (1)  ----------------------------
--R         3 3       2 2     2       3
--R        e x  + 3d e x  + 3d e x + d
--R                                                    Type: Expression(Integer)
--E 106
--S 107 of 1000
r0:=-1/2*F^(c*(a+b*x))/(e*(d+e*x)^2)-1/2*b*c*F^(c*(a+b*x))*log(F)/_
   (e^2*(d+e*x))+1/2*b^2*c^2*F^(c*(a-b*d/e))*Ei(b*c*(d+e*x)*log(F)/e)*_
   log(F)^2/e^3
--R
--R
--R   (2)
--R                                                 a c e - b c d
--R                                                 -------------
--R           2 2 2 2     2 2         2 2 2       2       e
--R         (b c e x  + 2b c d e x + b c d )log(F) F
--R      *
--R            (b c e x + b c d)log(F)
--R         Ei(-----------------------)
--R                       e
--R     +
--R                2                      2  b c x + a c
--R       ((- b c e x - b c d e)log(F) - e )F
--R  /
--R       5 2       4      2 3
--R     2e x  + 4d e x + 2d e
--R                                                    Type: Expression(Integer)
--E 107

--S 108 of 1000
a0:=integrate(t0,x)
--R
--R
--R           x            (%D b + a)c
--R         ++            F
--R   (3)   |   ------------------------------- d%D
--R        ++     3 3      2   2        2     3
--R             %D e  + 3%D d e  + 3%D d e + d
--R                                         Type: Union(Expression(Integer),...)
--E 108
--S 109 of 1000
m0:=a0-r0
--R
--R
--R   (4)
--R                                  x            (%D b + a)c
--R          5 2       4      2 3  ++            F
--R       (2e x  + 4d e x + 2d e ) |   ------------------------------- d%D
--R                               ++     3 3      2   2        2     3
--R                                    %D e  + 3%D d e  + 3%D d e + d
--R     +
--R                                                   a c e - b c d
--R                                                   -------------
--R             2 2 2 2     2 2         2 2 2       2       e
--R         (- b c e x  - 2b c d e x - b c d )log(F) F
--R      *
--R            (b c e x + b c d)log(F)
--R         Ei(-----------------------)
--R                       e
--R     +
--R              2                      2  b c x + a c
--R       ((b c e x + b c d e)log(F) + e )F
--R  /
--R       5 2       4      2 3
--R     2e x  + 4d e x + 2d e
--R                                                    Type: Expression(Integer)
--E 109
--S 110 of 1000
d0:=normalize(D(m0,x))
--R
--R
--R   (5)  0
--R                                                    Type: Expression(Integer)
--E 110
)clear all

--S 111 of 1000
t0:=F^(c*(a+b*x))/(d^4+4*d^3*e*x+6*d^2*e^2*x^2+4*d*e^3*x^3+e^4*x^4)
--R
--R
--R                      b c x + a c
--R                     F
--R   (1)  --------------------------------------
--R         4 4       3 3     2 2 2     3       4
--R        e x  + 4d e x  + 6d e x  + 4d e x + d
--R                                                    Type: Expression(Integer)
--E 111
--S 112 of 1000
r0:=-1/3*F^(c*(a+b*x))/(e*(d+e*x)^3)-1/6*b*c*F^(c*(a+b*x))*log(F)/_
   (e^2*(d+e*x)^2)-1/6*b^2*c^2*F^(c*(a+b*x))*log(F)^2/(e^3*(d+e*x))+_
   1/6*b^3*c^3*F^(c*(a-b*d/e))*Ei(b*c*(d+e*x)*log(F)/e)*log(F)^3/e^4
--R
--R
--R   (2)
--R                                                               a c e - b c d
--R                                                               -------------
--R           3 3 3 3     3 3   2 2     3 3 2       3 3 3       3       e
--R         (b c e x  + 3b c d e x  + 3b c d e x + b c d )log(F) F
--R      *
--R            (b c e x + b c d)log(F)
--R         Ei(-----------------------)
--R                       e
--R     +
--R               2 2 3 2     2 2   2     2 2 2        2
--R           (- b c e x  - 2b c d e x - b c d e)log(F)
--R         +
--R                   3           2            3
--R           (- b c e x - b c d e )log(F) - 2e
--R      *
--R          b c x + a c
--R         F
--R  /
--R       7 3        6 2      2 5      3 4
--R     6e x  + 18d e x  + 18d e x + 6d e
--R                                                    Type: Expression(Integer)
--E 112
--S 113 of 1000
a0:=integrate(t0,x)
--R
--R
--R           x                 (%D b + a)c
--R         ++                 F
--R   (3)   |   ------------------------------------------ d%D
--R        ++     4 4      3   3      2 2 2        3     4

--R             %D e  + 4%D d e  + 6%D d e  + 4%D d e + d
--R                                         Type: Union(Expression(Integer),...)
--E 113
--S 114 of 1000
m0:=a0-r0
--R
--R
--R   (4)
--R            7 3        6 2      2 5      3 4
--R         (6e x  + 18d e x  + 18d e x + 6d e )
--R      *
--R            x                 (%D b + a)c
--R          ++                 F
--R          |   ------------------------------------------ d%D
--R         ++     4 4      3   3      2 2 2        3     4
--R              %D e  + 4%D d e  + 6%D d e  + 4%D d e + d
--R     +
--R                                                                 a c e - b c d
--R                                                                 -------------
--R             3 3 3 3     3 3   2 2     3 3 2       3 3 3       3       e
--R         (- b c e x  - 3b c d e x  - 3b c d e x - b c d )log(F) F
--R      *
--R            (b c e x + b c d)log(F)
--R         Ei(-----------------------)
--R                       e
--R     +
--R             2 2 3 2     2 2   2     2 2 2        2         3           2
--R           (b c e x  + 2b c d e x + b c d e)log(F)  + (b c e x + b c d e )log(F)
--R         +
--R             3
--R           2e
--R      *
--R          b c x + a c
--R         F
--R  /
--R       7 3        6 2      2 5      3 4
--R     6e x  + 18d e x  + 18d e x + 6d e
--R                                                    Type: Expression(Integer)
--E 114
--S 115 of 1000
d0:=normalize(D(m0,x))
--R
--R
--R   (5)  0
--R                                                    Type: Expression(Integer)
--E 115
)clear all

--S 116 of 1000
t0:=F^(c*(a+b*x))/(d^5+5*d^4*e*x+10*d^3*e^2*x^2+10*d^2*e^3*x^3+_
   5*d*e^4*x^4+e^5*x^5)
--R
--R
--R                            b c x + a c
--R                           F
--R   (1)  --------------------------------------------------
--R         5 5       4 4      2 3 3      3 2 2     4       5
--R        e x  + 5d e x  + 10d e x  + 10d e x  + 5d e x + d
--R                                                    Type: Expression(Integer)
--E 116
--S 117 of 1000
--r0:=-b^4*c^4*F^(c*(a-b*d/e))*GAMMA(-4,-b*c*(d+e*x)*log(F)/e)*log(F)^4/e^5
--E 117
--S 118 of 1000
--a0:=integrate(t0,x)
--E 118
--S 119 of 1000
--m0:=a0-r0
--E 119
--S 120 of 1000
--d0:=normalize(D(m0,x))
--E 120
)clear all
--S 121 of 1000
t0:=F^(c*(a+b*x))/(d^6+6*d^5*e*x+15*d^4*e^2*x^2+20*d^3*e^3*x^3+_
   15*d^2*e^4*x^4+6*d*e^5*x^5+e^6*x^6)
--R
--R
--R                                  b c x + a c
--R                                 F
--R   (1)  -------------------------------------------------------------
--R         6 6       5 5      2 4 4      3 3 3      4 2 2     5       6
--R        e x  + 6d e x  + 15d e x  + 20d e x  + 15d e x  + 6d e x + d
--R                                                    Type: Expression(Integer)
--E 121
--S 122 of 1000
--r0:=b^5*c^5*F^(c*(a-b*d/e))*GAMMA(-5,-b*c*(d+e*x)*log(F)/e)*log(F)^5/e^6
--E 122
--S 123 of 1000

--a0:=integrate(t0,x)
--E 123
--S 124 of 1000
--m0:=a0-r0
--E 124
--S 125 of 1000
--d0:=normalize(D(m0,x))
--E 125
)clear all
--S 126 of 1000
t0:=F^(c*(a+b*x))*((d+e*x)^n)^m
--R
--R
--R         b c x + a c         m n
--R   (1)  F           (e x + d)
--R                                                    Type: Expression(Integer)
--E 126
--S 127 of 1000
--r0:=-F^(c*(a-b*d/e))*(d+e*x)*((d+e*x)^n)^m*GAMMA(1+m*n,-b*c*(d+e*x)*_
--  log(F)/e)*(-b*c*(d+e*x)*log(F)/e)^(-1-m*n)/e
--E 127
--S 128 of 1000
--a0:=integrate(t0,x)
--E 128
--S 129 of 1000
--m0:=a0-r0
--E 129
--S 130 of 1000
--d0:=normalize(D(m0,x))
--E 130
)clear all
--S 131 of 1000
t0:=F^(c*(a+b*x))*(d^4+4*d^3*e*x+6*d^2*e^2*x^2+4*d*e^3*x^3+e^4*x^4)^m
--R
--R
--R         b c x + a c  4 4       3 3     2 2 2     3       4 m
--R   (1)  F           (e x  + 4d e x  + 6d e x  + 4d e x + d )
--R                                                    Type: Expression(Integer)
--E 131

--S 132 of 1000
--r0:=-F^(c*(a-b*d/e))*(d+e*x)*((d+e*x)^4)^m*GAMMA(1+4*m,-b*c*(d+e*x)*_
--  log(F)/e)*(-b*c*(d+e*x)*log(F)/e)^(-1-4*m)/e
--E 132
--S 133 of 1000
--a0:=integrate(t0,x)
--E 133
--S 134 of 1000
--m0:=a0-r0
--E 134
--S 135 of 1000
--d0:=normalize(D(m0,x))
--E 135
)clear all
--S 136 of 1000
t0:=F^(c*(a+b*x))*(d^3+3*d^2*e*x+3*d*e^2*x^2+e^3*x^3)^m
--R
--R
--R         b c x + a c  3 3       2 2     2       3 m
--R   (1)  F           (e x  + 3d e x  + 3d e x + d )
--R                                                    Type: Expression(Integer)
--E 136
--S 137 of 1000
--r0:=-F^(c*(a-b*d/e))*(d+e*x)*((d+e*x)^3)^m*GAMMA(1+3*m,-b*c*(d+e*x)*_
--  log(F)/e)*(-b*c*(d+e*x)*log(F)/e)^(-1-3*m)/e
--E 137
--S 138 of 1000
--a0:=integrate(t0,x)
--E 138
--S 139 of 1000
--m0:=a0-r0
--E 139
--S 140 of 1000
--d0:=normalize(D(m0,x))
--E 140
)clear all
--S 141 of 1000
t0:=F^(c*(a+b*x))*(d^2+2*d*e*x+e^2*x^2)^m
--R

--R
--R         b c x + a c  2 2             2 m
--R   (1)  F           (e x  + 2d e x + d )
--R                                                    Type: Expression(Integer)
--E 141
--S 142 of 1000
--r0:=-F^(c*(a-b*d/e))*(d+e*x)*((d+e*x)^2)^m*GAMMA(1+2*m,-b*c*(d+e*x)*_
--  log(F)/e)*(-b*c*(d+e*x)*log(F)/e)^(-1-2*m)/e
--E 142
--S 143 of 1000
--a0:=integrate(t0,x)
--E 143
--S 144 of 1000
--m0:=a0-r0
--E 144
--S 145 of 1000
--d0:=normalize(D(m0,x))
--E 145
)clear all
--S 146 of 1000
t0:=F^(c*(a+b*x))*(d+e*x)^m
--R
--R
--R         b c x + a c         m
--R   (1)  F           (e x + d)
--R                                                    Type: Expression(Integer)
--E 146
--S 147 of 1000
--r0:=-F^(c*(a-b*d/e))*(d+e*x)^(1+m)*GAMMA(1+m,-b*c*(d+e*x)*log(F)/e)*_
--  (-b*c*(d+e*x)*log(F)/e)^(-1-m)/e
--E 147
--S 148 of 1000
--a0:=integrate(t0,x)
--E 148
--S 149 of 1000
--m0:=a0-r0
--E 149
--S 150 of 1000
--d0:=normalize(D(m0,x))
--E 150

--S 151 of 1000
t0:=F^(c*(a+b*x))/(d+e*x)^m
--R
--R
--R         b c x + a c
--R        F
--R   (1)  ------------
--R                  m
--R         (e x + d)
--R                                                    Type: Expression(Integer)
--E 151
--S 152 of 1000
--r0:=-F^(c*(a-b*d/e))*(d+e*x)^(1-m)*GAMMA(1-m,-b*c*(d+e*x)*log(F)/e)*_
--  (-b*c*(d+e*x)*log(F)/e)^(-1+m)/e
--E 152
--S 153 of 1000
--a0:=integrate(t0,x)
--E 153
--S 154 of 1000
--m0:=a0-r0
--E 154
--S 155 of 1000
--d0:=normalize(D(m0,x))
--E 155
)clear all
--S 156 of 1000
t0:=F^(c*(a+b*x))/(d^2+2*d*e*x+e^2*x^2)^m
--R
--R
--R              b c x + a c
--R             F
--R   (1)  ---------------------
--R          2 2             2 m
--R        (e x  + 2d e x + d )
--R                                                    Type: Expression(Integer)
--E 156
--S 157 of 1000
--r0:=-F^(c*(a-b*d/e))*(d+e*x)*GAMMA(1-2*m,-b*c*(d+e*x)*log(F)/e)*_
--  (-b*c*(d+e*x)*log(F)/e)^(-1+2*m)/(e*((d+e*x)^2)^m)
--E 157

--S 159 of 1000
--m0:=a0-r0
--E 159
--S 160 of 1000
--d0:=normalize(D(m0,x))
--E 160
)clear all
--S 161 of 1000
t0:=F^(c*(a+b*x))/(d^3+3*d^2*e*x+3*d*e^2*x^2+e^3*x^3)^m
--R
--R
--R                   b c x + a c
--R                  F
--R   (1)  -------------------------------
--R          3 3       2 2     2       3 m
--R        (e x  + 3d e x  + 3d e x + d )
--R                                                    Type: Expression(Integer)
--E 161
--S 162 of 1000
--r0:=-F^(c*(a-b*d/e))*(d+e*x)*GAMMA(1-3*m,-b*c*(d+e*x)*log(F)/e)*_
--  (-b*c*(d+e*x)*log(F)/e)^(-1+3*m)/(e*((d+e*x)^3)^m)
--E 162
--S 163 of 1000
--a0:=integrate(t0,x)
--E 163
--S 164 of 1000
--m0:=a0-r0
--E 164
--S 165 of 1000
--d0:=normalize(D(m0,x))
--E 165
)clear all
--S 166 of 1000
t0:=f^(2+5*x)
--R
--R

--R         5x + 2
--R   (1)  f
--R                                                    Type: Expression(Integer)
--E 166
--S 167 of 1000
r0:=1/5*f^(2+5*x)/log(f)
--R
--R
--R         5x + 2
--R        f
--R   (2)  -------
--R        5log(f)
--R                                                    Type: Expression(Integer)
--E 167
--S 168 of 1000
a0:=integrate(t0,x)
--R
--R
--R          (5x + 2)log(f)
--R        %e
--R   (3)  ----------------
--R             5log(f)
--R                                         Type: Union(Expression(Integer),...)
--E 168
--S 169 of 1000
m0:=a0-r0
--R
--R
--R          (5x + 2)log(f)    5x + 2
--R        %e               - f
--R   (4)  --------------------------
--R                  5log(f)
--R                                                    Type: Expression(Integer)
--E 169
--S 170 of 1000
d0:=normalize(D(m0,x))
--R
--R
--R   (5)  0
--R                                                    Type: Expression(Integer)
--E 170
)clear all
--S 171 of 1000
t0:=f^(a+b*x)

--R
--R
--R         b x + a
--R   (1)  f
--R                                                    Type: Expression(Integer)
--E 171
--S 172 of 1000
r0:=f^(a+b*x)/(b*log(f))
--R
--R
--R         b x + a
--R        f
--R   (2)  --------
--R        b log(f)
--R                                                    Type: Expression(Integer)
--E 172
--S 173 of 1000
a0:=integrate(t0,x)
--R
--R
--R          (b x + a)log(f)
--R        %e
--R   (3)  -----------------
--R             b log(f)
--R                                         Type: Union(Expression(Integer),...)
--E 173
--S 174 of 1000
m0:=a0-r0
--R
--R
--R          (b x + a)log(f)    b x + a
--R        %e                - f
--R   (4)  ----------------------------
--R                  b log(f)
--R                                                    Type: Expression(Integer)
--E 174
--S 175 of 1000
d0:=normalize(D(m0,x))
--R
--R
--R   (5)  0
--R                                                    Type: Expression(Integer)
--E 175
)clear all

--S 176 of 1000
t0:=10^(2+5*x)
--R
--R
--R          5x + 2
--R   (1)  10
--R                                                    Type: Expression(Integer)
--E 176
--S 177 of 1000
r0:=2^(2+5*x)*5^(1+5*x)/log(10)
--R
--R
--R         5x + 2 5x + 1
--R        2      5
--R   (2)  --------------
--R            log(10)
--R                                                    Type: Expression(Integer)
--E 177
--S 178 of 1000
a0:=integrate(t0,x)
--R
--R
--R          (5x + 2)log(10)
--R        %e
--R   (3)  -----------------
--R             5log(10)
--R                                         Type: Union(Expression(Integer),...)
--E 178
--S 179 of 1000
m0:=a0-r0
--R
--R
--R             5x + 2 5x + 1     (5x + 2)log(10)
--R        - 5 2      5       + %e
--R   (4)  --------------------------------------
--R                       5log(10)
--R                                                    Type: Expression(Integer)
--E 179
--S 180 of 1000
d0:=normalize(D(m0,x))
--R
--R
--R   (5)
--R                (5x + 2)log(10)
--R       log(10)%e
--R     +

--R                              (5x + 2)log(2)  (5x + 1)log(5)
--R       (- 5log(5) - 5log(2))%e              %e
--R  /
--R     log(10)
--R                                                    Type: Expression(Integer)
--E 180
)clear all
--S 181 of 1000
t0:=F^(c*(a+b*x))*(d+e*x)^(11/2)
--R
--R
--R   (1)
--R     5 5       4 4      2 3 3      3 2 2     4       5  b c x + a c +-------+
--R   (e x  + 5d e x  + 10d e x  + 10d e x  + 5d e x + d )F           \|e x + d
--R                                                    Type: Expression(Integer)
--E 181
--S 182 of 1000
--r0:=-F^(c*(a-b*d/e))*(d+e*x)^(13/2)*GAMMA(13/2,-b*c*(d+e*x)*log(F)/e)/_
--  (e*(-b*c*(d+e*x)*log(F)/e)^(13/2))
--E 182
--S 183 of 1000
--a0:=integrate(t0,x)
--E 183
--S 184 of 1000
--m0:=a0-r0
--E 184
--S 185 of 1000
--d0:=normalize(D(m0,x))
--E 185
)clear all
--S 186 of 1000
t0:=F^(c*(a+b*x))*(d+e*x)^(9/2)
--R
--R
--R          4 4       3 3     2 2 2     3       4  b c x + a c +-------+
--R   (1)  (e x  + 4d e x  + 6d e x  + 4d e x + d )F           \|e x + d
--R                                                    Type: Expression(Integer)
--E 186
--S 187 of 1000
--r0:=-F^(c*(a-b*d/e))*(d+e*x)^(11/2)*GAMMA(11/2,-b*c*(d+e*x)*log(F)/e)/_
--  (e*(-b*c*(d+e*x)*log(F)/e)^(11/2))

--E 187
--S 188 of 1000
--a0:=integrate(t0,x)
--E 188
--S 189 of 1000
--m0:=a0-r0
--E 189
--S 190 of 1000
--d0:=normalize(D(m0,x))
--E 190
)clear all
--S 191 of 1000
t0:=F^(c*(a+b*x))*(d+e*x)^(7/2)
--R
--R
--R          3 3       2 2     2       3  b c x + a c +-------+
--R   (1)  (e x  + 3d e x  + 3d e x + d )F           \|e x + d
--R                                                    Type: Expression(Integer)
--E 191
--S 192 of 1000
--r0:=35/4*e^2*F^(c*(a+b*x))*(d+e*x)^(3/2)/(b^3*c^3*log(F)^3)-_
--   7/2*e*F^(c*(a+b*x))*(d+e*x)^(5/2)/(b^2*c^2*log(F)^2)+F^(c*(a+b*x))*_
--   (d+e*x)^(7/2)/(b*c*log(F))+105/16*e^(7/2)*F^(c*(a-b*d/e))*_
--   erfi(sqrt(b)*sqrt(c)*sqrt(d+e*x)*sqrt(log(F))/sqrt(e))*sqrt(%pi)/_
--   (b^(9/2)*c^(9/2)*log(F)^(9/2))-105/8*e^3*F^(c*(a+b*x))*_
--   sqrt(d+e*x)/(b^4*c^4*log(F)^4)
--E 192
--S 193 of 1000
--a0:=integrate(t0,x)
--E 193
--S 194 of 1000
--m0:=a0-r0
--E 194
--S 195 of 1000
--d0:=normalize(D(m0,x))
--E 195
)clear all
--S 196 of 1000
t0:=F^(c*(a+b*x))*(d+e*x)^(5/2)

--R
--R
--R          2 2             2  b c x + a c +-------+
--R   (1)  (e x  + 2d e x + d )F           \|e x + d
--R                                                    Type: Expression(Integer)
--E 196
--S 197 of 1000
--r0:=-5/2*e*F^(c*(a+b*x))*(d+e*x)^(3/2)/(b^2*c^2*log(F)^2)+F^(c*(a+b*x))*_
--  (d+e*x)^(5/2)/(b*c*log(F))-15/8*e^(5/2)*F^(c*(a-b*d/e))*_
--  erfi(sqrt(b)*sqrt(c)*sqrt(d+e*x)*sqrt(log(F))/sqrt(e))*_
--  sqrt(%pi)/(b^(7/2)*c^(7/2)*log(F)^(7/2))+15/4*e^2*F^(c*(a+b*x))*_
--  sqrt(d+e*x)/(b^3*c^3*log(F)^3)
--E 197
--S 198 of 1000
--a0:=integrate(t0,x)
--E 198
--S 199 of 1000
--m0:=a0-r0
--E 199
--S 200 of 1000
--d0:=normalize(D(m0,x))
--E 200
)clear all
--S 201 of 1000
t0:=F^(c*(a+b*x))*(d+e*x)^(3/2)
--R
--R
--R                  b c x + a c +-------+
--R   (1)  (e x + d)F           \|e x + d
--R                                                    Type: Expression(Integer)
--E 201
--S 202 of 1000
--r0:=F^(c*(a+b*x))*(d+e*x)^(3/2)/(b*c*log(F))+3/4*e^(3/2)*_
--  F^(c*(a-b*d/e))*erfi(sqrt(b)*sqrt(c)*sqrt(d+e*x)*sqrt(log(F))/_
--  sqrt(e))*sqrt(%pi)/(b^(5/2)*c^(5/2)*log(F)^(5/2))-3/2*e*F^(c*_
--  (a+b*x))*sqrt(d+e*x)/(b^2*c^2*log(F)^2)
--E 202
--S 203 of 1000
--a0:=integrate(t0,x)
--E 203
--S 204 of 1000

--m0:=a0-r0
--E 204
--S 205 of 1000
--d0:=normalize(D(m0,x))
--E 205
)clear all
--S 206 of 1000
t0:=F^(c*(a+b*x))*(d+e*x)^(1/2)
--R
--R
--R         b c x + a c +-------+
--R   (1)  F           \|e x + d
--R                                                    Type: Expression(Integer)
--E 206
--S 207 of 1000
--r0:=-1/2*F^(c*(a-b*d/e))*erfi(sqrt(b)*sqrt(c)*sqrt(d+e*x)*sqrt(log(F))/_
--  sqrt(e))*sqrt(%pi)*sqrt(e)/(b^(3/2)*c^(3/2)*log(F)^(3/2))+_
--  F^(c*(a+b*x))*sqrt(d+e*x)/(b*c*log(F))
--E 207
--S 208 of 1000
--a0:=integrate(t0,x)
--E 208
--S 209 of 1000
--m0:=a0-r0
--E 209
--S 210 of 1000
--d0:=normalize(D(m0,x))
--E 210
)clear all
--S 211 of 1000
t0:=F^(c*(a+b*x))/(d+e*x)^(1/2)
--R
--R
--R         b c x + a c
--R        F
--R   (1)  ------------
--R          +-------+
--R         \|e x + d
--R                                                    Type: Expression(Integer)
--E 211

--S 212 of 1000
--r0:=F^(c*(a-b*d/e))*erfi(sqrt(b)*sqrt(c)*sqrt(d+e*x)*sqrt(log(F))/_
--  sqrt(e))*sqrt(%pi)/(sqrt(b)*sqrt(c)*sqrt(e)*sqrt(log(F)))
--E 212
--S 213 of 1000
--a0:=integrate(t0,x)
--E 213
--S 214 of 1000
--m0:=a0-r0
--E 214
--S 215 of 1000
--d0:=normalize(D(m0,x))
--E 215
)clear all
--S 216 of 1000
t0:=F^(c*(a+b*x))/(d+e*x)^(3/2)
--R
--R
--R             b c x + a c
--R            F
--R   (1)  -------------------
--R                  +-------+
--R        (e x + d)\|e x + d
--R                                                    Type: Expression(Integer)
--E 216
--S 217 of 1000
--r0:=-2*F^(c*(a+b*x))/(e*sqrt(d+e*x))+2*F^(c*(a-b*d/e))*erfi(sqrt(b)*_
--  sqrt(c)*sqrt(d+e*x)*sqrt(log(F))/sqrt(e))*sqrt(%pi)*sqrt(b)*_
--  sqrt(c)*sqrt(log(F))/e^(3/2)
--E 217
--S 218 of 1000
--a0:=integrate(t0,x)
--E 218
--S 219 of 1000
--m0:=a0-r0
--E 219
--S 220 of 1000
--d0:=normalize(D(m0,x))
--E 220
)clear all

--S 221 of 1000
t0:=F^(c*(a+b*x))/(d+e*x)^(5/2)
--R
--R
--R                  b c x + a c
--R                 F
--R   (1)  ------------------------------
--R          2 2             2  +-------+
--R        (e x  + 2d e x + d )\|e x + d
--R                                                    Type: Expression(Integer)
--E 221
--S 222 of 1000
--r0:=-2/3*F^(c*(a+b*x))/(e*(d+e*x)^(3/2))+4/3*b^(3/2)*c^(3/2)*_
--  F^(c*(a-b*d/e))*erfi(sqrt(b)*sqrt(c)*sqrt(d+e*x)*sqrt(log(F))/_
--  sqrt(e))*log(F)^(3/2)*sqrt(%pi)/e^(5/2)-4/3*b*c*F^(c*(a+b*x))*_
--  log(F)/(e^2*sqrt(d+e*x))
--E 222
--S 223 of 1000
--a0:=integrate(t0,x)
--E 223
--S 224 of 1000
--m0:=a0-r0
--E 224
--S 225 of 1000
--d0:=normalize(D(m0,x))
--E 225
)clear all
--S 226 of 1000
t0:=F^(c*(a+b*x))/(d+e*x)^(7/2)
--R
--R
--R                       b c x + a c
--R                      F
--R   (1)  ----------------------------------------
--R          3 3       2 2     2       3  +-------+
--R        (e x  + 3d e x  + 3d e x + d )\|e x + d
--R                                                    Type: Expression(Integer)
--E 226
--S 227 of 1000
--r0:=-2/5*F^(c*(a+b*x))/(e*(d+e*x)^(5/2))-4/15*b*c*F^(c*(a+b*x))*_
--  log(F)/(e^2*(d+e*x)^(3/2))+8/15*b^(5/2)*c^(5/2)*F^(c*(a-b*d/e))*_
--  erfi(sqrt(b)*sqrt(c)*sqrt(d+e*x)*sqrt(log(F))/sqrt(e))*log(F)^(5/2)*_

--  sqrt(%pi)/e^(7/2)-8/15*b^2*c^2*F^(c*(a+b*x))*log(F)^2/(e^3*sqrt(d+e*x))
--E 227
--S 228 of 1000
--a0:=integrate(t0,x)
--E 228
--S 229 of 1000
--m0:=a0-r0
--E 229
--S 230 of 1000
--d0:=normalize(D(m0,x))
--E 230
)clear all
--S 231 of 1000
t0:=F^(c*(a+b*x))/(d+e*x)^(9/2)
--R
--R
--R                            b c x + a c
--R                           F
--R   (1)  --------------------------------------------------
--R          4 4       3 3     2 2 2     3       4  +-------+
--R        (e x  + 4d e x  + 6d e x  + 4d e x + d )\|e x + d
--R                                                    Type: Expression(Integer)
--E 231
--S 232 of 1000
--r0:=-2/7*F^(c*(a+b*x))/(e*(d+e*x)^(7/2))-4/35*b*c*F^(c*(a+b*x))*_
--  log(F)/(e^2*(d+e*x)^(5/2))-8/105*b^2*c^2*F^(c*(a+b*x))*_
--  log(F)^2/(e^3*(d+e*x)^(3/2))+16/105*b^(7/2)*c^(7/2)*F^(c*(a-b*d/e))*_
--  erfi(sqrt(b)*sqrt(c)*sqrt(d+e*x)*sqrt(log(F))/sqrt(e))*log(F)^(7/2)*_
--  sqrt(%pi)/e^(9/2)-16/105*b^3*c^3*F^(c*(a+b*x))*log(F)^3/(e^4*sqrt(d+e*x))
--E 232
--S 233 of 1000
--a0:=integrate(t0,x)
--E 233
--S 234 of 1000
--m0:=a0-r0
--E 234
--S 235 of 1000
--d0:=normalize(D(m0,x))
--E 235
)clear all

--S 236 of 1000
t0:=F^(c*(a+b*x))/(d+e*x)^(11/2)
--R
--R
--R                                  b c x + a c
--R                                 F
--R   (1)  --------------------------------------------------------------
--R          5 5       4 4      2 3 3      3 2 2     4       5  +-------+
--R        (e x  + 5d e x  + 10d e x  + 10d e x  + 5d e x + d )\|e x + d
--R                                                    Type: Expression(Integer)
--E 236
--S 237 of 1000
--r0:=-F^(c*(a-b*d/e))*GAMMA(-9/2,-b*c*(d+e*x)*log(F)/e)*(-b*c*(d+e*x)*_
--  log(F)/e)^(9/2)/(e*(d+e*x)^(9/2))
--E 237
--S 238 of 1000
--a0:=integrate(t0,x)
--E 238
--S 239 of 1000
--m0:=a0-r0
--E 239
--S 240 of 1000
--d0:=normalize(D(m0,x))
--E 240
)clear all
--S 241 of 1000
t0:=F^(c*(a+b*x))/(d+e*x)^(13/2)
--R
--R
--R   (1)
--R                                   b c x + a c
--R                                  F
--R   -------------------------------------------------------------------------
--R     6 6       5 5      2 4 4      3 3 3      4 2 2     5       6  +-------+
--R   (e x  + 6d e x  + 15d e x  + 20d e x  + 15d e x  + 6d e x + d )\|e x + d
--R                                                    Type: Expression(Integer)
--E 241
--S 242 of 1000
--r0:=-F^(c*(a-b*d/e))*GAMMA(-11/2,-b*c*(d+e*x)*log(F)/e)*(-b*c*(d+e*x)*_
--  log(F)/e)^(11/2)/(e*(d+e*x)^(11/2))
--E 242

--S 244 of 1000
--m0:=a0-r0
--E 244
--S 245 of 1000
--d0:=normalize(D(m0,x))
--E 245
)clear all
--S 246 of 1000
t0:=x^(13/2)/%e^(b*x)
--R
--R
--R         6 +-+
--R        x \|x
--R   (1)  ------
--R           b x
--R         %e
--R                                                    Type: Expression(Integer)
--E 246
--S 247 of 1000
--r0:=-x^(13/2)*GAMMA(15/2,b*x)/(b*(b*x)^(13/2))
--E 247
--S 248 of 1000
--a0:=integrate(t0,x)
--E 248
--S 249 of 1000
--m0:=a0-r0
--E 249
--S 250 of 1000
--d0:=normalize(D(m0,x))
--E 250
)clear all
--S 251 of 1000
t0:=F^(c*(a+b*x))*(d+e*x)
--R
--R
--R                  b c x + a c
--R   (1)  (e x + d)F

--S 252 of 1000
r0:=-e*F^(c*(a+b*x))/(b^2*c^2*log(F)^2)+F^(c*(a+b*x))*(d+e*x)/(b*c*log(F))
--R
--R
--R                                      b c x + a c
--R        ((b c e x + b c d)log(F) - e)F
--R   (2)  -----------------------------------------
--R                        2 2      2
--R                       b c log(F)
--R                                                    Type: Expression(Integer)
--E 252
--S 253 of 1000
a0:=integrate(t0,x)
--R
--R
--R                                       (b c x + a c)log(F)
--R        ((b c e x + b c d)log(F) - e)%e
--R   (3)  --------------------------------------------------
--R                             2 2      2
--R                            b c log(F)
--R                                         Type: Union(Expression(Integer),...)
--E 253
--S 254 of 1000
m0:=a0-r0
--R
--R
--R   (4)
--R                                      (b c x + a c)log(F)
--R       ((b c e x + b c d)log(F) - e)%e
--R     +
--R                                       b c x + a c
--R       ((- b c e x - b c d)log(F) + e)F
--R  /
--R      2 2      2
--R     b c log(F)
--R                                                    Type: Expression(Integer)
--E 254
--S 255 of 1000
d0:=normalize(D(m0,x))
--R
--R
--R   (5)  0
--R                                                    Type: Expression(Integer)
--E 255

--S 256 of 1000
t0:=F^(c*(a+b*x))*(d+e*x+f*x^2)
--R
--R
--R            2            b c x + a c
--R   (1)  (f x  + e x + d)F
--R                                                    Type: Expression(Integer)
--E 256
--S 257 of 1000
r0:=2*f*F^(c*(a+b*x))/(b^3*c^3*log(F)^3)-e*F^(c*(a+b*x))/(b^2*c^2*log(F)^2)-_
   2*f*F^(c*(a+b*x))*x/(b^2*c^2*log(F)^2)+d*F^(c*(a+b*x))/(b*c*log(F))+_
   e*F^(c*(a+b*x))*x/(b*c*log(F))+f*F^(c*(a+b*x))*x^2/(b*c*log(F))
--R
--R
--R   (2)
--R          2 2   2    2 2       2 2        2
--R       ((b c f x  + b c e x + b c d)log(F)  + (- 2b c f x - b c e)log(F) + 2f)
--R    *
--R        b c x + a c
--R       F
--R  /
--R      3 3      3
--R     b c log(F)
--R                                                    Type: Expression(Integer)
--E 257
--S 258 of 1000
a0:=integrate(t0,x)
--R
--R
--R   (3)
--R          2 2   2    2 2       2 2        2
--R       ((b c f x  + b c e x + b c d)log(F)  + (- 2b c f x - b c e)log(F) + 2f)
--R    *
--R         (b c x + a c)log(F)
--R       %e
--R  /
--R      3 3      3
--R     b c log(F)
--R                                         Type: Union(Expression(Integer),...)
--E 258
--S 259 of 1000
m0:=a0-r0
--R
--R

--R   (4)
--R            2 2   2    2 2       2 2        2
--R         ((b c f x  + b c e x + b c d)log(F)  + (- 2b c f x - b c e)log(F) + 2f)
--R      *
--R           (b c x + a c)log(F)
--R         %e
--R     +
--R              2 2   2    2 2       2 2        2
--R         ((- b c f x  - b c e x - b c d)log(F)  + (2b c f x + b c e)log(F) - 2f)
--R      *
--R          b c x + a c
--R         F
--R  /
--R      3 3      3
--R     b c log(F)
--R                                                    Type: Expression(Integer)
--E 259
--S 260 of 1000
d0:=normalize(D(m0,x))
--R
--R
--R   (5)  0
--R                                                    Type: Expression(Integer)
--E 260
)clear all
--S 261 of 1000
t0:=F^(c*(a+b*x))*(d+e*x+f*x^2+g*x^3)
--R
--R
--R            3      2            b c x + a c
--R   (1)  (g x  + f x  + e x + d)F
--R                                                    Type: Expression(Integer)
--E 261
--S 262 of 1000
r0:=-6*F^(c*(a+b*x))*g/(b^4*c^4*log(F)^4)+2*f*F^(c*(a+b*x))/(b^3*c^3*_
   log(F)^3)+6*F^(c*(a+b*x))*g*x/(b^3*c^3*log(F)^3)-e*F^(c*(a+b*x))/_
   (b^2*c^2*log(F)^2)-2*f*F^(c*(a+b*x))*x/(b^2*c^2*log(F)^2)-3*F^(c*_
   (a+b*x))*g*x^2/(b^2*c^2*log(F)^2)+d*F^(c*(a+b*x))/(b*c*log(F))+_
   e*F^(c*(a+b*x))*x/(b*c*log(F))+f*F^(c*(a+b*x))*x^2/(b*c*log(F))+_
   F^(c*(a+b*x))*g*x^3/(b*c*log(F))
--R
--R
--R   (2)
--R           3 3   3    3 3   2    3 3       3 3        3
--R         (b c g x  + b c f x  + b c e x + b c d)log(F)
--R       +

--R            2 2   2     2 2       2 2        2
--R       (- 3b c g x  - 2b c f x - b c e)log(F)  + (6b c g x + 2b c f)log(F) - 6g
--R    *
--R        b c x + a c
--R       F
--R  /
--R      4 4      4
--R     b c log(F)
--R                                                    Type: Expression(Integer)
--E 262
--S 263 of 1000
a0:=integrate(t0,x)
--R
--R
--R   (3)
--R           3 3   3    3 3   2    3 3       3 3        3
--R         (b c g x  + b c f x  + b c e x + b c d)log(F)
--R       +
--R            2 2   2     2 2       2 2        2
--R       (- 3b c g x  - 2b c f x - b c e)log(F)  + (6b c g x + 2b c f)log(F) - 6g
--R    *
--R         (b c x + a c)log(F)
--R       %e
--R  /
--R      4 4      4
--R     b c log(F)
--R                                         Type: Union(Expression(Integer),...)
--E 263
--S 264 of 1000
m0:=a0-r0
--R
--R
--R   (4)
--R             3 3   3    3 3   2    3 3       3 3        3
--R           (b c g x  + b c f x  + b c e x + b c d)log(F)
--R         +
--R                2 2   2     2 2       2 2        2
--R           (- 3b c g x  - 2b c f x - b c e)log(F)  + (6b c g x + 2b c f)log(F)
--R         +
--R           - 6g
--R      *
--R           (b c x + a c)log(F)
--R         %e
--R     +
--R               3 3   3    3 3   2    3 3       3 3        3
--R           (- b c g x  - b c f x  - b c e x - b c d)log(F)
--R         +
--R              2 2   2     2 2       2 2        2

--R           (3b c g x  + 2b c f x + b c e)log(F)  + (- 6b c g x - 2b c f)log(F)
--R         +
--R           6g
--R      *
--R          b c x + a c
--R         F
--R  /
--R      4 4      4
--R     b c log(F)
--R                                                    Type: Expression(Integer)
--E 264
--S 265 of 1000
d0:=normalize(D(m0,x))
--R
--R
--R   (5)  0
--R                                                    Type: Expression(Integer)
--E 265
)clear all
--S 266 of 1000
t0:=F^(c*(a+b*x))*(d+e*x+f*x^2+g*x^3+h*x^4)
--R
--R
--R            4      3      2            b c x + a c
--R   (1)  (h x  + g x  + f x  + e x + d)F
--R                                                    Type: Expression(Integer)
--E 266
--S 267 of 1000
--r0:=F^(a*c)*h*GAMMA(5,-b*c*x*log(F))/(b^5*c^5*log(F)^5)-6*F^(c*(a+b*x))*_
--  g/(b^4*c^4*log(F)^4)+2*f*F^(c*(a+b*x))/(b^3*c^3*log(F)^3)+_
--  6*F^(c*(a+b*x))*g*x/(b^3*c^3*log(F)^3)-e*F^(c*(a+b*x))/(b^2*c^2*_
--  log(F)^2)-2*f*F^(c*(a+b*x))*x/(b^2*c^2*log(F)^2)-3*F^(c*(a+b*x))*_
--  g*x^2/(b^2*c^2*log(F)^2)+d*F^(c*(a+b*x))/(b*c*log(F))+e*F^(c*(a+b*x))*_
--  x/(b*c*log(F))+f*F^(c*(a+b*x))*x^2/(b*c*log(F))+F^(c*(a+b*x))*_
--  g*x^3/(b*c*log(F))
--E 267
--S 268 of 1000
--a0:=integrate(t0,x)
--E 268
--S 269 of 1000
--m0:=a0-r0
--E 269
--S 270 of 1000

--d0:=normalize(D(m0,x))
--E 270
)clear all
--S 271 of 1000
t0:=F^(c*(a+b*x))*(d+e*x+f*x^2+g*x^3+h*x^4+j*x^5)
--R
--R
--R            5      4      3      2            b c x + a c
--R   (1)  (j x  + h x  + g x  + f x  + e x + d)F
--R                                                    Type: Expression(Integer)
--E 271
--S 272 of 1000
--r0:=-F^(a*c)*j*GAMMA(6,-b*c*x*log(F))/(b^6*c^6*log(F)^6)+F^(a*c)*h*_
--  GAMMA(5,-b*c*x*log(F))/(b^5*c^5*log(F)^5)-6*F^(c*(a+b*x))*g/_
--  (b^4*c^4*log(F)^4)+2*f*F^(c*(a+b*x))/(b^3*c^3*log(F)^3)+_
--  6*F^(c*(a+b*x))*g*x/(b^3*c^3*log(F)^3)-e*F^(c*(a+b*x))/_
--  (b^2*c^2*log(F)^2)-2*f*F^(c*(a+b*x))*x/(b^2*c^2*log(F)^2)-_
--  3*F^(c*(a+b*x))*g*x^2/(b^2*c^2*log(F)^2)+d*F^(c*(a+b*x))/_
--  (b*c*log(F))+e*F^(c*(a+b*x))*x/(b*c*log(F))+f*F^(c*(a+b*x))*_
--  x^2/(b*c*log(F))+F^(c*(a+b*x))*g*x^3/(b*c*log(F))
--E 272
--S 273 of 1000
--a0:=integrate(t0,x)
--E 273
--S 274 of 1000
--m0:=a0-r0
--E 274
--S 275 of 1000
--d0:=normalize(D(m0,x))
--E 275
)clear all
--S 276 of 1000
t0:=F^(c*(a+b*x))*(d+e*x+f*x^2+g*x^3+h*x^4+j*x^5+k*x^6)
--R
--R
--R            6      5      4      3      2            b c x + a c
--R   (1)  (k x  + j x  + h x  + g x  + f x  + e x + d)F
--R                                                    Type: Expression(Integer)
--E 276
--S 277 of 1000
--r0:=F^(a*c)*k*GAMMA(7,-b*c*x*log(F))/(b^7*c^7*log(F)^7)-F^(a*c)*j*_

--  GAMMA(6,-b*c*x*log(F))/(b^6*c^6*log(F)^6)+F^(a*c)*h*_
--  GAMMA(5,-b*c*x*log(F))/(b^5*c^5*log(F)^5)-6*F^(c*(a+b*x))*_
--  g/(b^4*c^4*log(F)^4)+2*f*F^(c*(a+b*x))/(b^3*c^3*log(F)^3)+_
--  6*F^(c*(a+b*x))*g*x/(b^3*c^3*log(F)^3)-e*F^(c*(a+b*x))/_
--  (b^2*c^2*log(F)^2)-2*f*F^(c*(a+b*x))*x/(b^2*c^2*log(F)^2)-_
--  3*F^(c*(a+b*x))*g*x^2/(b^2*c^2*log(F)^2)+d*F^(c*(a+b*x))/_
--  (b*c*log(F))+e*F^(c*(a+b*x))*x/(b*c*log(F))+f*F^(c*(a+b*x))*_
--  x^2/(b*c*log(F))+F^(c*(a+b*x))*g*x^3/(b*c*log(F))
--E 277
--S 278 of 1000
--a0:=integrate(t0,x)
--E 278
--S 279 of 1000
--m0:=a0-r0
--E 279
--S 280 of 1000
--d0:=normalize(D(m0,x))
--E 280
)clear all
--S 281 of 1000
t0:=%e^(-a-b*x)*x^m*(a+b*x)^4
--R
--R
--R          4 4       3 3     2 2 2     3       4   - b x - a m
--R   (1)  (b x  + 4a b x  + 6a b x  + 4a b x + a )%e         x
--R                                                    Type: Expression(Integer)
--E 281
--S 282 of 1000
--r0:=-a^4*x^m*GAMMA(1+m,b*x)/(%e^a*b*(b*x)^m)-4*a^3*x^(1+m)*(b*x)^(-1-m)*_
--  GAMMA(2+m,b*x)/%e^a-6*a^2*b*x^(2+m)*(b*x)^(-2-m)*GAMMA(3+m,b*x)/%e^a-_
--  4*a*b^2*x^(3+m)*(b*x)^(-3-m)*GAMMA(4+m,b*x)/%e^a-b^3*x^(4+m)*_
--  (b*x)^(-4-m)*GAMMA(5+m,b*x)/%e^a
--E 282
--S 283 of 1000
--a0:=integrate(t0,x)
--E 283
--S 284 of 1000
--m0:=a0-r0
--E 284
--S 285 of 1000
--d0:=normalize(D(m0,x))

--E 285
)clear all
--S 286 of 1000
t0:=%e^(-a-b*x)*x^7*(a+b*x)^4
--R
--R
--R          4 11       3 10     2 2 9     3   8    4 7   - b x - a
--R   (1)  (b x   + 4a b x   + 6a b x  + 4a b x  + a x )%e
--R                                                    Type: Expression(Integer)
--E 286
--S 287 of 1000
--r0:=-a^4*GAMMA(8,b*x)/(%e^a*b^8)-4*a^3*GAMMA(9,b*x)/(%e^a*b^8)-_
--  6*a^2*GAMMA(10,b*x)/(%e^a*b^8)-4*a*GAMMA(11,b*x)/(%e^a*b^8)-_
--  GAMMA(12,b*x)/(%e^a*b^8)
--E 287
--S 288 of 1000
--a0:=integrate(t0,x)
--E 288
--S 289 of 1000
--m0:=a0-r0
--E 289
--S 290 of 1000
--d0:=normalize(D(m0,x))
--E 290
)clear all
--S 291 of 1000
t0:=%e^(-a-b*x)*x^6*(a+b*x)^4
--R
--R
--R          4 10       3 9     2 2 8     3   7    4 6   - b x - a
--R   (1)  (b x   + 4a b x  + 6a b x  + 4a b x  + a x )%e
--R                                                    Type: Expression(Integer)
--E 291
--S 292 of 1000
--r0:=-a^4*GAMMA(7,b*x)/(%e^a*b^7)-4*a^3*GAMMA(8,b*x)/(%e^a*b^7)-_
--  6*a^2*GAMMA(9,b*x)/(%e^a*b^7)-4*a*GAMMA(10,b*x)/(%e^a*b^7)-_
--  GAMMA(11,b*x)/(%e^a*b^7)
--E 292
--S 293 of 1000
--a0:=integrate(t0,x)

--E 293
--S 294 of 1000
--m0:=a0-r0
--E 294
--S 295 of 1000
--d0:=normalize(D(m0,x))
--E 295
)clear all
--S 296 of 1000
t0:=%e^(-a-b*x)*x^5*(a+b*x)^4
--R
--R
--R          4 9       3 8     2 2 7     3   6    4 5   - b x - a
--R   (1)  (b x  + 4a b x  + 6a b x  + 4a b x  + a x )%e
--R                                                    Type: Expression(Integer)
--E 296
--S 297 of 1000
--r0:=-a^4*GAMMA(6,b*x)/(%e^a*b^6)-4*a^3*GAMMA(7,b*x)/(%e^a*b^6)-_
--  6*a^2*GAMMA(8,b*x)/(%e^a*b^6)-4*a*GAMMA(9,b*x)/(%e^a*b^6)-_
--  GAMMA(10,b*x)/(%e^a*b^6)
--E 297
--S 298 of 1000
--a0:=integrate(t0,x)
--E 298
--S 299 of 1000
--m0:=a0-r0
--E 299
--S 300 of 1000
--d0:=normalize(D(m0,x))
--E 300
)clear all
--S 301 of 1000
t0:=%e^(-a-b*x)*x^4*(a+b*x)^4
--R
--R
--R          4 8       3 7     2 2 6     3   5    4 4   - b x - a
--R   (1)  (b x  + 4a b x  + 6a b x  + 4a b x  + a x )%e
--R                                                    Type: Expression(Integer)
--E 301

--S 302 of 1000
--r0:=-a^4*GAMMA(5,a+b*x)/b^5+4*a^3*GAMMA(6,a+b*x)/b^5-_
--  6*a^2*GAMMA(7,a+b*x)/b^5+4*a*GAMMA(8,a+b*x)/b^5-GAMMA(9,a+b*x)/b^5
--E 302
--S 303 of 1000
--a0:=integrate(t0,x)
--E 303
--S 304 of 1000
--m0:=a0-r0
--E 304
--S 305 of 1000
--d0:=normalize(D(m0,x))
--E 305
)clear all
--S 306 of 1000
t0:=%e^(-a-b*x)*x^3*(a+b*x)^4
--R
--R
--R          4 7       3 6     2 2 5     3   4    4 3   - b x - a
--R   (1)  (b x  + 4a b x  + 6a b x  + 4a b x  + a x )%e
--R                                                    Type: Expression(Integer)
--E 306
--S 307 of 1000
--r0:=a^3*GAMMA(5,a+b*x)/b^4-3*a^2*GAMMA(6,a+b*x)/b^4+_
--  3*a*GAMMA(7,a+b*x)/b^4-GAMMA(8,a+b*x)/b^4
--E 307
--S 308 of 1000
--a0:=integrate(t0,x)
--E 308
--S 309 of 1000
--m0:=a0-r0
--E 309
--S 310 of 1000
--d0:=normalize(D(m0,x))
--E 310
)clear all
--S 311 of 1000
t0:=%e^(-a-b*x)*x^2*(a+b*x)^4
--R

--R
--R          4 6       3 5     2 2 4     3   3    4 2   - b x - a
--R   (1)  (b x  + 4a b x  + 6a b x  + 4a b x  + a x )%e
--R                                                    Type: Expression(Integer)
--E 311
--S 312 of 1000
--r0:=-a^2*GAMMA(5,a+b*x)/b^3+2*a*GAMMA(6,a+b*x)/b^3-GAMMA(7,a+b*x)/b^3
--E 312
--S 313 of 1000
--a0:=integrate(t0,x)
--E 313
--S 314 of 1000
--m0:=a0-r0
--E 314
--S 315 of 1000
--d0:=normalize(D(m0,x))
--E 315
)clear all
--S 316 of 1000
t0:=%e^(-a-b*x)*x*(a+b*x)^4
--R
--R
--R          4 5       3 4     2 2 3     3   2    4    - b x - a
--R   (1)  (b x  + 4a b x  + 6a b x  + 4a b x  + a x)%e
--R                                                    Type: Expression(Integer)
--E 316
--S 317 of 1000
--r0:=a*GAMMA(5,a+b*x)/b^2-GAMMA(6,a+b*x)/b^2
--E 317
--S 318 of 1000
--a0:=integrate(t0,x)
--E 318
--S 319 of 1000
--m0:=a0-r0
--E 319
--S 320 of 1000
--d0:=normalize(D(m0,x))
--E 320
)clear all

--S 321 of 1000
t0:=%e^(-a-b*x)*(a+b*x)^4
--R
--R
--R          4 4       3 3     2 2 2     3       4   - b x - a
--R   (1)  (b x  + 4a b x  + 6a b x  + 4a b x + a )%e
--R                                                    Type: Expression(Integer)
--E 321
--S 322 of 1000
--r0:=-GAMMA(5,a+b*x)/b
--E 322
--S 323 of 1000
--a0:=integrate(t0,x)
--E 323
--S 324 of 1000
--m0:=a0-r0
--E 324
--S 325 of 1000
--d0:=normalize(D(m0,x))
--E 325
)clear all
--S 326 of 1000
t0:=%e^(-a-b*x)*(a+b*x)^4/x
--R
--R
--R          4 4       3 3     2 2 2     3       4   - b x - a
--R        (b x  + 4a b x  + 6a b x  + 4a b x + a )%e
--R   (1)  ---------------------------------------------------
--R                                 x
--R                                                    Type: Expression(Integer)
--E 326
--S 327 of 1000
r0:=-6*%e^(-a-b*x)-2*%e^(-a-b*x)*a-%e^(-a-b*x)*a^2-%e^(-a-b*x)*a^3-_
   6*%e^(-a-b*x)*(a+b*x)-2*%e^(-a-b*x)*a*(a+b*x)-%e^(-a-b*x)*a^2*(a+b*x)-_
   3*%e^(-a-b*x)*(a+b*x)^2-%e^(-a-b*x)*a*(a+b*x)^2-%e^(-a-b*x)*(a+b*x)^3+_
   a^4*Ei(-b*x)/%e^a
--R
--R
--R   (2)
--R             3 3              2 2        2                  3     2
--R         (- b x  + (- 4a - 3)b x  + (- 6a  - 8a - 6)b x - 4a  - 6a  - 8a - 6)
--R      *

--R           - b x - a  a
--R         %e         %e
--R     +
--R        4
--R       a Ei(- b x)
--R  /
--R       a
--R     %e
--R                                                    Type: Expression(Integer)
--E 327
--S 328 of 1000
a0:=integrate(t0,x)
--R
--R
--R           x    4 4      3   3      2 2 2        3     4   - %D b - a
--R         ++  (%D b  + 4%D a b  + 6%D a b  + 4%D a b + a )%e
--R   (3)   |   -------------------------------------------------------- d%D
--R        ++                              %D
--R                                         Type: Union(Expression(Integer),...)
--E 328
--S 329 of 1000
m0:=a0-r0
--R
--R
--R   (4)
--R             x    4 4      3   3      2 2 2        3     4   - %D b - a
--R         a ++  (%D b  + 4%D a b  + 6%D a b  + 4%D a b + a )%e
--R       %e  |   -------------------------------------------------------- d%D
--R          ++                              %D
--R     +
--R           3 3            2 2      2                  3     2
--R         (b x  + (4a + 3)b x  + (6a  + 8a + 6)b x + 4a  + 6a  + 8a + 6)
--R      *
--R           - b x - a  a
--R         %e         %e
--R     +
--R          4
--R       - a Ei(- b x)
--R  /
--R       a
--R     %e
--R                                                    Type: Expression(Integer)
--E 329
--S 330 of 1000
d0:=normalize(D(m0,x))
--R
--R

--R   (5)  0
--R                                                    Type: Expression(Integer)
--E 330
)clear all
--S 331 of 1000
t0:=%e^(-a-b*x)*(a+b*x)^4/x^2
--R
--R
--R          4 4       3 3     2 2 2     3       4   - b x - a
--R        (b x  + 4a b x  + 6a b x  + 4a b x + a )%e
--R   (1)  ---------------------------------------------------
--R                                  2
--R                                 x
--R                                                    Type: Expression(Integer)
--E 331
--S 332 of 1000
r0:=-2*%e^(-a-b*x)*b-4*%e^(-a-b*x)*a*b-6*%e^(-a-b*x)*a^2*b-%e^(-a-b*x)*a^4/x-_
   2*%e^(-a-b*x)*b^2*x-4*%e^(-a-b*x)*a*b^2*x-%e^(-a-b*x)*b^3*x^2+_
   4*a^3*b*Ei(-b*x)/%e^a-a^4*b*Ei(-b*x)/%e^a
--R
--R
--R   (2)
--R           3 3              2 2        2                 4   - b x - a  a
--R       (- b x  + (- 4a - 2)b x  + (- 6a  - 4a - 2)b x - a )%e         %e
--R     +
--R           4     3
--R       (- a  + 4a )b x Ei(- b x)
--R  /
--R         a
--R     x %e
--R                                                    Type: Expression(Integer)
--E 332
--S 333 of 1000
a0:=integrate(t0,x)
--R
--R
--R           x    4 4      3   3      2 2 2        3     4   - %D b - a
--R         ++  (%D b  + 4%D a b  + 6%D a b  + 4%D a b + a )%e
--R   (3)   |   -------------------------------------------------------- d%D
--R        ++                                2
--R                                        %D
--R                                         Type: Union(Expression(Integer),...)
--E 333
--S 334 of 1000
m0:=a0-r0

--R
--R
--R   (4)
--R               x    4 4      3   3      2 2 2        3     4   - %D b - a
--R           a ++  (%D b  + 4%D a b  + 6%D a b  + 4%D a b + a )%e
--R       x %e  |   -------------------------------------------------------- d%D
--R            ++                                2
--R                                            %D
--R     +
--R         3 3            2 2      2                 4   - b x - a  a
--R       (b x  + (4a + 2)b x  + (6a  + 4a + 2)b x + a )%e         %e
--R     +
--R         4     3
--R       (a  - 4a )b x Ei(- b x)
--R  /
--R         a
--R     x %e
--R                                                    Type: Expression(Integer)
--E 334
--S 335 of 1000
d0:=normalize(D(m0,x))
--R
--R
--R   (5)  0
--R                                                    Type: Expression(Integer)
--E 335
)clear all
--S 336 of 1000
t0:=%e^(-a-b*x)*(a+b*x)^4/x^3
--R
--R
--R          4 4       3 3     2 2 2     3       4   - b x - a
--R        (b x  + 4a b x  + 6a b x  + 4a b x + a )%e
--R   (1)  ---------------------------------------------------
--R                                  3
--R                                 x
--R                                                    Type: Expression(Integer)
--E 336
--S 337 of 1000
r0:=-%e^(-a-b*x)*b^2-4*%e^(-a-b*x)*a*b^2-1/2*%e^(-a-b*x)*a^4/x^2-_
   4*%e^(-a-b*x)*a^3*b/x+1/2*%e^(-a-b*x)*a^4*b/x-%e^(-a-b*x)*b^3*x+_
   6*a^2*b^2*Ei(-b*x)/%e^a-4*a^3*b^2*Ei(-b*x)/%e^a+1/2*a^4*b^2*Ei(-b*x)/%e^a
--R
--R
--R   (2)
--R            3 3              2 2     4     3        4   - b x - a  a

--R       (- 2b x  + (- 8a - 2)b x  + (a  - 8a )b x - a )%e         %e
--R     +
--R         4     3      2  2 2
--R       (a  - 8a  + 12a )b x Ei(- b x)
--R  /
--R       2  a
--R     2x %e
--R                                                    Type: Expression(Integer)
--E 337
--S 338 of 1000
a0:=integrate(t0,x)
--R
--R
--R           x    4 4      3   3      2 2 2        3     4   - %D b - a
--R         ++  (%D b  + 4%D a b  + 6%D a b  + 4%D a b + a )%e
--R   (3)   |   -------------------------------------------------------- d%D
--R        ++                                3
--R                                        %D
--R                                         Type: Union(Expression(Integer),...)
--E 338
--S 339 of 1000
m0:=a0-r0
--R
--R
--R   (4)
--R                x    4 4      3   3      2 2 2        3     4   - %D b - a
--R         2  a ++  (%D b  + 4%D a b  + 6%D a b  + 4%D a b + a )%e
--R       2x %e  |   -------------------------------------------------------- d%D
--R             ++                                3
--R                                             %D
--R     +
--R          3 3            2 2       4     3        4   - b x - a  a
--R       (2b x  + (8a + 2)b x  + (- a  + 8a )b x + a )%e         %e
--R     +
--R           4     3      2  2 2
--R       (- a  + 8a  - 12a )b x Ei(- b x)
--R  /
--R       2  a
--R     2x %e
--R                                                    Type: Expression(Integer)
--E 339
--S 340 of 1000
d0:=normalize(D(m0,x))
--R
--R
--R   (5)  0
--R                                                    Type: Expression(Integer)

--E 340
)clear all
--S 341 of 1000
t0:=%e^(-a-b*x)*(a+b*x)^4/x^4
--R
--R
--R          4 4       3 3     2 2 2     3       4   - b x - a
--R        (b x  + 4a b x  + 6a b x  + 4a b x + a )%e
--R   (1)  ---------------------------------------------------
--R                                  4
--R                                 x
--R                                                    Type: Expression(Integer)
--E 341
--S 342 of 1000
r0:=-%e^(-a-b*x)*b^3-1/3*%e^(-a-b*x)*a^4/x^3-2*%e^(-a-b*x)*a^3*b/x^2+_
   1/6*%e^(-a-b*x)*a^4*b/x^2-6*%e^(-a-b*x)*a^2*b^2/x+2*%e^(-a-b*x)*a^3*b^2/x-_
   1/6*%e^(-a-b*x)*a^4*b^2/x+4*a*b^3*Ei(-b*x)/%e^a-6*a^2*b^3*Ei(-b*x)/%e^a+_
   2*a^3*b^3*Ei(-b*x)/%e^a-1/6*a^4*b^3*Ei(-b*x)/%e^a
--R
--R
--R   (2)
--R            3 3       4      3      2  2 2     4      3         4   - b x - a  a
--R       (- 6b x  + (- a  + 12a  - 36a )b x  + (a  - 12a )b x - 2a )%e         %e
--R     +
--R           4      3      2        3 3
--R       (- a  + 12a  - 36a  + 24a)b x Ei(- b x)
--R  /
--R       3  a
--R     6x %e
--R                                                    Type: Expression(Integer)
--E 342
--S 343 of 1000
a0:=integrate(t0,x)
--R
--R
--R           x    4 4      3   3      2 2 2        3     4   - %D b - a
--R         ++  (%D b  + 4%D a b  + 6%D a b  + 4%D a b + a )%e
--R   (3)   |   -------------------------------------------------------- d%D
--R        ++                                4
--R                                        %D
--R                                         Type: Union(Expression(Integer),...)
--E 343
--S 344 of 1000
m0:=a0-r0
--R

--R
--R   (4)
--R                x    4 4      3   3      2 2 2        3     4   - %D b - a
--R         3  a ++  (%D b  + 4%D a b  + 6%D a b  + 4%D a b + a )%e
--R       6x %e  |   -------------------------------------------------------- d%D
--R             ++                                4
--R                                             %D
--R     +
--R          3 3     4      3      2  2 2       4      3         4   - b x - a  a
--R       (6b x  + (a  - 12a  + 36a )b x  + (- a  + 12a )b x + 2a )%e         %e
--R     +
--R         4      3      2        3 3
--R       (a  - 12a  + 36a  - 24a)b x Ei(- b x)
--R  /
--R       3  a
--R     6x %e
--R                                                    Type: Expression(Integer)
--E 344
--S 345 of 1000
d0:=normalize(D(m0,x))
--R
--R
--R   (5)  0
--R                                                    Type: Expression(Integer)
--E 345
)clear all
--S 346 of 1000
t0:=%e^(-a-b*x)*(a+b*x)^4/x^5
--R
--R
--R          4 4       3 3     2 2 2     3       4   - b x - a
--R        (b x  + 4a b x  + 6a b x  + 4a b x + a )%e
--R   (1)  ---------------------------------------------------
--R                                  5
--R                                 x
--R                                                    Type: Expression(Integer)
--E 346
--S 347 of 1000
--r0:=-4/3*%e^(-a-b*x)*a^3*b/x^3-3*%e^(-a-b*x)*a^2*b^2/x^2+_
--  2/3*%e^(-a-b*x)*a^3*b^2/x^2-4*%e^(-a-b*x)*a*b^3/x+3*%e^(-a-b*x)*_
--  a^2*b^3/x-2/3*%e^(-a-b*x)*a^3*b^3/x+b^4*Ei(-b*x)/%e^a-4*a*b^4*_
--  Ei(-b*x)/%e^a+3*a^2*b^4*Ei(-b*x)/%e^a-2/3*a^3*b^4*Ei(-b*x)/%e^a-_
--  a^4*b^4*GAMMA(-4,b*x)/%e^a
--E 347
--S 348 of 1000

--S 349 of 1000
--m0:=a0-r0
--E 349
--S 350 of 1000
--d0:=normalize(D(m0,x))
--E 350
)clear all
--S 351 of 1000
t0:=%e^(-a-b*x)*(a+b*x)^4/x^6
--R
--R
--R          4 4       3 3     2 2 2     3       4   - b x - a
--R        (b x  + 4a b x  + 6a b x  + 4a b x + a )%e
--R   (1)  ---------------------------------------------------
--R                                  6
--R                                 x
--R                                                    Type: Expression(Integer)
--E 351
--S 352 of 1000
--r0:=-2*%e^(-a-b*x)*a^2*b^2/x^3-2*%e^(-a-b*x)*a*b^3/x^2+%e^(-a-b*x)*_
--  a^2*b^3/x^2-%e^(-a-b*x)*b^4/x+2*%e^(-a-b*x)*a*b^4/x-%e^(-a-b*x)*_
--  a^2*b^4/x-b^5*Ei(-b*x)/%e^a+2*a*b^5*Ei(-b*x)/%e^a-a^2*b^5*Ei(-b*x)/%e^a-_
--  a^4*b^5*GAMMA(-5,b*x)/%e^a-4*a^3*b^5*GAMMA(-4,b*x)/%e^a
--E 352
--S 353 of 1000
--a0:=integrate(t0,x)
--E 353
--S 354 of 1000
--m0:=a0-r0
--E 354
--S 355 of 1000
--d0:=normalize(D(m0,x))
--E 355
)clear all
--S 356 of 1000
t0:=%e^(-a-b*x)*(a+b*x)^4/x^7
--R
--R

--R          4 4       3 3     2 2 2     3       4   - b x - a
--R        (b x  + 4a b x  + 6a b x  + 4a b x + a )%e
--R   (1)  ---------------------------------------------------
--R                                  7
--R                                 x
--R                                                    Type: Expression(Integer)
--E 356
--S 357 of 1000
--r0:=-4/3*%e^(-a-b*x)*a*b^3/x^3-1/2*%e^(-a-b*x)*b^4/x^2+2/3*%e^(-a-b*x)*_
--  a*b^4/x^2+1/2*%e^(-a-b*x)*b^5/x-2/3*%e^(-a-b*x)*a*b^5/x+1/2*b^6*_
--  Ei(-b*x)/%e^a-2/3*a*b^6*Ei(-b*x)/%e^a-a^4*b^6*GAMMA(-6,b*x)/%e^a-4*_
--  a^3*b^6*GAMMA(-5,b*x)/%e^a-6*a^2*b^6*GAMMA(-4,b*x)/%e^a
--E 357
--S 358 of 1000
--a0:=integrate(t0,x)
--E 358
--S 359 of 1000
--m0:=a0-r0
--E 359
--S 360 of 1000
--d0:=normalize(D(m0,x))
--E 360
)clear all
--S 361 of 1000
t0:=%e^(-a-b*x)*(a+b*x)^4/x^8
--R
--R
--R          4 4       3 3     2 2 2     3       4   - b x - a
--R        (b x  + 4a b x  + 6a b x  + 4a b x + a )%e
--R   (1)  ---------------------------------------------------
--R                                  8
--R                                 x
--R                                                    Type: Expression(Integer)
--E 361
--S 362 of 1000
--r0:=-1/3*%e^(-a-b*x)*b^4/x^3+1/6*%e^(-a-b*x)*b^5/x^2-1/6*%e^(-a-b*x)*_
--  b^6/x-1/6*b^7*Ei(-b*x)/%e^a-a^4*b^7*GAMMA(-7,b*x)/%e^a-4*a^3*b^7*_
--  GAMMA(-6,b*x)/%e^a-6*a^2*b^7*GAMMA(-5,b*x)/%e^a-4*a*b^7*GAMMA(-4,b*x)/%e^a
--E 362
--S 363 of 1000
--a0:=integrate(t0,x)
--E 363

--S 364 of 1000
--m0:=a0-r0
--E 364
--S 365 of 1000
--d0:=normalize(D(m0,x))
--E 365
)clear all
--S 366 of 1000
t0:=F^(a+b*(c+d*x))*x^m*(e+f*x)^4
--R
--R
--R          4 4       3 3     2 2 2     3       4  b d x + b c + a m
--R   (1)  (f x  + 4e f x  + 6e f x  + 4e f x + e )F               x
--R                                                    Type: Expression(Integer)
--E 366
--S 367 of 1000
--r0:=-f^4*F^(a+b*c)*x^(5+m)*GAMMA(5+m,-b*d*x*log(F))*(-b*d*x*_
--  log(F))^(-5-m)-4*e*f^3*F^(a+b*c)*x^(4+m)*GAMMA(4+m,-b*d*x*log(F))*_
--  (-b*d*x*log(F))^(-4-m)-6*e^2*f^2*F^(a+b*c)*x^(3+m)*GAMMA(3+m,-b*d*x*_
--  log(F))*(-b*d*x*log(F))^(-3-m)-4*e^3*f*F^(a+b*c)*x^(2+m)*GAMMA(2+m,_
--  -b*d*x*log(F))*(-b*d*x*log(F))^(-2-m)-e^4*F^(a+b*c)*x^(1+m)*_
--  GAMMA(1+m,-b*d*x*log(F))*(-b*d*x*log(F))^(-1-m)
--E 367
--S 368 of 1000
--a0:=integrate(t0,x)
--E 368
--S 369 of 1000
--m0:=a0-r0
--E 369
--S 370 of 1000
--d0:=normalize(D(m0,x))
--E 370
)clear all
--S 371 of 1000
t0:=F^(a+b*(c+d*x))*x^7*(e+f*x)^4
--R
--R
--R          4 11       3 10     2 2 9     3   8    4 7  b d x + b c + a
--R   (1)  (f x   + 4e f x   + 6e f x  + 4e f x  + e x )F
--R                                                    Type: Expression(Integer)

--E 371
--S 372 of 1000
--r0:=-f^4*F^(a+b*c)*GAMMA(12,-b*d*x*log(F))/(b^12*d^12*log(F)^12)+_
--  4*e*f^3*F^(a+b*c)*GAMMA(11,-b*d*x*log(F))/(b^11*d^11*log(F)^11)-_
--  6*e^2*f^2*F^(a+b*c)*GAMMA(10,-b*d*x*log(F))/(b^10*d^10*log(F)^10)+_
--  4*e^3*f*F^(a+b*c)*GAMMA(9,-b*d*x*log(F))/(b^9*d^9*log(F)^9)-_
--  e^4*F^(a+b*c)*GAMMA(8,-b*d*x*log(F))/(b^8*d^8*log(F)^8)
--E 372
--S 373 of 1000
--a0:=integrate(t0,x)
--E 373
--S 374 of 1000
--m0:=a0-r0
--E 374
--S 375 of 1000
--d0:=normalize(D(m0,x))
--E 375
)clear all
--S 376 of 1000
t0:=F^(a+b*(c+d*x))*x^6*(e+f*x)^4
--R
--R
--R          4 10       3 9     2 2 8     3   7    4 6  b d x + b c + a
--R   (1)  (f x   + 4e f x  + 6e f x  + 4e f x  + e x )F
--R                                                    Type: Expression(Integer)
--E 376
--S 377 of 1000
--r0:=f^4*F^(a+b*c)*GAMMA(11,-b*d*x*log(F))/(b^11*d^11*log(F)^11)-_
--  4*e*f^3*F^(a+b*c)*GAMMA(10,-b*d*x*log(F))/(b^10*d^10*log(F)^10)+_
--  6*e^2*f^2*F^(a+b*c)*GAMMA(9,-b*d*x*log(F))/(b^9*d^9*log(F)^9)-_
--  4*e^3*f*F^(a+b*c)*GAMMA(8,-b*d*x*log(F))/(b^8*d^8*log(F)^8)+_
--  e^4*F^(a+b*c)*GAMMA(7,-b*d*x*log(F))/(b^7*d^7*log(F)^7)
--E 377
--S 378 of 1000
--a0:=integrate(t0,x)
--E 378
--S 379 of 1000
--m0:=a0-r0
--E 379
--S 380 of 1000

)clear all
--S 381 of 1000
t0:=F^(a+b*(c+d*x))*x^5*(e+f*x)^4
--R
--R
--R          4 9       3 8     2 2 7     3   6    4 5  b d x + b c + a
--R   (1)  (f x  + 4e f x  + 6e f x  + 4e f x  + e x )F
--R                                                    Type: Expression(Integer)
--E 381
--S 382 of 1000
--r0:=-f^4*F^(a+b*c)*GAMMA(10,-b*d*x*log(F))/(b^10*d^10*log(F)^10)+_
--  4*e*f^3*F^(a+b*c)*GAMMA(9,-b*d*x*log(F))/(b^9*d^9*log(F)^9)-_
--  6*e^2*f^2*F^(a+b*c)*GAMMA(8,-b*d*x*log(F))/(b^8*d^8*log(F)^8)+_
--  4*e^3*f*F^(a+b*c)*GAMMA(7,-b*d*x*log(F))/(b^7*d^7*log(F)^7)-_
--  e^4*F^(a+b*c)*GAMMA(6,-b*d*x*log(F))/(b^6*d^6*log(F)^6)
--E 382
--S 383 of 1000
--a0:=integrate(t0,x)
--E 383
--S 384 of 1000
--m0:=a0-r0
--E 384
--S 385 of 1000
--d0:=normalize(D(m0,x))
--E 385
)clear all
--S 386 of 1000
t0:=F^(a+b*(c+d*x))*x^4*(e+f*x)^4
--R
--R
--R          4 8       3 7     2 2 6     3   5    4 4  b d x + b c + a
--R   (1)  (f x  + 4e f x  + 6e f x  + 4e f x  + e x )F
--R                                                    Type: Expression(Integer)
--E 386
--S 387 of 1000
--r0:=f^4*F^(a+b*c-b*d*e/f)*GAMMA(9,-b*d*(e+f*x)*log(F)/f)/(b^9*d^9*_
--  log(F)^9)+4*e*f^3*F^(a+b*c-b*d*e/f)*GAMMA(8,-b*d*(e+f*x)*log(F)/f)/_
--  (b^8*d^8*log(F)^8)+6*e^2*f^2*F^(a+b*c-b*d*e/f)*GAMMA(7,-b*d*(e+f*x)*_
--  log(F)/f)/(b^7*d^7*log(F)^7)+4*e^3*f*F^(a+b*c-b*d*e/f)*GAMMA(6,_

--  -b*d*(e+f*x)*log(F)/f)/(b^6*d^6*log(F)^6)+e^4*F^(a+b*c-b*d*e/f)*_
--  GAMMA(5,-b*d*(e+f*x)*log(F)/f)/(b^5*d^5*log(F)^5)
--E 387
--S 388 of 1000
--a0:=integrate(t0,x)
--E 388
--S 389 of 1000
--m0:=a0-r0
--E 389
--S 390 of 1000
--d0:=normalize(D(m0,x))
--E 390
)clear all
--S 391 of 1000
t0:=F^(a+b*(c+d*x))*x^3*(e+f*x)^4
--R
--R
--R          4 7       3 6     2 2 5     3   4    4 3  b d x + b c + a
--R   (1)  (f x  + 4e f x  + 6e f x  + 4e f x  + e x )F
--R                                                    Type: Expression(Integer)
--E 391
--S 392 of 1000
--r0:=-f^4*F^(a+b*c-b*d*e/f)*GAMMA(8,-b*d*(e+f*x)*log(F)/f)/(b^8*d^8*_
--  log(F)^8)-3*e*f^3*F^(a+b*c-b*d*e/f)*GAMMA(7,-b*d*(e+f*x)*log(F)/f)/_
--  (b^7*d^7*log(F)^7)-3*e^2*f^2*F^(a+b*c-b*d*e/f)*GAMMA(6,-b*d*(e+f*x)*_
--  log(F)/f)/(b^6*d^6*log(F)^6)-e^3*f*F^(a+b*c-b*d*e/f)*GAMMA(5,_
--  -b*d*(e+f*x)*log(F)/f)/(b^5*d^5*log(F)^5)
--E 392
--S 393 of 1000
--a0:=integrate(t0,x)
--E 393
--S 394 of 1000
--m0:=a0-r0
--E 394
--S 395 of 1000
--d0:=normalize(D(m0,x))
--E 395
)clear all
--S 396 of 1000

t0:=F^(a+b*(c+d*x))*x^2*(e+f*x)^4
--R
--R
--R          4 6       3 5     2 2 4     3   3    4 2  b d x + b c + a
--R   (1)  (f x  + 4e f x  + 6e f x  + 4e f x  + e x )F
--R                                                    Type: Expression(Integer)
--E 396
--S 397 of 1000
--r0:=f^4*F^(a+b*c-b*d*e/f)*GAMMA(7,-b*d*(e+f*x)*log(F)/f)/(b^7*d^7*_
--  log(F)^7)+2*e*f^3*F^(a+b*c-b*d*e/f)*GAMMA(6,-b*d*(e+f*x)*log(F)/f)/_
--  (b^6*d^6*log(F)^6)+e^2*f^2*F^(a+b*c-b*d*e/f)*GAMMA(5,-b*d*(e+f*x)*_
--  log(F)/f)/(b^5*d^5*log(F)^5)
--E 397
--S 398 of 1000
--a0:=integrate(t0,x)
--E 398
--S 399 of 1000
--m0:=a0-r0
--E 399
--S 400 of 1000
--d0:=normalize(D(m0,x))
--E 400
)clear all
--S 401 of 1000
t0:=F^(a+b*(c+d*x))*x*(e+f*x)^4
--R
--R
--R          4 5       3 4     2 2 3     3   2    4   b d x + b c + a
--R   (1)  (f x  + 4e f x  + 6e f x  + 4e f x  + e x)F
--R                                                    Type: Expression(Integer)
--E 401
--S 402 of 1000
--r0:=-f^4*F^(a+b*c-b*d*e/f)*GAMMA(6,-b*d*(e+f*x)*log(F)/f)/(b^6*d^6*_
--  log(F)^6)-e*f^3*F^(a+b*c-b*d*e/f)*GAMMA(5,-b*d*(e+f*x)*log(F)/f)/_
--  (b^5*d^5*log(F)^5)
--E 402
--S 403 of 1000
--a0:=integrate(t0,x)
--E 403
--S 404 of 1000
--m0:=a0-r0

--E 404
--S 405 of 1000
--d0:=normalize(D(m0,x))
--E 405
)clear all
--S 406 of 1000
t0:=F^(a+b*(c+d*x))*(e+f*x)^4
--R
--R
--R          4 4       3 3     2 2 2     3       4  b d x + b c + a
--R   (1)  (f x  + 4e f x  + 6e f x  + 4e f x + e )F
--R                                                    Type: Expression(Integer)
--E 406
--S 407 of 1000
--r0:=f^4*F^(a+b*c-b*d*e/f)*GAMMA(5,-b*d*(e+f*x)*log(F)/f)/(b^5*d^5*log(F)^5)
--E 407
--S 408 of 1000
--a0:=integrate(t0,x)
--E 408
--S 409 of 1000
--m0:=a0-r0
--E 409
--S 410 of 1000
--d0:=normalize(D(m0,x))
--E 410
)clear all
--S 411 of 1000
t0:=F^(a+b*(c+d*x))*(e+f*x)^4/x
--R
--R
--R          4 4       3 3     2 2 2     3       4  b d x + b c + a
--R        (f x  + 4e f x  + 6e f x  + 4e f x + e )F
--R   (1)  --------------------------------------------------------
--R                                    x
--R                                                    Type: Expression(Integer)
--E 411
--S 412 of 1000
r0:=e^4*F^(a+b*c)*Ei(b*d*x*log(F))-6*f^4*F^(a+b*c+b*d*x)/(b^4*d^4*log(F)^4)+_
   8*e*f^3*F^(a+b*c+b*d*x)/(b^3*d^3*log(F)^3)+6*f^4*F^(a+b*c+b*d*x)*x/_
   (b^3*d^3*log(F)^3)-6*e^2*f^2*F^(a+b*c+b*d*x)/(b^2*d^2*log(F)^2)-_

   8*e*f^3*F^(a+b*c+b*d*x)*x/(b^2*d^2*log(F)^2)-3*f^4*F^(a+b*c+b*d*x)*_
   x^2/(b^2*d^2*log(F)^2)+4*e^3*f*F^(a+b*c+b*d*x)/(b*d*log(F))+_
   6*e^2*f^2*F^(a+b*c+b*d*x)*x/(b*d*log(F))+4*e*f^3*F^(a+b*c+b*d*x)*_
   x^2/(b*d*log(F))+f^4*F^(a+b*c+b*d*x)*x^3/(b*d*log(F))
--R
--R
--R   (2)
--R        4 4 4      4 b c + a
--R       b d e log(F) F       Ei(b d x log(F))
--R     +
--R             3 3 4 3     3 3   3 2     3 3 2 2      3 3 3        3
--R           (b d f x  + 4b d e f x  + 6b d e f x + 4b d e f)log(F)
--R         +
--R                2 2 4 2     2 2   3      2 2 2 2       2
--R           (- 3b d f x  - 8b d e f x - 6b d e f )log(F)
--R         +
--R                  4            3            4
--R           (6b d f x + 8b d e f )log(F) - 6f
--R      *
--R          b d x + b c + a
--R         F
--R  /
--R      4 4      4
--R     b d log(F)
--R                                                    Type: Expression(Integer)
--E 412
--S 413 of 1000
a0:=integrate(t0,x)
--R
--R
--R   (3)
--R      x    4 4      3   3      2 2 2        3     4  %D b d + b c + a
--R    ++  (%D f  + 4%D e f  + 6%D e f  + 4%D e f + e )F
--R    |   ------------------------------------------------------------- d%D
--R   ++                                 %D
--R                                         Type: Union(Expression(Integer),...)
--E 413
--S 414 of 1000
m0:=a0-r0
--R
--R
--R   (4)
--R          4 4      4
--R         b d log(F)
--R      *
--R          x    4 4      3   3      2 2 2        3     4  %D b d + b c + a
--R        ++  (%D f  + 4%D e f  + 6%D e f  + 4%D e f + e )F
--R        |   ------------------------------------------------------------- d%D

--R       ++                                 %D
--R     +
--R          4 4 4      4 b c + a
--R       - b d e log(F) F       Ei(b d x log(F))
--R     +
--R               3 3 4 3     3 3   3 2     3 3 2 2      3 3 3        3
--R           (- b d f x  - 4b d e f x  - 6b d e f x - 4b d e f)log(F)
--R         +
--R              2 2 4 2     2 2   3      2 2 2 2       2
--R           (3b d f x  + 8b d e f x + 6b d e f )log(F)
--R         +
--R                    4            3            4
--R           (- 6b d f x - 8b d e f )log(F) + 6f
--R      *
--R          b d x + b c + a
--R         F
--R  /
--R      4 4      4
--R     b d log(F)
--R                                                    Type: Expression(Integer)
--E 414
--S 415 of 1000
d0:=normalize(D(m0,x))
--R
--R
--R   (5)  0
--R                                                    Type: Expression(Integer)
--E 415
)clear all
--S 416 of 1000
t0:=F^(a+b*(c+d*x))*(e+f*x)^4/x^2
--R
--R
--R          4 4       3 3     2 2 2     3       4  b d x + b c + a
--R        (f x  + 4e f x  + 6e f x  + 4e f x + e )F
--R   (1)  --------------------------------------------------------
--R                                    2
--R                                   x
--R                                                    Type: Expression(Integer)
--E 416
--S 417 of 1000
r0:=-e^4*F^(a+b*c+b*d*x)/x+4*e^3*f*F^(a+b*c)*Ei(b*d*x*log(F))+_
   2*f^4*F^(a+b*c+b*d*x)/(b^3*d^3*log(F)^3)-4*e*f^3*F^(a+b*c+b*d*x)/_
   (b^2*d^2*log(F)^2)-2*f^4*F^(a+b*c+b*d*x)*x/(b^2*d^2*log(F)^2)+_
   6*e^2*f^2*F^(a+b*c+b*d*x)/(b*d*log(F))+4*e*f^3*F^(a+b*c+b*d*x)*x/_
   (b*d*log(F))+f^4*F^(a+b*c+b*d*x)*x^2/(b*d*log(F))+b*d*e^4*F^(a+b*c)*_

   Ei(b*d*x*log(F))*log(F)
--R
--R
--R   (2)
--R         4 4 4        4     3 3 3          3  b c + a
--R       (b d e x log(F)  + 4b d e f x log(F) )F       Ei(b d x log(F))
--R     +
--R              3 3 4      3     2 2 4 3     2 2   3 2     2 2 2 2        2
--R           - b d e log(F)  + (b d f x  + 4b d e f x  + 6b d e f x)log(F)
--R         +
--R                    4 2           3             4
--R           (- 2b d f x  - 4b d e f x)log(F) + 2f x
--R      *
--R          b d x + b c + a
--R         F
--R  /
--R      3 3        3
--R     b d x log(F)
--R                                                    Type: Expression(Integer)
--E 417
--S 418 of 1000
a0:=integrate(t0,x)
--R
--R
--R   (3)
--R      x    4 4      3   3      2 2 2        3     4  %D b d + b c + a
--R    ++  (%D f  + 4%D e f  + 6%D e f  + 4%D e f + e )F
--R    |   ------------------------------------------------------------- d%D
--R   ++                                  2
--R                                     %D
--R                                         Type: Union(Expression(Integer),...)
--E 418
--S 419 of 1000
m0:=a0-r0
--R
--R
--R   (4)
--R          3 3        3
--R         b d x log(F)
--R      *
--R          x    4 4      3   3      2 2 2        3     4  %D b d + b c + a
--R        ++  (%D f  + 4%D e f  + 6%D e f  + 4%D e f + e )F
--R        |   ------------------------------------------------------------- d%D
--R       ++                                  2
--R                                         %D
--R     +
--R           4 4 4        4     3 3 3          3  b c + a
--R       (- b d e x log(F)  - 4b d e f x log(F) )F       Ei(b d x log(F))

--R     +
--R            3 3 4      3       2 2 4 3     2 2   3 2     2 2 2 2        2
--R           b d e log(F)  + (- b d f x  - 4b d e f x  - 6b d e f x)log(F)
--R         +
--R                  4 2           3             4
--R           (2b d f x  + 4b d e f x)log(F) - 2f x
--R      *
--R          b d x + b c + a
--R         F
--R  /
--R      3 3        3
--R     b d x log(F)
--R                                                    Type: Expression(Integer)
--E 419
--S 420 of 1000
d0:=normalize(D(m0,x))
--R
--R
--R   (5)  0
--R                                                    Type: Expression(Integer)
--E 420
)clear all
--S 421 of 1000
t0:=F^(a+b*(c+d*x))*(e+f*x)^4/x^3
--R
--R
--R          4 4       3 3     2 2 2     3       4  b d x + b c + a
--R        (f x  + 4e f x  + 6e f x  + 4e f x + e )F
--R   (1)  --------------------------------------------------------
--R                                    3
--R                                   x
--R                                                    Type: Expression(Integer)
--E 421
--S 422 of 1000
r0:=-1/2*e^4*F^(a+b*c+b*d*x)/x^2-4*e^3*f*F^(a+b*c+b*d*x)/x+_
   6*e^2*f^2*F^(a+b*c)*Ei(b*d*x*log(F))-f^4*F^(a+b*c+b*d*x)/(b^2*d^2*_
   log(F)^2)+4*e*f^3*F^(a+b*c+b*d*x)/(b*d*log(F))+f^4*F^(a+b*c+b*d*x)*_
   x/(b*d*log(F))-1/2*b*d*e^4*F^(a+b*c+b*d*x)*log(F)/x+4*b*d*e^3*_
   f*F^(a+b*c)*Ei(b*d*x*log(F))*log(F)+1/2*b^2*d^2*e^4*F^(a+b*c)*_
   Ei(b*d*x*log(F))*log(F)^2
--R
--R
--R   (2)
--R           4 4 4 2      4     3 3 3   2      3      2 2 2 2 2      2  b c + a
--R         (b d e x log(F)  + 8b d e f x log(F)  + 12b d e f x log(F) )F
--R      *

--R         Ei(b d x log(F))
--R     +
--R              3 3 4        3        2 2 3       2 2 4       2
--R           - b d e x log(F)  + (- 8b d e f x - b d e )log(F)
--R         +
--R                  4 3           3 2            4 2
--R           (2b d f x  + 8b d e f x )log(F) - 2f x
--R      *
--R          b d x + b c + a
--R         F
--R  /
--R       2 2 2      2
--R     2b d x log(F)
--R                                                    Type: Expression(Integer)
--E 422
--S 423 of 1000
a0:=integrate(t0,x)
--R
--R
--R   (3)
--R      x    4 4      3   3      2 2 2        3     4  %D b d + b c + a
--R    ++  (%D f  + 4%D e f  + 6%D e f  + 4%D e f + e )F
--R    |   ------------------------------------------------------------- d%D
--R   ++                                  3
--R                                     %D
--R                                         Type: Union(Expression(Integer),...)
--E 423
--S 424 of 1000
m0:=a0-r0
--R
--R
--R   (4)
--R           2 2 2      2
--R         2b d x log(F)
--R      *
--R          x    4 4      3   3      2 2 2        3     4  %D b d + b c + a
--R        ++  (%D f  + 4%D e f  + 6%D e f  + 4%D e f + e )F
--R        |   ------------------------------------------------------------- d%D
--R       ++                                  3
--R                                         %D
--R     +
--R             4 4 4 2      4     3 3 3   2      3      2 2 2 2 2      2  b c + a
--R         (- b d e x log(F)  - 8b d e f x log(F)  - 12b d e f x log(F) )F
--R      *
--R         Ei(b d x log(F))
--R     +
--R            3 3 4        3      2 2 3       2 2 4       2
--R           b d e x log(F)  + (8b d e f x + b d e )log(F)

--R         +
--R                    4 3           3 2            4 2
--R           (- 2b d f x  - 8b d e f x )log(F) + 2f x
--R      *
--R          b d x + b c + a
--R         F
--R  /
--R       2 2 2      2
--R     2b d x log(F)
--R                                                    Type: Expression(Integer)
--E 424
--S 425 of 1000
d0:=normalize(D(m0,x))
--R
--R
--R   (5)  0
--R                                                    Type: Expression(Integer)
--E 425
)clear all
--S 426 of 1000
t0:=F^(a+b*(c+d*x))*(e+f*x)^4/x^4
--R
--R
--R          4 4       3 3     2 2 2     3       4  b d x + b c + a
--R        (f x  + 4e f x  + 6e f x  + 4e f x + e )F
--R   (1)  --------------------------------------------------------
--R                                    4
--R                                   x
--R                                                    Type: Expression(Integer)
--E 426
--S 427 of 1000
r0:=-1/3*e^4*F^(a+b*c+b*d*x)/x^3-2*e^3*f*F^(a+b*c+b*d*x)/x^2-6*e^2*_
   f^2*F^(a+b*c+b*d*x)/x+4*e*f^3*F^(a+b*c)*Ei(b*d*x*log(F))+f^4*_
   F^(a+b*c+b*d*x)/(b*d*log(F))-1/6*b*d*e^4*F^(a+b*c+b*d*x)*log(F)/x^2-_
   2*b*d*e^3*f*F^(a+b*c+b*d*x)*log(F)/x+6*b*d*e^2*f^2*F^(a+b*c)*_
   Ei(b*d*x*log(F))*log(F)-1/6*b^2*d^2*e^4*F^(a+b*c+b*d*x)*log(F)^2/x+_
   2*b^2*d^2*e^3*f*F^(a+b*c)*Ei(b*d*x*log(F))*log(F)^2+1/6*b^3*_
   d^3*e^4*F^(a+b*c)*Ei(b*d*x*log(F))*log(F)^3
--R
--R
--R   (2)
--R            4 4 4 3      4      3 3 3   3      3      2 2 2 2 3      2
--R           b d e x log(F)  + 12b d e f x log(F)  + 36b d e f x log(F)
--R         +
--R                    3 3
--R           24b d e f x log(F)

--R      *
--R          b c + a
--R         F       Ei(b d x log(F))
--R     +
--R              3 3 4 2      3         2 2 3   2    2 2 4        2
--R           - b d e x log(F)  + (- 12b d e f x  - b d e x)log(F)
--R         +
--R                     2 2 2          3            4            4 3
--R           (- 36b d e f x  - 12b d e f x - 2b d e )log(F) + 6f x
--R      *
--R          b d x + b c + a
--R         F
--R  /
--R           3
--R     6b d x log(F)
--R                                                    Type: Expression(Integer)
--E 427
--S 428 of 1000
a0:=integrate(t0,x)
--R
--R
--R   (3)
--R      x    4 4      3   3      2 2 2        3     4  %D b d + b c + a
--R    ++  (%D f  + 4%D e f  + 6%D e f  + 4%D e f + e )F
--R    |   ------------------------------------------------------------- d%D
--R   ++                                  4
--R                                     %D
--R                                         Type: Union(Expression(Integer),...)
--E 428
--S 429 of 1000
m0:=a0-r0
--R
--R
--R   (4)
--R               3
--R         6b d x log(F)
--R      *
--R          x    4 4      3   3      2 2 2        3     4  %D b d + b c + a
--R        ++  (%D f  + 4%D e f  + 6%D e f  + 4%D e f + e )F
--R        |   ------------------------------------------------------------- d%D
--R       ++                                  4
--R                                         %D
--R     +
--R              4 4 4 3      4      3 3 3   3      3      2 2 2 2 3      2
--R           - b d e x log(F)  - 12b d e f x log(F)  - 36b d e f x log(F)
--R         +
--R                      3 3
--R           - 24b d e f x log(F)

--R      *
--R          b c + a
--R         F       Ei(b d x log(F))
--R     +
--R            3 3 4 2      3       2 2 3   2    2 2 4        2
--R           b d e x log(F)  + (12b d e f x  + b d e x)log(F)
--R         +
--R                   2 2 2          3            4            4 3
--R           (36b d e f x  + 12b d e f x + 2b d e )log(F) - 6f x
--R      *
--R          b d x + b c + a
--R         F
--R  /
--R           3
--R     6b d x log(F)
--R                                                    Type: Expression(Integer)
--E 429
--S 430 of 1000
d0:=normalize(D(m0,x))
--R
--R
--R   (5)  0
--R                                                    Type: Expression(Integer)
--E 430
)clear all
--S 431 of 1000
t0:=F^(a+b*(c+d*x))*(e+f*x)^4/x^5
--R
--R
--R          4 4       3 3     2 2 2     3       4  b d x + b c + a
--R        (f x  + 4e f x  + 6e f x  + 4e f x + e )F
--R   (1)  --------------------------------------------------------
--R                                    5
--R                                   x
--R                                                    Type: Expression(Integer)
--E 431
--S 432 of 1000
--r0:=-4/3*e^3*f*F^(a+b*c+b*d*x)/x^3-3*e^2*f^2*F^(a+b*c+b*d*x)/x^2-_
--  4*e*f^3*F^(a+b*c+b*d*x)/x+f^4*F^(a+b*c)*Ei(b*d*x*log(F))-2/3*b*d*_
--  e^3*f*F^(a+b*c+b*d*x)*log(F)/x^2-3*b*d*e^2*f^2*F^(a+b*c+b*d*x)*_
--  log(F)/x+4*b*d*e*f^3*F^(a+b*c)*Ei(b*d*x*log(F))*log(F)-2/3*b^2*_
--  d^2*e^3*f*F^(a+b*c+b*d*x)*log(F)^2/x+3*b^2*d^2*e^2*f^2*F^(a+b*c)*_
--  Ei(b*d*x*log(F))*log(F)^2+2/3*b^3*d^3*e^3*f*F^(a+b*c)*Ei(b*d*x*_
--  log(F))*log(F)^3-b^4*d^4*e^4*F^(a+b*c)*GAMMA(-4,-b*d*x*log(F))*log(F)^4
--E 432

--S 434 of 1000
--m0:=a0-r0
--E 434
--S 435 of 1000
--d0:=normalize(D(m0,x))
--E 435
)clear all
--S 436 of 1000
t0:=F^(a+b*(c+d*x))*(e+f*x)^4/x^6
--R
--R
--R          4 4       3 3     2 2 2     3       4  b d x + b c + a
--R        (f x  + 4e f x  + 6e f x  + 4e f x + e )F
--R   (1)  --------------------------------------------------------
--R                                    6
--R                                   x
--R                                                    Type: Expression(Integer)
--E 436
--S 437 of 1000
--r0:=-2*e^2*f^2*F^(a+b*c+b*d*x)/x^3-2*e*f^3*F^(a+b*c+b*d*x)/x^2-_
--  f^4*F^(a+b*c+b*d*x)/x-b*d*e^2*f^2*F^(a+b*c+b*d*x)*log(F)/x^2-2*b*d*_
--  e*f^3*F^(a+b*c+b*d*x)*log(F)/x+b*d*f^4*F^(a+b*c)*Ei(b*d*x*log(F))*_
--  log(F)-b^2*d^2*e^2*f^2*F^(a+b*c+b*d*x)*log(F)^2/x+2*b^2*d^2*e*f^3*_
--  F^(a+b*c)*Ei(b*d*x*log(F))*log(F)^2+b^3*d^3*e^2*f^2*F^(a+b*c)*_
--  Ei(b*d*x*log(F))*log(F)^3-4*b^4*d^4*e^3*f*F^(a+b*c)*GAMMA(-4,_
--  -b*d*x*log(F))*log(F)^4+b^5*d^5*e^4*F^(a+b*c)*GAMMA(-5,-b*_
--  d*x*log(F))*log(F)^5
--E 437
--S 438 of 1000
--a0:=integrate(t0,x)
--E 438
--S 439 of 1000
--m0:=a0-r0
--E 439
--S 440 of 1000
--d0:=normalize(D(m0,x))
--E 440
)clear all

--S 441 of 1000
t0:=F^(a+b*(c+d*x))*(e+f*x)^4/x^7
--R
--R
--R          4 4       3 3     2 2 2     3       4  b d x + b c + a
--R        (f x  + 4e f x  + 6e f x  + 4e f x + e )F
--R   (1)  --------------------------------------------------------
--R                                    7
--R                                   x
--R                                                    Type: Expression(Integer)
--E 441
--S 442 of 1000
--r0:=-4/3*e*f^3*F^(a+b*c+b*d*x)/x^3-1/2*f^4*F^(a+b*c+b*d*x)/x^2-_
--  2/3*b*d*e*f^3*F^(a+b*c+b*d*x)*log(F)/x^2-1/2*b*d*f^4*F^(a+b*c+_
--  b*d*x)*log(F)/x-2/3*b^2*d^2*e*f^3*F^(a+b*c+b*d*x)*log(F)^2/x+_
--  1/2*b^2*d^2*f^4*F^(a+b*c)*Ei(b*d*x*log(F))*log(F)^2+2/3*b^3*d^3*_
--  e*f^3*F^(a+b*c)*Ei(b*d*x*log(F))*log(F)^3-6*b^4*d^4*e^2*f^2*_
--  F^(a+b*c)*GAMMA(-4,-b*d*x*log(F))*log(F)^4+4*b^5*d^5*e^3*f*_
--  F^(a+b*c)*GAMMA(-5,-b*d*x*log(F))*log(F)^5-b^6*d^6*e^4*F^(a+b*c)*_
--  GAMMA(-6,-b*d*x*log(F))*log(F)^6
--E 442
--S 443 of 1000
--a0:=integrate(t0,x)
--E 443
--S 444 of 1000
--m0:=a0-r0
--E 444
--S 445 of 1000
--d0:=normalize(D(m0,x))
--E 445
)clear all
--S 446 of 1000
t0:=F^(a+b*(c+d*x))*(e+f*x)^4/x^8
--R
--R
--R          4 4       3 3     2 2 2     3       4  b d x + b c + a
--R        (f x  + 4e f x  + 6e f x  + 4e f x + e )F
--R   (1)  --------------------------------------------------------
--R                                    8
--R                                   x
--R                                                    Type: Expression(Integer)
--E 446

--S 447 of 1000
--r0:=-1/3*f^4*F^(a+b*c+b*d*x)/x^3-1/6*b*d*f^4*F^(a+b*c+b*d*x)*_
--  log(F)/x^2-1/6*b^2*d^2*f^4*F^(a+b*c+b*d*x)*log(F)^2/x+1/6*b^3*_
--  d^3*f^4*F^(a+b*c)*Ei(b*d*x*log(F))*log(F)^3-4*b^4*d^4*e*f^3*_
--  F^(a+b*c)*GAMMA(-4,-b*d*x*log(F))*log(F)^4+6*b^5*d^5*e^2*f^2*_
--  F^(a+b*c)*GAMMA(-5,-b*d*x*log(F))*log(F)^5-4*b^6*d^6*e^3*f*_
--  F^(a+b*c)*GAMMA(-6,-b*d*x*log(F))*log(F)^6+b^7*d^7*e^4*_
--  F^(a+b*c)*GAMMA(-7,-b*d*x*log(F))*log(F)^7
--E 447
--S 448 of 1000
--a0:=integrate(t0,x)
--E 448
--S 449 of 1000
--m0:=a0-r0
--E 449
--S 450 of 1000
--d0:=normalize(D(m0,x))
--E 450
)clear all
--S 451 of 1000
t0:=%e^(-a-b*x)*(a+b*x)^6*(c+d*x)^6
--R
--R
--R   (1)
--R        6 6 12        5 6     6   5  11       2 4 6        5   5      6 2 4  10
--R       b d x   + (6a b d  + 6b c d )x   + (15a b d  + 36a b c d  + 15b c d )x
--R     +
--R           3 3 6      2 4   5        5 2 4      6 3 3  9
--R       (20a b d  + 90a b c d  + 90a b c d  + 20b c d )x
--R     +
--R           4 2 6       3 3   5       2 4 2 4         5 3 3      6 4 2  8
--R       (15a b d  + 120a b c d  + 225a b c d  + 120a b c d  + 15b c d )x
--R     +
--R               5   6      4 2   5       3 3 2 4       2 4 3 3        5 4 2
--R             6a b d  + 90a b c d  + 300a b c d  + 300a b c d  + 90a b c d
--R           +
--R               6 5
--R             6b c d
--R      *
--R          7
--R         x
--R     +
--R            6 6      5     5       4 2 2 4       3 3 3 3       2 4 4 2
--R           a d  + 36a b c d  + 225a b c d  + 400a b c d  + 225a b c d
--R         +

--R                5 5     6 6
--R           36a b c d + b c
--R      *
--R          6
--R         x
--R     +
--R               6   5      5   2 4       4 2 3 3       3 3 4 2      2 4 5
--R             6a c d  + 90a b c d  + 300a b c d  + 300a b c d  + 90a b c d
--R           +
--R                 5 6
--R             6a b c
--R      *
--R          5
--R         x
--R     +
--R           6 2 4       5   3 3       4 2 4 2       3 3 5       2 4 6  4
--R       (15a c d  + 120a b c d  + 225a b c d  + 120a b c d + 15a b c )x
--R     +
--R           6 3 3      5   4 2      4 2 5       3 3 6  3
--R       (20a c d  + 90a b c d  + 90a b c d + 20a b c )x
--R     +
--R           6 4 2      5   5       4 2 6  2      6 5      5   6      6 6
--R       (15a c d  + 36a b c d + 15a b c )x  + (6a c d + 6a b c )x + a c
--R  *
--R       - b x - a
--R     %e
--R                                                    Type: Expression(Integer)
--E 451
--S 452 of 1000
--r0:=-(b*c-a*d)^6*GAMMA(7,a+b*x)/b^7-6*d*(b*c-a*d)^5*GAMMA(8,_
--  a+b*x)/b^7-15*d^2*(b*c-a*d)^4*GAMMA(9,a+b*x)/b^7-20*d^3*(b*c-_
--  a*d)^3*GAMMA(10,a+b*x)/b^7-15*d^4*(b*c-a*d)^2*GAMMA(11,a+b*x)/b^7-_
--  6*d^5*(b*c-a*d)*GAMMA(12,a+b*x)/b^7-d^6*GAMMA(13,a+b*x)/b^7
--E 452
--S 453 of 1000
--a0:=integrate(t0,x)
--E 453
--S 454 of 1000
--m0:=a0-r0
--E 454
--S 455 of 1000
--d0:=normalize(D(m0,x))
--E 455
)clear all

--S 456 of 1000
t0:=%e^(-a-b*x)*(a+b*x)^6*(c+d*x)^5
--R
--R
--R   (1)
--R        6 5 11        5 5     6   4  10       2 4 5        5   4      6 2 3  9
--R       b d x   + (6a b d  + 5b c d )x   + (15a b d  + 30a b c d  + 10b c d )x
--R     +
--R           3 3 5      2 4   4        5 2 3      6 3 2  8
--R       (20a b d  + 75a b c d  + 60a b c d  + 10b c d )x
--R     +
--R           4 2 5       3 3   4       2 4 2 3        5 3 2     6 4   7
--R       (15a b d  + 100a b c d  + 150a b c d  + 60a b c d  + 5b c d)x
--R     +
--R          5   5      4 2   4       3 3 2 3       2 4 3 2        5 4     6 5  6
--R       (6a b d  + 75a b c d  + 200a b c d  + 150a b c d  + 30a b c d + b c )x
--R     +
--R         6 5      5     4       4 2 2 3       3 3 3 2      2 4 4        5 5  5
--R       (a d  + 30a b c d  + 150a b c d  + 200a b c d  + 75a b c d + 6a b c )x
--R     +
--R          6   4      5   2 3       4 2 3 2       3 3 4       2 4 5  4
--R       (5a c d  + 60a b c d  + 150a b c d  + 100a b c d + 15a b c )x
--R     +
--R           6 2 3      5   3 2      4 2 4       3 3 5  3
--R       (10a c d  + 60a b c d  + 75a b c d + 20a b c )x
--R     +
--R           6 3 2      5   4       4 2 5  2      6 4      5   5      6 5
--R       (10a c d  + 30a b c d + 15a b c )x  + (5a c d + 6a b c )x + a c
--R  *
--R       - b x - a
--R     %e
--R                                                    Type: Expression(Integer)
--E 456
--S 457 of 1000
--r0:=-(b*c-a*d)^5*GAMMA(7,a+b*x)/b^6-5*d*(b*c-a*d)^4*GAMMA(8,a+b*x)/b^6-_
--  10*d^2*(b*c-a*d)^3*GAMMA(9,a+b*x)/b^6-10*d^3*(b*c-a*d)^2*_
--  GAMMA(10,a+b*x)/b^6-5*d^4*(b*c-a*d)*GAMMA(11,a+b*x)/b^6-d^5*_
--  GAMMA(12,a+b*x)/b^6
--E 457
--S 458 of 1000
--a0:=integrate(t0,x)
--E 458
--S 459 of 1000
--m0:=a0-r0
--E 459
--S 460 of 1000

)clear all
--S 461 of 1000
t0:=%e^(-a-b*x)*(a+b*x)^6*(c+d*x)^4
--R
--R
--R   (1)
--R        6 4 10        5 4     6   3  9       2 4 4        5   3     6 2 2  8
--R       b d x   + (6a b d  + 4b c d )x  + (15a b d  + 24a b c d  + 6b c d )x
--R     +
--R           3 3 4      2 4   3        5 2 2     6 3   7
--R       (20a b d  + 60a b c d  + 36a b c d  + 4b c d)x
--R     +
--R           4 2 4      3 3   3      2 4 2 2        5 3     6 4  6
--R       (15a b d  + 80a b c d  + 90a b c d  + 24a b c d + b c )x
--R     +
--R          5   4      4 2   3       3 3 2 2      2 4 3        5 4  5
--R       (6a b d  + 60a b c d  + 120a b c d  + 60a b c d + 6a b c )x
--R     +
--R         6 4      5     3      4 2 2 2      3 3 3       2 4 4  4
--R       (a d  + 24a b c d  + 90a b c d  + 80a b c d + 15a b c )x
--R     +
--R          6   3      5   2 2      4 2 3       3 3 4  3
--R       (4a c d  + 36a b c d  + 60a b c d + 20a b c )x
--R     +
--R          6 2 2      5   3       4 2 4  2      6 3      5   4      6 4
--R       (6a c d  + 24a b c d + 15a b c )x  + (4a c d + 6a b c )x + a c
--R  *
--R       - b x - a
--R     %e
--R                                                    Type: Expression(Integer)
--E 461
--S 462 of 1000
--r0:=-(b*c-a*d)^4*GAMMA(7,a+b*x)/b^5-4*d*(b*c-a*d)^3*GAMMA(8,a+b*x)/b^5-_
--  6*d^2*(b*c-a*d)^2*GAMMA(9,a+b*x)/b^5-4*d^3*(b*c-a*d)*GAMMA(10,a+b*x)/_
--  b^5-d^4*GAMMA(11,a+b*x)/b^5
--E 462
--S 463 of 1000
--a0:=integrate(t0,x)
--E 463
--S 464 of 1000
--m0:=a0-r0
--E 464

--S 465 of 1000
--d0:=normalize(D(m0,x))
--E 465
)clear all
--S 466 of 1000
t0:=%e^(-a-b*x)*(a+b*x)^6*(c+d*x)^3
--R
--R
--R   (1)
--R        6 3 9        5 3     6   2  8       2 4 3        5   2     6 2   7
--R       b d x  + (6a b d  + 3b c d )x  + (15a b d  + 18a b c d  + 3b c d)x
--R     +
--R           3 3 3      2 4   2        5 2     6 3  6
--R       (20a b d  + 45a b c d  + 18a b c d + b c )x
--R     +
--R           4 2 3      3 3   2      2 4 2        5 3  5
--R       (15a b d  + 60a b c d  + 45a b c d + 6a b c )x
--R     +
--R          5   3      4 2   2      3 3 2       2 4 3  4
--R       (6a b d  + 45a b c d  + 60a b c d + 15a b c )x
--R     +
--R         6 3      5     2      4 2 2       3 3 3  3
--R       (a d  + 18a b c d  + 45a b c d + 20a b c )x
--R     +
--R          6   2      5   2       4 2 3  2      6 2      5   3      6 3
--R       (3a c d  + 18a b c d + 15a b c )x  + (3a c d + 6a b c )x + a c
--R  *
--R       - b x - a
--R     %e
--R                                                    Type: Expression(Integer)
--E 466
--S 467 of 1000
--r0:=-(b*c-a*d)^3*GAMMA(7,a+b*x)/b^4-3*d*(b*c-a*d)^2*GAMMA(8,a+b*x)/b^4-_
--  3*d^2*(b*c-a*d)*GAMMA(9,a+b*x)/b^4-d^3*GAMMA(10,a+b*x)/b^4
--E 467
--S 468 of 1000
--a0:=integrate(t0,x)
--E 468
--S 469 of 1000
--m0:=a0-r0
--E 469
--S 470 of 1000
--d0:=normalize(D(m0,x))
--E 470

--S 471 of 1000
t0:=%e^(-a-b*x)*(a+b*x)^6*(c+d*x)^2
--R
--R
--R   (1)
--R        6 2 8        5 2     6     7       2 4 2        5       6 2  6
--R       b d x  + (6a b d  + 2b c d)x  + (15a b d  + 12a b c d + b c )x
--R     +
--R           3 3 2      2 4          5 2  5       4 2 2      3 3         2 4 2  4
--R       (20a b d  + 30a b c d + 6a b c )x  + (15a b d  + 40a b c d + 15a b c )x
--R     +
--R          5   2      4 2         3 3 2  3     6 2      5           4 2 2  2
--R       (6a b d  + 30a b c d + 20a b c )x  + (a d  + 12a b c d + 15a b c )x
--R     +
--R          6        5   2      6 2
--R       (2a c d + 6a b c )x + a c
--R  *
--R       - b x - a
--R     %e
--R                                                    Type: Expression(Integer)
--E 471
--S 472 of 1000
--r0:=-(b*c-a*d)^2*GAMMA(7,a+b*x)/b^3-2*d*(b*c-a*d)*GAMMA(8,a+b*x)/b^3-_
--  d^2*GAMMA(9,a+b*x)/b^3
--E 472
--S 473 of 1000
--a0:=integrate(t0,x)
--E 473
--S 474 of 1000
--m0:=a0-r0
--E 474
--S 475 of 1000
--d0:=normalize(D(m0,x))
--E 475
)clear all
--S 476 of 1000
t0:=%e^(-a-b*x)*(a+b*x)^6*(c+d*x)
--R
--R
--R   (1)
--R        6   7        5     6   6       2 4        5   5       3 3       2 4   4

--R       b d x  + (6a b d + b c)x  + (15a b d + 6a b c)x  + (20a b d + 15a b c)x
--R     +
--R           4 2       3 3   3      5         4 2   2     6      5         6
--R       (15a b d + 20a b c)x  + (6a b d + 15a b c)x  + (a d + 6a b c)x + a c
--R  *
--R       - b x - a
--R     %e
--R                                                    Type: Expression(Integer)
--E 476
--S 477 of 1000
--r0:=-(b*c-a*d)*GAMMA(7,a+b*x)/b^2-d*GAMMA(8,a+b*x)/b^2
--E 477
--S 478 of 1000
--a0:=integrate(t0,x)
--E 478
--S 479 of 1000
--m0:=a0-r0
--E 479
--S 480 of 1000
--d0:=normalize(D(m0,x))
--E 480
)clear all
--S 481 of 1000
t0:=%e^(-a-b*x)*(a+b*x)^6
--R
--R
--R   (1)
--R     6 6       5 5      2 4 4      3 3 3      4 2 2     5       6   - b x - a
--R   (b x  + 6a b x  + 15a b x  + 20a b x  + 15a b x  + 6a b x + a )%e
--R                                                    Type: Expression(Integer)
--E 481
--S 482 of 1000
--r0:=-GAMMA(7,a+b*x)/b
--E 482
--S 483 of 1000
--a0:=integrate(t0,x)
--E 483
--S 484 of 1000
--m0:=a0-r0
--E 484

)clear all
--S 486 of 1000
t0:=%e^(-a-b*x)*(a+b*x)^6/(c+d*x)
--R
--R
--R   (1)
--R     6 6       5 5      2 4 4      3 3 3      4 2 2     5       6   - b x - a
--R   (b x  + 6a b x  + 15a b x  + 20a b x  + 15a b x  + 6a b x + a )%e
--R   --------------------------------------------------------------------------
--R                                     d x + c
--R                                                    Type: Expression(Integer)
--E 486
--S 487 of 1000
--r0:=-6*%e^(-a-b*x)*(b*c-a*d)^2/d^3+2*%e^(-a-b*x)*(b*c-a*d)^3/_
--  d^4-%e^(-a-b*x)*(b*c-a*d)^4/d^5+%e^(-a-b*x)*(b*c-a*d)^5/d^6-_
--  6*%e^(-a-b*x)*(b*c-a*d)^2*(a+b*x)/d^3+2*%e^(-a-b*x)*(b*c-a*d)^3*_
--  (a+b*x)/d^4-%e^(-a-b*x)*(b*c-a*d)^4*(a+b*x)/d^5-3*%e^(-a-b*x)*_
--  (b*c-a*d)^2*(a+b*x)^2/d^3+%e^(-a-b*x)*(b*c-a*d)^3*(a+b*x)^2/d^4-_
--  %e^(-a-b*x)*(b*c-a*d)^2*(a+b*x)^3/d^3+%e^(-a+b*c/d)*(b*c-a*d)^6*_
--  Ei(-b*(c+d*x)/d)/d^7+(b*c-a*d)*GAMMA(5,a+b*x)/d^2-GAMMA(6,a+b*x)/d
--E 487
--S 488 of 1000
--a0:=integrate(t0,x)
--E 488
--S 489 of 1000
--m0:=a0-r0
--E 489
--S 490 of 1000
--d0:=normalize(D(m0,x))
--E 490
)clear all
--S 491 of 1000
t0:=%e^(-a-b*x)*(a+b*x)^6/(c+d*x)^2
--R
--R
--R   (1)
--R     6 6       5 5      2 4 4      3 3 3      4 2 2     5       6   - b x - a
--R   (b x  + 6a b x  + 15a b x  + 20a b x  + 15a b x  + 6a b x + a )%e
--R   --------------------------------------------------------------------------

--R                                2 2             2
--R                               d x  + 2c d x + c
--R                                                    Type: Expression(Integer)
--E 491
--S 492 of 1000
--r0:=36*%e^(-a-b*x)*b*(b*c-a*d)/d^3-30*%e^(-a-b*x)*b*(b*c-a*d)^2/d^4+_
--  20*%e^(-a-b*x)*b*(b*c-a*d)^3/d^5-15*%e^(-a-b*x)*b*(b*c-a*d)^4/d^6-_
--  %e^(-a-b*x)*(b*c-a*d)^6/(d^7*(c+d*x))+36*%e^(-a-b*x)*b^2*(b*c-a*d)*_
--  (c+d*x)/d^4-30*%e^(-a-b*x)*b^2*(b*c-a*d)^2*(c+d*x)/d^5+_
--  20*%e^(-a-b*x)*b^2*(b*c-a*d)^3*(c+d*x)/d^6+18*%e^(-a-b*x)*_
--  b^3*(b*c-a*d)*(c+d*x)^2/d^5-15*%e^(-a-b*x)*b^3*(b*c-a*d)^2*(c+d*x)^2/_
--  d^6+6*%e^(-a-b*x)*b^4*(b*c-a*d)*(c+d*x)^3/d^6-6*%e^(-a+b*c/d)*b*_
--  (b*c-a*d)^5*Ei(-b*(c+d*x)/d)/d^7-%e^(-a+b*c/d)*b*(b*c-a*d)^6*_
--  Ei(-b*(c+d*x)/d)/d^8-%e^(-a+b*c/d)*b*GAMMA(5,b*(c+d*x)/d)/d^2
--E 492
--S 493 of 1000
--a0:=integrate(t0,x)
--E 493
--S 494 of 1000
--m0:=a0-r0
--E 494
--S 495 of 1000
--d0:=normalize(D(m0,x))
--E 495
)clear all
--S 496 of 1000
t0:=%e^(-a-b*x)*(a+b*x)^6/(c+d*x)^3
--R
--R
--R   (1)
--R     6 6       5 5      2 4 4      3 3 3      4 2 2     5       6   - b x - a
--R   (b x  + 6a b x  + 15a b x  + 20a b x  + 15a b x  + 6a b x + a )%e
--R   --------------------------------------------------------------------------
--R                           3 3       2 2     2       3
--R                          d x  + 3c d x  + 3c d x + c
--R                                                    Type: Expression(Integer)
--E 496
--S 497 of 1000
r0:=-6*%e^(-a-b*x)*b^2/d^3+12*%e^(-a-b*x)*b^2*(b*c-a*d)/d^4-15*%e^(-a-b*x)*_
   b^2*(b*c-a*d)^2/d^5+20*%e^(-a-b*x)*b^2*(b*c-a*d)^3/d^6-1/2*%e^(-a-b*x)*_
   (b*c-a*d)^6/(d^7*(c+d*x)^2)+6*%e^(-a-b*x)*b*(b*c-a*d)^5/(d^7*(c+d*x))+_
   1/2*%e^(-a-b*x)*b*(b*c-a*d)^6/(d^8*(c+d*x))-6*%e^(-a-b*x)*b^3*(c+d*x)/_
   d^4+12*%e^(-a-b*x)*b^3*(b*c-a*d)*(c+d*x)/d^5-15*%e^(-a-b*x)*b^3*_

   (b*c-a*d)^2*(c+d*x)/d^6-3*%e^(-a-b*x)*b^4*(c+d*x)^2/d^5+6*%e^(-a-b*x)*_
   b^4*(b*c-a*d)*(c+d*x)^2/d^6-%e^(-a-b*x)*b^5*(c+d*x)^3/d^6+_
   15*%e^(-a+b*c/d)*b^2*(b*c-a*d)^4*Ei(-b*(c+d*x)/d)/d^7+6*%e^(-a+b*c/d)*_
   b^2*(b*c-a*d)^5*Ei(-b*(c+d*x)/d)/d^8+1/2*%e^(-a+b*c/d)*b^2*(b*c-a*d)^6*_
   Ei(-b*(c+d*x)/d)/d^9
--R
--R
--R   (2)
--R                 6      5      4  2 8        5      4       3  3   7
--R               (a  - 12a  + 30a )b d  + (- 6a  + 60a  - 120a )b c d
--R             +
--R                   4       3       2  4 2 6         3       2         5 3 5
--R               (15a  - 120a  + 180a )b c d  + (- 20a  + 120a  - 120a)b c d
--R             +
--R                   2             6 4 4               7 5 3    8 6 2
--R               (15a  - 60a + 30)b c d  + (- 6a + 12)b c d  + b c d
--R          *
--R              2
--R             x
--R         +
--R                  6      5      4  2   7         5       4       3  3 2 6
--R               (2a  - 24a  + 60a )b c d  + (- 12a  + 120a  - 240a )b c d
--R             +
--R                   4       3       2  4 3 5         3       2         5 4 4
--R               (30a  - 240a  + 360a )b c d  + (- 40a  + 240a  - 240a)b c d
--R             +
--R                   2              6 5 3                7 6 2     8 7
--R               (30a  - 120a + 60)b c d  + (- 12a + 24)b c d  + 2b c d
--R          *
--R             x
--R         +
--R             6      5      4  2 2 6        5      4       3  3 3 5
--R           (a  - 12a  + 30a )b c d  + (- 6a  + 60a  - 120a )b c d
--R         +
--R               4       3       2  4 4 4         3       2         5 5 3
--R           (15a  - 120a  + 180a )b c d  + (- 20a  + 120a  - 120a)b c d
--R         +
--R               2             6 6 2               7 7     8 8
--R           (15a  - 60a + 30)b c d  + (- 6a + 12)b c d + b c
--R      *
--R                            - a d + b c
--R                            -----------
--R            - b d x - b c        d
--R         Ei(-------------)%e
--R                  d
--R     +
--R               5 8 5                4 8     5   7  4
--R           - 2b d x  + ((- 12a - 6)b d  + 2b c d )x
--R         +
--R                  2             3 8        4   7     5 2 6  3

--R           ((- 30a  - 24a - 12)b d  + 12a b c d  - 2b c d )x
--R         +
--R                     3      2             2 8       2             3   7
--R               (- 40a  - 30a  - 24a - 12)b d  + (30a  - 12a - 12)b c d
--R             +
--R                           4 2 6     5 3 5
--R               (- 12a + 6)b c d  + 2b c d
--R          *
--R              2
--R             x
--R         +
--R                 6      5    8        5      4      3      2             2   7
--R               (a  - 12a )b d  + (- 6a  + 60a  - 80a  - 60a  - 48a - 24)b c d
--R             +
--R                   4       3       2             3 2 6
--R               (15a  - 120a  + 150a  + 48a + 12)b c d
--R             +
--R                     3       2              4 3 5       2             5 4 4
--R               (- 20a  + 120a  - 108a - 12)b c d  + (15a  - 60a + 28)b c d
--R             +
--R                           6 5 3    7 6 2
--R               (- 6a + 12)b c d  + b c d
--R          *
--R             x
--R         +
--R              6 8     6     5      7
--R           - a d  + (a  - 6a )b c d
--R         +
--R                5      4      3      2             2 2 6
--R           (- 6a  + 45a  - 40a  - 30a  - 24a - 12)b c d
--R         +
--R               4       3      2             3 3 5
--R           (15a  - 100a  + 90a  + 36a + 12)b c d
--R         +
--R                 3       2             4 4 4       2             5 5 3
--R           (- 20a  + 105a  - 72a - 12)b c d  + (15a  - 54a + 20)b c d
--R         +
--R                       6 6 2    7 7
--R           (- 6a + 11)b c d  + b c d
--R      *
--R           - b x - a
--R         %e
--R  /
--R       11 2       10      2 9
--R     2d  x  + 4c d  x + 2c d
--R                                                    Type: Expression(Integer)
--E 497
--S 498 of 1000
a0:=integrate(t0,x)

--R
--R
--R   (3)
--R   INTSIGN
--R  ,
--R      x
--R  ,
--R                  6 6      5   5       4 2 4       3 3 3       2 4 2        5
--R                %D b  + 6%D a b  + 15%D a b  + 20%D a b  + 15%D a b  + 6%D a b
--R              +
--R                 6
--R                a
--R         *
--R              - %D b - a
--R            %e
--R       /
--R            3 3      2   2        2     3
--R          %D d  + 3%D c d  + 3%D c d + c
--R     *
--R        d%D
--R                                         Type: Union(Expression(Integer),...)
--E 498
--S 499 of 1000
m0:=a0-r0
--R
--R
--R   (4)
--R            11 2       10      2 9
--R         (2d  x  + 4c d  x + 2c d )
--R      *
--R         INTSIGN
--R        ,
--R            x
--R        ,
--R                      6 6      5   5       4 2 4       3 3 3       2 4 2
--R                    %D b  + 6%D a b  + 15%D a b  + 20%D a b  + 15%D a b
--R                  +
--R                         5     6
--R                    6%D a b + a
--R               *
--R                    - %D b - a
--R                  %e
--R             /
--R                  3 3      2   2        2     3
--R                %D d  + 3%D c d  + 3%D c d + c
--R           *
--R              d%D
--R     +
--R                   6      5      4  2 8      5      4       3  3   7

--R               (- a  + 12a  - 30a )b d  + (6a  - 60a  + 120a )b c d
--R             +
--R                     4       3       2  4 2 6       3       2         5 3 5
--R               (- 15a  + 120a  - 180a )b c d  + (20a  - 120a  + 120a)b c d
--R             +
--R                     2             6 4 4             7 5 3    8 6 2
--R               (- 15a  + 60a - 30)b c d  + (6a - 12)b c d  - b c d
--R          *
--R              2
--R             x
--R         +
--R                    6      5      4  2   7       5       4       3  3 2 6
--R               (- 2a  + 24a  - 60a )b c d  + (12a  - 120a  + 240a )b c d
--R             +
--R                     4       3       2  4 3 5       3       2         5 4 4
--R               (- 30a  + 240a  - 360a )b c d  + (40a  - 240a  + 240a)b c d
--R             +
--R                     2              6 5 3              7 6 2     8 7
--R               (- 30a  + 120a - 60)b c d  + (12a - 24)b c d  - 2b c d
--R          *
--R             x
--R         +
--R               6      5      4  2 2 6      5      4       3  3 3 5
--R           (- a  + 12a  - 30a )b c d  + (6a  - 60a  + 120a )b c d
--R         +
--R                 4       3       2  4 4 4       3       2         5 5 3
--R           (- 15a  + 120a  - 180a )b c d  + (20a  - 120a  + 120a)b c d
--R         +
--R                 2             6 6 2             7 7     8 8
--R           (- 15a  + 60a - 30)b c d  + (6a - 12)b c d - b c
--R      *
--R                            - a d + b c
--R                            -----------
--R            - b d x - b c        d
--R         Ei(-------------)%e
--R                  d
--R     +
--R             5 8 5              4 8     5   7  4
--R           2b d x  + ((12a + 6)b d  - 2b c d )x
--R         +
--R                2             3 8        4   7     5 2 6  3
--R           ((30a  + 24a + 12)b d  - 12a b c d  + 2b c d )x
--R         +
--R                   3      2             2 8         2             3   7
--R               (40a  + 30a  + 24a + 12)b d  + (- 30a  + 12a + 12)b c d
--R             +
--R                         4 2 6     5 3 5
--R               (12a - 6)b c d  - 2b c d
--R          *
--R              2

--R             x
--R         +
--R                   6      5    8      5      4      3      2             2   7
--R               (- a  + 12a )b d  + (6a  - 60a  + 80a  + 60a  + 48a + 24)b c d
--R             +
--R                     4       3       2             3 2 6
--R               (- 15a  + 120a  - 150a  - 48a - 12)b c d
--R             +
--R                   3       2              4 3 5         2             5 4 4
--R               (20a  - 120a  + 108a + 12)b c d  + (- 15a  + 60a - 28)b c d
--R             +
--R                         6 5 3    7 6 2
--R               (6a - 12)b c d  - b c d
--R          *
--R             x
--R         +
--R            6 8       6     5      7
--R           a d  + (- a  + 6a )b c d
--R         +
--R              5      4      3      2             2 2 6
--R           (6a  - 45a  + 40a  + 30a  + 24a + 12)b c d
--R         +
--R                 4       3      2             3 3 5
--R           (- 15a  + 100a  - 90a  - 36a - 12)b c d
--R         +
--R               3       2             4 4 4         2             5 5 3
--R           (20a  - 105a  + 72a + 12)b c d  + (- 15a  + 54a - 20)b c d
--R         +
--R                     6 6 2    7 7
--R           (6a - 11)b c d  - b c d
--R      *
--R           - b x - a
--R         %e
--R  /
--R       11 2       10      2 9
--R     2d  x  + 4c d  x + 2c d
--R                                                    Type: Expression(Integer)
--E 499
--S 500 of 1000
d0:=normalize(D(m0,x))
--R
--R
--R   (5)  0
--R                                                    Type: Expression(Integer)
--E 500
)clear all
--S 501 of 1000

t0:=f^(a+b*x^2)*x^m
--R
--R
--R            2
--R         b x  + a m
--R   (1)  f        x
--R                                                    Type: Expression(Integer)
--E 501
--S 502 of 1000
--r0:=-1/2*f^a*x^(1+m)*GAMMA(1/2*(1+m),-b*x^2*log(f))*_
--  (-b*x^2*log(f))^(1/2*(-1-m))
--E 502
--S 503 of 1000
--a0:=integrate(t0,x)
--E 503
--S 504 of 1000
--m0:=a0-r0
--E 504
--S 505 of 1000
--d0:=normalize(D(m0,x))
--E 505
)clear all
--S 506 of 1000
t0:=f^(a+b*x^2)*x^11
--R
--R
--R               2
--R         11 b x  + a
--R   (1)  x  f
--R                                                    Type: Expression(Integer)
--E 506
--S 507 of 1000
--r0:=-1/2*f^a*GAMMA(6,-b*x^2*log(f))/(b^6*log(f)^6)
--E 507
--S 508 of 1000
--a0:=integrate(t0,x)
--E 508
--S 509 of 1000
--m0:=a0-r0
--E 509

)clear all
--S 511 of 1000
t0:=f^(a+b*x^2)*x^9
--R
--R
--R              2
--R         9 b x  + a
--R   (1)  x f
--R                                                    Type: Expression(Integer)
--E 511
--S 512 of 1000
--r0:=1/2*f^a*GAMMA(5,-b*x^2*log(f))/(b^5*log(f)^5)
--E 512
--S 513 of 1000
--a0:=integrate(t0,x)
--E 513
--S 514 of 1000
--m0:=a0-r0
--E 514
--S 515 of 1000
--d0:=normalize(D(m0,x))
--E 515
)clear all
--S 516 of 1000
t0:=f^(a+b*x^2)*x^7
--R
--R
--R              2
--R         7 b x  + a
--R   (1)  x f
--R                                                    Type: Expression(Integer)
--E 516
--S 517 of 1000
r0:=-3*f^(a+b*x^2)/(b^4*log(f)^4)+3*f^(a+b*x^2)*x^2/(b^3*log(f)^3)-_
   3/2*f^(a+b*x^2)*x^4/(b^2*log(f)^2)+1/2*f^(a+b*x^2)*x^6/(b*log(f))
--R
--R
--R                                                          2

--R          3 6      3     2 4      2       2            b x  + a
--R        (b x log(f)  - 3b x log(f)  + 6b x log(f) - 6)f
--R   (2)  -------------------------------------------------------
--R                                 4      4
--R                               2b log(f)
--R                                                    Type: Expression(Integer)
--E 517
--S 518 of 1000
a0:=integrate(t0,x)
--R
--R
--R                                                            2
--R          3 6      3     2 4      2       2             (b x  + a)log(f)
--R        (b x log(f)  - 3b x log(f)  + 6b x log(f) - 6)%e
--R   (3)  ----------------------------------------------------------------
--R                                     4      4
--R                                   2b log(f)
--R                                         Type: Union(Expression(Integer),...)
--E 518
--S 519 of 1000
m0:=a0-r0
--R
--R
--R   (4)
--R                                                           2
--R         3 6      3     2 4      2       2             (b x  + a)log(f)
--R       (b x log(f)  - 3b x log(f)  + 6b x log(f) - 6)%e
--R     +
--R                                                           2
--R           3 6      3     2 4      2       2            b x  + a
--R       (- b x log(f)  + 3b x log(f)  - 6b x log(f) + 6)f
--R  /
--R       4      4
--R     2b log(f)
--R                                                    Type: Expression(Integer)
--E 519
--S 520 of 1000
d0:=normalize(D(m0,x))
--R
--R
--R   (5)  0
--R                                                    Type: Expression(Integer)
--E 520
)clear all
--S 521 of 1000

t0:=f^(a+b*x^2)*x^5
--R
--R
--R              2
--R         5 b x  + a
--R   (1)  x f
--R                                                    Type: Expression(Integer)
--E 521
--S 522 of 1000
r0:=f^(a+b*x^2)/(b^3*log(f)^3)-f^(a+b*x^2)*x^2/(b^2*log(f)^2)+_
   1/2*f^(a+b*x^2)*x^4/(b*log(f))
--R
--R
--R                                           2
--R          2 4      2       2            b x  + a
--R        (b x log(f)  - 2b x log(f) + 2)f
--R   (2)  ----------------------------------------
--R                         3      3
--R                       2b log(f)
--R                                                    Type: Expression(Integer)
--E 522
--S 523 of 1000
a0:=integrate(t0,x)
--R
--R
--R                                             2
--R          2 4      2       2             (b x  + a)log(f)
--R        (b x log(f)  - 2b x log(f) + 2)%e
--R   (3)  -------------------------------------------------
--R                              3      3
--R                            2b log(f)
--R                                         Type: Union(Expression(Integer),...)
--E 523
--S 524 of 1000
m0:=a0-r0
--R
--R
--R   (4)
--R                                            2
--R         2 4      2       2             (b x  + a)log(f)
--R       (b x log(f)  - 2b x log(f) + 2)%e
--R     +
--R                                            2
--R           2 4      2       2            b x  + a
--R       (- b x log(f)  + 2b x log(f) - 2)f
--R  /
--R       3      3

--R     2b log(f)
--R                                                    Type: Expression(Integer)
--E 524
--S 525 of 1000
d0:=normalize(D(m0,x))
--R
--R
--R   (5)  0
--R                                                    Type: Expression(Integer)
--E 525
)clear all
--S 526 of 1000
t0:=f^(a+b*x^2)*x^3
--R
--R
--R              2
--R         3 b x  + a
--R   (1)  x f
--R                                                    Type: Expression(Integer)
--E 526
--S 527 of 1000
r0:=-1/2*f^(a+b*x^2)/(b^2*log(f)^2)+1/2*f^(a+b*x^2)*x^2/(b*log(f))
--R
--R
--R                            2
--R            2            b x  + a
--R        (b x log(f) - 1)f
--R   (2)  -------------------------
--R                  2      2
--R                2b log(f)
--R                                                    Type: Expression(Integer)
--E 527
--S 528 of 1000
a0:=integrate(t0,x)
--R
--R
--R                              2
--R            2             (b x  + a)log(f)
--R        (b x log(f) - 1)%e
--R   (3)  ----------------------------------
--R                      2      2
--R                    2b log(f)
--R                                         Type: Union(Expression(Integer),...)
--E 528

--S 529 of 1000
m0:=a0-r0
--R
--R
--R                              2                                    2
--R            2             (b x  + a)log(f)         2            b x  + a
--R        (b x log(f) - 1)%e                 + (- b x log(f) + 1)f
--R   (4)  ----------------------------------------------------------------
--R                                     2      2
--R                                   2b log(f)
--R                                                    Type: Expression(Integer)
--E 529
--S 530 of 1000
d0:=normalize(D(m0,x))
--R
--R
--R   (5)  0
--R                                                    Type: Expression(Integer)
--E 530
)clear all
--S 531 of 1000
t0:=f^(a+b*x^2)*x
--R
--R
--R              2
--R           b x  + a
--R   (1)  x f
--R                                                    Type: Expression(Integer)
--E 531
--S 532 of 1000
r0:=1/2*f^(a+b*x^2)/(b*log(f))
--R
--R
--R            2
--R         b x  + a
--R        f
--R   (2)  ---------
--R        2b log(f)
--R                                                    Type: Expression(Integer)
--E 532
--S 533 of 1000
a0:=integrate(t0,x)
--R
--R
--R              2

--R          (b x  + a)log(f)
--R        %e
--R   (3)  ------------------
--R             2b log(f)
--R                                         Type: Union(Expression(Integer),...)
--E 533
--S 534 of 1000
m0:=a0-r0
--R
--R
--R              2                  2
--R          (b x  + a)log(f)    b x  + a
--R        %e                 - f
--R   (4)  ------------------------------
--R                   2b log(f)
--R                                                    Type: Expression(Integer)
--E 534
--S 535 of 1000
d0:=normalize(D(m0,x))
--R
--R
--R   (5)  0
--R                                                    Type: Expression(Integer)
--E 535
)clear all
--S 536 of 1000
t0:=f^(a+b*x^2)/x
--R
--R
--R            2
--R         b x  + a
--R        f
--R   (1)  ---------
--R            x
--R                                                    Type: Expression(Integer)
--E 536
--S 537 of 1000
r0:=1/2*f^a*Ei(b*x^2*log(f))
--R
--R
--R         a      2
--R        f Ei(b x log(f))
--R   (2)  ----------------
--R                2
--R                                                    Type: Expression(Integer)

--E 537
--S 538 of 1000
a0:=integrate(t0,x)
--R
--R
--R                2
--R           x  %D b + a
--R         ++  f
--R   (3)   |   --------- d%D
--R        ++       %D
--R                                         Type: Union(Expression(Integer),...)
--E 538
--S 539 of 1000
m0:=a0-r0
--R
--R
--R                 2
--R            x  %D b + a
--R          ++  f                 a      2
--R        2 |   --------- d%D  - f Ei(b x log(f))
--R         ++       %D
--R   (4)  ---------------------------------------
--R                           2
--R                                                    Type: Expression(Integer)
--E 539
--S 540 of 1000
d0:=normalize(D(m0,x))
--R
--R
--R   (5)  0
--R                                                    Type: Expression(Integer)
--E 540
)clear all
--S 541 of 1000
t0:=f^(a+b*x^2)/x^3
--R
--R
--R            2
--R         b x  + a
--R        f
--R   (1)  ---------
--R             3
--R            x
--R                                                    Type: Expression(Integer)
--E 541

--S 542 of 1000
r0:=-1/2*f^(a+b*x^2)/x^2+1/2*b*f^a*Ei(b*x^2*log(f))*log(f)
--R
--R
--R                                         2
--R           2       a      2           b x  + a
--R        b x log(f)f Ei(b x log(f)) - f
--R   (2)  --------------------------------------
--R                            2
--R                          2x
--R                                                    Type: Expression(Integer)
--E 542
--S 543 of 1000
a0:=integrate(t0,x)
--R
--R
--R                2
--R           x  %D b + a
--R         ++  f
--R   (3)   |   --------- d%D
--R        ++        3
--R                %D
--R                                         Type: Union(Expression(Integer),...)
--E 543
--S 544 of 1000
m0:=a0-r0
--R
--R
--R                   2
--R              x  %D b + a                                         2
--R          2 ++  f                   2       a      2           b x  + a
--R        2x  |   --------- d%D  - b x log(f)f Ei(b x log(f)) + f
--R           ++        3
--R                   %D
--R   (4)  ---------------------------------------------------------------
--R                                        2
--R                                      2x
--R                                                    Type: Expression(Integer)
--E 544
--S 545 of 1000
d0:=normalize(D(m0,x))
--R
--R
--R   (5)  0
--R                                                    Type: Expression(Integer)
--E 545

--S 546 of 1000
t0:=f^(a+b*x^2)/x^5
--R
--R
--R            2
--R         b x  + a
--R        f
--R   (1)  ---------
--R             5
--R            x
--R                                                    Type: Expression(Integer)
--E 546
--S 547 of 1000
r0:=-1/4*f^(a+b*x^2)/x^4-1/4*b*f^(a+b*x^2)*log(f)/x^2+1/4*b^2*f^a*_
   Ei(b*x^2*log(f))*log(f)^2
--R
--R
--R                                                            2
--R         2 4      2 a      2                2            b x  + a
--R        b x log(f) f Ei(b x log(f)) + (- b x log(f) - 1)f
--R   (2)  ---------------------------------------------------------
--R                                     4
--R                                   4x
--R                                                    Type: Expression(Integer)
--E 547
--S 548 of 1000
a0:=integrate(t0,x)
--R
--R
--R                2
--R           x  %D b + a
--R         ++  f
--R   (3)   |   --------- d%D
--R        ++        5
--R                %D
--R                                         Type: Union(Expression(Integer),...)
--E 548
--S 549 of 1000
m0:=a0-r0
--R
--R
--R   (4)
--R                  2
--R             x  %D b + a

--R         4 ++  f                 2 4      2 a      2
--R       4x  |   --------- d%D  - b x log(f) f Ei(b x log(f))
--R          ++        5
--R                  %D
--R     +
--R                           2
--R           2            b x  + a
--R       (b x log(f) + 1)f
--R  /
--R       4
--R     4x
--R                                                    Type: Expression(Integer)
--E 549
--S 550 of 1000
d0:=normalize(D(m0,x))
--R
--R
--R   (5)  0
--R                                                    Type: Expression(Integer)
--E 550
)clear all
--S 551 of 1000
t0:=f^(a+b*x^2)/x^7
--R
--R
--R            2
--R         b x  + a
--R        f
--R   (1)  ---------
--R             7
--R            x
--R                                                    Type: Expression(Integer)
--E 551
--S 552 of 1000
r0:=-1/6*f^(a+b*x^2)/x^6-1/12*b*f^(a+b*x^2)*log(f)/x^4-_
   1/12*b^2*f^(a+b*x^2)*log(f)^2/x^2+1/12*b^3*f^a*Ei(b*x^2*log(f))*log(f)^3
--R
--R
--R   (2)
--R                                                                     2
--R    3 6      3 a      2              2 4      2      2            b x  + a
--R   b x log(f) f Ei(b x log(f)) + (- b x log(f)  - b x log(f) - 2)f
--R   -----------------------------------------------------------------------
--R                                        6
--R                                     12x
--R                                                    Type: Expression(Integer)

--E 552
--S 553 of 1000
a0:=integrate(t0,x)
--R
--R
--R                2
--R           x  %D b + a
--R         ++  f
--R   (3)   |   --------- d%D
--R        ++        7
--R                %D
--R                                         Type: Union(Expression(Integer),...)
--E 553
--S 554 of 1000
m0:=a0-r0
--R
--R
--R   (4)
--R                   2
--R              x  %D b + a
--R          6 ++  f                 3 6      3 a      2
--R       12x  |   --------- d%D  - b x log(f) f Ei(b x log(f))
--R           ++        7
--R                   %D
--R     +
--R                                         2
--R         2 4      2      2            b x  + a
--R       (b x log(f)  + b x log(f) + 2)f
--R  /
--R        6
--R     12x
--R                                                    Type: Expression(Integer)
--E 554
--S 555 of 1000
d0:=normalize(D(m0,x))
--R
--R
--R   (5)  0
--R                                                    Type: Expression(Integer)
--E 555
)clear all
--S 556 of 1000
t0:=f^(a+b*x^2)/x^9
--R
--R

--R            2
--R         b x  + a
--R        f
--R   (1)  ---------
--R             9
--R            x
--R                                                    Type: Expression(Integer)
--E 556
--S 557 of 1000
--r0:=-1/2*b^4*f^a*GAMMA(-4,-b*x^2*log(f))*log(f)^4
--E 557
--S 558 of 1000
--a0:=integrate(t0,x)
--E 558
--S 559 of 1000
--m0:=a0-r0
--E 559
--S 560 of 1000
--d0:=normalize(D(m0,x))
--E 560
)clear all
--S 561 of 1000
t0:=f^(a+b*x^2)/x^11
--R
--R
--R            2
--R         b x  + a
--R        f
--R   (1)  ---------
--R            11
--R           x
--R                                                    Type: Expression(Integer)
--E 561
--S 562 of 1000
--r0:=1/2*b^5*f^a*GAMMA(-5,-b*x^2*log(f))*log(f)^5
--E 562
--S 563 of 1000
--a0:=integrate(t0,x)
--E 563
--S 564 of 1000
--m0:=a0-r0

--E 564
--S 565 of 1000
--d0:=normalize(D(m0,x))
--E 565
)clear all
--S 566 of 1000
t0:=f^(a+b*x^2)*x^12
--R
--R
--R               2
--R         12 b x  + a
--R   (1)  x  f
--R                                                    Type: Expression(Integer)
--E 566
--S 567 of 1000
--r0:=-1/2*f^a*x^13*GAMMA(13/2,-b*x^2*log(f))/(-b*x^2*log(f))^(13/2)
--E 567
--S 568 of 1000
--a0:=integrate(t0,x)
--E 568
--S 569 of 1000
--m0:=a0-r0
--E 569
--S 570 of 1000
--d0:=normalize(D(m0,x))
--E 570
)clear all
--S 571 of 1000
t0:=f^(a+b*x^2)*x^10
--R
--R
--R               2
--R         10 b x  + a
--R   (1)  x  f
--R                                                    Type: Expression(Integer)
--E 571
--S 572 of 1000
--r0:=-1/2*f^a*x^11*GAMMA(11/2,-b*x^2*log(f))/(-b*x^2*log(f))^(11/2)
--E 572

--S 574 of 1000
--m0:=a0-r0
--E 574
--S 575 of 1000
--d0:=normalize(D(m0,x))
--E 575
)clear all
--S 576 of 1000
t0:=f^(a+b*x^2)*x^8
--R
--R
--R              2
--R         8 b x  + a
--R   (1)  x f
--R                                                    Type: Expression(Integer)
--E 576
--S 577 of 1000
--r0:=-105/16*f^(a+b*x^2)*x/(b^4*log(f)^4)+35/8*f^(a+b*x^2)*x^3/_
--  (b^3*log(f)^3)-7/4*f^(a+b*x^2)*x^5/(b^2*log(f)^2)+1/2*f^(a+b*x^2)*_
--  x^7/(b*log(f))+105/32*f^a*erfi(x*sqrt(b)*sqrt(log(f)))*_
--  sqrt(%pi)/(b^(9/2)*log(f)^(9/2))
--E 577
--S 578 of 1000
--a0:=integrate(t0,x)
--E 578
--S 579 of 1000
--m0:=a0-r0
--E 579
--S 580 of 1000
--d0:=normalize(D(m0,x))
--E 580
)clear all
--S 581 of 1000
t0:=f^(a+b*x^2)*x^6
--R
--R
--R              2

--R         6 b x  + a
--R   (1)  x f
--R                                                    Type: Expression(Integer)
--E 581
--S 582 of 1000
--r0:=15/8*f^(a+b*x^2)*x/(b^3*log(f)^3)-5/4*f^(a+b*x^2)*x^3/_
--  (b^2*log(f)^2)+1/2*f^(a+b*x^2)*x^5/(b*log(f))-15/16*f^a*_
--  erfi(x*sqrt(b)*sqrt(log(f)))*sqrt(%pi)/(b^(7/2)*log(f)^(7/2))
--E 582
--S 583 of 1000
--a0:=integrate(t0,x)
--E 583
--S 584 of 1000
--m0:=a0-r0
--E 584
--S 585 of 1000
--d0:=normalize(D(m0,x))
--E 585
)clear all
--S 586 of 1000
t0:=f^(a+b*x^2)*x^4
--R
--R
--R              2
--R         4 b x  + a
--R   (1)  x f
--R                                                    Type: Expression(Integer)
--E 586
--S 587 of 1000
--r0:=-3/4*f^(a+b*x^2)*x/(b^2*log(f)^2)+1/2*f^(a+b*x^2)*x^3/(b*log(f))+_
--  3/8*f^a*erfi(x*sqrt(b)*sqrt(log(f)))*sqrt(%pi)/(b^(5/2)*log(f)^(5/2))
--E 587
--S 588 of 1000
--a0:=integrate(t0,x)
--E 588
--S 589 of 1000
--m0:=a0-r0
--E 589
--S 590 of 1000
--d0:=normalize(D(m0,x))

--E 590
)clear all
--S 591 of 1000
t0:=f^(a+b*x^2)*x^2
--R
--R
--R              2
--R         2 b x  + a
--R   (1)  x f
--R                                                    Type: Expression(Integer)
--E 591
--S 592 of 1000
--r0:=1/2*f^(a+b*x^2)*x/(b*log(f))-1/4*f^a*erfi(x*sqrt(b)*sqrt(log(f)))*_
--  sqrt(%pi)/(b^(3/2)*log(f)^(3/2))
--E 592
--S 593 of 1000
--a0:=integrate(t0,x)
--E 593
--S 594 of 1000
--m0:=a0-r0
--E 594
--S 595 of 1000
--d0:=normalize(D(m0,x))
--E 595
)clear all
--S 596 of 1000
t0:=f^(a+b*x^2)
--R
--R
--R            2
--R         b x  + a
--R   (1)  f
--R                                                    Type: Expression(Integer)
--E 596
--S 597 of 1000
--r0:=1/2*f^a*erfi(x*sqrt(b)*sqrt(log(f)))*sqrt(%pi)/(sqrt(b)*sqrt(log(f)))
--E 597
--S 598 of 1000
--a0:=integrate(t0,x)
--E 598

--S 600 of 1000
--d0:=normalize(D(m0,x))
--E 600
)clear all
--S 601 of 1000
t0:=f^(a+b*x^2)/x^2
--R
--R
--R            2
--R         b x  + a
--R        f
--R   (1)  ---------
--R             2
--R            x
--R                                                    Type: Expression(Integer)
--E 601
--S 602 of 1000
--r0:=-f^(a+b*x^2)/x+f^a*erfi(x*sqrt(b)*sqrt(log(f)))*sqrt(%pi)*_
--  sqrt(b)*sqrt(log(f))
--E 602
--S 603 of 1000
--a0:=integrate(t0,x)
--E 603
--S 604 of 1000
--m0:=a0-r0
--E 604
--S 605 of 1000
--d0:=normalize(D(m0,x))
--E 605
)clear all
--S 606 of 1000
t0:=f^(a+b*x^2)/x^4
--R
--R
--R            2
--R         b x  + a
--R        f

--R   (1)  ---------
--R             4
--R            x
--R                                                    Type: Expression(Integer)
--E 606
--S 607 of 1000
--r0:=-1/3*f^(a+b*x^2)/x^3-2/3*b*f^(a+b*x^2)*log(f)/x+2/3*b^(3/2)*f^a*_
--  erfi(x*sqrt(b)*sqrt(log(f)))*log(f)^(3/2)*sqrt(%pi)
--E 607
--S 608 of 1000
--a0:=integrate(t0,x)
--E 608
--S 609 of 1000
--m0:=a0-r0
--E 609
--S 610 of 1000
--d0:=normalize(D(m0,x))
--E 610
)clear all
--S 611 of 1000
t0:=f^(a+b*x^2)/x^6
--R
--R
--R            2
--R         b x  + a
--R        f
--R   (1)  ---------
--R             6
--R            x
--R                                                    Type: Expression(Integer)
--E 611
--S 612 of 1000
--r0:=-1/5*f^(a+b*x^2)/x^5-2/15*b*f^(a+b*x^2)*log(f)/x^3-4/15*b^2*_
--  f^(a+b*x^2)*log(f)^2/x+4/15*b^(5/2)*f^a*erfi(x*sqrt(b)*_
--  sqrt(log(f)))*log(f)^(5/2)*sqrt(%pi)
--E 612
--S 613 of 1000
--a0:=integrate(t0,x)
--E 613
--S 614 of 1000
--m0:=a0-r0

--E 614
--S 615 of 1000
--d0:=normalize(D(m0,x))
--E 615
)clear all
--S 616 of 1000
t0:=f^(a+b*x^2)/x^8
--R
--R
--R            2
--R         b x  + a
--R        f
--R   (1)  ---------
--R             8
--R            x
--R                                                    Type: Expression(Integer)
--E 616
--S 617 of 1000
--r0:=-1/7*f^(a+b*x^2)/x^7-2/35*b*f^(a+b*x^2)*log(f)/x^5-4/105*b^2*_
--  f^(a+b*x^2)*log(f)^2/x^3-8/105*b^3*f^(a+b*x^2)*log(f)^3/x+_
--  8/105*b^(7/2)*f^a*erfi(x*sqrt(b)*sqrt(log(f)))*log(f)^(7/2)*sqrt(%pi)
--E 617
--S 618 of 1000
--a0:=integrate(t0,x)
--E 618
--S 619 of 1000
--m0:=a0-r0
--E 619
--S 620 of 1000
--d0:=normalize(D(m0,x))
--E 620
)clear all
--S 621 of 1000
t0:=f^(a+b*x^2)/x^10
--R
--R
--R            2
--R         b x  + a
--R        f
--R   (1)  ---------
--R            10

--R           x
--R                                                    Type: Expression(Integer)
--E 621
--S 622 of 1000
--r0:=-1/2*f^a*GAMMA(-9/2,-b*x^2*log(f))*(-b*x^2*log(f))^(9/2)/x^9
--E 622
--S 623 of 1000
--a0:=integrate(t0,x)
--E 623
--S 624 of 1000
--m0:=a0-r0
--E 624
--S 625 of 1000
--d0:=normalize(D(m0,x))
--E 625
)clear all
--S 626 of 1000
t0:=f^(a+b*x^2)/x^12
--R
--R
--R            2
--R         b x  + a
--R        f
--R   (1)  ---------
--R            12
--R           x
--R                                                    Type: Expression(Integer)
--E 626
--S 627 of 1000
--r0:=-1/2*f^a*GAMMA(-11/2,-b*x^2*log(f))*(-b*x^2*log(f))^(11/2)/x^11
--E 627
--S 628 of 1000
--a0:=integrate(t0,x)
--E 628
--S 629 of 1000
--m0:=a0-r0
--E 629
--S 630 of 1000
--d0:=normalize(D(m0,x))
--E 630

--S 631 of 1000
t0:=f^(a+b*x^3)*x^m
--R
--R
--R            3
--R         b x  + a m
--R   (1)  f        x
--R                                                    Type: Expression(Integer)
--E 631
--S 632 of 1000
--r0:=-1/3*f^a*x^(1+m)*GAMMA(1/3*(1+m),-b*x^3*log(f))*_
--  (-b*x^3*log(f))^(1/3*(-1-m))
--E 632
--S 633 of 1000
--a0:=integrate(t0,x)
--E 633
--S 634 of 1000
--m0:=a0-r0
--E 634
--S 635 of 1000
--d0:=normalize(D(m0,x))
--E 635
)clear all
--S 636 of 1000
t0:=f^(a+b*x^3)*x^17
--R
--R
--R               3
--R         17 b x  + a
--R   (1)  x  f
--R                                                    Type: Expression(Integer)
--E 636
--S 637 of 1000
--r0:=-1/3*f^a*GAMMA(6,-b*x^3*log(f))/(b^6*log(f)^6)
--E 637
--S 638 of 1000
--a0:=integrate(t0,x)
--E 638

--S 640 of 1000
--d0:=normalize(D(m0,x))
--E 640
)clear all
--S 641 of 1000
t0:=f^(a+b*x^3)*x^14
--R
--R
--R               3
--R         14 b x  + a
--R   (1)  x  f
--R                                                    Type: Expression(Integer)
--E 641
--S 642 of 1000
--r0:=1/3*f^a*GAMMA(5,-b*x^3*log(f))/(b^5*log(f)^5)
--E 642
--S 643 of 1000
--a0:=integrate(t0,x)
--E 643
--S 644 of 1000
--m0:=a0-r0
--E 644
--S 645 of 1000
--d0:=normalize(D(m0,x))
--E 645
)clear all
--S 646 of 1000
t0:=f^(a+b*x^3)*x^11
--R
--R
--R               3
--R         11 b x  + a
--R   (1)  x  f
--R                                                    Type: Expression(Integer)
--E 646
--S 647 of 1000
r0:=-2*f^(a+b*x^3)/(b^4*log(f)^4)+2*f^(a+b*x^3)*x^3/(b^3*log(f)^3)-_

   f^(a+b*x^3)*x^6/(b^2*log(f)^2)+1/3*f^(a+b*x^3)*x^9/(b*log(f))
--R
--R
--R                                                          3
--R          3 9      3     2 6      2       3            b x  + a
--R        (b x log(f)  - 3b x log(f)  + 6b x log(f) - 6)f
--R   (2)  -------------------------------------------------------
--R                                 4      4
--R                               3b log(f)
--R                                                    Type: Expression(Integer)
--E 647
--S 648 of 1000
a0:=integrate(t0,x)
--R
--R
--R                                                            3
--R          3 9      3     2 6      2       3             (b x  + a)log(f)
--R        (b x log(f)  - 3b x log(f)  + 6b x log(f) - 6)%e
--R   (3)  ----------------------------------------------------------------
--R                                     4      4
--R                                   3b log(f)
--R                                         Type: Union(Expression(Integer),...)
--E 648
--S 649 of 1000
m0:=a0-r0
--R
--R
--R   (4)
--R                                                           3
--R         3 9      3     2 6      2       3             (b x  + a)log(f)
--R       (b x log(f)  - 3b x log(f)  + 6b x log(f) - 6)%e
--R     +
--R                                                           3
--R           3 9      3     2 6      2       3            b x  + a
--R       (- b x log(f)  + 3b x log(f)  - 6b x log(f) + 6)f
--R  /
--R       4      4
--R     3b log(f)
--R                                                    Type: Expression(Integer)
--E 649
--S 650 of 1000
d0:=normalize(D(m0,x))
--R
--R
--R   (5)  0
--R                                                    Type: Expression(Integer)
--E 650

--S 651 of 1000
t0:=f^(a+b*x^3)*x^8
--R
--R
--R              3
--R         8 b x  + a
--R   (1)  x f
--R                                                    Type: Expression(Integer)
--E 651
--S 652 of 1000
r0:=2/3*f^(a+b*x^3)/(b^3*log(f)^3)-2/3*f^(a+b*x^3)*x^3/(b^2*log(f)^2)+_
   1/3*f^(a+b*x^3)*x^6/(b*log(f))
--R
--R
--R                                           3
--R          2 6      2       3            b x  + a
--R        (b x log(f)  - 2b x log(f) + 2)f
--R   (2)  ----------------------------------------
--R                         3      3
--R                       3b log(f)
--R                                                    Type: Expression(Integer)
--E 652
--S 653 of 1000
a0:=integrate(t0,x)
--R
--R
--R                                             3
--R          2 6      2       3             (b x  + a)log(f)
--R        (b x log(f)  - 2b x log(f) + 2)%e
--R   (3)  -------------------------------------------------
--R                              3      3
--R                            3b log(f)
--R                                         Type: Union(Expression(Integer),...)
--E 653
--S 654 of 1000
m0:=a0-r0
--R
--R
--R   (4)
--R                                            3
--R         2 6      2       3             (b x  + a)log(f)
--R       (b x log(f)  - 2b x log(f) + 2)%e
--R     +
--R                                            3

--R           2 6      2       3            b x  + a
--R       (- b x log(f)  + 2b x log(f) - 2)f
--R  /
--R       3      3
--R     3b log(f)
--R                                                    Type: Expression(Integer)
--E 654
--S 655 of 1000
d0:=normalize(D(m0,x))
--R
--R
--R   (5)  0
--R                                                    Type: Expression(Integer)
--E 655
)clear all
--S 656 of 1000
t0:=f^(a+b*x^3)*x^5
--R
--R
--R              3
--R         5 b x  + a
--R   (1)  x f
--R                                                    Type: Expression(Integer)
--E 656
--S 657 of 1000
r0:=-1/3*f^(a+b*x^3)/(b^2*log(f)^2)+1/3*f^(a+b*x^3)*x^3/(b*log(f))
--R
--R
--R                            3
--R            3            b x  + a
--R        (b x log(f) - 1)f
--R   (2)  -------------------------
--R                  2      2
--R                3b log(f)
--R                                                    Type: Expression(Integer)
--E 657
--S 658 of 1000
a0:=integrate(t0,x)
--R
--R
--R                              3
--R            3             (b x  + a)log(f)
--R        (b x log(f) - 1)%e
--R   (3)  ----------------------------------
--R                      2      2

--R                    3b log(f)
--R                                         Type: Union(Expression(Integer),...)
--E 658
--S 659 of 1000
m0:=a0-r0
--R
--R
--R                              3                                    3
--R            3             (b x  + a)log(f)         3            b x  + a
--R        (b x log(f) - 1)%e                 + (- b x log(f) + 1)f
--R   (4)  ----------------------------------------------------------------
--R                                     2      2
--R                                   3b log(f)
--R                                                    Type: Expression(Integer)
--E 659
--S 660 of 1000
d0:=normalize(D(m0,x))
--R
--R
--R   (5)  0
--R                                                    Type: Expression(Integer)
--E 660
)clear all
--S 661 of 1000
t0:=f^(a+b*x^3)*x^2
--R
--R
--R              3
--R         2 b x  + a
--R   (1)  x f
--R                                                    Type: Expression(Integer)
--E 661
--S 662 of 1000
r0:=1/3*f^(a+b*x^3)/(b*log(f))
--R
--R
--R            3
--R         b x  + a
--R        f
--R   (2)  ---------
--R        3b log(f)
--R                                                    Type: Expression(Integer)
--E 662
--S 663 of 1000

a0:=integrate(t0,x)
--R
--R
--R              3
--R          (b x  + a)log(f)
--R        %e
--R   (3)  ------------------
--R             3b log(f)
--R                                         Type: Union(Expression(Integer),...)
--E 663
--S 664 of 1000
m0:=a0-r0
--R
--R
--R              3                  3
--R          (b x  + a)log(f)    b x  + a
--R        %e                 - f
--R   (4)  ------------------------------
--R                   3b log(f)
--R                                                    Type: Expression(Integer)
--E 664
--S 665 of 1000
d0:=normalize(D(m0,x))
--R
--R
--R   (5)  0
--R                                                    Type: Expression(Integer)
--E 665
)clear all
--S 666 of 1000
t0:=f^(a+b*x^3)/x
--R
--R
--R            3
--R         b x  + a
--R        f
--R   (1)  ---------
--R            x
--R                                                    Type: Expression(Integer)
--E 666
--S 667 of 1000
r0:=1/3*f^a*Ei(b*x^3*log(f))
--R
--R
--R         a      3

--R        f Ei(b x log(f))
--R   (2)  ----------------
--R                3
--R                                                    Type: Expression(Integer)
--E 667
--S 668 of 1000
a0:=integrate(t0,x)
--R
--R
--R                3
--R           x  %D b + a
--R         ++  f
--R   (3)   |   --------- d%D
--R        ++       %D
--R                                         Type: Union(Expression(Integer),...)
--E 668
--S 669 of 1000
m0:=a0-r0
--R
--R
--R                 3
--R            x  %D b + a
--R          ++  f                 a      3
--R        3 |   --------- d%D  - f Ei(b x log(f))
--R         ++       %D
--R   (4)  ---------------------------------------
--R                           3
--R                                                    Type: Expression(Integer)
--E 669
--S 670 of 1000
d0:=normalize(D(m0,x))
--R
--R
--R   (5)  0
--R                                                    Type: Expression(Integer)
--E 670
)clear all
--S 671 of 1000
t0:=f^(a+b*x^3)/x^4
--R
--R
--R            3
--R         b x  + a
--R        f
--R   (1)  ---------

--R             4
--R            x
--R                                                    Type: Expression(Integer)
--E 671
--S 672 of 1000
r0:=-1/3*f^(a+b*x^3)/x^3+1/3*b*f^a*Ei(b*x^3*log(f))*log(f)
--R
--R
--R                                         3
--R           3       a      3           b x  + a
--R        b x log(f)f Ei(b x log(f)) - f
--R   (2)  --------------------------------------
--R                            3
--R                          3x
--R                                                    Type: Expression(Integer)
--E 672
--S 673 of 1000
a0:=integrate(t0,x)
--R
--R
--R                3
--R           x  %D b + a
--R         ++  f
--R   (3)   |   --------- d%D
--R        ++        4
--R                %D
--R                                         Type: Union(Expression(Integer),...)
--E 673
--S 674 of 1000
m0:=a0-r0
--R
--R
--R                   3
--R              x  %D b + a                                         3
--R          3 ++  f                   3       a      3           b x  + a
--R        3x  |   --------- d%D  - b x log(f)f Ei(b x log(f)) + f
--R           ++        4
--R                   %D
--R   (4)  ---------------------------------------------------------------
--R                                        3
--R                                      3x
--R                                                    Type: Expression(Integer)
--E 674
--S 675 of 1000
d0:=normalize(D(m0,x))
--R

--R
--R   (5)  0
--R                                                    Type: Expression(Integer)
--E 675
)clear all
--S 676 of 1000
t0:=f^(a+b*x^3)/x^7
--R
--R
--R            3
--R         b x  + a
--R        f
--R   (1)  ---------
--R             7
--R            x
--R                                                    Type: Expression(Integer)
--E 676
--S 677 of 1000
r0:=-1/6*f^(a+b*x^3)/x^6-1/6*b*f^(a+b*x^3)*log(f)/x^3+1/6*b^2*f^a*_
   Ei(b*x^3*log(f))*log(f)^2
--R
--R
--R                                                            3
--R         2 6      2 a      3                3            b x  + a
--R        b x log(f) f Ei(b x log(f)) + (- b x log(f) - 1)f
--R   (2)  ---------------------------------------------------------
--R                                     6
--R                                   6x
--R                                                    Type: Expression(Integer)
--E 677
--S 678 of 1000
a0:=integrate(t0,x)
--R
--R
--R                3
--R           x  %D b + a
--R         ++  f
--R   (3)   |   --------- d%D
--R        ++        7
--R                %D
--R                                         Type: Union(Expression(Integer),...)
--E 678
--S 679 of 1000
m0:=a0-r0
--R

--R
--R   (4)
--R                  3
--R             x  %D b + a
--R         6 ++  f                 2 6      2 a      3
--R       6x  |   --------- d%D  - b x log(f) f Ei(b x log(f))
--R          ++        7
--R                  %D
--R     +
--R                           3
--R           3            b x  + a
--R       (b x log(f) + 1)f
--R  /
--R       6
--R     6x
--R                                                    Type: Expression(Integer)
--E 679
--S 680 of 1000
d0:=normalize(D(m0,x))
--R
--R
--R   (5)  0
--R                                                    Type: Expression(Integer)
--E 680
)clear all
--S 681 of 1000
t0:=f^(a+b*x^3)/x^10
--R
--R
--R            3
--R         b x  + a
--R        f
--R   (1)  ---------
--R            10
--R           x
--R                                                    Type: Expression(Integer)
--E 681
--S 682 of 1000
r0:=-1/9*f^(a+b*x^3)/x^9-1/18*b*f^(a+b*x^3)*log(f)/x^6-1/18*b^2*f^(a+b*x^3)*_
   log(f)^2/x^3+1/18*b^3*f^a*Ei(b*x^3*log(f))*log(f)^3
--R
--R
--R   (2)
--R                                                                     3
--R    3 9      3 a      3              2 6      2      3            b x  + a
--R   b x log(f) f Ei(b x log(f)) + (- b x log(f)  - b x log(f) - 2)f

--R   -----------------------------------------------------------------------
--R                                        9
--R                                     18x
--R                                                    Type: Expression(Integer)
--E 682
--S 683 of 1000
a0:=integrate(t0,x)
--R
--R
--R                3
--R           x  %D b + a
--R         ++  f
--R   (3)   |   --------- d%D
--R        ++        10
--R                %D
--R                                         Type: Union(Expression(Integer),...)
--E 683
--S 684 of 1000
m0:=a0-r0
--R
--R
--R   (4)
--R                   3
--R              x  %D b + a
--R          9 ++  f                 3 9      3 a      3
--R       18x  |   --------- d%D  - b x log(f) f Ei(b x log(f))
--R           ++        10
--R                   %D
--R     +
--R                                         3
--R         2 6      2      3            b x  + a
--R       (b x log(f)  + b x log(f) + 2)f
--R  /
--R        9
--R     18x
--R                                                    Type: Expression(Integer)
--E 684
--S 685 of 1000
d0:=normalize(D(m0,x))
--R
--R
--R   (5)  0
--R                                                    Type: Expression(Integer)
--E 685
)clear all

--S 686 of 1000
t0:=f^(a+b*x^3)/x^13
--R
--R
--R            3
--R         b x  + a
--R        f
--R   (1)  ---------
--R            13
--R           x
--R                                                    Type: Expression(Integer)
--E 686
--S 687 of 1000
--r0:=-1/3*b^4*f^a*GAMMA(-4,-b*x^3*log(f))*log(f)^4
--E 687
--S 688 of 1000
--a0:=integrate(t0,x)
--E 688
--S 689 of 1000
--m0:=a0-r0
--E 689
--S 690 of 1000
--d0:=normalize(D(m0,x))
--E 690
)clear all
--S 691 of 1000
t0:=f^(a+b*x^3)/x^16
--R
--R
--R            3
--R         b x  + a
--R        f
--R   (1)  ---------
--R            16
--R           x
--R                                                    Type: Expression(Integer)
--E 691
--S 692 of 1000
--r0:=1/3*b^5*f^a*GAMMA(-5,-b*x^3*log(f))*log(f)^5
--E 692
--S 693 of 1000
--a0:=integrate(t0,x)

--E 693
--S 694 of 1000
--m0:=a0-r0
--E 694
--S 695 of 1000
--d0:=normalize(D(m0,x))
--E 695
)clear all
--S 696 of 1000
t0:=f^(a+b*x^3)*x^4
--R
--R
--R              3
--R         4 b x  + a
--R   (1)  x f
--R                                                    Type: Expression(Integer)
--E 696
--S 697 of 1000
--r0:=-1/3*f^a*x^5*GAMMA(5/3,-b*x^3*log(f))/(-b*x^3*log(f))^(5/3)
--E 697
--S 698 of 1000
--a0:=integrate(t0,x)
--E 698
--S 699 of 1000
--m0:=a0-r0
--E 699
--S 700 of 1000
--d0:=normalize(D(m0,x))
--E 700
)clear all
--S 701 of 1000
t0:=f^(a+b*x^3)*x^3
--R
--R
--R              3
--R         3 b x  + a
--R   (1)  x f
--R                                                    Type: Expression(Integer)
--E 701

--S 702 of 1000
--r0:=-1/3*f^a*x^4*GAMMA(4/3,-b*x^3*log(f))/(-b*x^3*log(f))^(4/3)
--E 702
--S 703 of 1000
--a0:=integrate(t0,x)
--E 703
--S 704 of 1000
--m0:=a0-r0
--E 704
--S 705 of 1000
--d0:=normalize(D(m0,x))
--E 705
)clear all
--S 706 of 1000
t0:=f^(a+b*x^3)*x
--R
--R
--R              3
--R           b x  + a
--R   (1)  x f
--R                                                    Type: Expression(Integer)
--E 706
--S 707 of 1000
--r0:=-1/3*f^a*x^2*GAMMA(2/3,-b*x^3*log(f))/(-b*x^3*log(f))^(2/3)
--E 707
--S 708 of 1000
--a0:=integrate(t0,x)
--E 708
--S 709 of 1000
--m0:=a0-r0
--E 709
--S 710 of 1000
--d0:=normalize(D(m0,x))
--E 710
)clear all
--S 711 of 1000
t0:=f^(a+b*x^3)
--R
--R

--R            3
--R         b x  + a
--R   (1)  f
--R                                                    Type: Expression(Integer)
--E 711
--S 712 of 1000
--r0:=-1/3*f^a*x*GAMMA(1/3,-b*x^3*log(f))/(-b*x^3*log(f))^(1/3)
--E 712
--S 713 of 1000
--a0:=integrate(t0,x)
--E 713
--S 714 of 1000
--m0:=a0-r0
--E 714
--S 715 of 1000
--d0:=normalize(D(m0,x))
--E 715
)clear all
--S 716 of 1000
t0:=f^(a+b*x^3)/x^2
--R
--R
--R            3
--R         b x  + a
--R        f
--R   (1)  ---------
--R             2
--R            x
--R                                                    Type: Expression(Integer)
--E 716
--S 717 of 1000
--r0:=-1/3*f^a*GAMMA(-1/3,-b*x^3*log(f))*(-b*x^3*log(f))^(1/3)/x
--E 717
--S 718 of 1000
--a0:=integrate(t0,x)
--E 718
--S 719 of 1000
--m0:=a0-r0
--E 719
--S 720 of 1000

)clear all
--S 721 of 1000
t0:=f^(a+b*x^3)/x^3
--R
--R
--R            3
--R         b x  + a
--R        f
--R   (1)  ---------
--R             3
--R            x
--R                                                    Type: Expression(Integer)
--E 721
--S 722 of 1000
--r0:=-1/3*f^a*GAMMA(-2/3,-b*x^3*log(f))*(-b*x^3*log(f))^(2/3)/x^2
--E 722
--S 723 of 1000
--a0:=integrate(t0,x)
--E 723
--S 724 of 1000
--m0:=a0-r0
--E 724
--S 725 of 1000
--d0:=normalize(D(m0,x))
--E 725
)clear all
--S 726 of 1000
t0:=%e^(4*x^3)*x^2
--R
--R
--R              3
--R         2  4x
--R   (1)  x %e
--R                                                    Type: Expression(Integer)
--E 726
--S 727 of 1000
r0:=1/12*%e^(4*x^3)
--R
--R

--R            3
--R          4x
--R        %e
--R   (2)  -----
--R          12
--R                                                    Type: Expression(Integer)
--E 727
--S 728 of 1000
a0:=integrate(t0,x)
--R
--R
--R            3
--R          4x
--R        %e
--R   (3)  -----
--R          12
--R                                         Type: Union(Expression(Integer),...)
--E 728
--S 729 of 1000
m0:=a0-r0
--R
--R
--R   (4)  0
--R                                                    Type: Expression(Integer)
--E 729
--S 730 of 1000
d0:=normalize(D(m0,x))
--R
--R
--R   (5)  0
--R                                                    Type: Expression(Integer)
--E 730
)clear all
--S 731 of 1000
t0:=f^(a+b/x)*x^m
--R
--R
--R         a x + b
--R         -------
--R            x    m
--R   (1)  f       x
--R                                                    Type: Expression(Integer)
--E 731
--S 732 of 1000

--r0:=f^a*x^(1+m)*GAMMA(-1-m,-b*log(f)/x)*(-b*log(f)/x)^(1+m)
--E 732
--S 733 of 1000
--a0:=integrate(t0,x)
--E 733
--S 734 of 1000
--m0:=a0-r0
--E 734
--S 735 of 1000
--d0:=normalize(D(m0,x))
--E 735
)clear all
--S 736 of 1000
t0:=f^(a+b/x)*x^4
--R
--R
--R           a x + b
--R           -------
--R         4    x
--R   (1)  x f
--R                                                    Type: Expression(Integer)
--E 736
--S 737 of 1000
--r0:=-b^5*f^a*GAMMA(-5,-b*log(f)/x)*log(f)^5
--E 737
--S 738 of 1000
--a0:=integrate(t0,x)
--E 738
--S 739 of 1000
--m0:=a0-r0
--E 739
--S 740 of 1000
--d0:=normalize(D(m0,x))
--E 740
)clear all
--S 741 of 1000
t0:=f^(a+b/x)*x^3
--R
--R

--R           a x + b
--R           -------
--R         3    x
--R   (1)  x f
--R                                                    Type: Expression(Integer)
--E 741
--S 742 of 1000
--r0:=b^4*f^a*GAMMA(-4,-b*log(f)/x)*log(f)^4
--E 742
--S 743 of 1000
--a0:=integrate(t0,x)
--E 743
--S 744 of 1000
--m0:=a0-r0
--E 744
--S 745 of 1000
--d0:=normalize(D(m0,x))
--E 745
)clear all
--S 746 of 1000
t0:=f^(a+b/x)*x^2
--R
--R
--R           a x + b
--R           -------
--R         2    x
--R   (1)  x f
--R                                                    Type: Expression(Integer)
--E 746
--S 747 of 1000
r0:=1/3*f^(a+b/x)*x^3+1/6*b*f^(a+b/x)*x^2*log(f)+1/6*b^2*f^(a+b/x)*x*_
   log(f)^2-1/6*b^3*f^a*Ei(b*log(f)/x)*log(f)^3
--R
--R
--R                                                                     a x + b
--R                                                                     -------
--R           3      3 a   b log(f)      2        2      2           3     x
--R        - b log(f) f Ei(--------) + (b x log(f)  + b x log(f) + 2x )f
--R                            x
--R   (2)  --------------------------------------------------------------------
--R                                          6
--R                                                    Type: Expression(Integer)
--E 747

--S 748 of 1000
a0:=integrate(t0,x)
--R
--R
--R                 b + %D a
--R           x     --------
--R         ++    2    %D
--R   (3)   |   %D f        d%D
--R        ++
--R                                         Type: Union(Expression(Integer),...)
--E 748
--S 749 of 1000
m0:=a0-r0
--R
--R
--R   (4)
--R                 b + %D a
--R           x     --------
--R         ++    2    %D           3      3 a   b log(f)
--R       6 |   %D f        d%D  + b log(f) f Ei(--------)
--R        ++                                        x
--R     +
--R                                          a x + b
--R                                          -------
--R           2        2      2           3     x
--R       (- b x log(f)  - b x log(f) - 2x )f
--R  /
--R     6
--R                                                    Type: Expression(Integer)
--E 749
--S 750 of 1000
d0:=normalize(D(m0,x))
--R
--R
--R   (5)  0
--R                                                    Type: Expression(Integer)
--E 750
)clear all
--S 751 of 1000
t0:=f^(a+b/x)*x
--R
--R
--R           a x + b
--R           -------
--R              x

--R   (1)  x f
--R                                                    Type: Expression(Integer)
--E 751
--S 752 of 1000
r0:=1/2*f^(a+b/x)*x^2+1/2*b*f^(a+b/x)*x*log(f)-1/2*b^2*f^a*Ei(b*log(f)/x)*_
   log(f)^2
--R
--R
--R                                                      a x + b
--R                                                      -------
--R           2      2 a   b log(f)                   2     x
--R        - b log(f) f Ei(--------) + (b x log(f) + x )f
--R                            x
--R   (2)  -----------------------------------------------------
--R                                  2
--R                                                    Type: Expression(Integer)
--E 752
--S 753 of 1000
a0:=integrate(t0,x)
--R
--R
--R                 b + %D a
--R           x     --------
--R         ++         %D
--R   (3)   |   %D f        d%D
--R        ++
--R                                         Type: Union(Expression(Integer),...)
--E 753
--S 754 of 1000
m0:=a0-r0
--R
--R
--R   (4)
--R                 b + %D a
--R           x     --------
--R         ++         %D           2      2 a   b log(f)
--R       2 |   %D f        d%D  + b log(f) f Ei(--------)
--R        ++                                        x
--R     +
--R                           a x + b
--R                           -------
--R                        2     x
--R       (- b x log(f) - x )f
--R  /
--R     2
--R                                                    Type: Expression(Integer)
--E 754

--S 755 of 1000
d0:=normalize(D(m0,x))
--R
--R
--R   (5)  0
--R                                                    Type: Expression(Integer)
--E 755
)clear all
--S 756 of 1000
t0:=f^(a+b/x)
--R
--R
--R         a x + b
--R         -------
--R            x
--R   (1)  f
--R                                                    Type: Expression(Integer)
--E 756
--S 757 of 1000
r0:=f^(a+b/x)*x-b*f^a*Ei(b*log(f)/x)*log(f)
--R
--R
--R                                      a x + b
--R                                      -------
--R                   a   b log(f)          x
--R   (2)  - b log(f)f Ei(--------) + x f
--R                           x
--R                                                    Type: Expression(Integer)
--E 757
--S 758 of 1000
a0:=integrate(t0,x)
--R
--R
--R              b + %D a
--R           x  --------
--R         ++      %D
--R   (3)   |   f        d%D
--R        ++
--R                                         Type: Union(Expression(Integer),...)
--E 758
--S 759 of 1000
m0:=a0-r0
--R
--R

--R              b + %D a                                   a x + b
--R           x  --------                                   -------
--R         ++      %D                   a   b log(f)          x
--R   (4)   |   f        d%D  + b log(f)f Ei(--------) - x f
--R        ++                                    x
--R                                                    Type: Expression(Integer)
--E 759
--S 760 of 1000
d0:=normalize(D(m0,x))
--R
--R
--R   (5)  0
--R                                                    Type: Expression(Integer)
--E 760
)clear all
--S 761 of 1000
t0:=f^(a+b/x)/x
--R
--R
--R         a x + b
--R         -------
--R            x
--R        f
--R   (1)  --------
--R            x
--R                                                    Type: Expression(Integer)
--E 761
--S 762 of 1000
r0:=-f^a*Ei(b*log(f)/x)
--R
--R
--R           a   b log(f)
--R   (2)  - f Ei(--------)
--R                   x
--R                                                    Type: Expression(Integer)
--E 762
--S 763 of 1000
a0:=integrate(t0,x)
--R
--R
--R              b + %D a
--R              --------
--R           x     %D
--R         ++  f
--R   (3)   |   --------- d%D

--R        ++       %D
--R                                         Type: Union(Expression(Integer),...)
--E 763
--S 764 of 1000
m0:=a0-r0
--R
--R
--R              b + %D a
--R              --------
--R           x     %D
--R         ++  f                 a   b log(f)
--R   (4)   |   --------- d%D  + f Ei(--------)
--R        ++       %D                    x
--R                                                    Type: Expression(Integer)
--E 764
--S 765 of 1000
d0:=normalize(D(m0,x))
--R
--R
--R   (5)  0
--R                                                    Type: Expression(Integer)
--E 765
)clear all
--S 766 of 1000
t0:=f^(a+b/x)/x^2
--R
--R
--R         a x + b
--R         -------
--R            x
--R        f
--R   (1)  --------
--R            2
--R           x
--R                                                    Type: Expression(Integer)
--E 766
--S 767 of 1000
r0:=-f^(a+b/x)/(b*log(f))
--R
--R
--R           a x + b
--R           -------
--R              x
--R          f
--R   (2)  - --------

--S 768 of 1000
a0:=integrate(t0,x)
--R
--R
--R            (a x + b)log(f)
--R            ---------------
--R                   x
--R          %e
--R   (3)  - -----------------
--R               b log(f)
--R                                         Type: Union(Expression(Integer),...)
--E 768
--S 769 of 1000
m0:=a0-r0
--R
--R
--R            (a x + b)log(f)    a x + b
--R            ---------------    -------
--R                   x              x
--R        - %e                + f
--R   (4)  ------------------------------
--R                   b log(f)
--R                                                    Type: Expression(Integer)
--E 769
--S 770 of 1000
d0:=normalize(D(m0,x))
--R
--R
--R   (5)  0
--R                                                    Type: Expression(Integer)
--E 770
)clear all
--S 771 of 1000
t0:=f^(a+b/x)/x^3
--R
--R
--R         a x + b
--R         -------
--R            x
--R        f
--R   (1)  --------
--R            3

--S 772 of 1000
r0:=f^(a+b/x)/(b^2*log(f)^2)-f^(a+b/x)/(b*x*log(f))
--R
--R
--R                         a x + b
--R                         -------
--R                            x
--R        (- b log(f) + x)f
--R   (2)  ------------------------
--R                2        2
--R               b x log(f)
--R                                                    Type: Expression(Integer)
--E 772
--S 773 of 1000
a0:=integrate(t0,x)
--R
--R
--R                          (a x + b)log(f)
--R                          ---------------
--R                                 x
--R        (- b log(f) + x)%e
--R   (3)  ---------------------------------
--R                    2        2
--R                   b x log(f)
--R                                         Type: Union(Expression(Integer),...)
--E 773
--S 774 of 1000
m0:=a0-r0
--R
--R
--R                          (a x + b)log(f)                  a x + b
--R                          ---------------                  -------
--R                                 x                            x
--R        (- b log(f) + x)%e                + (b log(f) - x)f
--R   (4)  ----------------------------------------------------------
--R                                 2        2
--R                                b x log(f)
--R                                                    Type: Expression(Integer)
--E 774
--S 775 of 1000
d0:=normalize(D(m0,x))
--R
--R

)clear all
--S 776 of 1000
t0:=f^(a+b/x)/x^4
--R
--R
--R         a x + b
--R         -------
--R            x
--R        f
--R   (1)  --------
--R            4
--R           x
--R                                                    Type: Expression(Integer)
--E 776
--S 777 of 1000
r0:=-2*f^(a+b/x)/(b^3*log(f)^3)+2*f^(a+b/x)/(b^2*x*log(f)^2)-_
   f^(a+b/x)/(b*x^2*log(f))
--R
--R
--R                                          a x + b
--R                                          -------
--R            2      2                   2     x
--R        (- b log(f)  + 2b x log(f) - 2x )f
--R   (2)  -----------------------------------------
--R                        3 2      3
--R                       b x log(f)
--R                                                    Type: Expression(Integer)
--E 777
--S 778 of 1000
a0:=integrate(t0,x)
--R
--R
--R                                           (a x + b)log(f)
--R                                           ---------------
--R            2      2                   2          x
--R        (- b log(f)  + 2b x log(f) - 2x )%e
--R   (3)  --------------------------------------------------
--R                             3 2      3
--R                            b x log(f)
--R                                         Type: Union(Expression(Integer),...)
--E 778
--S 779 of 1000

m0:=a0-r0
--R
--R
--R   (4)
--R                                          (a x + b)log(f)
--R                                          ---------------
--R           2      2                   2          x
--R       (- b log(f)  + 2b x log(f) - 2x )%e
--R     +
--R                                       a x + b
--R                                       -------
--R         2      2                   2     x
--R       (b log(f)  - 2b x log(f) + 2x )f
--R  /
--R      3 2      3
--R     b x log(f)
--R                                                    Type: Expression(Integer)
--E 779
--S 780 of 1000
d0:=normalize(D(m0,x))
--R
--R
--R   (5)  0
--R                                                    Type: Expression(Integer)
--E 780
)clear all
--S 781 of 1000
t0:=f^(a+b/x)/x^5
--R
--R
--R         a x + b
--R         -------
--R            x
--R        f
--R   (1)  --------
--R            5
--R           x
--R                                                    Type: Expression(Integer)
--E 781
--S 782 of 1000
r0:=6*f^(a+b/x)/(b^4*log(f)^4)-6*f^(a+b/x)/(b^3*x*log(f)^3)+_
   3*f^(a+b/x)/(b^2*x^2*log(f)^2)-f^(a+b/x)/(b*x^3*log(f))
--R
--R
--R                                                         a x + b
--R                                                         -------

--R            3      3     2        2       2           3     x
--R        (- b log(f)  + 3b x log(f)  - 6b x log(f) + 6x )f
--R   (2)  --------------------------------------------------------
--R                                4 3      4
--R                               b x log(f)
--R                                                    Type: Expression(Integer)
--E 782
--S 783 of 1000
a0:=integrate(t0,x)
--R
--R
--R                                                          (a x + b)log(f)
--R                                                          ---------------
--R            3      3     2        2       2           3          x
--R        (- b log(f)  + 3b x log(f)  - 6b x log(f) + 6x )%e
--R   (3)  -----------------------------------------------------------------
--R                                    4 3      4
--R                                   b x log(f)
--R                                         Type: Union(Expression(Integer),...)
--E 783
--S 784 of 1000
m0:=a0-r0
--R
--R
--R   (4)
--R                                                         (a x + b)log(f)
--R                                                         ---------------
--R           3      3     2        2       2           3          x
--R       (- b log(f)  + 3b x log(f)  - 6b x log(f) + 6x )%e
--R     +
--R                                                      a x + b
--R                                                      -------
--R         3      3     2        2       2           3     x
--R       (b log(f)  - 3b x log(f)  + 6b x log(f) - 6x )f
--R  /
--R      4 3      4
--R     b x log(f)
--R                                                    Type: Expression(Integer)
--E 784
--S 785 of 1000
d0:=normalize(D(m0,x))
--R
--R
--R   (5)  0
--R                                                    Type: Expression(Integer)
--E 785

--S 786 of 1000
t0:=f^(a+b/x)/x^6
--R
--R
--R         a x + b
--R         -------
--R            x
--R        f
--R   (1)  --------
--R            6
--R           x
--R                                                    Type: Expression(Integer)
--E 786
--S 787 of 1000
--r0:=-f^a*GAMMA(5,-b*log(f)/x)/(b^5*log(f)^5)
--E 787
--S 788 of 1000
--a0:=integrate(t0,x)
--E 788
--S 789 of 1000
--m0:=a0-r0
--E 789
--S 790 of 1000
--d0:=normalize(D(m0,x))
--E 790
)clear all
--S 791 of 1000
t0:=f^(a+b/x)/x^7
--R
--R
--R         a x + b
--R         -------
--R            x
--R        f
--R   (1)  --------
--R            7
--R           x
--R                                                    Type: Expression(Integer)
--E 791
--S 792 of 1000
--r0:=f^a*GAMMA(6,-b*log(f)/x)/(b^6*log(f)^6)

--E 792
--S 793 of 1000
--a0:=integrate(t0,x)
--E 793
--S 794 of 1000
--m0:=a0-r0
--E 794
--S 795 of 1000
--d0:=normalize(D(m0,x))
--E 795
)clear all
--S 796 of 1000
t0:=f^(a+b/x^2)*x^m
--R
--R
--R            2
--R         a x  + b
--R         --------
--R             2
--R            x     m
--R   (1)  f        x
--R                                                    Type: Expression(Integer)
--E 796
--S 797 of 1000
--r0:=1/2*f^a*x^(1+m)*GAMMA(1/2*(-1-m),-b*log(f)/x^2)*_
--  (-b*log(f)/x^2)^(1/2*(1+m))
--E 797
--S 798 of 1000
--a0:=integrate(t0,x)
--E 798
--S 799 of 1000
--m0:=a0-r0
--E 799
--S 800 of 1000
--d0:=normalize(D(m0,x))
--E 800
)clear all
--S 801 of 1000
t0:=f^(a+b/x^2)*x^9

--R
--R
--R              2
--R           a x  + b
--R           --------
--R               2
--R         9    x
--R   (1)  x f
--R                                                    Type: Expression(Integer)
--E 801
--S 802 of 1000
--r0:=-1/2*b^5*f^a*GAMMA(-5,-b*log(f)/x^2)*log(f)^5
--E 802
--S 803 of 1000
--a0:=integrate(t0,x)
--E 803
--S 804 of 1000
--m0:=a0-r0
--E 804
--S 805 of 1000
--d0:=normalize(D(m0,x))
--E 805
)clear all
--S 806 of 1000
t0:=f^(a+b/x^2)*x^7
--R
--R
--R              2
--R           a x  + b
--R           --------
--R               2
--R         7    x
--R   (1)  x f
--R                                                    Type: Expression(Integer)
--E 806
--S 807 of 1000
--r0:=1/2*b^4*f^a*GAMMA(-4,-b*log(f)/x^2)*log(f)^4
--E 807
--S 808 of 1000
--a0:=integrate(t0,x)
--E 808

--S 810 of 1000
--d0:=normalize(D(m0,x))
--E 810
)clear all
--S 811 of 1000
t0:=f^(a+b/x^2)*x^5
--R
--R
--R              2
--R           a x  + b
--R           --------
--R               2
--R         5    x
--R   (1)  x f
--R                                                    Type: Expression(Integer)
--E 811
--S 812 of 1000
r0:=1/6*f^(a+b/x^2)*x^6+1/12*b*f^(a+b/x^2)*x^4*log(f)+_
   1/12*b^2*f^(a+b/x^2)*x^2*log(f)^2-1/12*b^3*f^a*Ei(b*log(f)/x^2)*log(f)^3
--R
--R
--R                                                                        2
--R                                                                     a x  + b
--R                                                                     --------
--R                                                                         2
--R           3      3 a   b log(f)      2 2      2      4           6     x
--R        - b log(f) f Ei(--------) + (b x log(f)  + b x log(f) + 2x )f
--R                            2
--R                           x
--R   (2)  ---------------------------------------------------------------------
--R                                          12
--R                                                    Type: Expression(Integer)
--E 812
--S 813 of 1000
a0:=integrate(t0,x)
--R
--R
--R                       2
--R                 b + %D a
--R                 --------
--R           x          2
--R         ++    5    %D

--R   (3)   |   %D f        d%D
--R        ++
--R                                         Type: Union(Expression(Integer),...)
--E 813
--S 814 of 1000
m0:=a0-r0
--R
--R
--R   (4)
--R                        2
--R                  b + %D a
--R                  --------
--R            x          2
--R          ++    5    %D           3      3 a   b log(f)
--R       12 |   %D f        d%D  + b log(f) f Ei(--------)
--R         ++                                        2
--R                                                  x
--R     +
--R                                             2
--R                                          a x  + b
--R                                          --------
--R                                              2
--R           2 2      2      4           6     x
--R       (- b x log(f)  - b x log(f) - 2x )f
--R  /
--R     12
--R                                                    Type: Expression(Integer)
--E 814
--S 815 of 1000
d0:=normalize(D(m0,x))
--R
--R
--R   (5)  0
--R                                                    Type: Expression(Integer)
--E 815
)clear all
--S 816 of 1000
t0:=f^(a+b/x^2)*x^3
--R
--R
--R              2
--R           a x  + b
--R           --------
--R               2
--R         3    x
--R   (1)  x f

--S 817 of 1000
r0:=1/4*f^(a+b/x^2)*x^4+1/4*b*f^(a+b/x^2)*x^2*log(f)-_
   1/4*b^2*f^a*Ei(b*log(f)/x^2)*log(f)^2
--R
--R
--R                                                         2
--R                                                      a x  + b
--R                                                      --------
--R                                                          2
--R           2      2 a   b log(f)        2          4     x
--R        - b log(f) f Ei(--------) + (b x log(f) + x )f
--R                            2
--R                           x
--R   (2)  ------------------------------------------------------
--R                                   4
--R                                                    Type: Expression(Integer)
--E 817
--S 818 of 1000
a0:=integrate(t0,x)
--R
--R
--R                       2
--R                 b + %D a
--R                 --------
--R           x          2
--R         ++    3    %D
--R   (3)   |   %D f        d%D
--R        ++
--R                                         Type: Union(Expression(Integer),...)
--E 818
--S 819 of 1000
m0:=a0-r0
--R
--R
--R   (4)
--R                       2
--R                 b + %D a
--R                 --------
--R           x          2
--R         ++    3    %D           2      2 a   b log(f)
--R       4 |   %D f        d%D  + b log(f) f Ei(--------)
--R        ++                                        2
--R                                                 x
--R     +
--R                              2

--R                           a x  + b
--R                           --------
--R                               2
--R             2          4     x
--R       (- b x log(f) - x )f
--R  /
--R     4
--R                                                    Type: Expression(Integer)
--E 819
--S 820 of 1000
d0:=normalize(D(m0,x))
--R
--R
--R   (5)  0
--R                                                    Type: Expression(Integer)
--E 820
)clear all
--S 821 of 1000
t0:=f^(a+b/x^2)*x
--R
--R
--R              2
--R           a x  + b
--R           --------
--R               2
--R              x
--R   (1)  x f
--R                                                    Type: Expression(Integer)
--E 821
--S 822 of 1000
r0:=1/2*f^(a+b/x^2)*x^2-1/2*b*f^a*Ei(b*log(f)/x^2)*log(f)
--R
--R
--R                                         2
--R                                      a x  + b
--R                                      --------
--R                                          2
--R                   a   b log(f)     2    x
--R        - b log(f)f Ei(--------) + x f
--R                           2
--R                          x
--R   (2)  --------------------------------------
--R                           2
--R                                                    Type: Expression(Integer)
--E 822

--S 823 of 1000
a0:=integrate(t0,x)
--R
--R
--R                       2
--R                 b + %D a
--R                 --------
--R           x          2
--R         ++         %D
--R   (3)   |   %D f        d%D
--R        ++
--R                                         Type: Union(Expression(Integer),...)
--E 823
--S 824 of 1000
m0:=a0-r0
--R
--R
--R                        2                                       2
--R                  b + %D a                                   a x  + b
--R                  --------                                   --------
--R            x          2                                         2
--R          ++         %D                   a   b log(f)     2    x
--R        2 |   %D f        d%D  + b log(f)f Ei(--------) - x f
--R         ++                                       2
--R                                                 x
--R   (4)  -------------------------------------------------------------
--R                                      2
--R                                                    Type: Expression(Integer)
--E 824
--S 825 of 1000
d0:=normalize(D(m0,x))
--R
--R
--R   (5)  0
--R                                                    Type: Expression(Integer)
--E 825
)clear all
--S 826 of 1000
t0:=f^(a+b/x^2)/x
--R
--R
--R            2
--R         a x  + b
--R         --------
--R             2
--R            x

--R        f
--R   (1)  ---------
--R            x
--R                                                    Type: Expression(Integer)
--E 826
--S 827 of 1000
r0:=-1/2*f^a*Ei(b*log(f)/x^2)
--R
--R
--R           a   b log(f)
--R          f Ei(--------)
--R                   2
--R                  x
--R   (2)  - --------------
--R                 2
--R                                                    Type: Expression(Integer)
--E 827
--S 828 of 1000
a0:=integrate(t0,x)
--R
--R
--R                    2
--R              b + %D a
--R              --------
--R                   2
--R           x     %D
--R         ++  f
--R   (3)   |   --------- d%D
--R        ++       %D
--R                                         Type: Union(Expression(Integer),...)
--E 828
--S 829 of 1000
m0:=a0-r0
--R
--R
--R                     2
--R               b + %D a
--R               --------
--R                    2
--R            x     %D
--R          ++  f                 a   b log(f)
--R        2 |   --------- d%D  + f Ei(--------)
--R         ++       %D                    2
--R                                       x
--R   (4)  -------------------------------------
--R                          2
--R                                                    Type: Expression(Integer)

--E 829
--S 830 of 1000
d0:=normalize(D(m0,x))
--R
--R
--R   (5)  0
--R                                                    Type: Expression(Integer)
--E 830
)clear all
--S 831 of 1000
t0:=f^(a+b/x^2)/x^3
--R
--R
--R            2
--R         a x  + b
--R         --------
--R             2
--R            x
--R        f
--R   (1)  ---------
--R             3
--R            x
--R                                                    Type: Expression(Integer)
--E 831
--S 832 of 1000
r0:=-1/2*f^(a+b/x^2)/(b*log(f))
--R
--R
--R              2
--R           a x  + b
--R           --------
--R               2
--R              x
--R          f
--R   (2)  - ---------
--R          2b log(f)
--R                                                    Type: Expression(Integer)
--E 832
--S 833 of 1000
a0:=integrate(t0,x)
--R
--R
--R                2
--R            (a x  + b)log(f)
--R            ----------------

--R                    2
--R                   x
--R          %e
--R   (3)  - ------------------
--R               2b log(f)
--R                                         Type: Union(Expression(Integer),...)
--E 833
--S 834 of 1000
m0:=a0-r0
--R
--R
--R                2                  2
--R            (a x  + b)log(f)    a x  + b
--R            ----------------    --------
--R                    2               2
--R                   x               x
--R        - %e                 + f
--R   (4)  --------------------------------
--R                    2b log(f)
--R                                                    Type: Expression(Integer)
--E 834
--S 835 of 1000
d0:=normalize(D(m0,x))
--R
--R
--R   (5)  0
--R                                                    Type: Expression(Integer)
--E 835
)clear all
--S 836 of 1000
t0:=f^(a+b/x^2)/x^5
--R
--R
--R            2
--R         a x  + b
--R         --------
--R             2
--R            x
--R        f
--R   (1)  ---------
--R             5
--R            x
--R                                                    Type: Expression(Integer)
--E 836
--S 837 of 1000

r0:=1/2*f^(a+b/x^2)/(b^2*log(f)^2)-1/2*f^(a+b/x^2)/(b*x^2*log(f))
--R
--R
--R                             2
--R                          a x  + b
--R                          --------
--R                              2
--R                       2     x
--R        (- b log(f) + x )f
--R   (2)  --------------------------
--R                 2 2      2
--R               2b x log(f)
--R                                                    Type: Expression(Integer)
--E 837
--S 838 of 1000
a0:=integrate(t0,x)
--R
--R
--R                               2
--R                           (a x  + b)log(f)
--R                           ----------------
--R                                   2
--R                       2          x
--R        (- b log(f) + x )%e
--R   (3)  -----------------------------------
--R                      2 2      2
--R                    2b x log(f)
--R                                         Type: Union(Expression(Integer),...)
--E 838
--S 839 of 1000
m0:=a0-r0
--R
--R
--R                               2                                 2
--R                           (a x  + b)log(f)                   a x  + b
--R                           ----------------                   --------
--R                                   2                              2
--R                       2          x                        2     x
--R        (- b log(f) + x )%e                 + (b log(f) - x )f
--R   (4)  --------------------------------------------------------------
--R                                   2 2      2
--R                                 2b x log(f)
--R                                                    Type: Expression(Integer)
--E 839
--S 840 of 1000
d0:=normalize(D(m0,x))
--R

--R
--R   (5)  0
--R                                                    Type: Expression(Integer)
--E 840
)clear all
--S 841 of 1000
t0:=f^(a+b/x^2)/x^7
--R
--R
--R            2
--R         a x  + b
--R         --------
--R             2
--R            x
--R        f
--R   (1)  ---------
--R             7
--R            x
--R                                                    Type: Expression(Integer)
--E 841
--S 842 of 1000
r0:=-f^(a+b/x^2)/(b^3*log(f)^3)+f^(a+b/x^2)/(b^2*x^2*log(f)^2)-_
   1/2*f^(a+b/x^2)/(b*x^4*log(f))
--R
--R
--R                                             2
--R                                          a x  + b
--R                                          --------
--R                                              2
--R            2      2       2           4     x
--R        (- b log(f)  + 2b x log(f) - 2x )f
--R   (2)  ------------------------------------------
--R                         3 4      3
--R                       2b x log(f)
--R                                                    Type: Expression(Integer)
--E 842
--S 843 of 1000
a0:=integrate(t0,x)
--R
--R
--R                                               2
--R                                           (a x  + b)log(f)
--R                                           ----------------
--R                                                   2
--R            2      2       2           4          x
--R        (- b log(f)  + 2b x log(f) - 2x )%e

--R   (3)  ---------------------------------------------------
--R                              3 4      3
--R                            2b x log(f)
--R                                         Type: Union(Expression(Integer),...)
--E 843
--S 844 of 1000
m0:=a0-r0
--R
--R
--R   (4)
--R                                              2
--R                                          (a x  + b)log(f)
--R                                          ----------------
--R                                                  2
--R           2      2       2           4          x
--R       (- b log(f)  + 2b x log(f) - 2x )%e
--R     +
--R                                          2
--R                                       a x  + b
--R                                       --------
--R                                           2
--R         2      2       2           4     x
--R       (b log(f)  - 2b x log(f) + 2x )f
--R  /
--R       3 4      3
--R     2b x log(f)
--R                                                    Type: Expression(Integer)
--E 844
--S 845 of 1000
d0:=normalize(D(m0,x))
--R
--R
--R   (5)  0
--R                                                    Type: Expression(Integer)
--E 845
)clear all
--S 846 of 1000
t0:=f^(a+b/x^2)/x^9
--R
--R
--R            2
--R         a x  + b
--R         --------
--R             2
--R            x
--R        f

--R   (1)  ---------
--R             9
--R            x
--R                                                    Type: Expression(Integer)
--E 846
--S 847 of 1000
r0:=3*f^(a+b/x^2)/(b^4*log(f)^4)-3*f^(a+b/x^2)/(b^3*x^2*log(f)^3)+_
   3/2*f^(a+b/x^2)/(b^2*x^4*log(f)^2)-1/2*f^(a+b/x^2)/(b*x^6*log(f))
--R
--R
--R                                                            2
--R                                                         a x  + b
--R                                                         --------
--R                                                             2
--R            3      3     2 2      2       4           6     x
--R        (- b log(f)  + 3b x log(f)  - 6b x log(f) + 6x )f
--R   (2)  ---------------------------------------------------------
--R                                 4 6      4
--R                               2b x log(f)
--R                                                    Type: Expression(Integer)
--E 847
--S 848 of 1000
a0:=integrate(t0,x)
--R
--R
--R                                                              2
--R                                                          (a x  + b)log(f)
--R                                                          ----------------
--R                                                                  2
--R            3      3     2 2      2       4           6          x
--R        (- b log(f)  + 3b x log(f)  - 6b x log(f) + 6x )%e
--R   (3)  ------------------------------------------------------------------
--R                                     4 6      4
--R                                   2b x log(f)
--R                                         Type: Union(Expression(Integer),...)
--E 848
--S 849 of 1000
m0:=a0-r0
--R
--R
--R   (4)
--R                                                             2
--R                                                         (a x  + b)log(f)
--R                                                         ----------------
--R                                                                 2
--R           3      3     2 2      2       4           6          x
--R       (- b log(f)  + 3b x log(f)  - 6b x log(f) + 6x )%e

--R     +
--R                                                         2
--R                                                      a x  + b
--R                                                      --------
--R                                                          2
--R         3      3     2 2      2       4           6     x
--R       (b log(f)  - 3b x log(f)  + 6b x log(f) - 6x )f
--R  /
--R       4 6      4
--R     2b x log(f)
--R                                                    Type: Expression(Integer)
--E 849
--S 850 of 1000
d0:=normalize(D(m0,x))
--R
--R
--R   (5)  0
--R                                                    Type: Expression(Integer)
--E 850
)clear all
--S 851 of 1000
t0:=f^(a+b/x^2)/x^11
--R
--R
--R            2
--R         a x  + b
--R         --------
--R             2
--R            x
--R        f
--R   (1)  ---------
--R            11
--R           x
--R                                                    Type: Expression(Integer)
--E 851
--S 852 of 1000
--r0:=-1/2*f^a*GAMMA(5,-b*log(f)/x^2)/(b^5*log(f)^5)
--E 852
--S 853 of 1000
--a0:=integrate(t0,x)
--E 853
--S 854 of 1000
--m0:=a0-r0
--E 854

)clear all
--S 856 of 1000
t0:=f^(a+b/x^2)/x^13
--R
--R
--R            2
--R         a x  + b
--R         --------
--R             2
--R            x
--R        f
--R   (1)  ---------
--R            13
--R           x
--R                                                    Type: Expression(Integer)
--E 856
--S 857 of 1000
--r0:=1/2*f^a*GAMMA(6,-b*log(f)/x^2)/(b^6*log(f)^6)
--E 857
--S 858 of 1000
--a0:=integrate(t0,x)
--E 858
--S 859 of 1000
--m0:=a0-r0
--E 859
--S 860 of 1000
--d0:=normalize(D(m0,x))
--E 860
)clear all
--S 861 of 1000
t0:=f^(a+b/x^2)*x^10
--R
--R
--R               2
--R            a x  + b
--R            --------
--R                2
--R         10    x

--S 862 of 1000
--r0:=1/2*f^a*x^11*GAMMA(-11/2,-b*log(f)/x^2)*(-b*log(f)/x^2)^(11/2)
--E 862
--S 863 of 1000
--a0:=integrate(t0,x)
--E 863
--S 864 of 1000
--m0:=a0-r0
--E 864
--S 865 of 1000
--d0:=normalize(D(m0,x))
--E 865
)clear all
--S 866 of 1000
t0:=f^(a+b/x^2)*x^8
--R
--R
--R              2
--R           a x  + b
--R           --------
--R               2
--R         8    x
--R   (1)  x f
--R                                                    Type: Expression(Integer)
--E 866
--S 867 of 1000
--r0:=1/2*f^a*x^9*GAMMA(-9/2,-b*log(f)/x^2)*(-b*log(f)/x^2)^(9/2)
--E 867
--S 868 of 1000
--a0:=integrate(t0,x)
--E 868
--S 869 of 1000
--m0:=a0-r0
--E 869
--S 870 of 1000
--d0:=normalize(D(m0,x))
--E 870

--S 871 of 1000
t0:=f^(a+b/x^2)*x^6
--R
--R
--R              2
--R           a x  + b
--R           --------
--R               2
--R         6    x
--R   (1)  x f
--R                                                    Type: Expression(Integer)
--E 871
--S 872 of 1000
--r0:=1/7*f^(a+b/x^2)*x^7+2/35*b*f^(a+b/x^2)*x^5*log(f)+4/105*b^2*_
--  f^(a+b/x^2)*x^3*log(f)^2+8/105*b^3*f^(a+b/x^2)*x*log(f)^3-_
--  8/105*b^(7/2)*f^a*erfi(sqrt(b)*sqrt(log(f))/x)*log(f)^(7/2)*sqrt(%pi)
--E 872
--S 873 of 1000
--a0:=integrate(t0,x)
--E 873
--S 874 of 1000
--m0:=a0-r0
--E 874
--S 875 of 1000
--d0:=normalize(D(m0,x))
--E 875
)clear all
--S 876 of 1000
t0:=f^(a+b/x^2)*x^4
--R
--R
--R              2
--R           a x  + b
--R           --------
--R               2
--R         4    x
--R   (1)  x f
--R                                                    Type: Expression(Integer)
--E 876
--S 877 of 1000

--r0:=1/5*f^(a+b/x^2)*x^5+2/15*b*f^(a+b/x^2)*x^3*log(f)+_
--  4/15*b^2*f^(a+b/x^2)*x*log(f)^2-4/15*b^(5/2)*f^a*erfi(sqrt(b)*_
--  sqrt(log(f))/x)*log(f)^(5/2)*sqrt(%pi)
--E 877
--S 878 of 1000
--a0:=integrate(t0,x)
--E 878
--S 879 of 1000
--m0:=a0-r0
--E 879
--S 880 of 1000
--d0:=normalize(D(m0,x))
--E 880
)clear all
--S 881 of 1000
t0:=f^(a+b/x^2)*x^2
--R
--R
--R              2
--R           a x  + b
--R           --------
--R               2
--R         2    x
--R   (1)  x f
--R                                                    Type: Expression(Integer)
--E 881
--S 882 of 1000
--r0:=1/3*f^(a+b/x^2)*x^3+2/3*b*f^(a+b/x^2)*x*log(f)-_
--  2/3*b^(3/2)*f^a*erfi(sqrt(b)*sqrt(log(f))/x)*log(f)^(3/2)*sqrt(%pi)
--E 882
--S 883 of 1000
--a0:=integrate(t0,x)
--E 883
--S 884 of 1000
--m0:=a0-r0
--E 884
--S 885 of 1000
--d0:=normalize(D(m0,x))
--E 885
)clear all

--S 886 of 1000
t0:=f^(a+b/x^2)
--R
--R
--R            2
--R         a x  + b
--R         --------
--R             2
--R            x
--R   (1)  f
--R                                                    Type: Expression(Integer)
--E 886
--S 887 of 1000
--r0:=f^(a+b/x^2)*x-f^a*erfi(sqrt(b)*sqrt(log(f))/x)*sqrt(%pi)*_
--  sqrt(b)*sqrt(log(f))
--E 887
--S 888 of 1000
--a0:=integrate(t0,x)
--E 888
--S 889 of 1000
--m0:=a0-r0
--E 889
--S 890 of 1000
--d0:=normalize(D(m0,x))
--E 890
)clear all
--S 891 of 1000
t0:=f^(a+b/x^2)/x^2
--R
--R
--R            2
--R         a x  + b
--R         --------
--R             2
--R            x
--R        f
--R   (1)  ---------
--R             2
--R            x
--R                                                    Type: Expression(Integer)
--E 891
--S 892 of 1000

--r0:=-1/2*f^a*erfi(sqrt(b)*sqrt(log(f))/x)*sqrt(%pi)/(sqrt(b)*sqrt(log(f)))
--E 892
--S 893 of 1000
--a0:=integrate(t0,x)
--E 893
--S 894 of 1000
--m0:=a0-r0
--E 894
--S 895 of 1000
--d0:=normalize(D(m0,x))
--E 895
)clear all
--S 896 of 1000
t0:=f^(a+b/x^2)/x^4
--R
--R
--R            2
--R         a x  + b
--R         --------
--R             2
--R            x
--R        f
--R   (1)  ---------
--R             4
--R            x
--R                                                    Type: Expression(Integer)
--E 896
--S 897 of 1000
--r0:=-1/2*f^(a+b/x^2)/(b*x*log(f))+1/4*f^a*erfi(sqrt(b)*_
--  sqrt(log(f))/x)*sqrt(%pi)/(b^(3/2)*log(f)^(3/2))
--E 897
--S 898 of 1000
--a0:=integrate(t0,x)
--E 898
--S 899 of 1000
--m0:=a0-r0
--E 899
--S 900 of 1000
--d0:=normalize(D(m0,x))
--E 900

--S 901 of 1000
t0:=f^(a+b/x^2)/x^6
--R
--R
--R            2
--R         a x  + b
--R         --------
--R             2
--R            x
--R        f
--R   (1)  ---------
--R             6
--R            x
--R                                                    Type: Expression(Integer)
--E 901
--S 902 of 1000
--r0:=3/4*f^(a+b/x^2)/(b^2*x*log(f)^2)-1/2*f^(a+b/x^2)/(b*x^3*log(f))-_
--  3/8*f^a*erfi(sqrt(b)*sqrt(log(f))/x)*sqrt(%pi)/(b^(5/2)*log(f)^(5/2))
--E 902
--S 903 of 1000
--a0:=integrate(t0,x)
--E 903
--S 904 of 1000
--m0:=a0-r0
--E 904
--S 905 of 1000
--d0:=normalize(D(m0,x))
--E 905
)clear all
--S 906 of 1000
t0:=f^(a+b/x^2)/x^8
--R
--R
--R            2
--R         a x  + b
--R         --------
--R             2
--R            x
--R        f
--R   (1)  ---------
--R             8
--R            x

--S 907 of 1000
--r0:=-15/8*f^(a+b/x^2)/(b^3*x*log(f)^3)+5/4*f^(a+b/x^2)/(b^2*x^3*_
--  log(f)^2)-1/2*f^(a+b/x^2)/(b*x^5*log(f))+15/16*f^a*erfi(sqrt(b)*_
--  sqrt(log(f))/x)*sqrt(%pi)/(b^(7/2)*log(f)^(7/2))
--E 907
--S 908 of 1000
--a0:=integrate(t0,x)
--E 908
--S 909 of 1000
--m0:=a0-r0
--E 909
--S 910 of 1000
--d0:=normalize(D(m0,x))
--E 910
)clear all
--S 911 of 1000
t0:=f^(a+b/x^2)/x^10
--R
--R
--R            2
--R         a x  + b
--R         --------
--R             2
--R            x
--R        f
--R   (1)  ---------
--R            10
--R           x
--R                                                    Type: Expression(Integer)
--E 911
--S 912 of 1000
--r0:=105/16*f^(a+b/x^2)/(b^4*x*log(f)^4)-35/8*f^(a+b/x^2)/_
--  (b^3*x^3*log(f)^3)+7/4*f^(a+b/x^2)/(b^2*x^5*log(f)^2)-_
--  1/2*f^(a+b/x^2)/(b*x^7*log(f))-105/32*f^a*erfi(sqrt(b)*_
--  sqrt(log(f))/x)*sqrt(%pi)/(b^(9/2)*log(f)^(9/2))
--E 912
--S 913 of 1000
--a0:=integrate(t0,x)
--E 913

--S 915 of 1000
--d0:=normalize(D(m0,x))
--E 915
)clear all
--S 916 of 1000
t0:=f^(a+b/x^2)/x^12
--R
--R
--R            2
--R         a x  + b
--R         --------
--R             2
--R            x
--R        f
--R   (1)  ---------
--R            12
--R           x
--R                                                    Type: Expression(Integer)
--E 916
--S 917 of 1000
--r0:=1/2*f^a*GAMMA(11/2,-b*log(f)/x^2)/(x^11*(-b*log(f)/x^2)^(11/2))
--E 917
--S 918 of 1000
--a0:=integrate(t0,x)
--E 918
--S 919 of 1000
--m0:=a0-r0
--E 919
--S 920 of 1000
--d0:=normalize(D(m0,x))
--E 920
)clear all
--S 921 of 1000
t0:=f^(a+b/x^2)/x^14
--R
--R
--R            2
--R         a x  + b

--R         --------
--R             2
--R            x
--R        f
--R   (1)  ---------
--R            14
--R           x
--R                                                    Type: Expression(Integer)
--E 921
--S 922 of 1000
--r0:=1/2*f^a*GAMMA(13/2,-b*log(f)/x^2)/(x^13*(-b*log(f)/x^2)^(13/2))
--E 922
--S 923 of 1000
--a0:=integrate(t0,x)
--E 923
--S 924 of 1000
--m0:=a0-r0
--E 924
--S 925 of 1000
--d0:=normalize(D(m0,x))
--E 925
)clear all
--S 926 of 1000
t0:=f^(a+b/x^3)*x^m
--R
--R
--R            3
--R         a x  + b
--R         --------
--R             3
--R            x     m
--R   (1)  f        x
--R                                                    Type: Expression(Integer)
--E 926
--S 927 of 1000
--r0:=1/3*f^a*x^(1+m)*GAMMA(1/3*(-1-m),-b*log(f)/x^3)*_
--  (-b*log(f)/x^3)^(1/3*(1+m))
--E 927
--S 928 of 1000
--a0:=integrate(t0,x)
--E 928

--S 930 of 1000
--d0:=normalize(D(m0,x))
--E 930
)clear all
--S 931 of 1000
t0:=f^(a+b/x^3)*x^14
--R
--R
--R               3
--R            a x  + b
--R            --------
--R                3
--R         14    x
--R   (1)  x  f
--R                                                    Type: Expression(Integer)
--E 931
--S 932 of 1000
--r0:=-1/3*b^5*f^a*GAMMA(-5,-b*log(f)/x^3)*log(f)^5
--E 932
--S 933 of 1000
--a0:=integrate(t0,x)
--E 933
--S 934 of 1000
--m0:=a0-r0
--E 934
--S 935 of 1000
--d0:=normalize(D(m0,x))
--E 935
)clear all
--S 936 of 1000
t0:=f^(a+b/x^3)*x^11
--R
--R
--R               3
--R            a x  + b
--R            --------
--R                3
--R         11    x

--S 937 of 1000
--r0:=1/3*b^4*f^a*GAMMA(-4,-b*log(f)/x^3)*log(f)^4
--E 937
--S 938 of 1000
--a0:=integrate(t0,x)
--E 938
--S 939 of 1000
--m0:=a0-r0
--E 939
--S 940 of 1000
--d0:=normalize(D(m0,x))
--E 940
)clear all
--S 941 of 1000
t0:=f^(a+b/x^3)*x^8
--R
--R
--R              3
--R           a x  + b
--R           --------
--R               3
--R         8    x
--R   (1)  x f
--R                                                    Type: Expression(Integer)
--E 941
--S 942 of 1000
r0:=1/9*f^(a+b/x^3)*x^9+1/18*b*f^(a+b/x^3)*x^6*log(f)+_
   1/18*b^2*f^(a+b/x^3)*x^3*log(f)^2-1/18*b^3*f^a*Ei(b*log(f)/x^3)*log(f)^3
--R
--R
--R                                                                        3
--R                                                                     a x  + b
--R                                                                     --------
--R                                                                         3
--R           3      3 a   b log(f)      2 3      2      6           9     x
--R        - b log(f) f Ei(--------) + (b x log(f)  + b x log(f) + 2x )f
--R                            3
--R                           x
--R   (2)  ---------------------------------------------------------------------
--R                                          18

--S 943 of 1000
a0:=integrate(t0,x)
--R
--R
--R                       3
--R                 b + %D a
--R                 --------
--R           x          3
--R         ++    8    %D
--R   (3)   |   %D f        d%D
--R        ++
--R                                         Type: Union(Expression(Integer),...)
--E 943
--S 944 of 1000
m0:=a0-r0
--R
--R
--R   (4)
--R                        3
--R                  b + %D a
--R                  --------
--R            x          3
--R          ++    8    %D           3      3 a   b log(f)
--R       18 |   %D f        d%D  + b log(f) f Ei(--------)
--R         ++                                        3
--R                                                  x
--R     +
--R                                             3
--R                                          a x  + b
--R                                          --------
--R                                              3
--R           2 3      2      6           9     x
--R       (- b x log(f)  - b x log(f) - 2x )f
--R  /
--R     18
--R                                                    Type: Expression(Integer)
--E 944
--S 945 of 1000
d0:=normalize(D(m0,x))
--R
--R
--R   (5)  0
--R                                                    Type: Expression(Integer)
--E 945

--S 946 of 1000
t0:=f^(a+b/x^3)*x^5
--R
--R
--R              3
--R           a x  + b
--R           --------
--R               3
--R         5    x
--R   (1)  x f
--R                                                    Type: Expression(Integer)
--E 946
--S 947 of 1000
r0:=1/6*f^(a+b/x^3)*x^6+1/6*b*f^(a+b/x^3)*x^3*log(f)-_
   1/6*b^2*f^a*Ei(b*log(f)/x^3)*log(f)^2
--R
--R
--R                                                         3
--R                                                      a x  + b
--R                                                      --------
--R                                                          3
--R           2      2 a   b log(f)        3          6     x
--R        - b log(f) f Ei(--------) + (b x log(f) + x )f
--R                            3
--R                           x
--R   (2)  ------------------------------------------------------
--R                                   6
--R                                                    Type: Expression(Integer)
--E 947
--S 948 of 1000
a0:=integrate(t0,x)
--R
--R
--R                       3
--R                 b + %D a
--R                 --------
--R           x          3
--R         ++    5    %D
--R   (3)   |   %D f        d%D
--R        ++
--R                                         Type: Union(Expression(Integer),...)
--E 948
--S 949 of 1000
m0:=a0-r0
--R

--R
--R   (4)
--R                       3
--R                 b + %D a
--R                 --------
--R           x          3
--R         ++    5    %D           2      2 a   b log(f)
--R       6 |   %D f        d%D  + b log(f) f Ei(--------)
--R        ++                                        3
--R                                                 x
--R     +
--R                              3
--R                           a x  + b
--R                           --------
--R                               3
--R             3          6     x
--R       (- b x log(f) - x )f
--R  /
--R     6
--R                                                    Type: Expression(Integer)
--E 949
--S 950 of 1000
d0:=normalize(D(m0,x))
--R
--R
--R   (5)  0
--R                                                    Type: Expression(Integer)
--E 950
)clear all
--S 951 of 1000
t0:=f^(a+b/x^3)*x^2
--R
--R
--R              3
--R           a x  + b
--R           --------
--R               3
--R         2    x
--R   (1)  x f
--R                                                    Type: Expression(Integer)
--E 951
--S 952 of 1000
r0:=1/3*f^(a+b/x^3)*x^3-1/3*b*f^a*Ei(b*log(f)/x^3)*log(f)
--R
--R
--R                                         3

--R                                      a x  + b
--R                                      --------
--R                                          3
--R                   a   b log(f)     3    x
--R        - b log(f)f Ei(--------) + x f
--R                           3
--R                          x
--R   (2)  --------------------------------------
--R                           3
--R                                                    Type: Expression(Integer)
--E 952
--S 953 of 1000
a0:=integrate(t0,x)
--R
--R
--R                       3
--R                 b + %D a
--R                 --------
--R           x          3
--R         ++    2    %D
--R   (3)   |   %D f        d%D
--R        ++
--R                                         Type: Union(Expression(Integer),...)
--E 953
--S 954 of 1000
m0:=a0-r0
--R
--R
--R                        3                                       3
--R                  b + %D a                                   a x  + b
--R                  --------                                   --------
--R            x          3                                         3
--R          ++    2    %D                   a   b log(f)     3    x
--R        3 |   %D f        d%D  + b log(f)f Ei(--------) - x f
--R         ++                                       3
--R                                                 x
--R   (4)  -------------------------------------------------------------
--R                                      3
--R                                                    Type: Expression(Integer)
--E 954
--S 955 of 1000
d0:=normalize(D(m0,x))
--R
--R
--R   (5)  0
--R                                                    Type: Expression(Integer)
--E 955

--S 956 of 1000
t0:=f^(a+b/x^3)/x
--R
--R
--R            3
--R         a x  + b
--R         --------
--R             3
--R            x
--R        f
--R   (1)  ---------
--R            x
--R                                                    Type: Expression(Integer)
--E 956
--S 957 of 1000
r0:=-1/3*f^a*Ei(b*log(f)/x^3)
--R
--R
--R           a   b log(f)
--R          f Ei(--------)
--R                   3
--R                  x
--R   (2)  - --------------
--R                 3
--R                                                    Type: Expression(Integer)
--E 957
--S 958 of 1000
a0:=integrate(t0,x)
--R
--R
--R                    3
--R              b + %D a
--R              --------
--R                   3
--R           x     %D
--R         ++  f
--R   (3)   |   --------- d%D
--R        ++       %D
--R                                         Type: Union(Expression(Integer),...)
--E 958
--S 959 of 1000
m0:=a0-r0
--R
--R

--R                     3
--R               b + %D a
--R               --------
--R                    3
--R            x     %D
--R          ++  f                 a   b log(f)
--R        3 |   --------- d%D  + f Ei(--------)
--R         ++       %D                    3
--R                                       x
--R   (4)  -------------------------------------
--R                          3
--R                                                    Type: Expression(Integer)
--E 959
--S 960 of 1000
d0:=normalize(D(m0,x))
--R
--R
--R   (5)  0
--R                                                    Type: Expression(Integer)
--E 960
)clear all
--S 961 of 1000
t0:=f^(a+b/x^3)/x^4
--R
--R
--R            3
--R         a x  + b
--R         --------
--R             3
--R            x
--R        f
--R   (1)  ---------
--R             4
--R            x
--R                                                    Type: Expression(Integer)
--E 961
--S 962 of 1000
r0:=-1/3*f^(a+b/x^3)/(b*log(f))
--R
--R
--R              3
--R           a x  + b
--R           --------
--R               3
--R              x
--R          f

--R   (2)  - ---------
--R          3b log(f)
--R                                                    Type: Expression(Integer)
--E 962
--S 963 of 1000
a0:=integrate(t0,x)
--R
--R
--R                3
--R            (a x  + b)log(f)
--R            ----------------
--R                    3
--R                   x
--R          %e
--R   (3)  - ------------------
--R               3b log(f)
--R                                         Type: Union(Expression(Integer),...)
--E 963
--S 964 of 1000
m0:=a0-r0
--R
--R
--R                3                  3
--R            (a x  + b)log(f)    a x  + b
--R            ----------------    --------
--R                    3               3
--R                   x               x
--R        - %e                 + f
--R   (4)  --------------------------------
--R                    3b log(f)
--R                                                    Type: Expression(Integer)
--E 964
--S 965 of 1000
d0:=normalize(D(m0,x))
--R
--R
--R   (5)  0
--R                                                    Type: Expression(Integer)
--E 965
)clear all
--S 966 of 1000
t0:=f^(a+b/x^3)/x^7
--R
--R
--R            3

--R         a x  + b
--R         --------
--R             3
--R            x
--R        f
--R   (1)  ---------
--R             7
--R            x
--R                                                    Type: Expression(Integer)
--E 966
--S 967 of 1000
r0:=1/3*f^(a+b/x^3)/(b^2*log(f)^2)-1/3*f^(a+b/x^3)/(b*x^3*log(f))
--R
--R
--R                             3
--R                          a x  + b
--R                          --------
--R                              3
--R                       3     x
--R        (- b log(f) + x )f
--R   (2)  --------------------------
--R                 2 3      2
--R               3b x log(f)
--R                                                    Type: Expression(Integer)
--E 967
--S 968 of 1000
a0:=integrate(t0,x)
--R
--R
--R                               3
--R                           (a x  + b)log(f)
--R                           ----------------
--R                                   3
--R                       3          x
--R        (- b log(f) + x )%e
--R   (3)  -----------------------------------
--R                      2 3      2
--R                    3b x log(f)
--R                                         Type: Union(Expression(Integer),...)
--E 968
--S 969 of 1000
m0:=a0-r0
--R
--R
--R                               3                                 3
--R                           (a x  + b)log(f)                   a x  + b
--R                           ----------------                   --------

--R                                   3                              3
--R                       3          x                        3     x
--R        (- b log(f) + x )%e                 + (b log(f) - x )f
--R   (4)  --------------------------------------------------------------
--R                                   2 3      2
--R                                 3b x log(f)
--R                                                    Type: Expression(Integer)
--E 969
--S 970 of 1000
d0:=normalize(D(m0,x))
--R
--R
--R   (5)  0
--R                                                    Type: Expression(Integer)
--E 970
)clear all
--S 971 of 1000
t0:=f^(a+b/x^3)/x^10
--R
--R
--R            3
--R         a x  + b
--R         --------
--R             3
--R            x
--R        f
--R   (1)  ---------
--R            10
--R           x
--R                                                    Type: Expression(Integer)
--E 971
--S 972 of 1000
r0:=-2/3*f^(a+b/x^3)/(b^3*log(f)^3)+2/3*f^(a+b/x^3)/(b^2*x^3*log(f)^2)-_
   1/3*f^(a+b/x^3)/(b*x^6*log(f))
--R
--R
--R                                             3
--R                                          a x  + b
--R                                          --------
--R                                              3
--R            2      2       3           6     x
--R        (- b log(f)  + 2b x log(f) - 2x )f
--R   (2)  ------------------------------------------
--R                         3 6      3
--R                       3b x log(f)
--R                                                    Type: Expression(Integer)

--E 972
--S 973 of 1000
a0:=integrate(t0,x)
--R
--R
--R                                               3
--R                                           (a x  + b)log(f)
--R                                           ----------------
--R                                                   3
--R            2      2       3           6          x
--R        (- b log(f)  + 2b x log(f) - 2x )%e
--R   (3)  ---------------------------------------------------
--R                              3 6      3
--R                            3b x log(f)
--R                                         Type: Union(Expression(Integer),...)
--E 973
--S 974 of 1000
m0:=a0-r0
--R
--R
--R   (4)
--R                                              3
--R                                          (a x  + b)log(f)
--R                                          ----------------
--R                                                  3
--R           2      2       3           6          x
--R       (- b log(f)  + 2b x log(f) - 2x )%e
--R     +
--R                                          3
--R                                       a x  + b
--R                                       --------
--R                                           3
--R         2      2       3           6     x
--R       (b log(f)  - 2b x log(f) + 2x )f
--R  /
--R       3 6      3
--R     3b x log(f)
--R                                                    Type: Expression(Integer)
--E 974
--S 975 of 1000
d0:=normalize(D(m0,x))
--R
--R
--R   (5)  0
--R                                                    Type: Expression(Integer)
--E 975

--S 976 of 1000
t0:=f^(a+b/x^3)/x^13
--R
--R
--R            3
--R         a x  + b
--R         --------
--R             3
--R            x
--R        f
--R   (1)  ---------
--R            13
--R           x
--R                                                    Type: Expression(Integer)
--E 976
--S 977 of 1000
r0:=2*f^(a+b/x^3)/(b^4*log(f)^4)-2*f^(a+b/x^3)/(b^3*x^3*log(f)^3)+_
   f^(a+b/x^3)/(b^2*x^6*log(f)^2)-1/3*f^(a+b/x^3)/(b*x^9*log(f))
--R
--R
--R                                                            3
--R                                                         a x  + b
--R                                                         --------
--R                                                             3
--R            3      3     2 3      2       6           9     x
--R        (- b log(f)  + 3b x log(f)  - 6b x log(f) + 6x )f
--R   (2)  ---------------------------------------------------------
--R                                 4 9      4
--R                               3b x log(f)
--R                                                    Type: Expression(Integer)
--E 977
--S 978 of 1000
a0:=integrate(t0,x)
--R
--R
--R                                                              3
--R                                                          (a x  + b)log(f)
--R                                                          ----------------
--R                                                                  3
--R            3      3     2 3      2       6           9          x
--R        (- b log(f)  + 3b x log(f)  - 6b x log(f) + 6x )%e
--R   (3)  ------------------------------------------------------------------
--R                                     4 9      4
--R                                   3b x log(f)
--R                                         Type: Union(Expression(Integer),...)
--E 978

--S 979 of 1000
m0:=a0-r0
--R
--R
--R   (4)
--R                                                             3
--R                                                         (a x  + b)log(f)
--R                                                         ----------------
--R                                                                 3
--R           3      3     2 3      2       6           9          x
--R       (- b log(f)  + 3b x log(f)  - 6b x log(f) + 6x )%e
--R     +
--R                                                         3
--R                                                      a x  + b
--R                                                      --------
--R                                                          3
--R         3      3     2 3      2       6           9     x
--R       (b log(f)  - 3b x log(f)  + 6b x log(f) - 6x )f
--R  /
--R       4 9      4
--R     3b x log(f)
--R                                                    Type: Expression(Integer)
--E 979
--S 980 of 1000
d0:=normalize(D(m0,x))
--R
--R
--R   (5)  0
--R                                                    Type: Expression(Integer)
--E 980
)clear all
--S 981 of 1000
t0:=f^(a+b/x^3)/x^16
--R
--R
--R            3
--R         a x  + b
--R         --------
--R             3
--R            x
--R        f
--R   (1)  ---------
--R            16
--R           x
--R                                                    Type: Expression(Integer)
--E 981

--S 982 of 1000
--r0:=-1/3*f^a*GAMMA(5,-b*log(f)/x^3)/(b^5*log(f)^5)
--E 982
--S 983 of 1000
--a0:=integrate(t0,x)
--E 983
--S 984 of 1000
--m0:=a0-r0
--E 984
--S 985 of 1000
--d0:=normalize(D(m0,x))
--E 985
)clear all
--S 986 of 1000
t0:=f^(a+b/x^3)/x^19
--R
--R
--R            3
--R         a x  + b
--R         --------
--R             3
--R            x
--R        f
--R   (1)  ---------
--R            19
--R           x
--R                                                    Type: Expression(Integer)
--E 986
--S 987 of 1000
--r0:=1/3*f^a*GAMMA(6,-b*log(f)/x^3)/(b^6*log(f)^6)
--E 987
--S 988 of 1000
--a0:=integrate(t0,x)
--E 988
--S 989 of 1000
--m0:=a0-r0
--E 989
--S 990 of 1000
--d0:=normalize(D(m0,x))
--E 990

--S 991 of 1000
t0:=f^(a+b/x^3)*x^4
--R
--R
--R              3
--R           a x  + b
--R           --------
--R               3
--R         4    x
--R   (1)  x f
--R                                                    Type: Expression(Integer)
--E 991
--S 992 of 1000
--r0:=1/3*f^a*x^5*GAMMA(-5/3,-b*log(f)/x^3)*(-b*log(f)/x^3)^(5/3)
--E 992
--S 993 of 1000
--a0:=integrate(t0,x)
--E 993
--S 994 of 1000
--m0:=a0-r0
--E 994
--S 995 of 1000
--d0:=normalize(D(m0,x))
--E 995
)clear all
--S 996 of 1000
t0:=f^(a+b/x^3)*x^3
--R
--R
--R              3
--R           a x  + b
--R           --------
--R               3
--R         3    x
--R   (1)  x f
--R                                                    Type: Expression(Integer)
--E 996
--S 997 of 1000
--r0:=1/3*f^a*x^4*GAMMA(-4/3,-b*log(f)/x^3)*(-b*log(f)/x^3)^(4/3)
--E 997

--S 999 of 1000
--m0:=a0-r0
--E 999
--S 1000 of 1000
--d0:=normalize(D(m0,x))
--E 1000
)spool
)lisp (bye)

———-

References^{[1] nothing}

194