anchor.diff:                cf = 1
                 i = i + 1
                 call getarg(i,cfile)
  +          elseif (tag(1:4).eq.'-epi') then
  +              i = i + 1
  +              call getarg(i,efile)
  +          elseif (tag(1:3).eq.'-dc') then
  +              i = i + 1
  +              call getarg(i,dfile)
             elseif (tag(1:7).eq.'-noslip') then
                 i = i + 1
                 call getarg(i,nfile)
  
positive.code: C----
  C Parse command line, check for files
  C----
        call gcmdln(ifile,sfile,tfile,zfile,cfile,nfile,time,cf)
        if (ifile.eq.'none') then
            write(*,*) '!! Error: Input finite fault file unspecified'
            call usage('!! Use -f FFMFILE to specify input file')
  
negative.code:       zfile = 'none'
        cfile = 'none'
        nfile = 'none'
        efile = 'none'
        dfile = 'none'
        time = -1.0d0
        cf = 0
        narg = iargc()
  