param1

来自「linux下fortran语言开发」· 代码 · 共 35 行

simplemodel                         :model file
4                                   :#interfaces in model
plotcolors                          :model colors file
Mwq                                 :first plot descriptor (mwq)
curvedwell1                         :well coordinates
s                                   :
dummygeo                            :dummy geometry file
sg                                  :second plot descriptor (sgq)   ...THIS
r                                   :job descriptor (rlt)              DIRECTORY
don't care                          :output filename(s)
  0.   80.                          :range of takeoff angles 
1.                                  :increment in takeoff angle
4000.0  6000.0  9000.0
10000.0 13000.0                     :velocities
n                                   :direct wave? (y or n)
                                    :headwave interface numbers (1, 2, ...)
n                                   :primaries? (y or n)



Notes
-----
This example plots the model, plots the well and then quits.

(1) If you are doing VSP then you need to provide the coordinates
describing the well.  The program fits a spline through the well coordinates.
File curvedwell1 in Record 5 above contains the well description.
In order to plot the well, type a w in one of the first three
columns of Record 4. In this example we have m, w and q, so the program
plots the model, plots the well and then quits. To plot the well without
the model enter wq.

Update: The file dummygeo is a dummy geometry file that seems to be
        needed on some systems