void free_list(LIST **top)
{
   LIST *ptr;

   while(!empty(*top)) 
   {
      ptr=*top;
      *top=*top->next;
      free(ptr); 
   }
}