% diagonal matrix, return vector of diagonal
%
% (c) by Hannes Nickisch, MPI for Biological Cybernetics, 2010 August 23

function a = diag(A)

  a = A.a;
