anchor.diff:  !--------------------------------------------------------------------------------------------------!
   
       subroutine calc_array_dimensions()
  -    use io, only: stderr, stdout, verbosity
  +    use io, only: stdout, verbosity
       use variable_module, only: displacement, prestress, los, fault, rake_constraint, &
                                   damping_constant, smoothing_constant, smoothing, &
                                   disp_components
  
positive.code: !--------------------------------------------------------------------------------------------------!
  
      subroutine load_slip_constraints()
      use io, only: stderr, stdout, verbosity
      use variable_module, only: displacement, prestress, fault, &
                                  disp_components, slip_constraint, rake_constraint, &
                                  smoothing
  
negative.code:     use variable_module, only: inversion_mode
      implicit none
      ! Local variables
      integer :: i, j
      double precision :: start, finish
  
      if (verbosity.eq.1.or.verbosity.eq.2.or.verbosity.eq.22) then
  