Details | Last modification | View Log | RSS feed
Rev | Author | Line No. | Line |
---|---|---|---|
2071 | zjchen | 1 | |
2 | !goto $wims_read_parm |
||
3 | |||
4 | :def |
||
5 | title=Integration |
||
6 | synonyme=antiderivative, anti-derivative,indefinite integral |
||
7 | input=function |
||
8 | !exit |
||
9 | |||
10 | :proc |
||
11 | x=!word 1 of $variable |
||
12 | !if $x=$empty |
||
13 | t=!varlist nofn $formula |
||
14 | t=!sort reverse nocase item $t |
||
15 | x=!item 1 of $t |
||
16 | !endif |
||
17 | !default x=x |
||
18 | |||
19 | result=!exec maxima integrate($formula,$x); |
||
20 | !if integrate isin $result |
||
21 | result= |
||
22 | !endif |
||
23 | fn=!texmath $formula |
||
24 | rs=!texmath $result |
||
25 | !exit |
||
26 | |||
27 | :output |
||
28 | !instex $$$$ \int \left($fn\right)d$x = $rs + C $$$$ |
||
29 | !exit |
||
30 |