Added copyright notices to all files.

mpf · Aug 17, 2009 · 39e0709 · 39e0709
1 parent c6f7549
commit 39e0709
Show file tree

Hide file tree

Showing 109 changed files with 1,147 additions and 105 deletions.
diff --git a/+spot/+utils/fdct_c2v.m b/+spot/+utils/fdct_c2v.m
@@ -5,9 +5,11 @@
 %   the curvelet coefficients contained in X. When parameter
 %   CN is omitted the vector length is determined from X.
 
-%   Copyright 2008, Gilles Hennenfent and Ewout van den Berg
-%   http://www.cs.ubc.ca/labs/scl/sparco
-%   $Id$
+%   Copyright 2008, Gilles Hennenfent, Ewout van den Berg, Michael P. Friedlander
+%   See the file COPYING.txt for full copyright information.
+%   Use the command 'spot.gpl' to locate this file.
+
+%   http://www.cs.ubc.ca/labs/scl/spot
 
 % If vector size is not give, determine from coefficients
 if nargin < 2

diff --git a/+spot/+utils/fdct_v2c.m b/+spot/+utils/fdct_v2c.m
@@ -7,9 +7,11 @@
 %   level, the treatment of the finest level (e.g. AC=2 for
 %   wavelets), and the number of angles.
 
-%   Copyright 2008, Gilles Hennenfent and Ewout van den Berg
-%   http://www.cs.ubc.ca/labs/scl/sparco
-%   $Id$
+%   Copyright 2008, Gilles Hennenfent and Ewout van den Berg, Michael P. Friedlander
+%   See the file COPYING.txt for full copyright information.
+%   Use the command 'spot.gpl' to locate this file.
+
+%   http://www.cs.ubc.ca/labs/scl/spot
 
 k = prod(hdr{1}{1});
 v{1}{1} = reshape(x(1:k),hdr{1}{1});

diff --git a/+spot/+utils/fieldname.m b/+spot/+utils/fieldname.m
@@ -8,8 +8,10 @@
 %   See also parseParams, getOption
 
 %   Copyright 2008, Ewout van den Berg and Michael P. Friedlander
-%   http://www.cs.ubc.ca/labs/scl/sparco
-%   $Id: fieldname.m 1402 2009-06-18 23:35:43Z mpf $
+%   See the file COPYING.txt for full copyright information.
+%   Use the command 'spot.gpl' to locate this file.
+
+%   http://www.cs.ubc.ca/labs/scl/spot
 
 str = regexprep(lower(name),'\W','_');
-end
+
diff --git a/+spot/+utils/getOption.m b/+spot/+utils/getOption.m
@@ -6,8 +6,10 @@
 %   returned.
 
 %   Copyright 2008, Ewout van den Berg and Michael P. Friedlander
-%   http://www.cs.ubc.ca/labs/scl/sparco
-%   $Id: getOption.m 1402 2009-06-18 23:35:43Z mpf $
+%   See the file COPYING.txt for full copyright information.
+%   Use the command 'spot.gpl' to locate this file.
+
+%   http://www.cs.ubc.ca/labs/scl/spot
 
    import spot.utils.*
 

diff --git a/+spot/+utils/isposintmat.m b/+spot/+utils/isposintmat.m
@@ -1,3 +1,9 @@
 function r = isposintmat(m)
+%ispostintmat  Check if input vector is positive integer.
 
-r = all(all( (round(m) == m) & (m > 0) ));
+%   See the file COPYING.txt for full copyright information.
+%   Use the command 'spot.gpl' to locate this file.
+
+%   http://www.cs.ubc.ca/labs/scl/spot
+
+r = all(all( (round(m) == m) & (m > 0) ));
diff --git a/+spot/+utils/isposintscalar.m b/+spot/+utils/isposintscalar.m
@@ -1,3 +1,9 @@
 function r = isposintscalar(s)
+%ispostintscalar  Check if input vector is positive scalar.
+
+%   See the file COPYING.txt for full copyright information.
+%   Use the command 'spot.gpl' to locate this file.
+
+%   http://www.cs.ubc.ca/labs/scl/spot
 
 r = isscalar(s) && (round(s) == s) && s > 0;
diff --git a/+spot/+utils/parseOptions.m b/+spot/+utils/parseOptions.m
@@ -1,17 +1,18 @@
 function [opts,args] = parseOptions(args, flagFields, optsFields)
-   %parseOptions  Parse options
-   %
-   %   [OPTS,ARGS] = parseOptions(ARGS,FLAGFIELDS,OPTSFIELDS) goes
-   %   throught parameter list ARGS and looks for all flag strings
-   %   indicated by FLAGFIELDS and keyword-value pairs with keywords
-   %   given by OPTSFIELDS. All flag fields and encountered
-   %   keyword-value pairs are stored in OPTS. The remaining arguments
-   %   are returned in ARGS.
-
-   %   29 Jul 09: Imported from the Sparco project.
-
-   %   Copyright 2008-2009, Ewout van den Berg and Michael P. Friedlander
-   %   http://www.cs.ubc.ca/labs/scl/spot
+%parseOptions  Parse options
+%
+%   [OPTS,ARGS] = parseOptions(ARGS,FLAGFIELDS,OPTSFIELDS) goes
+%   throught parameter list ARGS and looks for all flag strings
+%   indicated by FLAGFIELDS and keyword-value pairs with keywords
+%   given by OPTSFIELDS. All flag fields and encountered
+%   keyword-value pairs are stored in OPTS. The remaining arguments
+%   are returned in ARGS.
+
+%   Copyright 2008-2009, Ewout van den Berg and Michael P. Friedlander
+%   See the file COPYING.txt for full copyright information.
+%   Use the command 'spot.gpl' to locate this file.
+
+%   http://www.cs.ubc.ca/labs/scl/spot
 
    import spot.utils.*
 

diff --git a/+spot/counter.m b/+spot/counter.m
@@ -2,6 +2,9 @@
 %counter  Counter class used to track no. of matrix-vector products.
 
 %   Copyright 2009, Ewout van den Berg and Michael P. Friedlander
+%   See the file COPYING.txt for full copyright information.
+%   Use the command 'spot.gpl' to locate this file.
+
 %   http://www.cs.ubc.ca/labs/scl/spot
 
    properties

diff --git a/+spot/gpl.m b/+spot/gpl.m
@@ -0,0 +1,19 @@
+function gpl()
+%GPL  Location of full copyright information for the Spot Toolbox.
+
+%   Copyright 2009 Ewout van den Berg and Michael P. Friedlander.
+%   See the file COPYING.txt for full copyright information.
+%   Use the command 'spot.gpl' to locate this file.
+
+%   http://www.cs.ubc.ca/labs/scl/spot
+
+    parts = regexp(mfilename('fullpath'),filesep,'split');
+    spotpath = [filesep fullfile(parts{1:end-2})];
+
+    fprintf('\n');
+    fprintf('  Full copyright information for the Spot Toolbox\n');
+    fprintf('  can be found in\n\n');
+    fprintf('  %s%s%s\n',spotpath,filesep,'COPYING.txt');
+    fprintf('\n');
+
+end % function gpl
diff --git a/@opSpot/bicg.m b/@opSpot/bicg.m
@@ -11,6 +11,9 @@
 %   Spot operator.
 
 %   Copyright 2009, Ewout van den Berg and Michael P. Friedlander
+%   See the file COPYING.txt for full copyright information.
+%   Use the command 'spot.gpl' to locate this file.
+
 %   http://www.cs.ubc.ca/labs/scl/spot
 
 % Check if A is square

diff --git a/@opSpot/bicgstab.m b/@opSpot/bicgstab.m
@@ -11,6 +11,9 @@
 %   Spot operator.
 
 %   Copyright 2009, Ewout van den Berg and Michael P. Friedlander
+%   See the file COPYING.txt for full copyright information.
+%   Use the command 'spot.gpl' to locate this file.
+
 %   http://www.cs.ubc.ca/labs/scl/spot
 
 % Check if A is square

diff --git a/@opSpot/blkdiag.m b/@opSpot/blkdiag.m
@@ -11,6 +11,9 @@
 %   See also opBlockDiag.
 %   
 %   Copyright 2009, Ewout van den Berg and Michael P. Friedlander
+%   See the file COPYING.txt for full copyright information.
+%   Use the command 'spot.gpl' to locate this file.
+
 %   http://www.cs.ubc.ca/labs/scl/spot
 
 y = opBlockDiag([],varargin{:},0); % No weight, zero overlap
diff --git a/@opSpot/cgs.m b/@opSpot/cgs.m
@@ -11,6 +11,9 @@
 %   Spot operator.
 
 %   Copyright 2009, Ewout van den Berg and Michael P. Friedlander
+%   See the file COPYING.txt for full copyright information.
+%   Use the command 'spot.gpl' to locate this file.
+
 %   http://www.cs.ubc.ca/labs/scl/spot
 
 % Check if A is square

diff --git a/@opSpot/char.m b/@opSpot/char.m
@@ -4,6 +4,9 @@
 %   char(A) converts the Spot operator into a string representation.
 
 %   Copyright 2009, Ewout van den Berg and Michael P. Friedlander
+%   See the file COPYING.txt for full copyright information.
+%   Use the command 'spot.gpl' to locate this file.
+
 %   http://www.cs.ubc.ca/labs/scl/spot
 
 m     = A.size(1);

diff --git a/@opSpot/conj.m b/@opSpot/conj.m
@@ -2,6 +2,9 @@
 %CONJ  Elementwise conjugate of operator.
 
 %   Copyright 2009, Ewout van den Berg and Michael P. Friedlander
+%   See the file COPYING.txt for full copyright information.
+%   Use the command 'spot.gpl' to locate this file.
+
 %   http://www.cs.ubc.ca/labs/scl/spot
 
 A = opConj(A);
diff --git a/@opSpot/ctranspose.m b/@opSpot/ctranspose.m
@@ -7,6 +7,9 @@
 %   See also opCTranspose, opTranspose, transpose.
 
 %   Copyright 2009, Ewout van den Berg and Michael P. Friedlander
+%   See the file COPYING.txt for full copyright information.
+%   Use the command 'spot.gpl' to locate this file.
+
 %   http://www.cs.ubc.ca/labs/scl/spot
 
 result = opCTranspose(A);
diff --git a/@opSpot/diag.m b/@opSpot/diag.m
@@ -6,6 +6,9 @@
 %   See also opDiag.
 
 %   Copyright 2009, Ewout van den Berg and Michael P. Friedlander
+%   See the file COPYING.txt for full copyright information.
+%   Use the command 'spot.gpl' to locate this file.
+
 %   http://www.cs.ubc.ca/labs/scl/spot
 
    [m,n] = size(A);

diff --git a/@opSpot/disp.m b/@opSpot/disp.m
@@ -6,6 +6,9 @@ function disp(A,name)
 %   DISP(A,NAME) displays a Spot operator along with its name.
 
 %   Copyright 2009, Ewout van den Berg and Michael P. Friedlander
+%   See the file COPYING.txt for full copyright information.
+%   Use the command 'spot.gpl' to locate this file.
+
 %   http://www.cs.ubc.ca/labs/scl/spot
 
    if nargin < 1

diff --git a/@opSpot/display.m b/@opSpot/display.m
@@ -4,6 +4,9 @@ function display(A)
 %   DISPLAY(A) displays an operator.
 
 %   Copyright 2009, Ewout van den Berg and Michael P. Friedlander
+%   See the file COPYING.txt for full copyright information.
+%   Use the command 'spot.gpl' to locate this file.
+
 %   http://www.cs.ubc.ca/labs/scl/spot
 
 disp(A,inputname(1));
diff --git a/@opSpot/divide.m b/@opSpot/divide.m
@@ -13,6 +13,9 @@
 %   See also mldivide, @opSpot/mrdivide, opFoG, opInverse, opPInverse, spotparams.
 
 %   Copyright 2009, Ewout van den Berg and Michael P. Friedlander
+%   See the file COPYING.txt for full copyright information.
+%   Use the command 'spot.gpl' to locate this file.
+
 %   http://www.cs.ubc.ca/labs/scl/spot
 
    if mode == 1

diff --git a/@opSpot/double.m b/@opSpot/double.m
@@ -5,6 +5,9 @@
 %   matrix.
 
 %   Copyright 2009, Ewout van den Berg and Michael P. Friedlander
+%   See the file COPYING.txt for full copyright information.
+%   Use the command 'spot.gpl' to locate this file.
+
 %   http://www.cs.ubc.ca/labs/scl/spot
 
 if size(A,1) < size(A,2)

diff --git a/@opSpot/drandn.m b/@opSpot/drandn.m
@@ -6,6 +6,9 @@
 %   See also opSpot.rrandn, randn.
 
 %   Copyright 2009, Ewout van den Berg and Michael P. Friedlander
+%   See the file COPYING.txt for full copyright information.
+%   Use the command 'spot.gpl' to locate this file.
+
 %   http://www.cs.ubc.ca/labs/scl/spot
 
 n = size(A,2);

diff --git a/@opSpot/eigs.m b/@opSpot/eigs.m
@@ -20,6 +20,9 @@
 %   Again, see Matlab's built-in EIGS for details on these calls.
 
 %   Copyright 2009, Ewout van den Berg and Michael P. Friedlander
+%   See the file COPYING.txt for full copyright information.
+%   Use the command 'spot.gpl' to locate this file.
+
 %   http://www.cs.ubc.ca/labs/scl/spot
 
 %   NOTE: Because Spot does support "backslash" for operators, it

diff --git a/@opSpot/end.m b/@opSpot/end.m
@@ -7,6 +7,9 @@
 %   returned.
 
 %   Copyright 2009, Ewout van den Berg and Michael P. Friedlander
+%   See the file COPYING.txt for full copyright information.
+%   Use the command 'spot.gpl' to locate this file.
+
 %   http://www.cs.ubc.ca/labs/scl/spot
 
 % Get operator size

diff --git a/@opSpot/full.m b/@opSpot/full.m
@@ -6,6 +6,9 @@
 %   See also @opSpot/double.
 
 %   Copyright 2009, Ewout van den Berg and Michael P. Friedlander
+%   See the file COPYING.txt for full copyright information.
+%   Use the command 'spot.gpl' to locate this file.
+
 %   http://www.cs.ubc.ca/labs/scl/spot
 
 x = full(double(A));
diff --git a/@opSpot/gmres.m b/@opSpot/gmres.m
@@ -11,6 +11,9 @@
 %   Spot operator.
 
 %   Copyright 2009, Ewout van den Berg and Michael P. Friedlander
+%   See the file COPYING.txt for full copyright information.
+%   Use the command 'spot.gpl' to locate this file.
+
 %   http://www.cs.ubc.ca/labs/scl/spot
 
 if size(A,1) ~= size(A,2)

diff --git a/@opSpot/horzcat.m b/@opSpot/horzcat.m
@@ -6,6 +6,9 @@
 %   See also vertcat, opDictionary.
 
 %   Copyright 2009, Ewout van den Berg and Michael P. Friedlander
+%   See the file COPYING.txt for full copyright information.
+%   Use the command 'spot.gpl' to locate this file.
+
 %   http://www.cs.ubc.ca/labs/scl/spot
 
 y = opDictionary(varargin{:});
diff --git a/@opSpot/imag.m b/@opSpot/imag.m
@@ -2,6 +2,9 @@
 %IMAG  Complex imaginary part.
 
 %   Copyright 2009, Ewout van den Berg and Michael P. Friedlander
+%   See the file COPYING.txt for full copyright information.
+%   Use the command 'spot.gpl' to locate this file.
+
 %   http://www.cs.ubc.ca/labs/scl/spot
 
    if isreal(A)

diff --git a/@opSpot/inv.m b/@opSpot/inv.m
@@ -1,10 +1,15 @@
 function y = inv(A)
-
+%INV   Inverse of a linear operator.
+%
+%   inv(A) returns the operator inverse of A. This routine is
+%   a simple front-end to opInverse.
+%
+%   See also opInverse.
+%
 %   Copyright 2009, Ewout van den Berg and Michael P. Friedlander
+%   See the file COPYING.txt for full copyright information.
+%   Use the command 'spot.gpl' to locate this file.
+
 %   http://www.cs.ubc.ca/labs/scl/spot
 
-if size(A,1) ~= size(A,2)
-   error('Operator must be square.');
-else
-   y = opInverse(A);
-end
+y = opInverse(A);
diff --git a/@opSpot/isempty.m b/@opSpot/isempty.m
@@ -2,6 +2,9 @@
 %isempty  True for empty operator.
 
 %   Copyright 2009, Ewout van den Berg and Michael P. Friedlander
+%   See the file COPYING.txt for full copyright information.
+%   Use the command 'spot.gpl' to locate this file.
+
 %   http://www.cs.ubc.ca/labs/scl/spot
 
 [m,n] = size(A);

diff --git a/@opSpot/isreal.m b/@opSpot/isreal.m
@@ -2,6 +2,9 @@
 %isreal  True for real operator.
 
 %   Copyright 2009, Ewout van den Berg and Michael P. Friedlander
+%   See the file COPYING.txt for full copyright information.
+%   Use the command 'spot.gpl' to locate this file.
+
 %   http://www.cs.ubc.ca/labs/scl/spot
 
 % Get size information

diff --git a/@opSpot/isscalar.m b/@opSpot/isscalar.m
@@ -2,6 +2,9 @@
 %isscalar  True if operator is a scalar.
 
 %   Copyright 2009, Ewout van den Berg and Michael P. Friedlander
+%   See the file COPYING.txt for full copyright information.
+%   Use the command 'spot.gpl' to locate this file.
+
 %   http://www.cs.ubc.ca/labs/scl/spot
 
 [m,n] = size(A);