summaryrefslogtreecommitdiff
path: root/3739/CH4/EX4.4/EX4_4.sce
blob: 5c78aba58c1402ad6d44c4d6febcb22809481034 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
//Chapter 4, Example 4.4, page 137
clc
//Initialisation
tec=10**17                                   //total electron content
H=200*10**3                                  //thickness of F layer
 
//Calculation
pd=tec/H                                      //plasma density at F
fc=9*sqrt(pd)
ouf=3.6*fc*0.8                               //optimum usable frequency
muf=fc*1.788                                 //maximum usable frequency

//Results
printf("Maximum usable frequency = %.1f MHz",(fc*10**-6))
printf("\nOptimum usable frequency < %.3f MHz",(ouf*10**-6))
printf("\nMaximum usable frequency (30) = %.1f MHz",(muf*10**-6))