summaryrefslogtreecommitdiff
path: root/761/CH17/EX17.4/17_4.sce
blob: f8077109ff535f7d1ce1660256e3fc46f6e5217d (plain)
1
2
3
4
5
6
7
clc;
//page no 627
//prob no. 17.4
//Determination of phase velo.with given 5GHz freq
f=5*10^9;c=3*10^8;fc=3.75*10^9;//Cut-off freq refering eg.17.1
vp=c/sqrt(1-(fc/f)^2);//Calculation of phase velo.
disp('m/s',vp,'The phase velo is');