summaryrefslogtreecommitdiff
path: root/226/CH17/EX17.13/example13_sce.sce
blob: dbe1c255f509d3ad446df649a11cfc8116366e0b (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
//chapter 17
//example 17.13
//page 750
printf("\n")
printf("given")
f1=10.3*10^3;f2=10.9*10^3;Hobp=34;
fo = sqrt(f1*f2);
sqrt(f1*f2)
Q=fo/(f2-f1)
R3=120*10^3;
R2=R3/Q
R1=R3/Hobp
fck=50*fo