anchor.diff:  character(len=16) :: plates(2)
   double precision :: pole(3)
   character(len=32) :: model_name
  +character(len=32) :: convert_mode
   
   end module
   
  
positive.code:                        output_file, &
                         plates, &
                         pole, &
                         model_name
  
  implicit none
  
  
negative.code: plates = ''
  pole = 0.0d0
  model_name = 'MORVEL56'
  convert_mode = ''
  
  ! Number of arguments
  narg = command_argument_count()
  