pro pointers

testemptyptr=ptr_new(fltarr(200,200))
testfullptr=ptr_new(findgen(100))

stop
ptr_free,testptr
ptr_free,testfullptr

stop

end