summaryrefslogtreecommitdiff
path: root/1332/CH14/EX14.16/14_16.sce
blob: 6faac5d7c37ccba55d2e683106fc5ecfa6a03cda (plain)
1
2
3
4
5
6
7
8
9
10
11
//Example 14.16
//Multiple Integration with Variable Limits
//Page no. 491
clc;close;clear;

deff('z=f(x)','z=x+1')
deff('z=f1(y)','z=(y+1)^3*(y+3)^2')
s=5/9*f(-sqrt(3/5))+8/9*f(0)+5/9*f(sqrt(3/5))
s=s*5/9*f1(-sqrt(3/5))+8/9*f1(0)+5/9*f1(sqrt(3/5))
s=s/256;
disp(s,'I = ')