anchor.diff:          isOutputDefined = .true.
           i = i + 1
           call get_command_argument(i,depth_file)
  +    elseif (trim(tag).eq.'-area') then
  +        isOutputDefined = .true.
  +        i = i + 1
  +        call get_command_argument(i,area_file)
   
       elseif (trim(tag).eq.'-clipseg') then
           isOutputDefined = .true.
  
positive.code: slip_file = ''
  time_file = ''
  depth_file = ''
  clip_file = ''
  epi_file = ''
  isOutputDefined = .false.
  
negative.code: character(len=512) :: slip_file
  character(len=512) :: time_file
  character(len=512) :: depth_file
  character(len=512) :: area_file
  
  character(len=512) :: clip_file
  character(len=16) :: clip_type
  