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 <par_chop.f>
c------------------------------------------------------------------------------
cS
c $Id$
c
c 24/03/98 by Thomas Forbriger (IfG Stuttgart)
c Copyright 1998, 2010 by Thomas Forbriger (IfG Stuttgart)
c
c read or set chopping parameters
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 24/03/98 V1.0 Thomas Forbriger
c 14/01/99 V2.0 model definition changed (see glq_model.inc)
......
c this is <par_definv.f>
c------------------------------------------------------------------------------
c $Id$
c
c 24/03/98 by Thomas Forbriger (IfG Stuttgart)
c Copyright 1998, 2010 by Thomas Forbriger (IfG Stuttgart)
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 REVISIONS and CHANGES
c 24/03/98 V1.0 Thomas Forbriger
......
c this is <par_defpg.f>
c------------------------------------------------------------------------------
c $Id$
c
c 24/03/98 by Thomas Forbriger (IfG Stuttgart)
c Copyright 1998, 2010 by Thomas Forbriger (IfG Stuttgart)
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 REVISIONS and CHANGES
c 24/03/98 V1.0 Thomas Forbriger
......
c this is <par_defverb.f>
c------------------------------------------------------------------------------
c $Id$
c
c 24/03/98 by Thomas Forbriger (IfG Stuttgart)
c Copyright 1998, 2010 by Thomas Forbriger (IfG Stuttgart)
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 REVISIONS and CHANGES
c 24/03/98 V1.0 Thomas Forbriger
......
c this is <par_feas.f>
c------------------------------------------------------------------------------
c $Id$
c
c 24/03/98 by Thomas Forbriger (IfG Stuttgart)
c Copyright 1998, 2010 by Thomas Forbriger (IfG Stuttgart)
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 REVISIONS and CHANGES
c 24/03/98 V1.0 Thomas Forbriger
......
c this is <par_oldhead.f>
c------------------------------------------------------------------------------
cS
c $Id$
c
c 03/12/97 by Thomas Forbriger (IfG Stuttgart)
c Copyright 1997, 2010 by Thomas Forbriger (IfG Stuttgart)
c
c control parameters
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 03/12/97 V1.0 Thomas Forbriger
c 10/12/97 V1.1 - par_sano looks now at section depth and
......
c this is <par_parcor.f>
c------------------------------------------------------------------------------
c $Id$
c
c 24/03/98 by Thomas Forbriger (IfG Stuttgart)
c Copyright 1998, 2010 by Thomas Forbriger (IfG Stuttgart)
c
c this subroutines controls the free model parameters
c it is a user interface
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 24/03/98 V1.0 Thomas Forbriger
c 25/03/98 V1.1 now check maximum number of free parameters
......
c this is <par_pardisp.f>
c------------------------------------------------------------------------------
cS
c $Id$
c
c 07/04/98 by Thomas Forbriger (IfG Stuttgart)
c Copyright 1998, 2010 by Thomas Forbriger (IfG Stuttgart)
c
c display named model parameter weights
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 07/04/98 V1.0 Thomas Forbriger
c 14/04/98 V1.1 do not display hyphen for top of model depth
......
c this is <par_pgapply.f>
c------------------------------------------------------------------------------
cS
c $Id$
c
c 20/01/99 by Thomas Forbriger (IfG Stuttgart)
c Copyright 1999, 2010 by Thomas Forbriger (IfG Stuttgart)
c
c apply pgplot parameters
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 20/01/99 V1.0 Thomas Forbriger
c 02/03/99 V1.1 set background colour too
......
c this is <par_pgmon.f>
c------------------------------------------------------------------------------
cS
c $Id$
c
c 01/07/99 by Thomas Forbriger (IfG Stuttgart)
c Copyright 1999, 2010 by Thomas Forbriger (IfG Stuttgart)
c
c switch pg-monitor devices on and off
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 01/07/99 V1.0 Thomas Forbriger
c
......
c this is <par_pgset.f>
c------------------------------------------------------------------------------
cS
c $Id$
c
c 20/01/99 by Thomas Forbriger (IfG Stuttgart)
c Copyright 1998, 2010 by Thomas Forbriger (IfG Stuttgart)
c
c display/edit pgplot parameters
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 20/01/99 V1.0 Thomas Forbriger
c
......
c this is <par_read.f>
c------------------------------------------------------------------------------
cS
c $Id$
c
c 24/03/98 by Thomas Forbriger (IfG Stuttgart)
c Copyright 1998, 2010 by Thomas Forbriger (IfG Stuttgart)
c
c read various parameters from file
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 24/03/98 V1.0 Thomas Forbriger
c 07/04/98 V1.1 introduced green amplitude error
......
c this is <par_sano.f>
c------------------------------------------------------------------------------
cS
c $Id$
c
c 24/03/98 by Thomas Forbriger (IfG Stuttgart)
c Copyright 1998, 2010 by Thomas Forbriger (IfG Stuttgart)
c
c set anonymous parameter mode
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 24/03/98 V1.0 Thomas Forbriger
c 25/03/98 V1.1 now check glqm_mano limit
......
......@@ -3,7 +3,23 @@ c------------------------------------------------------------------------------
cS
c $Id$
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 set parameters
c
......
c this is <par_setdebug.f>
c------------------------------------------------------------------------------
c $Id$
c
c 02/12/98 by Thomas Forbriger (IfG Stuttgart)
c Copyright 1998, 2010 by Thomas Forbriger (IfG Stuttgart)
c
c simple routine to be called from main program to allow debug mode
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 02/12/98 V1.0 Thomas Forbriger
c
......
......@@ -3,7 +3,23 @@ c------------------------------------------------------------------------------
cS
c $Id$
c
c 25/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 After splitting all subroutines into different object files the linker
c is no longer willing to include BLOCKDATA subroutines as there is
......
......@@ -3,7 +3,23 @@ c------------------------------------------------------------------------------
cS
c $Id$
c
c 06/04/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 After splitting the source into different object files, the linker
c refuses to link blockdata subroutines.
......
c this is <par_setdefpg.f>
c------------------------------------------------------------------------------
cS
c $Id$
c
c 06/04/98 by Thomas Forbriger (IfG Stuttgart)
c Copyright 1998, 2010 by Thomas Forbriger (IfG Stuttgart)
c
c After splitting the source into different object files, the linker
c refuses to link blockdata subroutines.
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 06/04/98 V1.0 Thomas Forbriger
c 17/08/98 V1.1 introduced line styles
......
c this is <par_setdefpgmon.f>
c------------------------------------------------------------------------------
cS
c $Id$
c
c 01/07/99 by Thomas Forbriger (IfG Stuttgart)
c Copyright 1999, 2010 by Thomas Forbriger (IfG Stuttgart)