anchor.diff:        endif
         write(*,*)
        1 '-ffm FFMFILE            Finite fault ',
  -     2                          'file in standard subfault format'
  +     2                          'file in USGS subfault format'
         if (str.eq.'long') then
             write(*,*)
             write(*,*)
  -     1 '    Example of subfault format can be seen at:'
  -          write(*,*)
  -     1 '    http://comcat.cr.usgs.gov/product/finite-fault/usc000nzvd/',
  -     2      'us/1397258114263/'
  -          write(*,*)
  -     1 '        web/static2_out'
  +     1 '    See Hayes (2017), The finite, kinematic rupture properties',
  +     2      ' of great-sized'
  +          write(*,*)
  +     1 '        earthquakes since 1990, EPSL.'
  +          write(*,*)
  +     1 '    Examples can be found at event pages on earthquake.usgs.gov'
  +          write(*,*)
             write(*,*)
        1 '    NB: o92util assumes FFM displacements are in centimeters'
             write(*,*)
  
positive.code:      1 '    Format: evlo evla evdp(km) str dip rak mag'
            write(*,*)
            write(*,*)
       1 '    The magnitude is converted to slip, width, and length ',
       2      'using Wells and'
            write (*,*)
       1 '    Coppersmith (1994) empirical relations, and a hard-coded ',
       2      'shear modulus'
            write (*,*)
       1 '    of 43 GPa.'
            write(*,*)
            write(*,9999)
            write(*,*)
  
negative.code:      1 '                                (degrees)          along-dip ',
       2                                                    'along-str'
            write(*,*)
            write(*,*)
       1 '        (or, if -xy is used: evx(km) evy(km) evdp(km)...)'
            write(*,*)
            write(*,9999)
            write(*,*)
        endif
  