anchor.diff:            call intersect_one_round( &
                  nodes_first, nodes_second, &
                  num_candidates, CANDIDATES_ODD, &
  -               num_intersections, intersections_workspace, &
  +               num_intersections, INTERSECTIONS_WORKSPACE, &
                  CANDIDATES_EVEN, num_next_candidates, py_exc)
          end if
   
  
positive.code:        deallocate(CANDIDATES_EVEN)
      end if
  
    end subroutine free_all_intersections_workspace
  
  end module curve_intersection
  
negative.code:     integer(c_int), intent(out) :: num_intersections
      integer(c_int), intent(out) :: status
      ! Variables outside of signature.
      integer(c_int) :: num_candidates, num_next_candidates, index_, py_exc
      logical(c_bool) :: is_even
  
  