[TASK] (green/disan): remove obsolete subversion keywords

src/green/disan/COPYING

 this is <COPYING>
 ============================================================================
 green/disan
----------
-$Id$
 ============================================================================
 
-some code for dispersion analysis
+programs to calculate wavefield transforms and for dispersion analysis
 
 Copyright (C) 1997,2010 by Thomas Forbriger 
 
 ----
-The conv/many suite is free software; you can redistribute it and/or modify
+The green/disan suite is free software; you can redistribute it and/or modify
 it under the terms of the GNU General Public License as published by
 the Free Software Foundation; either version 2 of the License, or
 (at your option) any later version. 
 
-This program is distributed in the hope that it will be useful,
+The programa are distributed in the hope that it will be useful,
 but WITHOUT ANY WARRANTY; without even the implied warranty of
 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 GNU General Public License for more details.

src/green/disan/Makefile

 # this is <Makefile>
 # ----------------------------------------------------------------------------
-# $Id$
 # 
 # Copyright (c) 2007 by Thomas Forbriger (BFO Schiltach) 
 # 

src/green/disan/gabor.f

 c this is <gabor.f>
 c------------------------------------------------------------------------------
-c   ($Id$)
 c
 c Copyright 2001,2006 by Thomas Forbriger (IMGF Frankfurt)
 c
@@ -35,9 +34,6 @@ c
 c
       character*(*) version
       parameter(version='GABOR   V1.4   calculate gabor matrix')
-      character*(*) GABOR_CVS_ID
-      parameter(GABOR_CVS_ID=
-     &  '$Id$')
 c
 c input dataset
       character*80 filename, informat

src/green/disan/greda.f

 c this is <greda.f>
 c------------------------------------------------------------------------------
-c $Id$
 c
 c Copright 1997,2010 by Thomas Forbriger (IfG Stuttgart)
 c
@@ -124,11 +123,9 @@ c
 c
 c first we declare some general variables
 c
-      character*79 version,CVSID
+      character*79 version
       parameter(version=
      &'GREDA   V3.22   Calculate Fourier-Bessel expansion coefficients')
-      parameter(CVSID=
-     &  '$Id$')
 c
 c calculations common block
       include 'greda_dim.inc'
@@ -437,7 +434,6 @@ c
         print *,'H^(2)_0 is used in theory, you have to use H^(1)_0'
         print *,'in greda.'
         print *,' '
-        print *,'$Id$'
         call pwo_cvsid
         print *,' '
         print *,'compiled array dimensions are:'

src/green/disan/greda_dim.inc

 c this is <greda_dim.inc>
 c ----------------------------------------------------------------------------
-c   ($Id$)
 c
 c Copyright (c) 2002 by Thomas Forbriger (IMG Frankfurt) 
 c

src/green/disan/greda_phasor.f

 c this is <greda_phasor.f>
 c ----------------------------------------------------------------------------
-c   ($Id$)
 c
 c Copyright (c) 2002 by Thomas Forbriger (IMG Frankfurt) 
 c
@@ -27,8 +26,9 @@ c    16/09/2002   V1.0   Thomas Forbriger
 c
 c ============================================================================
 c
+c this is a dummy function; it became obsolete when source code was move
+c to git
       subroutine pwo_cvsid
-      print *,'$Id$'
       return
       end
 c

src/green/disan/greda_pwo.inc

 c this is <greda_pwo.inc>
 c ----------------------------------------------------------------------------
-c   ($Id$)
 c
 c Copyright (c) 2002 by Thomas Forbriger (IMG Frankfurt) 
 c

src/green/disan/grereso.f

 c this is <grereso.f>
 c------------------------------------------------------------------------------
-c $Id$
 c
 c Copyright 1999,2010 by Thomas Forbriger (IfG Stuttgart)
 c
@@ -166,7 +165,6 @@ c
         print *,'  number of test slowness values:',maxpf
         print *,'  number of frequencies:         ',maxpf
         print *,' '
-        print *,'$Id$'
         stop
       endif
 c

src/green/disan/grereso.inc

 c this is <grereso.inc>
 c------------------------------------------------------------------------------
-c $Id$
 c
 c Copyright 1999,2010 by Thomas Forbriger (IfG Stuttgart)
 c

src/green/disan/hivexpanco.f

 c this is <hivexpanco.f>
 c ----------------------------------------------------------------------------
-c   ($Id$)
 c
 c Copyright (c) 2007 by Thomas Forbriger (BFO Schiltach) 
 c
@@ -33,9 +32,6 @@ c
       parameter(version=
      &  'HIVEXPANCO   V1.0'//
      &  '   calculate H/V for Fourier Bessel expansion coefficients')
-      character*(*) HIVEXPANCO_CVS_ID
-      parameter(HIVEXPANCO_CVS_ID=
-     &  '$Id$')
 c
 c datasets
       character*80 hinfile, vinfile, outfile

src/green/disan/hivgabor.f

 c this is <hivgabor.f>
 c ----------------------------------------------------------------------------
-c   ($Id$)
 c
 c Copyright (c) 2006 by Thomas Forbriger (BFO Schiltach) 
 c
@@ -32,9 +31,6 @@ c
       character*(*) version
       parameter(version=
      &  'HIVGABOR   V1.0   Calculate H/V from gabor results')
-      character*(*) HIVGABOR_CVS_ID
-      parameter(HIVGABOR_CVS_ID=
-     &  '$Id$')
 c
 c datasets
       character*80 hinfile, vinfile, outfile

src/green/disan/phadi.f

 c this is <phadi.f>
 c------------------------------------------------------------------------------
-c   ($Id$)
 c
 c Copyright 2001,2010 by Thomas Forbriger (IMGF Frankfurt)
 c
@@ -43,9 +42,6 @@ c
       character*(*) version
       parameter(version=
      & 'PHADI   V1.7   calculate dispersion relation from phase differences')
-      character*(*) PHADI_CVS_ID
-      parameter(PHADI_CVS_ID=
-     & '$Id$')
 c input dataset
       character*80 filename, informat
       integer maxtraces, totmaxsamples