experiment_5 - -------->'); ylabel(' Rayleigh...

Info iconThis preview shows page 1. Sign up to view the full content.

View Full Document Right Arrow Icon
clc; clear all; alpha0 = 1.7; lamda0 = 0.85; x = [700:1:1700]; Ralpha = alpha0*((lamda0/0.7)^4);% ghatak and thyagrajan page nummber 41 for i = x(1,2):x(1,1001) i = i/1000; Ralpha = [Ralpha,alpha0*((lamda0/i)^4)]; i = i*1000; end x = x/1000; plot(x,Ralpha,'r'); xlabel(' wavelength (micro meter)
Background image of page 1
This is the end of the preview. Sign up to access the rest of the document.

Unformatted text preview: -------->'); ylabel(' Rayleigh scattering (dB/km) --------->'); grid; lamda = input('enter the wavelength in micrometer at which loss is to be calculated = '); Ralpha = alpha0*((lamda0/lamda)^4); disp('rayleigh scattering at given wavelength(dB/km)is ='); disp(Ralpha);...
View Full Document

Ask a homework question - tutors are online