# History file 'p1-born.h' computes the 2D Born approximation. # ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ # History file 'p1-born.h' requires MRAM at least 65000000. # Input files required chk.pl: "data/p1i/" "p1-born.dat" chk.pl: "data/p1i/" "p1-src.dat" chk.pl: "data/p1i/" "p1-recb.dat" # output of 'p1-grid.h' chk.pl: "" "p1-vpper.out" chk.pl: "" "p1-vsper.out" chk.pl: "" "p1-rhper.out" # output of 'p1-mtt.h' chk.pl: "" "p1-num-u.out" chk.pl: "" "p1-mtt-u.out" chk.pl: "" "p1-mp1-u.out" chk.pl: "" "p1-mp2-u.out" chk.pl: "" "p1-mp3-u.out" chk.pl: "" "p1-mt22u.out" chk.pl: "" "p1-aur1.out" chk.pl: "" "p1-aui1.out" chk.pl: "" "p1-aur2.out" chk.pl: "" "p1-aui2.out" chk.pl: "" "p1-aur3.out" chk.pl: "" "p1-aui3.out" # Data for grdborn.for # Grid dimensions N1=2500 N2=1 N3=650 D1=0.005 D2=0. D3=0.005 # Perturbations of elastic parameters VPPER='p1-vpper.out' VSPER='p1-vsper.out' RHOPER='p1-rhper.out' # Number of arrivals of the incident wavefield at each grid point NUM='p1-num-u.out' # Travel times of the incident wavefield MTT='p1-mtt-u.out' # Slowness vectors of the incident wavefield MP1='p1-mp1-u.out' MP2='p1-mp2-u.out' MP3='p1-mp3-u.out' # The second spatial derivative of the travel times with respect to the # second coordinate MTTXX='p1-mt22u.out' # Amplitudes of the incident wavefield AUR1='p1-aur1.out' AUI1='p1-aui1.out' AUR2='p1-aur2.out' AUI2='p1-aui2.out' AUR3='p1-aur3.out' AUI3='p1-aui3.out' # Receiver name and the Green functions BORN='p1-born.dat' # Other input data SRC='p1-src.dat' REC='p1-recb.dat' # Name of the output RF file RF='rf-born.out' # Data common with program ss.for # Data describing the filtration of the source time function FMIN=1. FLOW=2. FHIGH=19. FMAX=20. # (cosine filter) # Time step and time interval for the Fast Fourier Transform DT=0.001 NFFT=16384 # Computation grdborn: # Born approximation