Lines Matching refs:quit
14 if hess([])<>[] then bugmes();quit;end
16 if U<>[]|H<>[] then bugmes();quit;end
17 if execstr('hess(rand(2,5))','errcatch')==0 then bugmes();quit;end
18 if execstr('[U,H]=hess(rand(2,5))','errcatch')==0 then bugmes();quit;end
19 if execstr('hess(rand(2,5)+%i)','errcatch')==0 then bugmes();quit;end
20 if execstr('[U,H]=hess(rand(2,5)+%i)','errcatch')==0 then bugmes();quit;end
26 if Err(H-H1)>200*%eps then bugmes();quit;end
27 if Err(U'*U-eye()) >200*%eps then bugmes();quit;end
28 if Err(U'*A*U-H1) >200*%eps then bugmes();quit;end
33 if Err(H-H1)>200*%eps then bugmes();quit;end
34 if Err(U'*U-eye()) >200*%eps then bugmes();quit;end
35 if Err(U'*A*U-H1) >200*%eps then bugmes();quit;end
40 if Err(H-H1)>200*%eps then bugmes();quit;end
41 if Err(U'*U-eye()) >1000*%eps then bugmes();quit;end
42 if Err(U'*A*U-H1) >1000*%eps then bugmes();quit;end
47 if Err(H-H1)>1000*%eps then bugmes();quit;end
48 if Err(U'*U-eye()) >1000*%eps then bugmes();quit;end
49 if Err(U'*A*U-H1) >1000*%eps then bugmes();quit;end