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

textual corrections

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:
SVN Revision: 1673
SVN UUID:     67feda4a-a26e-11df-9d6e-31afc202ad0c
parent 9d53a8a6
c this is <refmet_rsource.f> by Thomas Forbriger
c $Id: refmet_rsource.f,v 1.8 2005-04-18 12:53:44 tforb Exp $
c $Id: refmet_rsource.f,v 1.9 2005-04-18 13:07:25 tforb Exp $
c it is part of the REFMET reflectivity program
c (for comments and revisions see also the main source refmet.f)
......@@ -206,8 +206,6 @@ c
print 50,' source function differentiation (sig=3), which also will'
print 50,' be done in the Fourier domain. Notice that the scalar'
print 50,' momentum M0 always refers to the step-function f(t).'
print 50,' Therefore f''(t) and f''''(t) have normalizing amplitude'
print 50,' factors to derive velocity and acceleration waveforms.'
print 50,' '
print 50,' If you want to receive displacement waveforms as a'
print 50,' response to a one-sided force-impulse you may use'
......@@ -218,6 +216,12 @@ c
print 50,' If your force-pulse should have an amplitude of Fp Newton'
print 50,' you have to specify F0=Fp*(T2-T1)/(0.75*pi). '
print 50,' '
print 50,' NOTICE: Like with for seismic moment source, the scalar'
print 50,' source amplitude (here F0) is given with respect to'
print 50,' f(t). If you select sig=2 and typ=2, you will obtain'
print 50,' velocity seismograms for force step with amplitude F0'
print 50,' given in Newton.'
print 50,' '
print 50,' In the same way you may calculate the displacement'
print 50,' response to the two-sided pulse f''''(t) of maximum force'
print 50,' Fp when specifying sig=3 and F0=Fp*(T2-T1)**2/8.550.'
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