samer@4: function s=sizedims(A,i)
samer@4: % sizedims - size of array in specified dimensions only
samer@4: %
samer@4: % sizedims :: [Size:[[1,E]]], [[M]->[E]] -> [[M]->natural].
samer@4: %
samer@4: % Defined as sizedims(A,I)=paren(size(A),I)
samer@4: s=size(A);
samer@4: s=s(i);