anchor.diff:  C Parse command line, check for files
   C----
         call gcmdln(ifile,sfile,tfile,zfile,cfile,nfile,efile,dfile,
  -     1            time,cf)
  +     1            time,cf,itype)
         if (ifile.eq.'none') then
             write(*,*) '!! Error: Input finite fault file unspecified'
             call usage('!! Use -f FFMFILE to specify input file')
  
positive.code: C----
  C Read finite fault model
  C----
        call readffm(ifile,evlo,evla,evdp,str,dip,rak,dx,dy,slip,trup,
       1             hylo,hyla,seg,nseg,nflt)
  
  C----
  C Write output files
  
negative.code:           write(*,*)
        endif
        write(*,*)
       1 'Usage: ff2gmt -f[fm] FFMFILE -fsp FSPFILE -slip SLIPFILE ',
       2                  '-time TIMEFILE -dep DEPFILE'
        write(*,*)
       1 '              -clip CLIPFILE|-clipseg CLIPFILE -epi EPIFILE ',
       2                 '-dc DCFILE'
  