% va  Variance of an operator
%    va(op,rho) is the variance of the operator op
%    for the density matrix rho. If rho is not normalized,
%    it is automatically normalized to have trace 1.
%    If instead of rho a state vector is given then it is 
%    automatically converted to a normalized density matrix. 

function v=va(op,rho)
   if min(size(rho))==1,
       % Input is a state vector
       % Input is a density matrix
   end %if