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

major revision upgrade

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: 176
SVN UUID:     67feda4a-a26e-11df-9d6e-31afc202ad0c
parent 343170b6
#
# $Id: Makefile,v 2.0 2000-05-24 17:20:36 thof Exp $
#
# Makefile for prog/plot/refract
#
# refraction seismocs
......
c this is <refract_data.inc>
c------------------------------------------------------------------------------
c $Id: refract_data.inc,v 2.0 2000-05-24 17:20:36 thof Exp $
c
c 17/03/98 by Thomas Forbriger (IfG Stuttgart)
c
......
c this is <refract_dim.inc>
c------------------------------------------------------------------------------
c $Id: refract_dim.inc,v 2.0 2000-05-24 17:20:36 thof Exp $
c
c 17/03/98 by Thomas Forbriger (IfG Stuttgart)
c
......
c this is <refract_model.inc>
c------------------------------------------------------------------------------
c $Id: refract_model.inc,v 2.0 2000-05-24 17:20:36 thof Exp $
c
c 05/07/98 by Thomas Forbriger (IfG Stuttgart)
c
......
c this is <refract_opt.inc>
c------------------------------------------------------------------------------
c $Id: refract_opt.inc,v 1.2 2000-05-24 15:27:16 thof Exp $
c $Id: refract_opt.inc,v 2.0 2000-05-24 17:20:36 thof Exp $
c
c 17/03/98 by Thomas Forbriger (IfG Stuttgart)
c
......
c this is <refract_para.inc>
c------------------------------------------------------------------------------
c $Id: refract_para.inc,v 2.0 2000-05-24 17:20:36 thof Exp $
c
c 20/01/98 by Thomas Forbriger (IfG Stuttgart)
c
......
c this is <refract_pgpara.inc>
c------------------------------------------------------------------------------
c $Id: refract_pgpara.inc,v 1.3 2000-05-24 15:27:16 thof Exp $
c $Id: refract_pgpara.inc,v 2.0 2000-05-24 17:20:36 thof Exp $
c
c 01/05/98 by Thomas Forbriger (IfG Stuttgart)
c
......
c this is <refract_picks.inc>
c------------------------------------------------------------------------------
c $Id: refract_picks.inc,v 2.0 2000-05-24 17:20:36 thof Exp $
c
c 05/07/98 by Thomas Forbriger (IfG Stuttgart)
c
......
c this is <refract_seipar.inc>
c------------------------------------------------------------------------------
c $Id: refract_seipar.inc,v 2.0 2000-05-24 17:20:36 thof Exp $
c
c 30/04/98 by Thomas Forbriger (IfG Stuttgart)
c
......
c this is <refract_strings.inc>
c------------------------------------------------------------------------------
c $Id: refract_strings.inc,v 2.0 2000-05-24 17:20:36 thof Exp $
c
c 04/07/98 by Thomas Forbriger (IfG Stuttgart)
c
......
c this is <refract.f>
c------------------------------------------------------------------------------
c $Id: refract.f,v 1.4 2000-05-24 15:27:16 thof Exp $
c $Id: refract.f,v 2.0 2000-05-24 17:20:36 thof Exp $
c
c 09/01/98 by Thomas Forbriger (IfG Stuttgart)
c
......@@ -21,6 +21,8 @@ c to read old refra-created picks files
c 18/02/99 V3.8 allow offset scale in degree on a sphere
c 24/05/00 V3.9 - increased size of option identifier to 3 characters
c - introduced new options
c 24/05/00 V4.0 allowing almost full parameter control from the command
c line justifies the step to the next major revision
c
c==============================================================================
c
......@@ -28,7 +30,7 @@ c
c
character*79 version
parameter(version=
& 'REFRACT V3.9 REFRACTion seismics - data interpretation')
& 'REFRACT V4.0 REFRACTion seismics - data interpretation')
c
c get common blocks
include 'include/refract_dim.inc'
......
......@@ -2,7 +2,7 @@ c this is <refract_cmdopt.f>
c------------------------------------------------------------------------------
cS
c ($Source: /home/tforb/svnbuild/cvssource/CVS/thof/src/ts/refract/sub/refract_cmdopt.f,v $)
c ($Id: refract_cmdopt.f,v 1.2 2000-05-24 15:27:16 thof Exp $)
c ($Id: refract_cmdopt.f,v 2.0 2000-05-24 17:20:36 thof Exp $)
c
c 24/05/2000 by Thomas Forbriger (IfG Stuttgart)
c
......@@ -35,7 +35,7 @@ c declare local variables
integer i
c CVS Id
character*(*) refract_cmdopt_id
parameter (refract_cmdopt_id='$Id: refract_cmdopt.f,v 1.2 2000-05-24 15:27:16 thof Exp $')
parameter (refract_cmdopt_id='$Id: refract_cmdopt.f,v 2.0 2000-05-24 17:20:36 thof Exp $')
c commandline
integer maxopt
parameter(maxopt=55)
......
c this is <refract_domodel.f>
c------------------------------------------------------------------------------
c $Id: refract_domodel.f,v 1.2 2000-05-24 15:27:16 thof Exp $
c $Id: refract_domodel.f,v 2.0 2000-05-24 17:20:36 thof Exp $
c
c 05/07/98 by Thomas Forbriger (IfG Stuttgart)
c
......
c this is <refract_dopicks.f>
c------------------------------------------------------------------------------
c $Id: refract_dopicks.f,v 1.2 2000-05-24 15:27:16 thof Exp $
c $Id: refract_dopicks.f,v 2.0 2000-05-24 17:20:37 thof Exp $
c
c 05/07/98 by Thomas Forbriger (IfG Stuttgart)
c
......
c this is <refract_doplot.f>
c------------------------------------------------------------------------------
c $Id: refract_doplot.f,v 2.0 2000-05-24 17:20:37 thof Exp $
c
c 30/04/98 by Thomas Forbriger (IfG Stuttgart)
c
......
c this is <refract_loopaction.f>
c------------------------------------------------------------------------------
c $Id: refract_loopaction.f,v 2.0 2000-05-24 17:20:37 thof Exp $
c
c 01/05/98 by Thomas Forbriger (IfG Stuttgart)
c
......
c this is <refract_message.f>
c------------------------------------------------------------------------------
c $Id: refract_message.f,v 2.0 2000-05-24 17:20:37 thof Exp $
c
c 04/07/98 by Thomas Forbriger (IfG Stuttgart)
c
......
c this is <refract_mpc.f>
c------------------------------------------------------------------------------
c $Id: refract_mpc.f,v 2.0 2000-05-24 17:20:37 thof Exp $
c
c 30/04/98 by Thomas Forbriger (IfG Stuttgart)
c
......
......@@ -2,7 +2,7 @@ c this is <refract_pgdefaults.f>
c------------------------------------------------------------------------------
cS
c ($Source: /home/tforb/svnbuild/cvssource/CVS/thof/src/ts/refract/sub/refract_pgdefaults.f,v $)
c ($Id: refract_pgdefaults.f,v 1.1 2000-05-24 15:27:16 thof Exp $)
c ($Id: refract_pgdefaults.f,v 2.0 2000-05-24 17:20:37 thof Exp $)
c
c 24/05/2000 by Thomas Forbriger (IfG Stuttgart)
c
......@@ -25,7 +25,7 @@ c
cE
c declare local variables
character*(*) refract_pgdefaults_id
parameter (refract_pgdefaults_id='$Id: refract_pgdefaults.f,v 1.1 2000-05-24 15:27:16 thof Exp $')
parameter (refract_pgdefaults_id='$Id: refract_pgdefaults.f,v 2.0 2000-05-24 17:20:37 thof Exp $')
c
c------------------------------------------------------------------------------
c go
......
c this is <refract_pgfilenames.f>
c------------------------------------------------------------------------------
c $Id: refract_pgfilenames.f,v 1.2 2000-05-24 15:27:16 thof Exp $
c $Id: refract_pgfilenames.f,v 2.0 2000-05-24 17:20:37 thof Exp $
c
c 03/07/98 by Thomas Forbriger (IfG Stuttgart)
c
......
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment