% P3
% Tests the function LowRankLS

  randn('seed',0)
  rand('seed',0)
  clc
  format long

  m = 10; r = 5;
  W = randn(m,r); d = rand(r,1); b = randn(m,1);
  x = LowRankLS(W,d,b);
  
  rho     = norm(W*diag(d)*W'*x - b)
  x = x
  
  

  
  
  