diff options
| author | priyanka | 2015-06-24 15:03:17 +0530 |
|---|---|---|
| committer | priyanka | 2015-06-24 15:03:17 +0530 |
| commit | b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch) | |
| tree | ab291cffc65280e58ac82470ba63fbcca7805165 /854/CH6 | |
| download | Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.gz Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.bz2 Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.zip | |
initial commit / add all books
Diffstat (limited to '854/CH6')
| -rwxr-xr-x | 854/CH6/EX6.1/Example6_1.sce | 22 | ||||
| -rwxr-xr-x | 854/CH6/EX6.2/Example6_2.sce | 19 | ||||
| -rwxr-xr-x | 854/CH6/EX6.3/Example6_3.sce | 16 |
3 files changed, 57 insertions, 0 deletions
diff --git a/854/CH6/EX6.1/Example6_1.sce b/854/CH6/EX6.1/Example6_1.sce new file mode 100755 index 000000000..26f161873 --- /dev/null +++ b/854/CH6/EX6.1/Example6_1.sce @@ -0,0 +1,22 @@ +//clear//
+//Caption: Program to calculate D,E and Polarization P for Teflon slab
+//Example6.1
+//page 142
+clc;
+ax = sym('ax');
+e0 = sym('e0');
+E0 = sym('E0');
+Ein = sym('Ein');
+er = 2.1; //relative permittivity of teflon
+chi = er-1; //electric susceptibility
+Eout = E0*ax;
+Dout = float(e0*Eout);
+Din = float(er*e0*Ein);
+Pin = float(chi*e0*Ein);
+disp(Dout,'Dout in c/square.metre = ')
+disp(Din,'Din in c/square.metre = ')
+disp(Pin,'Polarization in coulombs per square metre Pin =')
+//Result
+//Dout in c/square.metre = ax*e0*E0
+//Din in c/square.metre = 2.1*e0*Ein
+//Polarization in coulombs per square metre Pin = 1.1*e0*Ein
diff --git a/854/CH6/EX6.2/Example6_2.sce b/854/CH6/EX6.2/Example6_2.sce new file mode 100755 index 000000000..165fa1713 --- /dev/null +++ b/854/CH6/EX6.2/Example6_2.sce @@ -0,0 +1,19 @@ +//clear//
+//Caption: Program to calculate E and Polarization P for Teflon slab
+//Example6.2
+//page 146
+clc;
+ax = sym('ax');
+e0 = sym('e0');
+E0 = sym('E0');
+er = 2.1; //relative permittivity of teflon
+chi = er-1; //electric susceptibility
+Eout = E0*ax;
+Ein = float(Eout/er);
+Din = float(e0*Eout);
+Pin = float(Din - e0*Ein);
+disp(Ein,'Ein in V/m = ')
+disp(Pin,'Polarization in coulombs per square metre Pin =')
+//Result
+//Ein in V/m = 0.47619047619048*ax*E0
+//Polarization in coulombs per square metre Pin = 0.52380952380952*ax*e0*E0
diff --git a/854/CH6/EX6.3/Example6_3.sce b/854/CH6/EX6.3/Example6_3.sce new file mode 100755 index 000000000..53b638a6a --- /dev/null +++ b/854/CH6/EX6.3/Example6_3.sce @@ -0,0 +1,16 @@ +//clear//
+//Caption: Program to calculate the capacitance of a parallel plate capacitor
+//Example6.3
+//page 151
+clc;
+S = 10;//area in square inch
+S = 10*(0.0254)^2; //area in square metre
+d = 0.01; //distance between the plates in inch
+d = 0.01*0.0254; //distance between the plates in metre
+e0 = 8.854e-12; //free space permittivity in F/m
+er = 6; //relative permittivity of mica
+e = e0*er;
+C = parallel_capacitor(e,S,d);
+disp(C*1e09,'Capacitance of a parallel plate capacitor in pico farads C =')
+//Result
+//Capacitance of a parallel plate capacitor in pico farads C = 1.3493496
|