13 files changed, 243 insertions, 0 deletions
diff --git a/3446/CH2/EX2.1/Ex2_1.sce b/3446/CH2/EX2.1/Ex2_1.sce
new file mode 100644
index 000000000..d205b7c41
--- /dev/null
+++ b/3446/CH2/EX2.1/Ex2_1.sce
@@ -0,0 +1,15 @@
+// Exa 2.1
+// TO get Gos during BH(Busy Hour).
+
+clc;
+clear all;
+
+LC=10; //Lost calls
+CC=380; //Carried calls
+
+// soution
+OC=LC+CC;  //Total offered calls
+//Gos=Blocking probability=(number of Lost calls/Total number of offered calls)
+Gos=LC/OC;
+printf('The Gos during busy hour is %f \n ', Gos);
+
diff --git a/3446/CH2/EX2.10/Ex2_10.sce b/3446/CH2/EX2.10/Ex2_10.sce
new file mode 100644
index 000000000..cbbd7800f
--- /dev/null
+++ b/3446/CH2/EX2.10/Ex2_10.sce
@@ -0,0 +1,34 @@
+//Exa_2.10 
+// TO find ABS/BH(average busy season per busy hour) calling rates, design cell capacity for the switch and design Erlangs.
+
+clc;
+clear all;
+
+Rlines=15000;//Residential lines
+Blines=80000;//Business lines
+PWElines=5000;//PBX, WATS, and Foreign Exchange (FX) lines
+CR_R=2;//Call rates for Rlines
+CR_B=3;// call rates for Blines
+CR_PWE=10;//call rates for PWElines
+HT_R=140;//average holding time for Rlines(sec)
+HT_B=160;//average holding time for Blines(sec)
+HT_PWE=200;//average holding time for PWE lines(sec)
+Slines=100000;// no of lines carried by switch
+HD_ABS=1.5;// HD/ABS for the switch
+
+//solution
+percentR_lines=Rlines/Slines;
+percentB_lines=Blines/Slines;
+percentPWE_lines=PWElines/Slines;
+CCSR=CR_R*HT_R/100;
+CCSB=CR_B*HT_B/100;
+CCSPWE=CR_PWE*HT_PWE/100;
+
+CR=CR_R*percentR_lines+CR_B*percentB_lines+CR_PWE*percentPWE_lines;
+printf('The call rate is %.1f calls per line \n ',CR);
+CCS=CCSR*percentR_lines+CCSB*percentB_lines+CCSPWE*percentPWE_lines;
+AvgHTperline=CCS*100/CR;
+ABS_BH_calls=CR*Slines;
+ABS_BH_usage=CCS/36*Slines;
+printf('Design cell capacity based on HD is %d calls \n',HD_ABS*ABS_BH_calls);
+printf(' DESIGN Erlangs based on HD is %d \n',round(HD_ABS*ABS_BH_usage)); 
diff --git a/3446/CH2/EX2.11/Ex2_11.sce b/3446/CH2/EX2.11/Ex2_11.sce
new file mode 100644
index 000000000..9873f01df
--- /dev/null
+++ b/3446/CH2/EX2.11/Ex2_11.sce
@@ -0,0 +1,15 @@
+// Exa 2.11
+// To find offered load A and number of service channels required to handle the load
+
+clc;
+clear all;
+
+maxcalls_hour=4000;//maximum call per hour
+avgHT=160;//average holding time in sec
+Gos=0.02;
+
+//solution
+A=maxcalls_hour*avgHT/3600; //offered load
+printf('Offered load A = %.2f Erlangs \n ',A);
+//Refering Appendix A i.e Erlang B table 
+disp("For calculated Offered load and referring Erlang B table we get Service channels as 182 giving 168.3 Erlangs at 2% blocking");
diff --git a/3446/CH2/EX2.12/Ex2_12.sce b/3446/CH2/EX2.12/Ex2_12.sce
new file mode 100644
index 000000000..958562024
--- /dev/null
+++ b/3446/CH2/EX2.12/Ex2_12.sce
@@ -0,0 +1,18 @@
+// Exa 2.12
+// To calculate number of mobile subscribers supported for the given system.
+
+clc;
+clear all;
+
+channels=50;
+blocking=0.02;
+HT=120;//average holding time inm sec
+BHcall=1.2;// in calls  per hour
+
+//solution
+//Refering Erlang B table in appendix A, For 50 channels at 2% blocking, the offered load=40.26 Erlangs.
+A=40.26;
+B=A*(1-0.02); //carried load
+Avgtraffic_user=BHcall*HT/3600;
+No_users=B/Avgtraffic_user;
+printf('NO of mobile subscribers supported are %d \n',round(No_users));
diff --git a/3446/CH2/EX2.2/Ex2_2.sce b/3446/CH2/EX2.2/Ex2_2.sce
new file mode 100644
index 000000000..6367244e3
--- /dev/null
+++ b/3446/CH2/EX2.2/Ex2_2.sce
@@ -0,0 +1,21 @@
+// Exa 2.2
+// To find usage in call-seconds,CCS(centrum call seconds) and Erlangs).
+
+clc;
+clear all;
+
+Ht=5; //Average holding time in seconds
+PC=450; // Peg count for one hour period
+OC=0;    // Overflow count
+
+// solution
+// usage(Erlangs)=(peg count- overflow count)*Average holding time(in hrs)
+U=(PC-OC)*(5/3600);   
+printf('Usage = %.3f Erlangs = ',U);
+
+// IN CCS
+Uccs=U*36;  // usage in CCS
+printf('%.1f CCS = ',Uccs);
+
+Ucs=Uccs *100;  //usage in call-seconds
+printf('%d call-seconds\n',Ucs);
diff --git a/3446/CH2/EX2.3/Ex2_3.sce b/3446/CH2/EX2.3/Ex2_3.sce
new file mode 100644
index 000000000..bfc6eef8c
--- /dev/null
+++ b/3446/CH2/EX2.3/Ex2_3.sce
@@ -0,0 +1,14 @@
+// Exa 2.3 
+//TO find Offered Load.
+
+clc;
+clear all;
+
+B=0.05;  //Blocking(5%)
+CL=3000;  //Carried Load in CCS
+
+//Solution
+//Offered Load=Carried Load/(1-Blocking);
+OL=CL/(1-B);  //Offered Load in CCS
+printf('Offered load is %d CCS \n',round(OL));
+printf(' Overflow is %d CCS \n',round(OL)-CL);
diff --git a/3446/CH2/EX2.4/Ex2_4.sce b/3446/CH2/EX2.4/Ex2_4.sce
new file mode 100644
index 000000000..4792b2894
--- /dev/null
+++ b/3446/CH2/EX2.4/Ex2_4.sce
@@ -0,0 +1,16 @@
+// Exa 2.4 
+ //To find traffic intensity.
+
+clc;
+clear all;
+
+Ht=120;  //Holding time in seconds
+CR=2;  //call rate per hour
+
+//solution
+//Traffic Intensity(Erlangs) = call rate * Holding time(in hrs));
+I=CR*Ht/3600; //Traffic Intensity
+printf('Traffic Intensity is %.4f Erlangs = %.1f CCS \n',I,I*36);
+
+
+
diff --git a/3446/CH2/EX2.5/Ex2_5.sce b/3446/CH2/EX2.5/Ex2_5.sce
new file mode 100644
index 000000000..1c9b268f7
--- /dev/null
+++ b/3446/CH2/EX2.5/Ex2_5.sce
@@ -0,0 +1,15 @@
+//Exa 2.5 
+//To find traffic intensity in Erlangs and CCS.
+//Refer-Table 2.1(page No 28): Traffic data used to estimate traffic intensity
+
+clc;
+clear all;
+
+time=90;  //in minutes
+calls=10;  //no of calls in 90mins
+
+//solution
+CR=calls/(time/60);    //call arrival rate in calls/hour
+tavg=(60+74+80+90+92+70+96+48+64+126)/10;    //average call holding time in sec per call
+I= CR*(tavg/3600);     //traffic intensity in Erlangs
+printf('Traffic Intensity is %.3f Erlangs = %.2f CCS \n ',I,I*36);
diff --git a/3446/CH2/EX2.6/Ex2_6.sce b/3446/CH2/EX2.6/Ex2_6.sce
new file mode 100644
index 000000000..3834b8a80
--- /dev/null
+++ b/3446/CH2/EX2.6/Ex2_6.sce
@@ -0,0 +1,21 @@
+// Exa 2.6  
+//To find traffic intensity in Erlangs and CCS during eight hour period and busy hour(4:00 PM to 5:00 PM).
+//Refer-Table 2.2(page no 28): Traffic on customer line between 9:00PM and 5:00PM
+
+clc;
+clear all;
+
+time=8;  //in hours
+calls=11;  //no of calls in 90mins period
+
+//solution
+CR=calls/time;    //call arrival rate in calls/hour
+tavg=(3+10+7+10+5+5+1+5+15+34+5)/11;    //average call holding time in mins per call
+I= CR*(tavg/60);     //traffic intensity in Erlangs
+printf('Traffic Intensity during eight hour period is %.3f Erlangs = %.1f CCS \n',I,I*36);
+
+//For Busy Hour i.e between 4:00PM and 5:00PM
+CRB=2;       //call arrival rate during busy hour in calls/hour(from table 2.2)
+tavgB=(34+5)/2;  //average holding time during Busy Hour in mins/call (from table 2.2)
+IB=CRB*(tavgB/60); //Traffic Intensity during Busy Hour
+printf(' Traffic Intensity during busy hour is %.2f Erlangs = %.1f CCS',IB,IB*36);
diff --git a/3446/CH2/EX2.7/Ex2_7.sce b/3446/CH2/EX2.7/Ex2_7.sce
new file mode 100644
index 000000000..71fcd846c
--- /dev/null
+++ b/3446/CH2/EX2.7/Ex2_7.sce
@@ -0,0 +1,15 @@
+//Exa 2.8
+// To find traffic per user per BH in Erlangs.
+
+clc;
+clear all;
+
+minutes=500; //No of minutes used per month per user
+Twork=0.9; //Traffic During Work day
+TBH=0.1;  //Traffic during busy hour
+Days=20;  //No of workdays in a month
+
+//solution
+//Avg BH usage per subscriber (in minutes) = minutes*Twork(TBH/Days);
+Traffic=minutes*Twork*(TBH/Days);
+printf('Traffic per user per BH is %.4f Erlangs \n',Traffic/60);
diff --git a/3446/CH2/EX2.8/Ex2_8.sce b/3446/CH2/EX2.8/Ex2_8.sce
new file mode 100644
index 000000000..c1fa1b2e1
--- /dev/null
+++ b/3446/CH2/EX2.8/Ex2_8.sce
@@ -0,0 +1,20 @@
+//Exa:2.8  
+// To find average busy hour call attempts(BHCA's).
+
+clc;
+clear all;
+
+minutes=500; //No of minutes used per month per user
+Twork=0.9; //Traffic During Work day
+TBH=0.1;  //Traffic during busy hour
+Days=20;  //No of workdays in a month
+MeanHT=100;  //Mean holding time(in secs)
+
+//solution
+//Avg BH usage per subscriber (in minutes) = minutes*Twork(TBH/Days);
+//BHCAs=trafﬁc (in Erlangs) *3600/(meanHT)
+
+Traffic=minutes*Twork*(TBH/Days);
+BHCAs=(Traffic/60)*(3600/MeanHT);
+
+printf('Average Busy Hour call attempts are %.2f ',   BHCAs);
diff --git a/3446/CH2/EX2.9/Ex2_9.sce b/3446/CH2/EX2.9/Ex2_9.sce
new file mode 100644
index 000000000..c9e9947ff
--- /dev/null
+++ b/3446/CH2/EX2.9/Ex2_9.sce
@@ -0,0 +1,26 @@
+//Exa 2.9 
+// To find total traffic in Erlangs and no of MScs required to handle it.
+
+clc;
+clear all;
+
+Tpopu=200000;//Total population
+SP=0.25; //subscriber penetration
+HT1=100;  //holding time for Mobile to Land line and vicecersa
+c1=3;  //Avg calls/hr for Mobile to Land line and vicecersa
+HT2=80;  //For mobile to mobile
+c2=4;   //For mobile to mobile
+TMSC=1800;  //traffic one msc can hold
+TrafDist=0.9 //Traffic distribution for Mobile to Land line and vicecersa
+
+//solution
+aM_L=c1*HT1/3600;  //Traffic Generated by Subscriber (M-L and  L-M).
+aM_M=c2*HT2/3600;  //Traffic Generated by Subscriber (M-M).
+WlessSub=SP*Tpopu;  //total wireless subscribers
+TotalTraffic=WlessSub*TrafDist*aM_L+WlessSub*(1-TrafDist)*aM_M;
+MSCreqd=TotalTraffic/TMSC;
+if(MSCreqd-int(MSCreqd)>0)//for rounding of to next integer ef 2.33 to 3
+    MSCreqd=MSCreqd+1;
+     end
+printf('Total Traffic is %.1f Erlangs \n',TotalTraffic);
+printf(' NO of MSCs Required are %d \n',int(MSCreqd));
diff --git a/3446/CH2/EX6.2/EX6_2.sce b/3446/CH2/EX6.2/EX6_2.sce
new file mode 100644
index 000000000..f82ff5ffd
--- /dev/null
+++ b/3446/CH2/EX6.2/EX6_2.sce
@@ -0,0 +1,13 @@
+// Exa 6.2
+// To calculate spectral efficiency of FDMA.
+
+clc;
+clear all;
+
+TCH=395;  // Traffic Channels
+SysBW=12.5;  //in MHz
+CHspace=30;  // in kHz
+
+//solution
+Eff=TCH*CHspace/(SysBW*1000);
+printf('Multiple access spectral efficiency of FDMA System is %.3f\n ',Eff);