Последовательный список: функция-член pop_front() удаляет не все элементы

 // List.h
#include <stdexcept>
class List
{
public:
    typedef double  value_type;
    typedef size_t  size;
private:
    struct Node
    {
        Node(const value_type& a) : item(a) {};
        Node(void) {};
        value_type item;
        Node *next;
        Node *prev;
    };
public:
    class iterator
    {
        friend class List;
        iterator(Node *el) : elem(el) {};
    public:
        // Конструкторы
        iterator(void) : elem(0) {};
        iterator(const iterator &it) : elem(it.elem) {};
        // Сравнение итераторов
        bool operator==(const iterator& it) const { return (elem == it.elem); }
        bool operator!=(const iterator& it) const { return !(*this == it); }
        // Перемещение итератор
        iterator& operator++(void)
        {
            if (elem != 0)
                elem = elem->next;
            return *this;
        }
        iterator& operator--(void)
        {
            if (elem != 0)
                elem = elem->prev;
            return *this;
        }
        value_type& operator*(void) const
        {
            if (elem != 0)
                return elem->item;
            else
                throw std::out_of_range("Nulliterator");
        }
    private:
        Node *elem;
    };
// Конструкторы / копирование / присваивание
    List(void) : Head(new Node()), Tail(Head), count(0)
    {
        Tail->next = Tail->prev = 0;
        head = iterator(Head);
        tail = iterator(Tail);
    }
    List(const value_type& a, size n = 1)
    {
        List tmp;
        for (size i = 0; i < n; ++i)
            tmp.push_front(a);
        *this = tmp;
    }
    List(iterator first, iterator last)
    {
        List tmp;
        for (iterator ip = first; ip != last; ++ip)
            tmp.push_front(*ip);
        *this = tmp;
    }
    List(const List& r)
    {
        List tmp(r.begin(), r.end());
        *this = tmp;
    }
    ~List(void)
    {
        Node *delete_Node = Head;
        for (Node *p = Head; p != Tail;)
        {
            p = p->next;
            delete delete_Node;
            --count;
            delete_Node = p;
        }
        delete delete_Node;
    }
    List& operator=(const List& t)
    {
        List tmp(t);
        swap(tmp);
        return *this;
    }
// Итераторы
    iterator begin(void) { return head; }
    iterator end(void) { return tail; }
    iterator begin(void) const { return head; }
    iterator end(void) const { return tail; }
// Размеры
    bool empty(void) const { return (Head == Tail); }
    size length(void) const { return count; }
// Доступ к элементам
    value_type& front(void) { return *begin(); }
    value_type& back(void) { iterator it = end(); --it; return *it; }
// Модификаторы контейнера
    void push_front(const value_type &value)
    {
        Node *new_Node = new Node(value);
        new_Node->prev = 0;
        new_Node->next = Head;
        Head->prev = new_Node;
        Head = new_Node;
        head = iterator(Head);
        ++count;
    }
    void pop_front(void)
    {
        Node *el = begin().elem;
        Node *nextel = el->next;
        nextel->prev = 0;
        delete el;
        Head = nextel;
        head = iterator(Head);
        --count;
    }
    void pop_back(void)
    {
        Node *el = (--end()).elem;
        Node *prevel = el->prev;
        Node *nextel = el->next;
        prevel->next = nextel;
        nextel->prev = prevel;
        delete el;
        --count;
    }
    void erase(iterator it)
    {
        if (it == begin())
            pop_front();
        else if (it == --end())
            pop_back();
        else
        {
            Node *el = it.elem;
            Node *prevel = it.elem->prev;
            Node *nextel = it.elem->next;
            prevel->next = nextel;
            nextel->prev = prevel;
            delete el;
        }
        --count;
    }
    void erase(iterator first, iterator last)
    {
        while (first != last)
            erase(first);
    }
    void swap(List &other)
    {
        if (this != &other)
        {
            std::swap(this->count, other.count);
            std::swap(this->Head, other.Head);
            std::swap(this->Tail, other.Tail);
            
            this->head = iterator(this->Head);
            this->tail = iterator(this->Tail);
            other.head = iterator(other.Head);
            other.tail = iterator(other.Tail);
        }
    }
private:
    long count;
    Node *Head;
    Node *Tail;
    iterator head, tail;
};

// main.cpp
#include "List.h"
#include <iostream>
 
int main()
{
    List a;
    a.push_front(1);
    a.push_front(2);
    a.push_front(3);
    a.push_front(4);
 
    for (List::iterator it = a.begin(); it != a.end(); ++it)
        std::cout << *it << ' ';
    std::cout << std::endl << "length: " << a.length() << std::endl << std::endl;
    
    for (size_t i(0); i < a.length(); ++i) // должно удалять 4 элемента, но удаляет только первые 2
        a.pop_front();
 
    for (List::iterator it = a.begin(); it != a.end(); ++it)
        std::cout << *it << ' ';
    std::cout << std::endl << "length: " << a.length() << std::endl << std::endl;
}

void pop_front(void)
    {
        if (begin() != end())
        {
            Node *del = begin().elem;
            Node *nextel = del->next;
            nextel->prev = 0;
            delete del;
            Head = nextel;
            head = iterator(Head);
            --count;
        }
    }

    for (size_t i(0); i < a.length(); ++i) // должно удалять 4 элемента, но удаляет только первые 2
        a.pop_front();