! [L,A] : (line(L) & point(A) & ninc_po_l(A,L))
? [B,C] : (point(B) & point(C) & B!=C & inc_po_l(B,L) & inc_po_l(C,L))
(ncol(A,B,C))
? [P] : (plane(P) & inc_po_pl(A,P) & inc_po_pl(B,P) & inc_po_pl(C,P))
(inc_l_pl(L,P) & inc_po_pl(A,P))

