lista primaria (A-B-C): a doppi puntatori con puntatore di testa e puntatore di coda
	liste secondarie (p, q-r-s, ...): semplici con puntatore di testa e puntatore di coda

Type
  tInfoP = "qualsiasi";	{le informazioni nel nodo principale}
  tInfoS = "qualsiasi";	{le informazioni nel nodo secondario}
  pNodoP = ^NodoP;
  pNodoS = ^NodoS;
  NodoP  = record
    InfoP: tInfoP;
    SuccP,              {puntatori nelle due direzioni}
    PrecP: pNodoP;
    TestaS,             {puntatori di testa e di coda}
    CodaS: pNodoS;
  end;
  NodoS  = record
    InfoS: tInfoS;
    SuccS: pNodoS;
  end;
  ListaM = record
    TestaP,
    CodaP: pNodoP;
  end;