RemoveVolt

RemoveVolt Removes all the voltages measured on the current carrying electrodes
 Function Vh=RemoveVolt(Uel,L);
 removes all the voltages measured on the
 current carrying electrodes.
 Change the Jacobian accordingly, see RemoveJacob.m.

 INPUT

 Uel = voltages on the electrodes
 L = number of electrodes
 
 OUTPUT

 Vh = new voltages

0001 function Vh=RemoveVolt(Uel,L);
0002 
0003 %RemoveVolt Removes all the voltages measured on the current carrying electrodes
0004 % Function Vh=RemoveVolt(Uel,L);
0005 % removes all the voltages measured on the
0006 % current carrying electrodes.
0007 % Change the Jacobian accordingly, see RemoveJacob.m.
0008 %
0009 % INPUT
0010 %
0011 % Uel = voltages on the electrodes
0012 % L = number of electrodes
0013 %
0014 % OUTPUT
0015 %
0016 % Vh = new voltages
0017 
0018 
0019 % M. Vauhkonen 6.9.1999,
0020 % University of Kuopio, Department of Applied Physics, PO Box 1627,
0021 % FIN-70211 Kuopio, Finland, email: Marko.Vauhkonen@uku.fi
0022 
0023   Uel=Uel(:);
0024   [rUel,cUel]=size(Uel);
0025   Uh=reshape(Uel,L,rUel/L);
0026   Vadj=Uh;
0027   kk=1;
0028    for ii=1:L
0029     Vadj(:,ii)=[Vadj(kk:L,ii);Vadj(1:kk-1,ii)];
0030     kk=kk+1;
0031    end
0032   Vadj([1 2 L],:)=[];
0033   Vh=Vadj;
0034   
0035 
0036 
0037