function findval1(a,x,i0,j0) { n=rows(a) p=cols(a) for (i=1; i<=n; i++) { for (j=1; j<=p; j++) { if (a[i,j]==x) { i0=i j0=j return(1) } } } return(0) } function findval2(a,x,i0,j0) { n=rows(a) p=cols(a) q=0 for (i=1; i<=n; i++) { for (j=1; j<=p; j++) { if (a[i,j]==x) { i0=i j0=j q=1 goto END } } } END: return(q) } function findval3(a,x,i0,j0) { n=rows(a) p=cols(a) q=0 for (i=1; i<=n; i++) { for (j=1; j<=p; j++) { if (a[i,j]==x) { i0=i j0=j q=1 break } } if (q) { break } } return(q) }