summaryrefslogtreecommitdiff
path: root/1757/CH6/EX6.33/EX6_33.sce
blob: 3393ca5a12a9b24aa27217c7f2503b70a29ce006 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
//Example6_33  // To calculate phase shift between two extremes 
clc;
clear;
close;
C = 0.22*10^-6 ;
R = 1*10^3 ;
f = 1*10^3 ;

// the cut off frequency of phase shifter 
fc = 1/(2*%pi*R*C) ;
disp('the cut off frequency of phase shifter is = ' +string(fc)+ 'Hz');

// the phase shift
f = 1 ; // KHz
fc = 7.23 ;  // KHz 
PS = -2*atand(f/fc);
disp('The phase shift is = '+string(PS)+ ' ');