function x=str2int(str);
%function x=str2int(str);
str=abs(str)-48;
bad=find((str>9)|(str<-4)|(str==-1)|(str==-2));
str(bad)=[];
if str(1)==-3
   sign=-1;
   str(1)=[];
else
   sign=1;
end
tens=floor(exp( ( (length(str)-1):-1:0)*log(10)));
x=sign*sum(tens.*str);
