1 files changed, 20 insertions, 0 deletions
diff --git a/2891/CH2/EX2.23/Ex2_23.sce b/2891/CH2/EX2.23/Ex2_23.sce
new file mode 100755
index 000000000..dbcc1e59a
--- /dev/null
+++ b/2891/CH2/EX2.23/Ex2_23.sce
@@ -0,0 +1,20 @@
+// Exa 2.23
+clc;
+clear;
+close;
+// given :
+Ic=10 // conduction current in ampere
+epsilon_r=1 // relative permittivity
+epsilon_0=8.854*10^-12 // permittivity in free space
+epsilon=epsilon_r*epsilon_0 // permittivity
+sigma=5.8*10^7 // conductivity in mho/m
+disp("when f=1MHz")
+f=1 // frequency in MHz
+f=1*10^6 // frequency in Hz
+Id=2*%pi*f*epsilon*Ic/sigma // displacement current
+disp(Id,"displacement current when f=1MHz in A:")
+disp("when f=100MHz")
+f=100 // frequency in MHz
+f=100*10^6 // frequency in Hz
+Id=2*%pi*f*epsilon*Ic/sigma // displacement current
+disp(Id,"displacement current when f=100MHz in A:")