Базовые навыки работы со списками (пример на C++)

ну...... конец списка типа
не вижу прямой взаимосвязи этого присвоения с ошибкой

в функции

void vivod(point Z){

не написал условие выхода из рекурсии - затупил жестко, да. но да время позднее было, и я уставший... не суть.

со списками я разобрался - ничего сложного в этом нет, скоро предоставлю пару примеров кодов и подробные комментарии

код

#include <cstdio>
#define _USE_MATH_DEFINES
#include <cmath>
#include <string>
#include <conio.h>
#include <iostream>

//using std::cout;
//using std::cin;
//using std::endl;
using namespace std;

struct elem{ // тип данных элементов списка
	elem *previous;
	//int N;
	int a;
	elem *next;
};
typedef elem* pnt; // псевдоним
pnt head;

void init (elem *&p){  //ИНИЦИАЛИЗАЦИЯ ПУСТОГО СПИСКА // работает!
	p = NULL;
}

bool proverka(){ // ПРОВЕРКА НА ПУСТОТУ  // работает!      
	if( head == NULL)
		return false;
	else
		return true;
}

void add(pnt &p, int x){  //ДОБАВЛЕНИЕ НОВОГО ЭЛЕМЕНТА // работает!
//  добавляем элемент после данного 
// имеем адрес элемента, рядом с которым добавляем новый и значение - х  
//которое добавим в новый элемент
	if(head == NULL){
		p = new elem;
		p-> a = x;
		p->next = NULL;
		p->previous = head;
		head = p;
	}
	else{
		pnt r = new elem;
		r->a = x;
		r-> next = p->next;
		p->next = r;
		r->previous = p;
	}
}

int read(pnt p /*, int x*/){ // работает! 
// "считываем" значение элемента, возвращаем его в маин для дальнейших разбирательств
	if(p != NULL)
		return(p->a);
	else{
		return 0;
	}
}

bool criterion(pnt &Q, int x){ // ПРОВЕРКА
//проверяет, равно ли значение элемента заданному значению (х)
	if(read(Q) == x)
		return true;
	else
		return false;
}

void show_list(elem *list){ // ВЫВОД СПИСКА НА ЭКРАН // работает!
	cout << endl << "вывод списка" << endl; 
	while(list != NULL) {
		cout << read(list) << endl;
		list = list->next;
	}
	cout << endl << "show_list конец списка";
}

void deleter(elem **list, elem *p) { // УДАЛЕНИЕ ЭЛЕМЕНТА
	if (p == NULL)
		return;

	if (p->previous == NULL) { //удаление первого элемента
		*list = (*list)->next;
		delete p;
	}
	else if(p->next == NULL) { //удаление последнего элемента
		elem *temp = p;
		p->previous->next = NULL;
		delete temp;
	}
	else {   // удаление элемента из середины
		p->previous->next = p->next;
		p->next->previous = p->previous;
		delete p;
	}
} 

elem * find(elem *list, int x) { // ПОИСК И УДАЛЕНИЕ ПО КРИТЕРИЮ    
	elem *curr = list;
	while (curr != NULL) {
		if (curr->a == x)
			return curr;
		curr = curr -> next;
	}
}
void main(){
	setlocale(LC_ALL, "Russian");
	list A;

	A.init (A.head); // инициализация пустого списка
	cout << "введите количество элементов в списке" << endl;
	int j; // количество элементов в списке
	cin >> j;
	cout << endl << "заполните список" << endl;
	elem *Q;
	for(int i = 1; i <= j; i++){   
		// заполнение списка
		int y;
		cin >> y;
		A.add(Q, y);
		if(i > 1)
			Q = Q-> next;
	}

	A.show_list(A.head);
	int x;
	cout << endl << endl << "введите критерий удаления"<< endl;
	cin >> x;
	A.deleter(&A.head, A.find(A.head, x)); //?????????????????????
	
	A.show_list(A.head);
	
getch();
}

/* спиок есть последовательность элементов, связанных указателями на друг друга
при добавлении нового элемента необходимо связать его указателями на соседние эл.
при удалении элемента необходимо переназначить указатели элементов, указывающие на него.
если в структуре описан указатель, то обращение к нему черезх операцию "->",
а не через точку, как к простым элементам структуры */