if generateNewCase==1 then if getos()<>'Windows' then unix(strcat(["../../test_suite/build/./ptrc_test >",fileName])); else dos(strcat(["../../test_suite/build/ptrc_test >",fileName])); end end if exists("dat")==1 clear dat; end if exists("rts")==1 clear rts; end if exists("bestGuess")==1 clear bestGuess; end dataFile=mopen(fileName,'rb'); dat.unc=mfscanf(1,dataFile,"%f"); dat.itr=mfscanf(1,dataFile,"%f"); dat.d=mfscanf(1,dataFile,"%f"); dat.n=mfscanf(1,dataFile,"%f"); dat.runs=mfscanf(1,dataFile,"%f"); for i=1:1:(dat.n) for j=1:1:(dat.d) dat.C(j,i)=mfscanf(1,dataFile,"%f"); end end for i=1:1:(dat.n) dat.R(i)=mfscanf(1,dataFile,"%f"); end iter=mfscanf(1,dataFile,"%f"); option=0; step=0; while(iter>-2) if(iter==0) option=option+1; step=0; end if(iter>-1) step=step+1; rts(option).s(step).i=iter; for i=1:1:dat.d rts(option).s(step).P(i)=mfscanf(1,dataFile,"%f"); end rts(option).s(step).lambda=mfscanf(1,dataFile,"%f"); end iter=mfscanf(1,dataFile,"%f"); if(iter==-1) bestGuess.i=iter; for i=1:1:dat.d bestGuess.P(i)=mfscanf(1,dataFile,"%f"); end bestGuess.lambda=mfscanf(1,dataFile,"%f"); iter=mfscanf(1,dataFile,"%f"); end if(iter==-2) bestGuess.i=iter; for i=1:1:dat.d dat.realPoint(i)=mfscanf(1,dataFile,"%f"); end dat.error=mfscanf(1,dataFile,"%f"); end end mclose(dataFile); clear dataFilename dataFile iter i j option step;