rot90.m

optimization toolbox

function X=rot90(X)
%ROT90 (overloaded)

% Author Johan L鰂berg 
% $Id: rot90.m,v 1.4 2006/07/26 20:17:58 joloef Exp $   

n = X.dim(1);
m = X.dim(2);
nm = n*m;
for i = 1:length(X.lmi_variables)+1
  X.basis(:,i) = reshape(rot90(reshape(X.basis(:,i),n,m)),nm,1);
end
X.dim(1) = m;
X.dim(2) = n;
% Reset info about conic terms
X.conicinfo = [0 0];