small adjustments for fusion frames

ltfat · Oct 16, 2023 · c285a67 · c285a67
1 parent 1fcc752
commit c285a67
Show file tree

Hide file tree

Showing 3 changed files with 14 additions and 8 deletions.
diff --git a/comp/comp_fudual.m b/comp/comp_fudual.m
@@ -1,4 +1,4 @@
-function FfD = fudual(F, L)
+function FfD = comp_fudual(F, L)
 %FUDUAL dual fusion frame
 %
 %   Input parameters:
@@ -17,7 +17,7 @@
 
 complainif_notvalidframeobj(F,'Fudual');
 
-F = checkfudim(F, L);
+F = comp_checkfudim(F, L);
 
 if ~strcmp(F.type, 'fusion')
     error('fudual only works for fusion frames');
@@ -27,8 +27,8 @@
     Sf = F.frameoperator;
 else
    Id = eye(F.cdim);
-   c = fuana(F,Id);
-   Sf = fusyn(F,c);
+   c = comp_fuana(F,Id);
+   Sf = comp_fusyn(F,c);
    F.frameoperator = Sf;
 end
 

diff --git a/frames/frameaccel.m b/frames/frameaccel.m
@@ -44,9 +44,15 @@
     F.L=L;
     F = comp_checkfudim(F, L);
     F.fuana = comp_fuana(F, eye(L));
-    F.fusyn = comp_fusyn(F, eye(L));
+    F.fusyn = comp_fusyn(F, ones(L,F.Nframes));
     F.localdual = comp_fudual(F, eye(L));
-    [F.A, F.B] = framebounds(F.frameoperator);
+    if ~isfield(F, 'frameoperator')
+        Id = eye(F.cdim);
+        c = comp_fuana(F,Id);
+        Sf = comp_fusyn(F,c);
+        F.frameoperator = Sf;
+    end
+    [F.A, F.B] = framebounds(F);
     F.istight = 0;
     F.isparseval = 0;
     F.isuniform = 0;
@@ -56,7 +62,7 @@
             F.isparseval = 0;
         end
     end
-    if sum(F.w)/length(w) == 1
+    if sum(F.w)/length(F.w) == 1
         F.isuniform = 1;
     end
     return;

diff --git a/frames/fusionframe.m b/frames/fusionframe.m
@@ -49,7 +49,7 @@
 definput.keyvals.weights = ones(framenumber, 1);
 definput.import={'fusionframe'};
 
-[~,kv]=ltfatarghelper({'framenumber'},definput,varargin,'fusionframe');
+[~,kv]=ltfatarghelper({},definput,varargin,'fusionframe');
 
 
 supported_frames = fieldnames(kv);