Creation of a Volume

+-------------+                                               +----------##
| Geant 3.10  |               GEANT User's Guide              | GEOM100  ##
+-------------+                                               +----------##
                                   

                                   

Author(s) : R.Brun                                     Submitted: 15.08.83
Origin    : R.Brun,A.McPherson                           Revised: 28.04.86
                                  

   +------------------------------------------------------------------+
   | CALL GSVOLU (NAME,SHAPE,NMED,PAR,NPAR,IVOLU*) |
   +------------------------------------------------------------------+
                                  

Defines a volume with a given name, shape, tracking medium number and shape parameters. There is a way for the user to indicate that dimensions are to be chosen automatically by the supplied routines. If the user specifies a dimensional parameter to be negative, then, in each case where the user places this volume within another, this dimension will be chosen to be the maximum that will fit inside the mother volume. This facility is of principal use in conjunction with the slice division of volumes using GSDVN, GSDVT, and GSDVX. It is implemented only in the absence of a relative rotation and only for rectangles and trapezoids within each other and for cylinders and cones or segments thereof within each other in the case of no offset in x or y.

NAME

Unique 4 character name.

SHAPE

4 character name of a system supplied shape.

NMED

Tracking medium number for the region of the volume. If volumes are located within this volume then this value will be overridden by lower level definition.

PAR

Array containing the shape parameters.

NPAR

Number of such parameters. If this is zero then the parameters will be expected at positioning time through calls to GSPOSP (GEOM 120).

IVOLU

Number returned by the subroutine as system volume number; if IVOLU <=0, then there is an error in the call.

Examples

      DIMENSION PECAL(6)
      DATA PECAL/1.71,4.,0.2,3*0./
      CALL GSVOLU('ECAL','BOX ',1,PECAL,6,IVOLU)

                +----------------------------------------+
                | CALL GPVOLU (IVOLU) |
                +----------------------------------------+
                                  

Prints the volume parameters

IVOLU

For volume IVOLU (for all volumes if IVOLU=0).