summaryrefslogtreecommitdiff
path: root/605/CH6/EX6.10/6_10.sce
blob: 07d7d76e23f9e8b5697b86b2c95535a355dfff71 (plain)
1
2
3
4
5
6
7
8

W=2*%pi*10^9
Gs=0.02
Gp=0.008
Q=sqrt(Gs/Gp-1)
Bs=Gs/Q
Bp=Q*Gp
printf("\nQ=%.4f\nBs=%.4f S\nBp=%.2f S\n",Q,Bs,Bp)