samer@4: function Y=col(X,I)
samer@4: % col - returns selected columns
samer@4: % col :: [[N,M]->A], [[L]->[M]] -> [[N,L]->A].
samer@4: 
samer@4: Y=X(:,I);