From b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b Mon Sep 17 00:00:00 2001
From: priyanka
Date: Wed, 24 Jun 2015 15:03:17 +0530
Subject: initial commit / add all books

---
 671/CH3/EX3.1/3_1.sce         |  9 +++++++++
 671/CH3/EX3.11/3_11b.sce      | 12 ++++++++++++
 671/CH3/EX3.12/3_12.sce       |  6 ++++++
 671/CH3/EX3.13/3_13.sce       | 15 +++++++++++++++
 671/CH3/EX3.16/3_16.sce       | 12 ++++++++++++
 671/CH3/EX3.18/3_18.sce       | 13 +++++++++++++
 671/CH3/EX3.2/3_2.sce         |  7 +++++++
 671/CH3/EX3.21/3_21.sce       | 13 +++++++++++++
 671/CH3/EX3.22/3_22.sce       | 12 ++++++++++++
 671/CH3/EX3.24/3_24.sce       | 14 ++++++++++++++
 671/CH3/EX3.26/3_26.sce       |  9 +++++++++
 671/CH3/EX3.27/3_27.sce       | 28 ++++++++++++++++++++++++++++
 671/CH3/EX3.29/3_29.sce       | 17 +++++++++++++++++
 671/CH3/EX3.3/3_3.sce         | 21 +++++++++++++++++++++
 671/CH3/EX3.32/3_32.sce       | 14 ++++++++++++++
 671/CH3/EX3.33/3_33.sce       | 24 ++++++++++++++++++++++++
 671/CH3/EX3.36/3_36.sce       | 17 +++++++++++++++++
 671/CH3/EX3.37.38/3_37_38.sce | 34 ++++++++++++++++++++++++++++++++++
 671/CH3/EX3.4/3_4.sce         |  2 ++
 671/CH3/EX3.5/3_5.sce         |  7 +++++++
 671/CH3/EX3.6/3_6.sce         | 10 ++++++++++
 671/CH3/EX3.7/3_7.sce         | 15 +++++++++++++++
 671/CH3/EX3.8/3_8.sce         |  6 ++++++
 671/CH3/EX3.9/3_9.sce         | 15 +++++++++++++++
 24 files changed, 332 insertions(+)
 create mode 100755 671/CH3/EX3.1/3_1.sce
 create mode 100755 671/CH3/EX3.11/3_11b.sce
 create mode 100755 671/CH3/EX3.12/3_12.sce
 create mode 100755 671/CH3/EX3.13/3_13.sce
 create mode 100755 671/CH3/EX3.16/3_16.sce
 create mode 100755 671/CH3/EX3.18/3_18.sce
 create mode 100755 671/CH3/EX3.2/3_2.sce
 create mode 100755 671/CH3/EX3.21/3_21.sce
 create mode 100755 671/CH3/EX3.22/3_22.sce
 create mode 100755 671/CH3/EX3.24/3_24.sce
 create mode 100755 671/CH3/EX3.26/3_26.sce
 create mode 100755 671/CH3/EX3.27/3_27.sce
 create mode 100755 671/CH3/EX3.29/3_29.sce
 create mode 100755 671/CH3/EX3.3/3_3.sce
 create mode 100755 671/CH3/EX3.32/3_32.sce
 create mode 100755 671/CH3/EX3.33/3_33.sce
 create mode 100755 671/CH3/EX3.36/3_36.sce
 create mode 100755 671/CH3/EX3.37.38/3_37_38.sce
 create mode 100755 671/CH3/EX3.4/3_4.sce
 create mode 100755 671/CH3/EX3.5/3_5.sce
 create mode 100755 671/CH3/EX3.6/3_6.sce
 create mode 100755 671/CH3/EX3.7/3_7.sce
 create mode 100755 671/CH3/EX3.8/3_8.sce
 create mode 100755 671/CH3/EX3.9/3_9.sce

(limited to '671/CH3')

diff --git a/671/CH3/EX3.1/3_1.sce b/671/CH3/EX3.1/3_1.sce
new file mode 100755
index 000000000..a3843c726
--- /dev/null
+++ b/671/CH3/EX3.1/3_1.sce
@@ -0,0 +1,9 @@
+function C=seriesC(C1,C2)
+    C=C1*C2/(C1+C2)
+endfunction
+
+Ceq1=10+seriesC(10,10)
+Ceq2=Ceq1
+
+Ceq=seriesC(seriesC(Ceq1,Ceq2),10)
+disp(Ceq)
\ No newline at end of file
diff --git a/671/CH3/EX3.11/3_11b.sce b/671/CH3/EX3.11/3_11b.sce
new file mode 100755
index 000000000..d62736528
--- /dev/null
+++ b/671/CH3/EX3.11/3_11b.sce
@@ -0,0 +1,12 @@
+L=2
+
+VL_0minus=0 //steady state
+disp(VL_0minus)
+
+i_0minus=1
+i_0plus=i_0minus
+VL_0plus=12-4*i_0plus
+disp(VL_0plus)
+
+di_by_dt_0plus=VL_0plus/L
+disp(di_by_dt_0plus)
diff --git a/671/CH3/EX3.12/3_12.sce b/671/CH3/EX3.12/3_12.sce
new file mode 100755
index 000000000..b11cd88ff
--- /dev/null
+++ b/671/CH3/EX3.12/3_12.sce
@@ -0,0 +1,6 @@
+Vc_0m=100
+Vc_0p=Vc_0m
+T=(400+100)*2E-6
+i_0p=100/500
+P_0p=i_0p^2*400
+disp(P_0p)
\ No newline at end of file
diff --git a/671/CH3/EX3.13/3_13.sce b/671/CH3/EX3.13/3_13.sce
new file mode 100755
index 000000000..609040e84
--- /dev/null
+++ b/671/CH3/EX3.13/3_13.sce
@@ -0,0 +1,15 @@
+Vc_0m=10
+Vc_0p=Vc_0m
+disp(Vc_0p)
+
+//KVL
+i1_0p=(10-Vc_0p)/20
+i2_0p=Vc_0p/20
+
+//KCL
+iC_0p=i1_0p-i2_0p
+disp(iC_0p)
+iC_inf=0 //capacitor is open circuit
+disp(iC_inf)
+VC_inf=10*20/(20+20)
+disp(VC_inf)
\ No newline at end of file
diff --git a/671/CH3/EX3.16/3_16.sce b/671/CH3/EX3.16/3_16.sce
new file mode 100755
index 000000000..0bef764dd
--- /dev/null
+++ b/671/CH3/EX3.16/3_16.sce
@@ -0,0 +1,12 @@
+L=0.25
+R=250
+V=10
+T=L/R
+
+t=0.5E-3
+i=V/R*(1-exp(-t/T))
+disp(i)
+
+t=2E-3
+i=V/R*((exp((1E-3-t)/T)-exp(-t/T)))
+disp(i)
\ No newline at end of file
diff --git a/671/CH3/EX3.18/3_18.sce b/671/CH3/EX3.18/3_18.sce
new file mode 100755
index 000000000..bf8fdfbec
--- /dev/null
+++ b/671/CH3/EX3.18/3_18.sce
@@ -0,0 +1,13 @@
+R=5000
+C=1.0E-6
+Ie=1/1000
+Vcf=Ie*R
+T=R*C
+
+t=10/1000
+Vc10=Vcf*(1-exp(-t/T))
+disp(Vc10)
+
+t=20/1000
+Vc20=Vcf*(1-exp(-t/T))-Vc10
+disp(Vc20)
\ No newline at end of file
diff --git a/671/CH3/EX3.2/3_2.sce b/671/CH3/EX3.2/3_2.sce
new file mode 100755
index 000000000..dd88f252d
--- /dev/null
+++ b/671/CH3/EX3.2/3_2.sce
@@ -0,0 +1,7 @@
+function p=parallel(r1,r2)
+    p=r1*r2/(r1+r2)
+endfunction
+
+Leq=1+parallel(2,2)+parallel(parallel(3,3),3)
+
+disp(Leq)
\ No newline at end of file
diff --git a/671/CH3/EX3.21/3_21.sce b/671/CH3/EX3.21/3_21.sce
new file mode 100755
index 000000000..f54e2c485
--- /dev/null
+++ b/671/CH3/EX3.21/3_21.sce
@@ -0,0 +1,13 @@
+//Replace curr source by voltage source
+Ics=1/1000
+R=100*1000
+V=Ics*R
+
+Vc_0m=25/(25+100)*V
+disp(Vc_0m)
+
+Vc_0p=Vc_0m
+disp(Vc_0p)
+
+Vc_inf=(V-10)*25/(100+25)
+disp(Vc_inf)
\ No newline at end of file
diff --git a/671/CH3/EX3.22/3_22.sce b/671/CH3/EX3.22/3_22.sce
new file mode 100755
index 000000000..a30cd9822
--- /dev/null
+++ b/671/CH3/EX3.22/3_22.sce
@@ -0,0 +1,12 @@
+L=20/1000
+VR2_0p=10
+VR2_inf=0
+VR2_1=5
+
+t=1/1000
+T=-t/log((VR2_1-VR2_inf)/(VR2_0p-VR2_inf))
+
+R2=L/T
+R1=1/(2/VR2_0p-1/R2)
+
+disp(R2,R1)
\ No newline at end of file
diff --git a/671/CH3/EX3.24/3_24.sce b/671/CH3/EX3.24/3_24.sce
new file mode 100755
index 000000000..7fc87c007
--- /dev/null
+++ b/671/CH3/EX3.24/3_24.sce
@@ -0,0 +1,14 @@
+C=1/4
+Vc_0m=12/(12+6)*12
+Vc_0p=8
+disp(Vc_0p)
+t=0
+V_0p=6*cos(t)
+
+//at t=0+
+Vth=12/(12+6)*6
+Rth=6*12/(6+12)
+ic_0p=(Vth-8)/Rth
+disp(ic_0p)
+d_by_dt_Vc_0p=ic_0p/C
+disp(d_by_dt_Vc_0p)
\ No newline at end of file
diff --git a/671/CH3/EX3.26/3_26.sce b/671/CH3/EX3.26/3_26.sce
new file mode 100755
index 000000000..632d4ef64
--- /dev/null
+++ b/671/CH3/EX3.26/3_26.sce
@@ -0,0 +1,9 @@
+//at t=0-
+iL=4
+v=0
+disp(v,iL)
+
+//at t=0+
+iL=4
+v=-4*20
+disp(v,iL)
\ No newline at end of file
diff --git a/671/CH3/EX3.27/3_27.sce b/671/CH3/EX3.27/3_27.sce
new file mode 100755
index 000000000..63925557b
--- /dev/null
+++ b/671/CH3/EX3.27/3_27.sce
@@ -0,0 +1,28 @@
+function p=parallel(r1,r2)
+    p=r1*r2/(r1+r2)
+endfunction
+
+L=25/1000
+
+//at t=0-
+R1=parallel(150,75)
+iL_0m=30/2
+disp(iL_0m)
+
+R2=parallel(150,50)
+ix_0m=R2/(R2+75)*30
+disp(ix_0m)
+
+
+//at t=0+
+iL_0p=iL_0m
+
+T=L/(75+50)
+iL_inf=0
+
+//at t=0.2ms
+t=0.2E-3
+
+iL=iL_inf+(iL_0p-iL_inf)*exp(-t/T)
+ix=-iL
+disp(ix,iL)
\ No newline at end of file
diff --git a/671/CH3/EX3.29/3_29.sce b/671/CH3/EX3.29/3_29.sce
new file mode 100755
index 000000000..638fac046
--- /dev/null
+++ b/671/CH3/EX3.29/3_29.sce
@@ -0,0 +1,17 @@
+R=250
+C=25E-3
+
+//at t=0-
+v_0m=200*0.2
+
+//at t=0+
+v_0p=v_0m
+
+T=R*C
+v_inf=0
+
+//at t=0.2ms
+t=0.2E-3
+
+t=T*log((v_0p-v_inf)/(20-v_inf))
+disp(t)
\ No newline at end of file
diff --git a/671/CH3/EX3.3/3_3.sce b/671/CH3/EX3.3/3_3.sce
new file mode 100755
index 000000000..810c2f2e6
--- /dev/null
+++ b/671/CH3/EX3.3/3_3.sce
@@ -0,0 +1,21 @@
+function C=seriesC(C1,C2)
+    C=C1*C2/(C1+C2)
+endfunction
+
+V=100
+
+Cp=1+2
+Ceq=seriesC(Cp,6)
+q=Ceq*V
+
+q1=q*(1/(1+2))
+q2=q-q1
+
+disp(q2,q1,q)
+
+E6=q*q/2/6/1000
+E1=q1*q1/2/1/1000
+E2=q2*q2/2/2/1000
+Enet=E1+E2+E6
+
+disp(Enet,E6,E2,E1)
\ No newline at end of file
diff --git a/671/CH3/EX3.32/3_32.sce b/671/CH3/EX3.32/3_32.sce
new file mode 100755
index 000000000..c1b871e42
--- /dev/null
+++ b/671/CH3/EX3.32/3_32.sce
@@ -0,0 +1,14 @@
+L=0.2
+R=50+30
+
+iL_0m=100/50
+iL_0p=iL_0m
+iL_inf=0
+T=L/R
+
+t=10/1000
+iL_10=iL_0p*exp(-t/T)
+disp(iL_10)
+
+t1=-T*log(0.5*iL_0p/(iL_0p))
+disp(t1)
\ No newline at end of file
diff --git a/671/CH3/EX3.33/3_33.sce b/671/CH3/EX3.33/3_33.sce
new file mode 100755
index 000000000..6d2c36143
--- /dev/null
+++ b/671/CH3/EX3.33/3_33.sce
@@ -0,0 +1,24 @@
+R=5
+L=2
+V=10
+T=L/R
+
+iL_m=V/R
+disp(iL_m)
+iL_0p=iL_m
+iL_inf=2+V/R
+
+//function I=iL(t)
+//    I=iL_inf+(iL_0p-iL_inf)*exp(-t/T)
+//endfunction
+
+//disp(iL(0.5))
+//disp(iL(1.5))
+
+t=0.5
+I=iL_inf+(iL_0p-iL_inf)*exp(-t/T)
+disp(I)
+
+t=1.5
+I=iL_inf+(iL_0p-iL_inf)*exp(-t/T)
+disp(I)
\ No newline at end of file
diff --git a/671/CH3/EX3.36/3_36.sce b/671/CH3/EX3.36/3_36.sce
new file mode 100755
index 000000000..d623c8512
--- /dev/null
+++ b/671/CH3/EX3.36/3_36.sce
@@ -0,0 +1,17 @@
+L=4/1000
+R=1000
+V=9
+
+iL_0m=V/(2*R)
+iL_0p=iL_0m
+iL_inf=0
+isw_inf=V/R
+T=L/R
+
+t=5E-6
+
+iL_5=iL_0p*exp(-t/T)
+disp(iL_5)
+
+isw_5=isw_inf*(1-exp(-t/T))
+disp(isw_5)
\ No newline at end of file
diff --git a/671/CH3/EX3.37.38/3_37_38.sce b/671/CH3/EX3.37.38/3_37_38.sce
new file mode 100755
index 000000000..5fa2f9d3d
--- /dev/null
+++ b/671/CH3/EX3.37.38/3_37_38.sce
@@ -0,0 +1,34 @@
+R=20
+L=2
+C=1/25
+
+//at t=0-
+iR=-4
+iL=4
+iC=0
+vR=-R*4
+vC=-vR
+vL=0
+
+disp(iR,iL,iC,vR,vL,vC)
+
+//at t=0+
+iL=iL
+vC=vC
+iR=5-4  //KCL at node 1
+vR=R*iR
+iC=4+iR  //KCL at node 2
+vL=vC+vR  //KVL inner mesh
+
+disp(iR,iL,iC,vR,vL,vC)
+
+
+//at t=0+ derivatives are
+DiL=vL/L
+DvC=iC/C
+DiR=-DiL        //Differentiating KCL at node 1
+DiC=DiR         //Differentiating KCL at node 2
+DvR=R*DiR
+DvL=DvR+DvC        //Differentiating KVL inner mesh
+
+disp(DiR,DiL,DiC,DvR,DvL,DvC)
\ No newline at end of file
diff --git a/671/CH3/EX3.4/3_4.sce b/671/CH3/EX3.4/3_4.sce
new file mode 100755
index 000000000..8e36e0d7d
--- /dev/null
+++ b/671/CH3/EX3.4/3_4.sce
@@ -0,0 +1,2 @@
+L=poly([3,-4,1],"L","coeff")
+disp(roots(L))
diff --git a/671/CH3/EX3.5/3_5.sce b/671/CH3/EX3.5/3_5.sce
new file mode 100755
index 000000000..6192aa309
--- /dev/null
+++ b/671/CH3/EX3.5/3_5.sce
@@ -0,0 +1,7 @@
+function C=seriesC(C1,C2)
+    C=C1*C2/(C1+C2)
+endfunction
+
+Ceq=1+seriesC(6,3)
+
+disp(Ceq)
\ No newline at end of file
diff --git a/671/CH3/EX3.6/3_6.sce b/671/CH3/EX3.6/3_6.sce
new file mode 100755
index 000000000..3b2271c0a
--- /dev/null
+++ b/671/CH3/EX3.6/3_6.sce
@@ -0,0 +1,10 @@
+function p=parallel(r1,r2)
+    p=r1*r2/(r1+r2)
+endfunction
+
+Lbc=parallel(1/10,1/20)
+Leq=1/50+Lbc
+disp(Leq)
+
+Vbc=Lbc*150
+disp(Vbc)
\ No newline at end of file
diff --git a/671/CH3/EX3.7/3_7.sce b/671/CH3/EX3.7/3_7.sce
new file mode 100755
index 000000000..7b1be3ebc
--- /dev/null
+++ b/671/CH3/EX3.7/3_7.sce
@@ -0,0 +1,15 @@
+function C=seriesC(C1,C2)
+    C=C1*C2/(C1+C2)
+endfunction
+
+Ceq=seriesC(seriesC(10,20),40)
+disp(Ceq)
+
+q=Ceq*280
+disp(q)
+
+V1=q/10
+V2=q/20
+V3=q/40
+
+disp(V3,V2,V1)
\ No newline at end of file
diff --git a/671/CH3/EX3.8/3_8.sce b/671/CH3/EX3.8/3_8.sce
new file mode 100755
index 000000000..965e88ea0
--- /dev/null
+++ b/671/CH3/EX3.8/3_8.sce
@@ -0,0 +1,6 @@
+Ceq=10+20+40
+Q=200*[10,20,40]
+
+disp(Q)
+Qnet=Q(1)+Q(2)+Q(3)
+disp(Qnet)
\ No newline at end of file
diff --git a/671/CH3/EX3.9/3_9.sce b/671/CH3/EX3.9/3_9.sce
new file mode 100755
index 000000000..53ac6fe54
--- /dev/null
+++ b/671/CH3/EX3.9/3_9.sce
@@ -0,0 +1,15 @@
+//deactivate all independent sources
+
+function p=parallel(r1,r2)
+    p=r1*r2/(r1+r2)
+endfunction
+
+L=2
+Req=parallel(6,12)+4
+T1=L/Req
+disp(T1)
+
+C=1/2
+Req=2+parallel(6,12)+2
+T2=Req*C
+disp(T2)
-- 
cgit