Удаление из двусвязного циклического списка

struct fib_heap
{
    int key; //ключ
    char *value; //Значение
    bool mark; // Метка, изменения узла
    ui degree; // количество дочерних узлов
 
    fib_heap *parent; // Указатель на родителя
    fib_heap *child; // Указатель на потомка
    fib_heap *left; //Указатель на левый дочерний
    fib_heap *right; // Указатель на правый дочерний
};
 
struct heap
{
    fib_heap *min;
    int n;
};

fib_heap *fib_heap_extract_min(heap *root)
{
    fib_heap *z = root->min;
 
    if (z == NULL)
        return NULL;
 
    fib_heap *x = NULL;
 
    for (x = z; x != NULL; x = x->child)
    {
        fib_heap_add_node_to_root_list(x, root->min);
        x->parent = NULL;
    }
 
    fib_heap_remove_node_root_list(z, root->min);
 
    if (z == z->right)
        root->min = NULL;
    else
    {
        root->min = z->right;
        fib_heap_cons(root);
    }
 
    root->n = root->n - 1;
 
    return z;
}

void fib_heap_add_node_to_root_list(fib_heap *node, fib_heap *min)
{
    if (min == NULL)
    {
        return;
    }
 
    if (min->left == min)
    {
        min->left = node;
        min->right = node;
        node->right = min;
        node->left = min;
    }
    else
    {
        node->left->left = min->left;
        min->left = node;
        node->right = min;
        node->left = node->left;
        node->left->right = node;
    }
}