DM 41X: Doble integral using different modules fails

[Thomas Klemm]

From Math Pac:

Quote:26 Numerical Integration

The program uses Registers 00-07; the remaining registers are available for defining \(f_{i}(x)\).

Thus you have to use e.g. register 08 instead of 00:

Code:

01▸LBL "F1"     @ for integration of the y-variable
02 STO 08       @ y-variable
03 0
04 1            @ limits for y-variable
05 "F2"
06 INTEG        @ calls integration routine from Advantage module to integrate x-variable
07 END

Also this program can be made a bit shorter:

Code:

01▸LBL "F2"     @ for the integration of the x-variable
02 X↑2          @ x^2
03 CHS
04 LASTX        @ x-value
05 RCL 08       @ y-value
06 +            @ x+y
07 LASTX        @ y-value
08 *            @ (x+y)*y
09 1
10 +            @ x*y + y^2 + 1
11 /
12 E↑X
13 END

---

With FIX 4 I got after a while:

0.822832788