Однонаправленные и двунаправленные списки

#include <iostream>
 
struct node {
    double val;
    node*  next;
    node(const double& v):val(v), next(NULL){}
};
 
class slist {
private:
    node* hd, *tl;
public:
    slist(void):hd(NULL), tl(NULL){}
 
    explicit slist(const double* a, const double* b):hd(NULL), tl(NULL){
        while(a != b)
            add(*a++);
    }
 
    ~slist(){ clear(); }
public:
    //добавить в конец списка
    node* add(const double& v){
        node* p = new node(v);
        if(hd == NULL)
            hd = tl = p;
        else {
            tl->next = p;
            tl = p;
        }
        return p;
    }
 
    //вставка в произвольное место после элемента
    node* insert_after(node* pos, const double& v){
        if(pos == tl || pos == NULL)
            return add(v);
 
        node*   p = new node(v);
        p->next   = pos->next;
        pos->next = p;
        return p;
    }
 
    //удалить всех
    void clear(void){
        node* t;
        while(hd != NULL){
            t  = hd;
            hd = hd->next;
            delete t;
        }
        tl = NULL;
    }
 
    node* head(void){ return hd; }
    const node* head(void) const { return hd; }
 
    node* tail(void){ return tl; }
    const node* tail(void) const { return tl; }
};
 
//печать списка
void slist_print(std::ostream& _out, const slist& lst){
    for(const node* p = lst.head(); p != NULL; p = p->next)
        _out << p->val << ' ';
    _out << std::endl;
}
 
int main(void){
    double a[] = { 1, 3, 4, 5, 6, 7, 8, 9 };
    slist  lst(a, a + sizeof(a)/sizeof(a[0]));
    slist_print(std::cout, lst);
 
    lst.insert_after(lst.head(), 2);
    slist_print(std::cout, lst);
 
    //среднее значение
    int    cnt = 0;
    double sum = 0;
    for(const node* p = lst.head(); p != NULL; p = p->next, ++cnt)
        sum += p->val;
 
    if(cnt > 0)
        std::cout << "avg: " << sum / cnt << std::endl;
    lst.clear();
    std::cin.get();
    return 0;
}