$dec = pdl [[1,1,2,2,3],[10,15,13,11,6]];