From b9c67f9bd985584dc71fe9f1b67ae0d731a0c949 Mon Sep 17 00:00:00 2001
From: marwan <>
Date: Tue, 24 Mar 2009 08:34:24 +0000
Subject: [PATCH] copyright address changed

---
 ace.m            |  9 ++++++++-
 adjust.m         |  9 ++++++++-
 arfit.m          | 17 ++++++++++++-----
 choosecolormap.m |  9 ++++++++-
 corrgram.m       |  8 ++++++--
 crp.m            | 10 +++++++++-
 crp2.m           | 10 +++++++++-
 crp_big.m        |  9 ++++++++-
 crqad_big.m      |  9 ++++++++-
 dl.m             |  9 ++++++++-
 entropy.m        |  9 ++++++++-
 erqa.m           |  9 ++++++++-
 first.m          |  9 ++++++++-
 french.m         |  9 ++++++++-
 hist2.m          |  9 ++++++++-
 histn.m          |  9 ++++++++-
 jrp.m            |  9 ++++++++-
 jrqa.m           |  9 ++++++++-
 mcf.m            |  9 ++++++++-
 mgui.m           | 15 ++++++++++-----
 mi.m             | 17 ++++++++++++-----
 migram.m         |  6 +++++-
 normalize.m      |  9 ++++++++-
 phasespace.m     |  9 ++++++++-
 phasesynchro.m   |  9 ++++++++-
 pss.m            |  9 ++++++++-
 recons.m         | 19 +++++++++++++------
 taucrp.m         |  9 ++++++++-
 trackplot.m      |  9 ++++++++-
 trafo.m          |  9 ++++++++-
 tt.m             |  9 ++++++++-
 twinsurr.m       |  9 ++++++++-
 winplot.m        | 17 ++++++++++++-----
 xcf.m            |  9 ++++++++-
 34 files changed, 288 insertions(+), 56 deletions(-)

diff --git a/ace.m b/ace.m
index 818fa0a..2944e34 100644
--- a/ace.m
+++ b/ace.m
@@ -41,7 +41,11 @@ function varargout=ace(x,y,w,ii,oi)
 %
 %    See also: MCF
 
-% Copyright (c) 2001-2003 by AMRON
+% Copyright (c) 2008-2009
+% Norbert Marwan, Potsdam Institute for Climate Impact Research, Germany
+% http://www.pik-potsdam.de
+%
+% Copyright (c) 2001-2008
 % Norbert Marwan, Potsdam University, Germany
 % http://www.agnld.uni-potsdam.de
 %
@@ -49,6 +53,9 @@ function varargout=ace(x,y,w,ii,oi)
 % $Revision$
 %
 % $Log$
+% Revision 1.6  2005/03/16 11:19:02  marwan
+% help text modified
+%
 % Revision 1.5  2004/11/10 07:05:02  marwan
 % initial import
 %
diff --git a/adjust.m b/adjust.m
index aa61cf6..ec0a06e 100644
--- a/adjust.m
+++ b/adjust.m
@@ -16,7 +16,11 @@ function [x, y]=adjust(a, b, flag)
 %              y2 = x(1:100) / 2; y2(:,2) = sin(x(1:100) / 5);
 %              [z1 z2] = adjust(y1,y2);
 
-% Copyright (c) 2001-2003 by AMRON
+% Copyright (c) 2008-2009
+% Norbert Marwan, Potsdam Institute for Climate Impact Research, Germany
+% http://www.pik-potsdam.de
+%
+% Copyright (c) 2001-2008
 % Norbert Marwan, Potsdam University, Germany
 % http://www.agnld.uni-potsdam.de
 %
@@ -24,6 +28,9 @@ function [x, y]=adjust(a, b, flag)
 % $Revision$
 %
 % $Log$
+% Revision 2.2  2005/03/16 11:19:02  marwan
+% help text modified
+%
 % Revision 2.1  2004/11/10 07:07:05  marwan
 % initial import
 %
diff --git a/arfit.m b/arfit.m
index 8b2480d..a93aff0 100644
--- a/arfit.m
+++ b/arfit.m
@@ -23,7 +23,11 @@ function varargout=arfit(varargin)
 %             end
 %             arfit(x,10)
 
-% Copyright (c) 2002-2007 by AMRON
+% Copyright (c) 2008-2009
+% Norbert Marwan, Potsdam Institute for Climate Impact Research, Germany
+% http://www.pik-potsdam.de
+%
+% Copyright (c) 2002-2008
 % Norbert Marwan, Potsdam University, Germany
 % http://www.agnld.uni-potsdam.de
 %
@@ -31,6 +35,9 @@ function varargout=arfit(varargin)
 % $Revision$
 %
 % $Log$
+% Revision 2.7  2007/12/20 16:26:05  marwan
+% changed gpl splash behaviour
+%
 % Revision 2.6  2007/05/24 12:30:55  marwan
 % definitions of criteria checked and corrected
 %
@@ -752,8 +759,8 @@ if 0
     err=fprintf(fid,'%s\n','Please send us the following error report. Provide a brief');
     err=fprintf(fid,'%s\n','description of what you were doing when this problem occurred.');
     err=fprintf(fid,'%s\n','E-mail or FAX this information to us at:');
-    err=fprintf(fid,'%s\n','    E-mail:  marwan@agnld.uni-potsdam.de');
-    err=fprintf(fid,'%s\n','       Fax:  ++49 +331 977 1142');
+    err=fprintf(fid,'%s\n','    E-mail:  marwan@pik-potsdam.de');
+    err=fprintf(fid,'%s\n','       Fax:  ++49 +331 288 2640');
     err=fprintf(fid,'%s\n\n\n','Thank you for your assistance.');
     err=fprintf(fid,'%s\n',repmat('-',50,1));
     err=fprintf(fid,'%s\n',datestr(now,0));
@@ -785,8 +792,8 @@ if 0
     disp('   Provide a brief description of what you were doing when ')
     disp('   this problem occurred.'), disp(' ')
     disp('   E-mail or FAX this information to us at:')
-    disp('       E-mail:  marwan@agnld.uni-potsdam.de')
-    disp('          Fax:  ++49 +331 977 1142'), disp(' ')
+    disp('       E-mail:  marwan@pik-potsdam.de')
+    disp('          Fax:  ++49 +331 288 2640'), disp(' ')
     disp('   Thank you for your assistance.')
     warning('on')
   end
diff --git a/choosecolormap.m b/choosecolormap.m
index 4b3b33d..e79a243 100644
--- a/choosecolormap.m
+++ b/choosecolormap.m
@@ -5,7 +5,11 @@ function x_out=choosecolormap(x_in)
 %
 %   See also COLORMAP, GRAPH3D
 
-% Copyright (c) 2002 by AMRON
+% Copyright (c) 2008-2009
+% Norbert Marwan, Potsdam Institute for Climate Impact Research, Germany
+% http://www.pik-potsdam.de
+%
+% Copyright (c) 2002-2008
 % Norbert Marwan, Potsdam University, Germany
 % http://www.agnld.uni-potsdam.de
 %
@@ -13,6 +17,9 @@ function x_out=choosecolormap(x_in)
 % $Revision$
 %
 % $Log$
+% Revision 2.1  2004/11/10 07:07:20  marwan
+% initial import
+%
 %
 
 error(nargchk(0,1,nargin)) 
diff --git a/corrgram.m b/corrgram.m
index ad0aacb..1c4bf2f 100644
--- a/corrgram.m
+++ b/corrgram.m
@@ -33,7 +33,11 @@ function [c_out, l_out, t_out] = corrgram(varargin)
 %
 %   See also CORRCOEF, CORR, XCORR, MIGRAM.
 
-% Copyright (c) 2007 by AMRON
+% Copyright (c) 2008-2009
+% Norbert Marwan, Potsdam Institute for Climate Impact Research, Germany
+% http://www.pik-potsdam.de
+%
+% Copyright (c) 2007-2008
 % Norbert Marwan, Potsdam University, Germany
 % http://www.agnld.uni-potsdam.de
 %
@@ -42,7 +46,7 @@ function [c_out, l_out, t_out] = corrgram(varargin)
 
 
 error(nargchk(2,5,nargin))
-verbose = 0;
+verbose = 1;
 
 x = varargin{1}; y = varargin{2};
 x = x(:); y = y(:);
diff --git a/crp.m b/crp.m
index 3238ca8..31f5b29 100644
--- a/crp.m
+++ b/crp.m
@@ -72,7 +72,11 @@ function xout=crp(varargin)
 %
 %    See also CRP2, CRP_BIG, JRP, TAUCRP, CRQA.
 
-% Copyright (c) 1998-2007 by AMRON
+% Copyright (c) 2008-2009
+% Norbert Marwan, Potsdam Institute for Climate Impact Research, Germany
+% http://www.pik-potsdam.de
+%
+% Copyright (c) 1998-2008
 % Norbert Marwan, Potsdam University, Germany
 % http://www.agnld.uni-potsdam.de
 %
@@ -80,6 +84,10 @@ function xout=crp(varargin)
 % $Revision$
 %
 % $Log$
+% Revision 5.14  2008/07/02 11:59:04  marwan
+% new norms: DTW and Levenshtein
+% bug fix for logical data vectors
+%
 % Revision 5.13  2007/07/18 17:18:44  marwan
 % integer values in the arguments supported
 %
diff --git a/crp2.m b/crp2.m
index 6400bef..faef0cb 100644
--- a/crp2.m
+++ b/crp2.m
@@ -74,7 +74,11 @@ function xout=crp2(varargin)
 %    Cross Recurrence Plot Based Synchronization of Time Series,
 %    Nonlin. Proc. Geophys., 9, 2002.
 
-% Copyright (c) 1998-2007 by AMRON
+% Copyright (c) 2008-2009
+% Norbert Marwan, Potsdam Institute for Climate Impact Research, Germany
+% http://www.pik-potsdam.de
+%
+% Copyright (c) 1998-2008
 % Norbert Marwan, Potsdam University, Germany
 % http://www.agnld.uni-potsdam.de
 %
@@ -82,6 +86,10 @@ function xout=crp2(varargin)
 % $Revision$
 %
 % $Log$
+% Revision 5.16  2008/07/02 11:59:22  marwan
+% new norms: DTW and Levenshtein
+% bug fix for logical data vectors
+%
 % Revision 5.15  2008/04/29 14:52:01  marwan
 % levenshtein and DTW distance added
 %
diff --git a/crp_big.m b/crp_big.m
index 19f5188..a2e8fd3 100644
--- a/crp_big.m
+++ b/crp_big.m
@@ -70,7 +70,11 @@ function xout=crp_big(varargin)
 %
 %    See also CRP, CRP2, JRP, TAUCRP and CRQA.
 
-% Copyright (c) 1998-2007 by AMRON
+% Copyright (c) 2008-2009
+% Norbert Marwan, Potsdam Institute for Climate Impact Research, Germany
+% http://www.pik-potsdam.de
+%
+% Copyright (c) 1998-2008
 % Norbert Marwan, Potsdam University, Germany
 % http://www.agnld.uni-potsdam.de
 %
@@ -78,6 +82,9 @@ function xout=crp_big(varargin)
 % $Revision$
 %
 % $Log$
+% Revision 5.12  2008/07/02 11:59:43  marwan
+% bug fix for logical data vectors
+%
 % Revision 5.11  2007/07/18 17:18:44  marwan
 % integer values in the arguments supported
 %
diff --git a/crqad_big.m b/crqad_big.m
index d73231b..c910c7d 100644
--- a/crqad_big.m
+++ b/crqad_big.m
@@ -62,7 +62,11 @@ function out=crqad_big(varargin)
 %    Nonlinear analysis of bivariate data with cross recurrence plots,
 %    Phys. Lett. A, 302, 2002.
 
-% Copyright (c) 2002-2006 by AMRON
+% Copyright (c) 2008-2009
+% Norbert Marwan, Potsdam Institute for Climate Impact Research, Germany
+% http://www.pik-potsdam.de
+%
+% Copyright (c) 2002-2008
 % Norbert Marwan, Potsdam University, Germany
 % http://www.agnld.uni-potsdam.de
 %
@@ -71,6 +75,9 @@ function out=crqad_big(varargin)
 % $Revision$
 %
 % $Log$
+% Revision 5.3  2007/07/18 17:18:44  marwan
+% integer values in the arguments supported
+%
 % Revision 5.2  2006/10/24 14:36:06  marwan
 % minor bug: different lengths of vectors z0 and z1
 %
diff --git a/dl.m b/dl.m
index 98c9528..0f0a012 100644
--- a/dl.m
+++ b/dl.m
@@ -14,7 +14,11 @@ function [a_out, b_out]=dl(x)
 %
 %    See also CRQA, TT.
 
-% Copyright (c) 2001-2004 by AMRON
+% Copyright (c) 2008-2009
+% Norbert Marwan, Potsdam Institute for Climate Impact Research, Germany
+% http://www.pik-potsdam.de
+%
+% Copyright (c) 2001-2008
 % Norbert Marwan, Potsdam University, Germany
 % http://www.agnld.uni-potsdam.de
 %
@@ -22,6 +26,9 @@ function [a_out, b_out]=dl(x)
 % $Revision$
 %
 % $Log$
+% Revision 3.3  2005/11/23 07:29:14  marwan
+% help text updated
+%
 % Revision 3.2  2005/03/16 11:19:02  marwan
 % help text modified
 %
diff --git a/entropy.m b/entropy.m
index 2f09bca..d6bce9b 100644
--- a/entropy.m
+++ b/entropy.m
@@ -5,7 +5,11 @@ function e=entropy(x)
 %
 %    See also MI.
 
-% Copyright (c) 1999-2001 by AMRON
+% Copyright (c) 2008-2009
+% Norbert Marwan, Potsdam Institute for Climate Impact Research, Germany
+% http://www.pik-potsdam.de
+%
+% Copyright (c) 1999-2008
 % Norbert Marwan, Potsdam University, Germany
 % http://www.agnld.uni-potsdam.de
 %
@@ -13,6 +17,9 @@ function e=entropy(x)
 % $Revision$
 %
 % $Log$
+% Revision 2.2  2005/04/06 12:58:08  marwan
+% changed from log2 to natural log
+%
 % Revision 2.1  2004/11/10 07:07:51  marwan
 % initial import
 %
diff --git a/erqa.m b/erqa.m
index b81e816..30f3a56 100644
--- a/erqa.m
+++ b/erqa.m
@@ -72,7 +72,11 @@ function xout=erqa(varargin)
 % % Don't use the results of this script!               %
 % %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 
-% Copyright (c) 1998-2003 by AMRON
+% Copyright (c) 2008-2009
+% Norbert Marwan, Potsdam Institute for Climate Impact Research, Germany
+% http://www.pik-potsdam.de
+%
+% Copyright (c) 1998-2008
 % Norbert Marwan, Potsdam University, Germany
 % http://www.agnld.uni-potsdam.de
 %
@@ -80,6 +84,9 @@ function xout=erqa(varargin)
 % $Revision$
 %
 % $Log$
+% Revision 1.11  2007/12/20 16:26:05  marwan
+% changed gpl splash behaviour
+%
 % Revision 1.10  2005/04/01 12:19:27  marwan
 % *** empty log message ***
 %
diff --git a/first.m b/first.m
index 07a16c7..d7bf271 100644
--- a/first.m
+++ b/first.m
@@ -6,7 +6,11 @@ function varargout=first(x)
 %    FIRST(...) without output arguments presents the result in
 %    a message box.
 
-% Copyright (c) 2001
+% Copyright (c) 2008-2009
+% Norbert Marwan, Potsdam Institute for Climate Impact Research, Germany
+% http://www.pik-potsdam.de
+%
+% Copyright (c) 1998-2008
 % Christian Hoennicke/ Norbert Marwan, Potsdam University, Germany
 % http://www.agnld.uni-potsdam.de
 %
@@ -14,6 +18,9 @@ function varargout=first(x)
 % $Revision$
 %
 % $Log$
+% Revision 2.1  2004/11/10 07:07:51  marwan
+% initial import
+%
 
 error(nargchk(0,3,nargin));
 if nargout>3, error('Too many output arguments'), end
diff --git a/french.m b/french.m
index 905aa1f..f8b31e0 100644
--- a/french.m
+++ b/french.m
@@ -13,7 +13,11 @@ function h = french(m,flag)
 %   See also HOT, HSV, GRAY, PINK, COOL, BONE, COPPER, FLAG, 
 %   COLORMAP, RGBPLOT.
 
-% Copyright (c) 2002 by AMRON
+% Copyright (c) 2008-2009
+% Norbert Marwan, Potsdam Institute for Climate Impact Research, Germany
+% http://www.pik-potsdam.de
+%
+% Copyright (c) 2002-2008
 % Norbert Marwan, Potsdam University, Germany
 % http://www.agnld.uni-potsdam.de
 %
@@ -21,6 +25,9 @@ function h = french(m,flag)
 % $Revision$
 %
 % $Log$
+% Revision 2.2  2006/03/16 13:52:43  marwan
+% code refreshed
+%
 % Revision 2.1  2004/11/10 07:07:51  marwan
 % initial import
 %
diff --git a/hist2.m b/hist2.m
index 7508937..82f6a29 100644
--- a/hist2.m
+++ b/hist2.m
@@ -25,7 +25,11 @@ function varargout=hist2(varargin)
 %
 %    See also HIST, HISTN, BAR3, MI.
 
-% Copyright (c) 2002-2007
+% Copyright (c) 2008-2009
+% Norbert Marwan, Potsdam Institute for Climate Impact Research, Germany
+% http://www.pik-potsdam.de
+%
+% Copyright (c) 2002-2008
 % Andre Sitz, Norbert Marwan, Potsdam University, Germany
 % http://www.agnld.uni-potsdam.de
 %
@@ -33,6 +37,9 @@ function varargout=hist2(varargin)
 % $Revision$
 %
 % $Log$
+% Revision 1.12  2007/12/20 16:26:05  marwan
+% changed gpl splash behaviour
+%
 % Revision 1.11  2007/05/25 13:02:48  marwan
 % some comments added
 %
diff --git a/histn.m b/histn.m
index 19b4a74..e0ad1ef 100644
--- a/histn.m
+++ b/histn.m
@@ -28,7 +28,11 @@ function varargout=histn(varargin)
 %
 %    See also HIST, HIST2, BAR3, MI.
 
-% Copyright (c) 2002-2007
+% Copyright (c) 2008-2009
+% Norbert Marwan, Potsdam Institute for Climate Impact Research, Germany
+% http://www.pik-potsdam.de
+%
+% Copyright (c) 1998-2008
 % Andre Sitz, Norbert Marwan, Potsdam University, Germany
 % http://www.agnld.uni-potsdam.de
 %
@@ -36,6 +40,9 @@ function varargout=histn(varargin)
 % $Revision$
 %
 % $Log$
+% Revision 1.12  2007/12/20 16:26:06  marwan
+% changed gpl splash behaviour
+%
 % Revision 1.11  2007/05/25 13:02:24  marwan
 % *** empty log message ***
 %
diff --git a/jrp.m b/jrp.m
index d4dedbe..49de3c2 100644
--- a/jrp.m
+++ b/jrp.m
@@ -73,7 +73,11 @@ function xout=jrp(varargin)
 %    Romano, M., Thiel, M., Kurths, J., von Bloh, W.: 
 %    Multivariate Recurrence Plots, Phys. Lett. A , 330, 2004.
 
-% Copyright (c) 2004-2007 by AMRON
+% Copyright (c) 2008-2009
+% Norbert Marwan, Potsdam Institute for Climate Impact Research, Germany
+% http://www.pik-potsdam.de
+%
+% Copyright (c) 2004-2008
 % Norbert Marwan, Potsdam University, Germany
 % http://www.agnld.uni-potsdam.de
 %
@@ -81,6 +85,9 @@ function xout=jrp(varargin)
 % $Revision$
 %
 % $Log$
+% Revision 2.8  2007/12/20 16:27:33  marwan
+% changed gpl splash behaviour
+%
 % Revision 2.7  2007/07/18 17:18:44  marwan
 % integer values in the arguments supported
 %
diff --git a/jrqa.m b/jrqa.m
index bf47384..adef7ac 100644
--- a/jrqa.m
+++ b/jrqa.m
@@ -116,7 +116,11 @@ function xout=jrqa(varargin)
 %    Romano, M., Thiel, M., Kurths, J., von Bloh, W.: 
 %    Multivariate Recurrence Plots, Phys. Lett. A , 330, 2004.
 
-% Copyright (c) 1998-2007 by AMRON
+% Copyright (c) 2008-2009
+% Norbert Marwan, Potsdam Institute for Climate Impact Research, Germany
+% http://www.pik-potsdam.de
+%
+% Copyright (c) 1998-2008
 % Norbert Marwan, Potsdam University, Germany
 % http://www.agnld.uni-potsdam.de
 %
@@ -124,6 +128,9 @@ function xout=jrqa(varargin)
 % $Revision$
 %
 % $Log$
+% Revision 2.6  2007/07/18 17:18:44  marwan
+% integer values in the arguments supported
+%
 % Revision 2.5  2007/05/15 17:33:13  marwan
 % new neighbourhood criterion: fixed RR
 %
diff --git a/mcf.m b/mcf.m
index 01c2f10..1d8011f 100644
--- a/mcf.m
+++ b/mcf.m
@@ -26,7 +26,11 @@ function [a_out, b_out]=mcf(x,y,w,T)
 %
 %    See also: ACE
 
-% Copyright (c) 2001-2004 by AMRON
+% Copyright (c) 2008-2009
+% Norbert Marwan, Potsdam Institute for Climate Impact Research, Germany
+% http://www.pik-potsdam.de
+%
+% Copyright (c) 2001-2008
 % Norbert Marwan, Potsdam University, Germany
 % http://www.agnld.uni-potsdam.de
 %
@@ -34,6 +38,9 @@ function [a_out, b_out]=mcf(x,y,w,T)
 % $Revision$
 %
 % $Log$
+% Revision 1.10  2007/12/20 16:26:06  marwan
+% changed gpl splash behaviour
+%
 % Revision 1.9  2005/03/16 11:19:02  marwan
 % help text modified
 %
diff --git a/mgui.m b/mgui.m
index ff7d8f5..4cbced7 100755
--- a/mgui.m
+++ b/mgui.m
@@ -18,16 +18,21 @@ function mgui(action)
 %
 %    See also MGUICLEAN.
 
-% Copyright (c) 2002-2006 by 
-%         AGNLD, Institute of Physics
-%         Potsdam University, Germany
-%         Christian Hoennicke, Norbert Marwan, Andre Sitz
-%         http://www.agnld.uni-potsdam.de
+% Copyright (c) 2008-2009
+% Norbert Marwan, Potsdam Institute for Climate Impact Research, Germany
+% http://www.pik-potsdam.de
+%
+% Copyright (c) 2002-2008
+% Christian Hoennicke, Norbert Marwan, Andre Sitz, Potsdam University, Germany
+% http://www.agnld.uni-potsdam.de
 %
 % $Date$
 % $Revision$
 %
 % $Log$
+% Revision 1.12  2006/03/29 13:07:55  marwan
+% problems regarding OPRPs and embedding resolved
+%
 % Revision 1.11  2006/03/16 14:55:57  marwan
 % code flattened
 %
diff --git a/mi.m b/mi.m
index 33c403d..21fa19f 100644
--- a/mi.m
+++ b/mi.m
@@ -48,7 +48,11 @@ function varargout=mi(varargin)
 %    Estimating the errors on measured entropy and mutual 
 %    information, Physica D, 125, 1999.
 
-% Copyright (c) 2002-2006
+% Copyright (c) 2008-2009
+% Norbert Marwan, Potsdam Institute for Climate Impact Research, Germany
+% http://www.pik-potsdam.de
+%
+% Copyright (c) 2002-2008
 % Andre Sitz/ Norbert Marwan, Potsdam University, Germany
 % http://www.agnld.uni-potsdam.de
 %
@@ -56,6 +60,9 @@ function varargout=mi(varargin)
 % $Revision$
 %
 % $Log$
+% Revision 3.13  2007/12/20 16:26:06  marwan
+% changed gpl splash behaviour
+%
 % Revision 3.12  2007/07/17 09:04:38  marwan
 % bug for single data series resolved
 %
@@ -628,8 +635,8 @@ if 0
     fprintf(fid,'%s\n','Please send us the following error report. Provide a brief');
     fprintf(fid,'%s\n','description of what you were doing when this problem occurred.');
     fprintf(fid,'%s\n','E-mail or FAX this information to us at:');
-    fprintf(fid,'%s\n','    E-mail:  marwan@agnld.uni-potsdam.de');
-    fprintf(fid,'%s\n','       Fax:  ++49 +331 977 1142');
+    fprintf(fid,'%s\n','    E-mail:  marwan@pik-potsdam.de');
+    fprintf(fid,'%s\n','       Fax:  ++49 +331 288 2640');
     fprintf(fid,'%s\n\n\n','Thank you for your assistance.');
     fprintf(fid,'%s\n',repmat('-',50,1));
     fprintf(fid,'%s\n',datestr(now,0));
@@ -678,8 +685,8 @@ if 0
     disp('   Provide a brief description of what you were doing when ')
     disp('   this problem occurred.'), disp(' ')
     disp('   E-mail or FAX this information to us at:')
-    disp('       E-mail:  marwan@agnld.uni-potsdam.de')
-    disp('          Fax:  ++49 +331 977 1142'), disp(' ')
+    disp('       E-mail:  marwan@pik-potsdam.de')
+    disp('          Fax:  ++49 +331 288 2640'), disp(' ')
     disp('   Thank you for your assistance.')
     warning('on')
   end
diff --git a/migram.m b/migram.m
index f393dc1..d9f202a 100644
--- a/migram.m
+++ b/migram.m
@@ -44,7 +44,11 @@ function [c_out, l_out, t_out] = migram(varargin)
 %
 %   See also MI, CORRGRAM.
 
-% Copyright (c) 2007 by AMRON
+% Copyright (c) 2008-2009
+% Norbert Marwan, Potsdam Institute for Climate Impact Research, Germany
+% http://www.pik-potsdam.de
+%
+% Copyright (c) 2007-2008
 % Norbert Marwan, Potsdam University, Germany
 % http://www.agnld.uni-potsdam.de
 %
diff --git a/normalize.m b/normalize.m
index d5f0ac7..3de2192 100644
--- a/normalize.m
+++ b/normalize.m
@@ -3,7 +3,11 @@ function y=normalize(x)
 %   Y=NORMALIZE(X) normalizes the matrix X to zero-mean and
 %   standard deviation one (Y=(X-mean(X))/std(X)).
 
-% Copyright (c) 1998-2001 by AMRON
+% Copyright (c) 2008-2009
+% Norbert Marwan, Potsdam Institute for Climate Impact Research, Germany
+% http://www.pik-potsdam.de
+%
+% Copyright (c) 1998-2008
 % Norbert Marwan, Potsdam University, Germany
 % http://www.agnld.uni-potsdam.de
 %
@@ -11,6 +15,9 @@ function y=normalize(x)
 % $Revision$
 %
 % $Log$
+% Revision 2.1  2004/11/10 07:07:51  marwan
+% initial import
+%
 %
 % This program is free software; you can redistribute it and/or
 % modify it under the terms of the GNU General Public License
diff --git a/phasespace.m b/phasespace.m
index 9e549fc..ec5980e 100644
--- a/phasespace.m
+++ b/phasespace.m
@@ -28,7 +28,11 @@ function phasespace(varargin)
 %    Detecting Strange Attractors in Turbulence,
 %    Lecture Notes in Mathematics, 898, Springer, Berlin, 1981
 
-% Copyright (c) 2002-2006 by AMRON
+% Copyright (c) 2008-2009
+% Norbert Marwan, Potsdam Institute for Climate Impact Research, Germany
+% http://www.pik-potsdam.de
+%
+% Copyright (c) 2002-2008
 % Norbert Marwan, Potsdam University, Germany
 % http://www.agnld.uni-potsdam.de
 %
@@ -36,6 +40,9 @@ function phasespace(varargin)
 % $Revision$
 %
 % $Log$
+% Revision 2.4  2007/12/20 16:26:06  marwan
+% changed gpl splash behaviour
+%
 % Revision 2.3  2006/03/29 13:07:55  marwan
 % problems regarding OPRPs and embedding resolved
 %
diff --git a/phasesynchro.m b/phasesynchro.m
index ffc39e2..62bf773 100644
--- a/phasesynchro.m
+++ b/phasesynchro.m
@@ -52,7 +52,11 @@ function CPRout = phasesynchro(varargin);
 %    Detection of synchronization for non-phase-coherent and 
 %    non-stationary data, Europhysics Letters, 71(3), 2005.
 
-% Copyright (c) 2008 by AMRON
+% Copyright (c) 2008-2009
+% Norbert Marwan, Potsdam Institute for Climate Impact Research, Germany
+% http://www.pik-potsdam.de
+%
+% Copyright (c) 2008
 % Norbert Marwan, Potsdam University, Germany
 % http://www.agnld.uni-potsdam.de
 %
@@ -60,6 +64,9 @@ function CPRout = phasesynchro(varargin);
 % $Revision$
 %
 % $Log$
+% Revision 5.3  2008/07/01 11:36:05  marwan
+% bug in embedding dimension fixed
+%
 % Revision 5.2  2008/04/29 14:49:30  marwan
 % window size bug
 %
diff --git a/pss.m b/pss.m
index 20a41d4..9a64d53 100644
--- a/pss.m
+++ b/pss.m
@@ -13,7 +13,11 @@ function [a_out, b_out]=pss(varargin)
 %
 %    See also PHASESPACE, CRP, CRQA.
 
-% Copyright (c) 1998-2003 by AMRON
+% Copyright (c) 2008-2009
+% Norbert Marwan, Potsdam Institute for Climate Impact Research, Germany
+% http://www.pik-potsdam.de
+%
+% Copyright (c) 1998-2008
 % Norbert Marwan, Potsdam University, Germany
 % http://www.agnld.uni-potsdam.de
 %
@@ -21,6 +25,9 @@ function [a_out, b_out]=pss(varargin)
 % $Revision$
 %
 % $Log$
+% Revision 2.1  2004/11/10 07:10:06  marwan
+% initial import
+%
 %
 % This program is free software; you can redistribute it and/or
 % modify it under the terms of the GNU General Public License
diff --git a/recons.m b/recons.m
index 2cd16f7..25b46f9 100644
--- a/recons.m
+++ b/recons.m
@@ -10,14 +10,18 @@ function varargout=recons(varargin)
 %    Y = RECONS(X,P) reconstructs the time series using
 %    the cumulative distribution function given by vector P.
 %
-%    See also CRP, CRP2, JRP.
+%    See also CRP, CRP2, JRP, TWINSURR.
 %
 %    References: 
 %    Thiel, M., Romano, M. C., Kurths, J.: 
 %    How much information is contained in a recurrence plot?, 
 %    Phys. Lett. A, 330, 2004.
 
-% Copyright (c) 2005-2006 by AMRON
+% Copyright (c) 2008-2009
+% Norbert Marwan, Potsdam Institute for Climate Impact Research, Germany
+% http://www.pik-potsdam.de
+%
+% Copyright (c) 2005-2008
 % Norbert Marwan, Potsdam University, Germany
 % http://www.agnld.uni-potsdam.de
 %
@@ -25,6 +29,9 @@ function varargout=recons(varargin)
 % $Revision$
 %
 % $Log$
+% Revision 5.2  2008/06/24 14:11:55  marwan
+% Including of a abort condition in order to avoid infinite loops.
+%
 % Revision 5.1  2008/01/25 12:47:25  marwan
 % initial import
 %
@@ -194,8 +201,8 @@ catch
     err=fprintf(fid,'%s\n','Please send us the following error report. Provide a brief');
     err=fprintf(fid,'%s\n','description of what you were doing when this problem occurred.');
     err=fprintf(fid,'%s\n','E-mail or FAX this information to us at:');
-    err=fprintf(fid,'%s\n','    E-mail:  marwan@agnld.uni-potsdam.de');
-    err=fprintf(fid,'%s\n','       Fax:  ++49 +331 977 1142');
+    err=fprintf(fid,'%s\n','    E-mail:  marwan@pik-potsdam.de');
+    err=fprintf(fid,'%s\n','       Fax:  ++49 +331 288 2640');
     err=fprintf(fid,'%s\n\n\n','Thank you for your assistance.');
     err=fprintf(fid,'%s\n',repmat('-',50,1));
     err=fprintf(fid,'%s\n',datestr(now,0));
@@ -227,8 +234,8 @@ catch
     disp('   Provide a brief description of what you were doing when ')
     disp('   this problem occurred.'), disp(' ')
     disp('   E-mail or FAX this information to us at:')
-    disp('       E-mail:  marwan@agnld.uni-potsdam.de')
-    disp('          Fax:  ++49 +331 977 1142'), disp(' ')
+    disp('       E-mail:  marwan@pik-potsdam.de')
+    disp('          Fax:  ++49 +331 288 2640'), disp(' ')
     disp('   Thank you for your assistance.')
     warning('on')
   end
diff --git a/taucrp.m b/taucrp.m
index 57c178f..d404136 100644
--- a/taucrp.m
+++ b/taucrp.m
@@ -45,7 +45,11 @@ function X = taucrp(varargin)
 %    Recurrence Plots for the Analysis of Complex Systems, Physics 
 %    Reports, 438(5-6), 2007.
 
-% Copyright (c) 2008 by AMRON
+% Copyright (c) 2008-2009
+% Norbert Marwan, Potsdam Institute for Climate Impact Research, Germany
+% http://www.pik-potsdam.de
+%
+% Copyright (c) 2008
 % Norbert Marwan, Potsdam University, Germany
 % http://www.agnld.uni-potsdam.de
 %
@@ -53,6 +57,9 @@ function X = taucrp(varargin)
 % $Revision$
 %
 % $Log$
+% Revision 5.1  2008/01/25 12:47:26  marwan
+% initial import
+%
 
 
 warning off
diff --git a/trackplot.m b/trackplot.m
index fc085ad..d2c5f92 100644
--- a/trackplot.m
+++ b/trackplot.m
@@ -33,7 +33,11 @@ function [tout, Nout] = trackplot(varargin)
 %    Marwan, N., Thiel, M., Nowaczyk, N.: Cross Recurrence Plot Based 
 %    Synchronization of Time Series, Nonlin. Proc. Geophys., 2001.
 
-% Copyright (c) 1998-2005 by AMRON
+% Copyright (c) 2008-2009
+% Norbert Marwan, Potsdam Institute for Climate Impact Research, Germany
+% http://www.pik-potsdam.de
+%
+% Copyright (c) 1998-2008
 % Norbert Marwan, Falko Zetsche, Potsdam University, Germany
 % http://www.agnld.uni-potsdam.de
 %
@@ -41,6 +45,9 @@ function [tout, Nout] = trackplot(varargin)
 % $Revision$
 %
 % $Log$
+% Revision 4.11  2007/12/20 16:26:06  marwan
+% changed gpl splash behaviour
+%
 % Revision 4.10  2005/11/09 08:58:30  marwan
 % bug fix in interdependent neighbours method
 %
diff --git a/trafo.m b/trafo.m
index 047195b..28fce1e 100644
--- a/trafo.m
+++ b/trafo.m
@@ -11,7 +11,11 @@ function y=trafo(x,a)
 %             y = trafo(x,0); 
 %             subplot(2,1,2), hist(y,20)   % normally distributed
 
-% Copyright (c) 2001-2002 by AMRON
+% Copyright (c) 2008-2009
+% Norbert Marwan, Potsdam Institute for Climate Impact Research, Germany
+% http://www.pik-potsdam.de
+%
+% Copyright (c) 2001-2008
 % Norbert Marwan, Potsdam University, Germany
 % http://www.agnld.uni-potsdam.de
 %
@@ -19,6 +23,9 @@ function y=trafo(x,a)
 % $Revision$
 %
 % $Log$
+% Revision 2.2  2005/03/16 11:19:02  marwan
+% help text modified
+%
 % Revision 2.1  2004/11/10 07:09:23  marwan
 % initial import
 %
diff --git a/tt.m b/tt.m
index 83c9373..7e7bc5a 100644
--- a/tt.m
+++ b/tt.m
@@ -15,7 +15,11 @@ function [a_out, b_out, c_out]=tt(x)
 %
 %    See also CRQA, DL.
 
-% Copyright (c) 2001-2003 by AMRON
+% Copyright (c) 2008-2009
+% Norbert Marwan, Potsdam Institute for Climate Impact Research, Germany
+% http://www.pik-potsdam.de
+%
+% Copyright (c) 2001-2008
 % Norbert Marwan, Potsdam University, Germany
 % http://www.agnld.uni-potsdam.de
 %
@@ -23,6 +27,9 @@ function [a_out, b_out, c_out]=tt(x)
 % $Revision$
 %
 % $Log$
+% Revision 3.5  2008/04/29 14:50:06  marwan
+% fixed problem of empty RP
+%
 % Revision 3.4  2007/12/20 16:26:57  marwan
 % includes also white vertical lines
 %
diff --git a/twinsurr.m b/twinsurr.m
index 640e656..1ba0925 100644
--- a/twinsurr.m
+++ b/twinsurr.m
@@ -28,7 +28,11 @@ function [y nTw] = twinsurr(varargin)
 %    Twin Surrogates to Test for Complex Synchronisation, 
 %    Europhys. Lett., 75, 2006.
 
-% Copyright (c) 2008 by AMRON
+% Copyright (c) 2008-2009
+% Norbert Marwan, Potsdam Institute for Climate Impact Research, Germany
+% http://www.pik-potsdam.de
+%
+% Copyright (c) 2008
 % Norbert Marwan, Potsdam University, Germany
 % http://www.agnld.uni-potsdam.de
 %
@@ -36,6 +40,9 @@ function [y nTw] = twinsurr(varargin)
 % $Revision$
 %
 % $Log$
+% Revision 5.3  2009/03/17 09:18:17  marwan
+% serious bug fix, zero columns were also considered as twins!
+%
 % Revision 5.2  2008/07/02 12:00:48  marwan
 % silent ability added, minor bug fixes
 %
diff --git a/winplot.m b/winplot.m
index d12ed1b..7a2e51f 100644
--- a/winplot.m
+++ b/winplot.m
@@ -24,7 +24,11 @@ function out=winplot(varargin)
 %
 %    See also PLOT.
 
-% Copyright (c) 2002-2006 by AMRON
+% Copyright (c) 2008-2009
+% Norbert Marwan, Potsdam Institute for Climate Impact Research, Germany
+% http://www.pik-potsdam.de
+%
+% Copyright (c) 2002-2008
 % Norbert Marwan, Potsdam University, Germany
 % http://www.agnld.uni-potsdam.de
 %
@@ -32,6 +36,9 @@ function out=winplot(varargin)
 % $Revision$
 %
 % $Log$
+% Revision 2.5  2007/12/20 16:26:07  marwan
+% changed gpl splash behaviour
+%
 % Revision 2.4  2006/02/14 11:45:59  marwan
 % *** empty log message ***
 %
@@ -497,8 +504,8 @@ catch
     err=fprintf(fid,'%s\n','Please send us the following error report. Provide a brief');
     err=fprintf(fid,'%s\n','description of what you were doing when this problem occurred.');
     err=fprintf(fid,'%s\n','E-mail or FAX this information to us at:');
-    err=fprintf(fid,'%s\n','    E-mail:  marwan@agnld.uni-potsdam.de');
-    err=fprintf(fid,'%s\n','       Fax:  ++49 +331 977 1142');
+    err=fprintf(fid,'%s\n','    E-mail:  marwan@pik-potsdam.de');
+    err=fprintf(fid,'%s\n','       Fax:  ++49 +331 288 2640');
     err=fprintf(fid,'%s\n\n\n','Thank you for your assistance.');
     err=fprintf(fid,'%s\n',repmat('-',50,1));
     err=fprintf(fid,'%s\n',datestr(now,0));
@@ -531,8 +538,8 @@ catch
     disp('   Provide a brief description of what you were doing when ')
     disp('   this problem occurred.'), disp(' ')
     disp('   E-mail or FAX this information to us at:')
-    disp('       E-mail:  marwan@agnld.uni-potsdam.de')
-    disp('          Fax:  ++49 +331 977 1142'), disp(' ')
+    disp('       E-mail:  marwan@pik-potsdam.de')
+    disp('          Fax:  ++49 +331 288 2640'), disp(' ')
     disp('   Thank you for your assistance.')
     warning('on')
   end
diff --git a/xcf.m b/xcf.m
index 400a8f6..d25eff8 100644
--- a/xcf.m
+++ b/xcf.m
@@ -7,7 +7,11 @@ function [c_out,s_out]=xcf(varargin)
 %
 %    See also COR, COV, XCORR, ACF
 
-% Copyright (c) 2001-2002 by AMRON
+% Copyright (c) 2008-2009
+% Norbert Marwan, Potsdam Institute for Climate Impact Research, Germany
+% http://www.pik-potsdam.de
+%
+% Copyright (c) 2001-2008
 % Norbert Marwan, Potsdam University, Germany
 % http://www.agnld.uni-potsdam.de
 %
@@ -15,6 +19,9 @@ function [c_out,s_out]=xcf(varargin)
 % $Revision$
 %
 % $Log$
+% Revision 2.2  2007/12/20 16:26:07  marwan
+% changed gpl splash behaviour
+%
 % Revision 2.1  2004/11/10 07:09:40  marwan
 % initial import
 %
-- 
GitLab