anchor.diff:    integer(ENGPAR_EDGE_T) :: edgeType
     type(c_ptr) :: graph, splitInput, diffusiveInput
     logical(C_BOOL) :: inSmall, balanceGhosts
  -  real(C_DOUBLE) :: tol, stepfactor
  +  real(C_DOUBLE) :: tol, stepfactor, cutFactor
     integer :: splitFactor, verbosity, newComm
     integer(ENGPAR_PART_T), dimension(1) :: ranks ! only used LOCAL_PARMETIS
     character(len=256) :: inGraphFileName, outGraphFileName, splitMethod
  
positive.code:   diffusiveInput = cengpar_createDiffusiveInput(graph,stepFactor)
    call cengpar_addPriority(diffusiveInput,-1,tol)
    call cengpar_addPriority(diffusiveInput,0,tol)
    call cengpar_setCutGrowthFactor(diffusiveInput,0.5)
    call cengpar_balanceGhosts(diffusiveInput,balanceGhosts)
    call cengpar_balance(diffusiveInput,verbosity);
    call cengpar_checkValidity(graph);
  
negative.code: 
    ! Create the input for diffusive load balancing (vtx>element)
    tol = 1.05
    cutFactor = 0.5
    stepFactor = 0.1
    verbosity = 0
    balanceGhosts = .true.
  