% Regression test function (black blox) for FreeMat v3.5 % This function is autogenerated by helpgen. function bbtest_success = bbtest_clabel bbtest_success = 1; NumErrors = 0; try [x,y] = meshgrid(linspace(-1,1,50)); catch NumErrors = NumErrors + 1; end try z = x.*exp(-(x.^2+y.^2)); catch NumErrors = NumErrors + 1; end try h = contour(z); catch NumErrors = NumErrors + 1; end try clabel(h,'backgroundcolor',[1,1,.6],'edgecolor',[.7,.7,.7]); catch NumErrors = NumErrors + 1; end try mprint clabel1 catch NumErrors = NumErrors + 1; end if (NumErrors ~= 0) bbtest_success = 0; return; end NumErrors = 0; try h = contour(z); catch NumErrors = NumErrors + 1; end try clabel(h,[-.2,0,.3]); catch NumErrors = NumErrors + 1; end try mprint clabel2 catch NumErrors = NumErrors + 1; end if (NumErrors ~= 0) bbtest_success = 0; return; end