procedure sbslic

This subroutine plots a "grey-scale" slice through a unit-cell of density. All (x,y,z) values are taken to be given in world coordinates. The z-component of the eye-poisition should be positive and that of all the lattice-vertices should be negative; the viewing-screen is fixed at z=0.

Syntax
sbslic EYE,LATICE,DENS,N1,N2,N3,DLOW,DHIGH,IC1,IC2,SLNORM,APOINT,ICEDGE

Arguments
ARGUMENT    TYPE I/O DIMENSION DESCRIPTION
EYE:   R*4 I 3 (x,y,z) coordinate of eye-position.
LATICE:   R*4 I 3 x 4 (x,y,z) coordinates of the origin
   and the a, b & C lattice-vertices.
DENS:   R*4 I (N1+1) The density at regular points within
   x (N2+1) the unit cell, wrapped around so
   x (N3+1) that DENS(0,J,K)=DENS(N1,J,K) etc..
N1,N2,N3:   I*4 I - The dimensions of the unit-cell grid.
DLOW:   R*4 I - Density for the lowest colour-index.
DHIGH:   R*4 I - Density for the highest colour-index.
IC1,IC2:   I*4 I - Lowest & highest colour-index to be
   used for the shading.
SLNORM:   R*4 I 3 (x,y,z) direction of the normal to
   the slice to be "grey-scaled".
APONIT:   R*4 I 3 (x,y,z) coordinate of a point within
   the slice to be "grey-scaled".
ICEDGE:   I*4 I - If >=0, it's the colour-index for the
   boundary of the "grey-scaled" slice.