On Mon, 4 Mar 2013, Riccardo (Jack) Lucchetti wrote:
Sorry, it should have been
<hansl>
function void boo(matrix *a[null])
if isnull(a)
printf "Ha!\n"
else
printf "Nope\n"
endif
end function
function scalar isempty(matrix a)
return (rows(a) == 0 || cols(a) == 0)
end function
matrix test = {1,0,3;1,1,100}
boo(&test)
boo()
matrix seek = selifr(test,test[,1].=1)
matrix seek = selifr(seek,seek[,2].=2)
eval seek
eval isempty(seek)
</hansl>
Sorry for the noise.
-------------------------------------------------------
Riccardo (Jack) Lucchetti
Dipartimento di Scienze Economiche e Sociali (DiSES)
Università Politecnica delle Marche
(formerly known as Università di Ancona)
r.lucchetti(a)univpm.it
http://www2.econ.univpm.it/servizi/hpp/lucchetti
-------------------------------------------------------