0001 function [new_oxy,Soc,Voffset,Boc,tcor,pcor,p1]=... 0002 oxy_fit_linear(volt,OXSAT,temp,press,sta,bot_oxy,Soc,Voffset,Boc,tcor,pcor,p1); 0003 x=[volt OXSAT temp press sta]; 0004 beta(1,1)=Soc; 0005 beta(1,2)=Voffset; 0006 beta(1,3)=Boc; 0007 beta(1,4)=tcor; 0008 beta(1,5)=pcor; 0009 beta(1,6)=p1; 0010 beta0=non_lin_fit(x,bot_oxy,'oxygen_fit_linear',beta); 0011 Soc=beta0(1); 0012 Voffset=beta0(2); 0013 Boc=beta0(3); 0014 tcor=beta0(4); 0015 pcor=beta0(5); 0016 p1=beta0(6); 0017 new_oxy=((Soc.*(volt+Voffset))+Boc.*exp(-0.04.*temp)+(p1.*sta)).*exp(tcor.*temp).*OXSAT.*exp(pcor.*press); 0018 return