summaryrefslogtreecommitdiff
path: root/752/CH8/EX8.11.1/8_11_1.sce
blob: 0abaa0e0f05269644c4496ac15c1e01221060e0c (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
clc;
//page no 274
//prob no. 8.11.1
//RC load ckt for diode detector with c=1000pF in paralel with R=10Kohm
fm=10*10^3;//modulation freq
c=1000*10^-12;R=10*10^3;
Yp=(1/R)+((%i)*2*(%pi)*fm*c);//admittance of RC load
disp(Yp);
Zp=1/sqrt((real(Yp)^2)+(imag(Yp)^2));
disp(Zp);
//Determination of max modulation index
m=Zp/R;
disp(m,'The max modulation index is');