diff options
Diffstat (limited to '3739/CH7/EX7.14/EX7_14.sce')
| -rw-r--r-- | 3739/CH7/EX7.14/EX7_14.sce | 32 |
1 files changed, 32 insertions, 0 deletions
diff --git a/3739/CH7/EX7.14/EX7_14.sce b/3739/CH7/EX7.14/EX7_14.sce new file mode 100644 index 000000000..953c4919f --- /dev/null +++ b/3739/CH7/EX7.14/EX7_14.sce @@ -0,0 +1,32 @@ +//Chapter 7, Example 7.14, page 343
+clc
+
+//Initialisation
+d=20 //distance in kM
+po=0.02 //fading occurrence probability at 20 Km
+d1=25 //distance in kM
+d2=40 //distance in kM
+fm1=30 //link in kM
+fm2=35 //link in kM
+fm3=40 //link in kM
+tr=30*24*60
+
+
+//Calculation
+po1=po*(d1*d**-1)**3 //fading occurrence probability at 25 Km
+po2=po*(d2/d)**3 //fading occurrence probability at 40 Km
+pw=po*10**(-fm1*10**-1) //fade margin at 30
+pw1=po1*10**(-fm2*10**-1) //fade margin at 35
+pw2=po2*10**(-fm3/10) //fade margin at 40
+u=pw+pw1+pw2 //total fade margin
+to=u*tr //network outage time
+
+//Results
+printf("(1) Fading occurrence probability at 20 = %.2f",po)
+printf("\n Fading occurrence probability at 25 = %.3f",po1)
+printf("\n Fading occurrence probability at 40 = %.2f",po2)
+printf("\n(2) Fade margin at 30 = %.1f x 10^-5",(pw*10**5))
+printf("\n Fade margin at 35 = %.2f x 10^-5",(pw1*10**5))
+printf("\n Fade margin at 40 = %.2f x 10^-5",(pw2*10**5))
+printf("\n Total fade margin = %.2f x 10**-5",(u*10**5))
+printf("\n(3) Network outage time , To = %.3f min per month",(to))
|