Commit b3941ce8 authored by thomas.forbriger's avatar thomas.forbriger

ts/hd [TASK]: remove obsolete CVS keywords

parent cb4db1cf
this is <COPYING>
============================================================================
ts/hd: time series data header manipulation
-------------------------------------------
$Id$
============================================================================
Copyright (c) 1998, 2013 by Thomas Forbriger (IfG Stuttgart)
......
# this is <Makefile>
# ----------------------------------------------------------------------------
# $Id$
#
# Copyright (c) 2002 by Thomas Forbriger (IMG Frankfurt)
#
......
this is <README>
============================================================================
hd: SFF header manipulation
---------------------------
$Id$
============================================================================
This is a collection of tools that support SFF (Stuttgart File Format)
......
c this is <coma.f>
c ----------------------------------------------------------------------------
c ($Id$)
c
c Copyright (c) 2010 by Thomas Forbriger (BFO Schiltach)
c
......
......@@ -3,7 +3,6 @@
*
* ----------------------------------------------------------------------------
*
* $Id$
* \author Thomas Forbriger
* \date 08/09/2004
*
......@@ -34,8 +33,6 @@
*/
#define COOSET_VERSION \
"COOSET V1.0 set coordinates"
#define COOSET_CVSID \
"$Id$"
#include <fstream>
#include <iostream>
......@@ -95,7 +92,6 @@ int main(int iargc, char* argv[])
"-sot date source time" "\n"
"-v be verbose" "\n"
"-o overwrite" "\n"
COOSET_CVSID
};
// define commandline options
......@@ -205,7 +201,6 @@ int main(int iargc, char* argv[])
// modify file header
sff::FileHeader fileheader(is);
fileheader.appendfree(COOSET_VERSION);
fileheader.appendfree(COOSET_CVSID);
sff::SRCE filesrce=fileheader.srce();
if (fileheader.hassrce())
{ fileheader.appendfree("input file has SRCE line"); }
......
c this is <offli.f>
c------------------------------------------------------------------------------
c $Id$
c
c Copyright 2000, 2010 by Thomas Forbriger (IfG Stuttgart)
c
......@@ -35,9 +34,6 @@ c
c
character*(*) version
parameter(version='OFFLI V1.3 OFFset LIsting')
character*(*) OFFLI_CVS_ID
parameter(OFFLI_CVS_ID=
& '$Id$')
c
integer ierr,nsamp,msamp,nstack
parameter(msamp=100000)
......@@ -118,8 +114,6 @@ c
print *,' moment-tensor or force components'
print *,' default is vertical force or explosion'
print *,' '
print *,OFFLI_CVS_ID
print *,' '
call sff_help_formats
stop
endif
......
c this is <sehefi.f>
c ----------------------------------------------------------------------------
c $Id$
c
c Copyright (c) 2005 by Thomas Forbriger (BFO Schiltach)
c
......@@ -31,8 +30,6 @@ c
c
character*(*) version
parameter(version='SEHEFI V1.0 set header field')
character*(*) SEHEFI_CVS_ID
parameter(SEHEFI_CVS_ID='$Id$')
c
integer luin,luout
parameter(luin=10,luout=11)
......@@ -81,8 +78,6 @@ c
print *,'-s s set station ID to ''s'' '
print *,'-i s set instrument ID to ''s'' '
print *,'-a s set auxid ID to ''s'' '
print *,' '
print *,SEHEFI_CVS_ID
stop
endif
c
......
......@@ -3,7 +3,6 @@
*
* ----------------------------------------------------------------------------
*
* $Id$
* \author Thomas Forbriger
* \date 07/01/2013
*
......@@ -36,8 +35,6 @@
*/
#define SEHEFIXX_VERSION \
"SEHEFIXX V1.1 set header field"
#define SEHEFIXX_CVSID \
"$Id$"
#include <iostream>
#include <fstream>
......@@ -82,7 +79,6 @@ int main(int iargc, char* argv[])
// define full help text
char help_text[]=
{
SEHEFIXX_CVSID
"\n"
"infile name of input data file\n"
"outfile name of output data file\n"
......@@ -344,7 +340,6 @@ int main(int iargc, char* argv[])
is >> freeblock;
freeblock.append("Edited with: ");
freeblock.append(SEHEFIXX_VERSION);
freeblock.append(SEHEFIXX_CVSID);
os << freeblock;
}
else
......
c this is <sesoc.f>
c ----------------------------------------------------------------------------
c ($Id$)
c
c Copyright (c) 2002 by Thomas Forbriger (IMG Frankfurt)
c
......
c this is <sesot.f>
c------------------------------------------------------------------------------
c $Id$
c
c Copyright 1999, 2010 by Thomas Forbriger (IfG Stuttgart)
c
......@@ -78,8 +77,6 @@ c
print *,'-n do not shift receivers'
print *,' useful for real data'
print *,' '
print *,'$Id$'
print *,' '
call timeinfo
stop
endif
......
# this is <Makefile>
# ----------------------------------------------------------------------------
# $Id$
#
# Copyright (c) 2012 by Thomas Forbriger (BFO Schiltach)
#
......
# this is <Makefile.tijerasxx>
# ----------------------------------------------------------------------------
# $Id: $
#
# Copyright (c) 2012 by Thomas Forbriger (BFO Schiltach)
#
......
Markdown is supported
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