% Prop9MultiplierInversionOp: Inversion of Frame multiplier according to Proposition 9
% using the program Prop9InvMultOp(c,r,TPhi,TG,m,e)
% requires entry of the input-parameters
%function y= Prop9MultiplierInversionOp;
ltfatstart;
c=input('Please enter the number c of the frame vectors: ');
r=input('Please enter the number r of the coordinates of the frame vectors: ');
TPhi=input('Please enter the synthesis matrix (rxc) of the frame Phi: ');
TG=input('Please enter the synthesis matrix (rxc) of the frame G (Psi-Phi): ');
m=input('Please enter the elements of m (c numbers in a row): ');
e=input('Please enter the error bound you aim: ');
v=1;
while(v==1)
   [m,TPsi,M0,M1,M2,M0inv,M0invMatlab,n0,M1inv,M1invMatlab,M2inv,M2invMatlab,n]=Prop9InvMultOp(c,r,TPhi,TG,m,e)
  TG=input('Please enter the synthesis matrix of the frame G or press zero if you want to stop: ');
   if TG==0 
       v=2;
    break 
   end
 e=input('Please enter the error bound you aim: ');
end


   
%end