1 files changed, 12 insertions, 0 deletions
diff --git a/1535/CH2/EX2.2/Ch02Ex2.sci b/1535/CH2/EX2.2/Ch02Ex2.sci
new file mode 100755
index 000000000..7c16ba606
--- /dev/null
+++ b/1535/CH2/EX2.2/Ch02Ex2.sci
@@ -0,0 +1,12 @@
+// Scilab Code Ex2.2 : Page-46 (2010)
+function E = fn(t)
+    E = sin(120*%pi*t);
+endfunction
+epsilon_r = 1;    // Relative electrical permittivity of free space
+epsilon_0 = 8.854e-012;    // Absolute electrical permittivity of free space, farad per metre
+t = 0;    // Time when peak value of current occurs
+J2 = epsilon_0*epsilon_r*derivative(fn,t);
+printf("\nThe peak value of displacement current = %4.2e ampere per metre square", J2);
+
+// Result 
+// The peak value of displacement current = 3.34e-009 ampere per metre square