5 * Revision 1.1.1.1 1995/10/24 10:20:28 cernlib
9 #include "geant321/pilot.h"
10 *CMZ : 3.21/02 29/03/94 15.41.27 by S.Giani
14 C. ******************************************************************
16 C. * Draw the N-th surface described by the 4 space points *
17 C. * stored in vector SURF starting from address 12*(N-1)+1 *
19 C. * ==>Called by : (not called yet) *
20 C. * Author : P.Zanarini ********* *
22 C. ******************************************************************
24 #include "geant321/gcbank.inc"
26 EQUIVALENCE (WS(1),SURF(1))
27 DIMENSION P(3,4),U(5),V(5)
29 C. ------------------------------------------------------------------