summaryrefslogtreecommitdiff
path: root/3739/CH3/EX3.2/EX3_2.sce
blob: 675268f62a95f408a1630489aebd5f2f6edf29c1 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
//Chapter 3, Example 3.2, page 63
clc

//Initialisation
h=2                                 //Height in Km
T=277                               //Tempreture in Kelvin
p=716
e=2
        

//Calculation
er=1+(151.1/T)*(p+(4810*h/T))*10**-6      
n=er**(0.515)                         //refractive index of the air
N=(n-1)*10**6                       //refractivity number
 

//Results
printf("n = %.5f",n)
printf("\nN = %d",N)