anchor.diff:            write(*,*)
        1 '    onto the rake vector of the target fault.'
             write(*,*)
  -     1 '    To have output be maximum value of shear traction, ',
  -     1       'use -shearmax.'
  +          write(*,*)
  +     1 '    To have output be maximum value of shear traction ',
  +     2       'on target geometry,'
  +          write(*,*)
  +     1 '        use -shearmax.'
             write(*,*)
             write(*,9999)
             write(*,*)
  
positive.code:      1 '                                (degrees)          along-dip ',
       2                                                    'along-str'
            write(*,*)
            write(*,9999)
            write(*,*)
        endif
  
negative.code:           write(*,*)
       1 '    Format: stlo stla stdp u_E(m) u_N(m) u_Z(m)'
            write(*,*)
       1 '        (or, if -xy is used: stx(km) sty(km) stdp(km)...)'
            write(*,*)
       1 '    Vertical displacement is positive up.'
            write(*,*)
            write(*,9999)
  