anchor.diff:          stop
       end subroutine read_config_file
   
  +
   end module lindblad_fit_module
   
  
positive.code:           A(super1,super2) = A(super1,super2) + calc(super1,i,j,k,l)*conjg(calc(super2,i,j,k,l))
  
            if(super1 == 1) then
              !B(super2) = B(super2) + HEOM_EVOPS(i,j,k,l)*conjg(calc(super2,i,j,k,l))
            end if
          end do
          end do
  
negative.code:         write(no4,'(i3)')   Utnemele2
        endif
  
        name = trim(prefix) // trim(no1) // '-'//trim(no2)//'--'// trim(no3) // '-'//trim(no4)//'.dat'
        open(UNIT=ind(Uelement,Uelement2,Utnemele,Utnemele2,.false.), FILE = trim(name), STATUS='OLD', ACTION='READ')
  
        end do
        end do
  