summaryrefslogtreecommitdiff
path: root/3739/CH2/EX2.6/EX2_6.sce
blob: cde94a5a22f3c20ead5b329b27485272f9ef98e5 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
//Chapter 2, Example 2.6, page 38
clc

//Initialisation
W=100*10**-12                         //power in watt
pi=3.14                                //pi
no=120*pi

//Calculation
Em=sqrt(2*no*W)                   //effective value of E
Ee=Em/sqrt(2)                     //effective value of E
Hm=sqrt((2*10**-10)/(no))         //effective value of H
He=Hm/sqrt(2)                     //effective value of H

//Result
printf("Em = %.1f  uV/m",(Em*10**6))
printf("\nEe = %.1f  uV/m",(Ee*10**6))
printf("\nHm = %.3f  uA/m",(Hm*10**6))
printf("\nHe = %.2f  uA/m",(He*10**6))