# file:
D:\_jk123org\ex\_new\jdsSVGTeXsize040226\jsf12.wxmx

H1:160; H2:280;dH:H2-H1;H0:120; Hall:H2-H0;

P2:380-320;P0:0;

dh:dH/4;

HH:280;

Px:P2*(Hall-dh)/Hall,numer;320+Px;HH-dh;

Px:P2*(Hall-2*dh)/Hall,numer;320+Px;HH-2*dh;

Px:P2*(Hall-3*dh)/Hall,numer;320+Px;HH-3*dh;

Px:P2*(Hall-4*dh)/Hall,numer;320+Px;HH-4*dh;

for i:1 thru 4 step 1 do (H_i:H_i-dh,display(H_i));

Px:P2*(Hall-dh)/Hall