CRBXSO ( centre, axis, width, length, height, box1, ifail )
===========================================================
Create box solid
Receives:
KI_vec_position centre --- centre of base of box
KI_vec_axis axis --- axis of box
KI_dbl_distance *width --- width of box
KI_dbl_distance *length --- length of box
<KI_dbl_distance> *height --- height of box
Returns:
KI_tag_body *box1 --- box
KI_cod_error *ifail --- failure indicator
Description:
If 'height' is positive, a body is created with six rectangular faces (a box
or cuboid). One of the faces is centred at the point 'centre', and the body
extends a distance 'height' from there in the direction of 'axis'. The other
two dimensions of the box are 'width' and 'height'.
If 'height' is zero, a rectangular sheet body is created, of dimension 'width'
by 'length'. The normal to the plane face of the sheet is 'axis'.
In either case, if 'axis' is parallel to the Z-axis (0,0,1) then the faces or
sides of length 'width' will be parallel to the X-axis, and those of length
'length' parallel to the Y-axis. If 'axis' is not parallel to the Z-axis, the
orientation of the body about 'axis' is not defined.
