{
{   This routine  returns the number of entries (both valid and unused) in the
{ active set table.  If the active set table  has  not  been  initialized  the
{ ast_size = 0.
{
{       STP$OBTAIN_AST_SIZE (AST_SIZE)
{
{ AST_SIZE: (output)  This parameter returns the size of the active set table.
{
