CRETIZATION BY OUTPUTING</span>
<span class="c">!              CLASS MIDPOINTS, WHEREAS THE DISCR3</span>
<span class="c">!              SUBROUTINE OUTPUTS CLASS NUMBERS</span>
<span class="c">!              (1, 2, ... , NUMCLA).</span>
<span class="c">!     COMMENT--THE INPUT VECTOR X REMAINS UNALTERED.</span>
<span class="c">!     COMMENT--IN THE MAIN (CALLING) ROUTINE, IT IS</span>
<span class="c">!              PERMISSABLE (IF THE ANALYST SO DESIRES)</span>
<span class="c">!              TO USE THE SAME