summaryrefslogtreecommitdiff
path: root/431/CH3/EX3.3/EX3_3.sce
blob: cd3da852a1603aee81a7412c65a5d159eaf0c609 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
//calculating induced emf and maximium flux density
//Chapter 3
//Example 3.3
//page 197
clear;
clc; 
disp("Example 3.3")
V1=230;                //primary voltage in volts
f=50;                    //frequency in hertz
N1=100;                  //number of primary turns
N2=400;                  //number of secondary turns
A=250*10^(-4);            //cross section area of core in m^2
disp("since at no-load E2=V2")
E2=(V1*N2)/N1;
printf("induced secondary winding,E2=%dV",E2);
phi=E2/(4.44*f*N2);
Bm=phi/A;
printf("\nMaximium flux density in the core=%fWb/m^2",Bm)