# History file 'corfun.h' to generate and plot the representations
# of the random media for papers
#     Klimes, L. (1997): Correlation functions of random media.
#         In: Seismic Waves in Complex 3-D Structures, Report 6.
#         Department of Geophysics, Charles University, Prague.
#     Klimes, L. (2001): Correlation functions of random media.
#         In: Seismic Waves in Complex 3-D Structures, Report 11.
#         Department of Geophysics, Charles University, Prague.
# The black and white version of the figures was used in paper
#     Klimes, L. (2002): Correlation functions of random media.
#         Pure and Applied Geophysics, 159, 1811-1831.
# ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

# Data common to all representations

# Grid dimensions
  N1=501  N2=501  D1=0.002  D2=0.002
# Velocities between 0.0 and 2.0, with mean value of 1.000
  DSD=0.500  VMEAN=1.000  DEVMAX=1.000  DEVEXP=2.
# Selecting a particular pseudo-random representation
  ISEED=-13

# Representations of individual random media

# Figure 2
  CTYPE='D'  POWERN=-0.2  ACORG=0.005  ACOR=0.020
  GRD='corf02.out'  grdran2d:

# Figure 3
  CTYPE='D'  POWERN=-1.0  ACORG=0.005  ACOR=
# CTYPE='L'  POWERN=-1.0  ACORG=0.005              # alternative data
# CTYPE='G'               ACORG=0.005              # alternative data
  GRD='corf03.out'  grdran2d:

# Figure 4
  CTYPE='D'  POWERN=-0.2  ACORG=0.     ACOR=0.020
# CTYPE='K'  POWERN=-0.2               ACOR=0.020  # alternative data
  GRD='corf04.out'  grdran2d:

# Figure 5
  CTYPE='D'  POWERN=0.5   ACORG=0.     ACOR=0.020
# CTYPE='K'  POWERN=0.5                ACOR=0.020  # alternative data
# CTYPE='E'                            ACOR=0.020  # alternative data
  GRD='corf05.out'  grdran2d:

# Figure 6
  CTYPE='D'  POWERN=0.0   ACORG=0.     ACOR=0.020
# CTYPE='K'  POWERN=0.0                ACOR=0.020  # alternative data
  GRD='corf06.out'  grdran2d:

# Figure 7
  CTYPE='D'  POWERN=-0.2  ACORG=0.     ACOR=
# CTYPE='K'  POWERN=-0.2               ACOR=       # alternative data
# CTYPE='L'  POWERN=-0.2  ACORG=0.                 # alternative data
# CTYPE='S'  POWERN=-0.2                           # alternative data
  GRD='corf07.out'  grdran2d:

# Figure 8
  CTYPE='D'  POWERN=-0.2  ACORG=0.005  ACOR=
# CTYPE='L'  POWERN=-0.2  ACORG=0.005              # alternative data
  GRD='corf08.out'  grdran2d:

# Plotting the representations of the random medium
  HSIZE=16.032  HOFFSET=2.484
  VCIRC=2.      VREF=1.000     CREF=.166667
  GRD='corf02.out'  PS='corf02.ps'  grdps:
  GRD='corf03.out'  PS='corf03.ps'  grdps:
  GRD='corf04.out'  PS='corf04.ps'  grdps:
  GRD='corf05.out'  PS='corf05.ps'  grdps:
  GRD='corf06.out'  PS='corf06.ps'  grdps:
  GRD='corf07.out'  PS='corf07.ps'  grdps:
  GRD='corf08.out'  PS='corf08.ps'  grdps:

# ======================================================================

# Temporary files (may be deleted)
# '*.tmp'

# List of output PostScript figures
# 'corf02.ps', 'corf03.ps', ..., 'corf08.ps'