Commit bb60dca7 authored by thomas.forbriger's avatar thomas.forbriger Committed by thomas.forbriger
Browse files

added GPL phrase to a lot of files

This is a legacy commit from before 2015-03-01.
It may be incomplete as well as inconsistent.
See COPYING.legacy and README.history for details.


SVN Path:     http://gpitrsvn.gpi.uni-karlsruhe.de/repos/TFSoftware/trunk
SVN Revision: 3599
SVN UUID:     67feda4a-a26e-11df-9d6e-31afc202ad0c
parent 3edd9b4f
c this is <mod_copy.f> c this is <mod_copy.f>
c------------------------------------------------------------------------------ c------------------------------------------------------------------------------
c $Id$
c c
c 24/03/98 by Thomas Forbriger (IfG Stuttgart) c Copyright 1998, 2010 by Thomas Forbriger (IfG Stuttgart)
c c
c PURPOSE c ----
c This program is free software; you can redistribute it and/or modify
c it under the terms of the GNU General Public License as published by
c the Free Software Foundation; either version 2 of the License, or
c (at your option) any later version.
c
c This program is distributed in the hope that it will be useful,
c but WITHOUT ANY WARRANTY; without even the implied warranty of
c MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
c GNU General Public License for more details.
c
c You should have received a copy of the GNU General Public License
c along with this program; if not, write to the Free Software
c Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
c ----
c c
c REVISIONS and CHANGES c REVISIONS and CHANGES
c 24/03/98 V1.0 Thomas Forbriger c 24/03/98 V1.0 Thomas Forbriger
......
c this is <mod_eval.f> c this is <mod_eval.f>
c------------------------------------------------------------------------------ c------------------------------------------------------------------------------
cS cS
c $Id$
c c
c 03/03/99 by Thomas Forbriger (IfG Stuttgart) c Copyright 1999, 2010 by Thomas Forbriger (IfG Stuttgart)
c c
c evaluate polynomial model description at any depth c evaluate polynomial model description at any depth
c c
c ----
c This program is free software; you can redistribute it and/or modify
c it under the terms of the GNU General Public License as published by
c the Free Software Foundation; either version 2 of the License, or
c (at your option) any later version.
c
c This program is distributed in the hope that it will be useful,
c but WITHOUT ANY WARRANTY; without even the implied warranty of
c MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
c GNU General Public License for more details.
c
c You should have received a copy of the GNU General Public License
c along with this program; if not, write to the Free Software
c Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
c ----
c
c 11.2.2010: changed definition of a(3) return value c 11.2.2010: changed definition of a(3) return value
c I understand that a(2) should be the first derivative and a(3) should be the c I understand that a(2) should be the first derivative and a(3) should be the
c second derivative. This was not the case. I assume that this was a c second derivative. This was not the case. I assume that this was a
......
c this is <mod_follow.f> c this is <mod_follow.f>
c------------------------------------------------------------------------------ c------------------------------------------------------------------------------
cS cS
c $Id$
c c
c 24/03/98 by Thomas Forbriger (IfG Stuttgart) c Copyright 1998, 2010 by Thomas Forbriger (IfG Stuttgart)
c c
c make a section parameter follow its lower neighbour c make a section parameter follow its lower neighbour
c c
c ----
c This program is free software; you can redistribute it and/or modify
c it under the terms of the GNU General Public License as published by
c the Free Software Foundation; either version 2 of the License, or
c (at your option) any later version.
c
c This program is distributed in the hope that it will be useful,
c but WITHOUT ANY WARRANTY; without even the implied warranty of
c MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
c GNU General Public License for more details.
c
c You should have received a copy of the GNU General Public License
c along with this program; if not, write to the Free Software
c Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
c ----
c
c REVISIONS and CHANGES c REVISIONS and CHANGES
c 24/03/98 V1.0 Thomas Forbriger c 24/03/98 V1.0 Thomas Forbriger
c 13/01/99 V2.0 model definition changed (see glq_model.inc) c 13/01/99 V2.0 model definition changed (see glq_model.inc)
......
...@@ -2,9 +2,25 @@ c this is <mod_follow1.f> ...@@ -2,9 +2,25 @@ c this is <mod_follow1.f>
c this was <mod_follow.f> c this was <mod_follow.f>
c------------------------------------------------------------------------------ c------------------------------------------------------------------------------
cS cS
c $Id$
c c
c 24/03/98 by Thomas Forbriger (IfG Stuttgart) c Copyright 1998, 2010 by Thomas Forbriger (IfG Stuttgart)
c 13/01/99 by Thomas Forbriger (IfG Stuttgart) c
c ----
c This program is free software; you can redistribute it and/or modify
c it under the terms of the GNU General Public License as published by
c the Free Software Foundation; either version 2 of the License, or
c (at your option) any later version.
c
c This program is distributed in the hope that it will be useful,
c but WITHOUT ANY WARRANTY; without even the implied warranty of
c MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
c GNU General Public License for more details.
c
c You should have received a copy of the GNU General Public License
c along with this program; if not, write to the Free Software
c Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
c ----
c c
c make a section parameter follow its lower neighbour c make a section parameter follow its lower neighbour
c c
......
c this is <mod_identify.f> c this is <mod_identify.f>
c------------------------------------------------------------------------------ c------------------------------------------------------------------------------
cS cS
c $Id$
c c
c 08/04/98 by Thomas Forbriger (IfG Stuttgart) c Copyright 1998, 2010 by Thomas Forbriger (IfG Stuttgart)
c c
c identify anonymous model parameter c identify anonymous model parameter
c c
c ----
c This program is free software; you can redistribute it and/or modify
c it under the terms of the GNU General Public License as published by
c the Free Software Foundation; either version 2 of the License, or
c (at your option) any later version.
c
c This program is distributed in the hope that it will be useful,
c but WITHOUT ANY WARRANTY; without even the implied warranty of
c MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
c GNU General Public License for more details.
c
c You should have received a copy of the GNU General Public License
c along with this program; if not, write to the Free Software
c Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
c ----
c
c REVISIONS and CHANGES c REVISIONS and CHANGES
c 08/04/98 V1.0 Thomas Forbriger c 08/04/98 V1.0 Thomas Forbriger
c 14/01/99 V1.1 model definition changed (see glq_model.inc) c 14/01/99 V1.1 model definition changed (see glq_model.inc)
......
c this is <mod_isec.f> c this is <mod_isec.f>
c------------------------------------------------------------------------------ c------------------------------------------------------------------------------
cS cS
c $Id$
c c
c 24/03/98 by Thomas Forbriger (IfG Stuttgart) c Copyright 1998, 2010 by Thomas Forbriger (IfG Stuttgart)
c c
c return section index containing depth in model c return section index containing depth in model
c c
c ----
c This program is free software; you can redistribute it and/or modify
c it under the terms of the GNU General Public License as published by
c the Free Software Foundation; either version 2 of the License, or
c (at your option) any later version.
c
c This program is distributed in the hope that it will be useful,
c but WITHOUT ANY WARRANTY; without even the implied warranty of
c MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
c GNU General Public License for more details.
c
c You should have received a copy of the GNU General Public License
c along with this program; if not, write to the Free Software
c Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
c ----
c
c REVISIONS and CHANGES c REVISIONS and CHANGES
c 24/03/98 V1.0 Thomas Forbriger c 24/03/98 V1.0 Thomas Forbriger
c 13/01/99 V2.0 model definition changed (see glq_model.inc) c 13/01/99 V2.0 model definition changed (see glq_model.inc)
......
c this is <mod_oldhead.f> c this is <mod_oldhead.f>
c------------------------------------------------------------------------------ c------------------------------------------------------------------------------
cS cS
c $Id$
c c
c 28/11/97 by Thomas Forbriger (IfG Stuttgart) c Copyright 1997, 2010 by Thomas Forbriger (IfG Stuttgart)
c c
c all model manipulation routines for least squares c all model manipulation routines for least squares
c c
c ----
c This program is free software; you can redistribute it and/or modify
c it under the terms of the GNU General Public License as published by
c the Free Software Foundation; either version 2 of the License, or
c (at your option) any later version.
c
c This program is distributed in the hope that it will be useful,
c but WITHOUT ANY WARRANTY; without even the implied warranty of
c MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
c GNU General Public License for more details.
c
c You should have received a copy of the GNU General Public License
c along with this program; if not, write to the Free Software
c Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
c ----
c
c REVISIONS and CHANGES c REVISIONS and CHANGES
c 28/11/97 V1.0 Thomas Forbriger c 28/11/97 V1.0 Thomas Forbriger
c 03/12/97 V1.1 - mod_clear c 03/12/97 V1.1 - mod_clear
......
c this is <mod_panic.f> c this is <mod_panic.f>
c------------------------------------------------------------------------------ c------------------------------------------------------------------------------
c $Id$
c c
c 24/03/98 by Thomas Forbriger (IfG Stuttgart) c Copyright 1998, 2010 by Thomas Forbriger (IfG Stuttgart)
c c
c PURPOSE c ----
c This program is free software; you can redistribute it and/or modify
c it under the terms of the GNU General Public License as published by
c the Free Software Foundation; either version 2 of the License, or
c (at your option) any later version.
c
c This program is distributed in the hope that it will be useful,
c but WITHOUT ANY WARRANTY; without even the implied warranty of
c MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
c GNU General Public License for more details.
c
c You should have received a copy of the GNU General Public License
c along with this program; if not, write to the Free Software
c Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
c ----
c c
c REVISIONS and CHANGES c REVISIONS and CHANGES
c 24/03/98 V1.0 Thomas Forbriger c 24/03/98 V1.0 Thomas Forbriger
......
...@@ -3,7 +3,23 @@ c------------------------------------------------------------------------------ ...@@ -3,7 +3,23 @@ c------------------------------------------------------------------------------
cS cS
c $Id$ c $Id$
c c
c 24/03/98 by Thomas Forbriger (IfG Stuttgart) c Copyright 1998, 2010 by Thomas Forbriger (IfG Stuttgart)
c
c ----
c This program is free software; you can redistribute it and/or modify
c it under the terms of the GNU General Public License as published by
c the Free Software Foundation; either version 2 of the License, or
c (at your option) any later version.
c
c This program is distributed in the hope that it will be useful,
c but WITHOUT ANY WARRANTY; without even the implied warranty of
c MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
c GNU General Public License for more details.
c
c You should have received a copy of the GNU General Public License
c along with this program; if not, write to the Free Software
c Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
c ----
c c
c apply anonymous parameters to named polynomial model c apply anonymous parameters to named polynomial model
c c
......
...@@ -2,9 +2,25 @@ c this is <mod_parcor1.f> ...@@ -2,9 +2,25 @@ c this is <mod_parcor1.f>
c this was <mod_parcor.f> c this was <mod_parcor.f>
c------------------------------------------------------------------------------ c------------------------------------------------------------------------------
cS cS
c $Id$
c c
c 24/03/98 by Thomas Forbriger (IfG Stuttgart) c Copyright 1998, 2010 by Thomas Forbriger (IfG Stuttgart)
c 14/01/99 by Thomas Forbriger (IfG Stuttgart) c
c ----
c This program is free software; you can redistribute it and/or modify
c it under the terms of the GNU General Public License as published by
c the Free Software Foundation; either version 2 of the License, or
c (at your option) any later version.
c
c This program is distributed in the hope that it will be useful,
c but WITHOUT ANY WARRANTY; without even the implied warranty of
c MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
c GNU General Public License for more details.
c
c You should have received a copy of the GNU General Public License
c along with this program; if not, write to the Free Software
c Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
c ----
c c
c apply anonymous parameters to named polynomial model c apply anonymous parameters to named polynomial model
c c
......
c this is <mod_pcheck.f> c this is <mod_pcheck.f>
c------------------------------------------------------------------------------ c------------------------------------------------------------------------------
cS cS
c $Id$
c c
c 24/03/98 by Thomas Forbriger (IfG Stuttgart) c Copyright 1998, 2010 by Thomas Forbriger (IfG Stuttgart)
c c
c check polynomial model section depth c check polynomial model section depth
c c
c ----
c This program is free software; you can redistribute it and/or modify
c it under the terms of the GNU General Public License as published by
c the Free Software Foundation; either version 2 of the License, or
c (at your option) any later version.
c
c This program is distributed in the hope that it will be useful,
c but WITHOUT ANY WARRANTY; without even the implied warranty of
c MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
c GNU General Public License for more details.
c
c You should have received a copy of the GNU General Public License
c along with this program; if not, write to the Free Software
c Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
c ----
c
c REVISIONS and CHANGES c REVISIONS and CHANGES
c 24/03/98 V1.0 Thomas Forbriger c 24/03/98 V1.0 Thomas Forbriger
c c
......
c this is <mod_prep.f> c this is <mod_prep.f>
c------------------------------------------------------------------------------ c------------------------------------------------------------------------------
c $Id$
c c
c 24/03/98 by Thomas Forbriger (IfG Stuttgart) c Copyright 1998, 2010 by Thomas Forbriger (IfG Stuttgart)
c c
c PURPOSE c ----
c This program is free software; you can redistribute it and/or modify
c it under the terms of the GNU General Public License as published by
c the Free Software Foundation; either version 2 of the License, or
c (at your option) any later version.
c
c This program is distributed in the hope that it will be useful,
c but WITHOUT ANY WARRANTY; without even the implied warranty of
c MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
c GNU General Public License for more details.
c
c You should have received a copy of the GNU General Public License
c along with this program; if not, write to the Free Software
c Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
c ----
c c
c REVISIONS and CHANGES c REVISIONS and CHANGES
c 24/03/98 V1.0 Thomas Forbriger c 24/03/98 V1.0 Thomas Forbriger
......
...@@ -3,7 +3,23 @@ c------------------------------------------------------------------------------ ...@@ -3,7 +3,23 @@ c------------------------------------------------------------------------------
cS cS
c $Id$ c $Id$
c c
c 24/03/98 by Thomas Forbriger (IfG Stuttgart) c Copyright 1998, 2010 by Thomas Forbriger (IfG Stuttgart)
c
c ----
c This program is free software; you can redistribute it and/or modify
c it under the terms of the GNU General Public License as published by
c the Free Software Foundation; either version 2 of the License, or
c (at your option) any later version.
c
c This program is distributed in the hope that it will be useful,
c but WITHOUT ANY WARRANTY; without even the implied warranty of
c MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
c GNU General Public License for more details.
c
c You should have received a copy of the GNU General Public License
c along with this program; if not, write to the Free Software
c Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
c ----
c c
c read a polynomial model from file c read a polynomial model from file
c c
......
...@@ -2,9 +2,25 @@ c this is <mod_read1.f> ...@@ -2,9 +2,25 @@ c this is <mod_read1.f>
c this was <mod_read.f> c this was <mod_read.f>
c------------------------------------------------------------------------------ c------------------------------------------------------------------------------
cS cS
c $Id$
c c
c 24/03/98 by Thomas Forbriger (IfG Stuttgart) c Copyright 1998, 2010 by Thomas Forbriger (IfG Stuttgart)
c 14/01/99 by Thomas Forbriger (IfG Stuttgart) c
c ----
c This program is free software; you can redistribute it and/or modify
c it under the terms of the GNU General Public License as published by
c the Free Software Foundation; either version 2 of the License, or
c (at your option) any later version.
c
c This program is distributed in the hope that it will be useful,
c but WITHOUT ANY WARRANTY; without even the implied warranty of
c MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
c GNU General Public License for more details.
c
c You should have received a copy of the GNU General Public License
c along with this program; if not, write to the Free Software
c Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
c ----
c c
c read a named model from file c read a named model from file
c c
......
c this is <mod_save.f> c this is <mod_save.f>
c------------------------------------------------------------------------------ c------------------------------------------------------------------------------
c $Id$
c c
c 24/03/98 by Thomas Forbriger (IfG Stuttgart) c Copyright 1998, 2010 by Thomas Forbriger (IfG Stuttgart)
c c
c PURPOSE c ----
c This program is free software; you can redistribute it and/or modify
c it under the terms of the GNU General Public License as published by
c the Free Software Foundation; either version 2 of the License, or
c (at your option) any later version.
c
c This program is distributed in the hope that it will be useful,
c but WITHOUT ANY WARRANTY; without even the implied warranty of
c MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
c GNU General Public License for more details.
c
c You should have received a copy of the GNU General Public License
c along with this program; if not, write to the Free Software
c Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
c ----
c c
c REVISIONS and CHANGES c REVISIONS and CHANGES
c 24/03/98 V1.0 Thomas Forbriger c 24/03/98 V1.0 Thomas Forbriger
......
...@@ -3,7 +3,23 @@ c------------------------------------------------------------------------------ ...@@ -3,7 +3,23 @@ c------------------------------------------------------------------------------
cC cC
c $Id$ c $Id$
c c
c 24/03/98 by Thomas Forbriger (IfG Stuttgart) c Copyright 1998, 2010 by Thomas Forbriger (IfG Stuttgart)
c
c ----
c This program is free software; you can redistribute it and/or modify
c it under the terms of the GNU General Public License as published by
c the Free Software Foundation; either version 2 of the License, or