protected void Link(FibonacciHeapNode newChild, FibonacciHeapNode newParent)
{
newChild.Left.Right = newChild.Right;
newChild.Right.Left = newChild.Left;
newChild.Parent = newParent;
if (newParent.Child == null)
{
newParent.Child = newChild;
newChild.Right = newChild;
newChild.Left = newChild;
}
else
{
newChild.Left = newParent.Child;
newChild.Right = newParent.Child.Right;
newParent.Child.Right = newChild;
newChild.Right.Left = newChild;
}
newParent.Degree++;
newChild.Marked = false;
}
public FibonacciHeapNode Insert(Vertex data, float key)
{
var node = new FibonacciHeapNode(data, key);
if (this.Root != null)
{
node.Left = this.Root;
node.Right = this.Root.Right;
this.Root.Right = node;
node.Right.Left = node;
if (node.Key.CompareTo(this.Root.Key) < 0)
{
this.Root = node;
}
}
else
{
this.Root = node;
}
this.Size++;
return(node);
}
protected void Cut(FibonacciHeapNode x, FibonacciHeapNode y)
{
x.Left.Right = x.Right;
x.Right.Left = x.Left;
y.Degree--;
if (y.Child == x)
{
y.Child = x.Right;
}
if (y.Degree == 0)
{
y.Child = null;
}
x.Left = this.Root;
x.Right = this.Root.Right;
this.Root.Right = x;
x.Right.Left = x;
x.Parent = null;
x.Marked = false;
}
protected void CascadingCut(FibonacciHeapNode y)
{
FibonacciHeapNode z = y.Parent;
if (z != null)
{
if (!y.Marked)
{
y.Marked = true;
}
else
{
this.Cut(y, z);
this.CascadingCut(z);
}
}
}
public FibonacciHeapNode Pop()
{
FibonacciHeapNode minNode = this.Root;
if (minNode != null)
{
int numKids = minNode.Degree;
FibonacciHeapNode oldMinChild = minNode.Child;
while (numKids > 0)
{
FibonacciHeapNode tempRight = oldMinChild.Right;
oldMinChild.Left.Right = oldMinChild.Right;
oldMinChild.Right.Left = oldMinChild.Left;
oldMinChild.Left = this.Root;
oldMinChild.Right = this.Root.Right;
this.Root.Right = oldMinChild;
oldMinChild.Right.Left = oldMinChild;
oldMinChild.Parent = null;
oldMinChild = tempRight;
numKids--;
}
minNode.Left.Right = minNode.Right;
minNode.Right.Left = minNode.Left;
if (minNode == minNode.Right)
{
this.Root = null;
}
else
{
this.Root = minNode.Right;
this.Consolidate();
}
this.Size--;
}
return(minNode);
}
public void DecreaseKey(FibonacciHeapNode node, float key)
{
if (key.CompareTo(node.Key) > 0)
{
throw new ArgumentOutOfRangeException(nameof(key));
}
node.Key = key;
FibonacciHeapNode y = node.Parent;
if ((y != null) && (node.Key.CompareTo(y.Key) < 0))
{
this.Cut(node, y);
this.CascadingCut(y);
}
if (node.Key.CompareTo(this.Root.Key) < 0)
{
this.Root = node;
}
}
public Vertex(FibonacciHeapNode node = null, State state = default(State))
{
this.Node = node;
this.State = state;
}
public void Clear()
{
this.Root = null;
this.Size = 0;
}
protected void Consolidate()
{
int arraySize = ((int)Math.Floor(Math.Log(this.Size) * one_over_log_phi)) + 1;
var array = new List <FibonacciHeapNode>(arraySize);
for (int i = 0; i < arraySize; i++)
{
array.Add(null);
}
int numRoots = 0;
FibonacciHeapNode x = this.Root;
if (x != null)
{
numRoots++;
x = x.Right;
while (x != this.Root)
{
numRoots++;
x = x.Right;
}
}
while (numRoots > 0)
{
int d = x.Degree;
FibonacciHeapNode next = x.Right;
while (true)
{
FibonacciHeapNode y = array[d];
if (y == null)
{
break;
}
if (x.Key.CompareTo(y.Key) > 0)
{
FibonacciHeapNode temp = y;
y = x;
x = temp;
}
this.Link(y, x);
array[d] = null;
d++;
}
array[d] = x;
x = next;
numRoots--;
}
this.Root = null;
for (int i = 0; i < arraySize; i++)
{
FibonacciHeapNode y = array[i];
if (y == null)
{
continue;
}
if (this.Root != null)
{
y.Left.Right = y.Right;
y.Right.Left = y.Left;
y.Left = this.Root;
y.Right = this.Root.Right;
this.Root.Right = y;
y.Right.Left = y;
if (y.Key.CompareTo(this.Root.Key) < 0)
{
this.Root = y;
}
}
else
{
this.Root = y;
}
}
}
