summaryrefslogtreecommitdiff
path: root/2219/CH2/EX2.10/Ex2_10.sce
blob: 4f91918130bd5f95a68b02f3808eaa7d58884630 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
// chapter 2 example 10
//------------------------------------------------------------------------------
clc;
clear;
// given data
// D  = 3*10^-7 sin(6*10^7 - 0.35x)az
er = 100;       // relative permitivity

// Calculations
// ∂D/∂t =  3*10^-7 * 6*10^7* cos(6*10^7 - 0.35x)az
A =  3*10^-7 * 6*10^7

// output
mprintf('Amplitude of displacement current density = %d A/m^2',A);
//-----------------------------------------------------------------------------