path: root/10/CH1/EX2/cha1_2.sce

A=4*%pi*10^-7;lc=360;
N=500;i=4;lg=2*10^-3;

m=-A*(lc/lg)
 
c=(N*i*A)/(lg)
 
Hc=(N*i)/(lc)