list beliebig(list& l, int dig, int s){
  listelement* lh=new listelement;
  listelement* cur=l.head;
  listelement* prev=NULL;
  lh->digit=dig;
  int i=0;

  while(cur&&i<s){  
    prev=cur;
    cur=cur->next;
    i++;
  }
  lh->back=prev;
  lh->next=cur;

  if(prev) {
    prev->next=lh;
    if(prev==l.tail) l.tail=lh;
  }
  if(cur) {
    cur->back=lh;
    if(cur==l.head) l.head=lh;
  }
  
  
}