8.4 SUBROUTINE RESERV_OP

c----------------------------------------------------------------------
      subroutine reserv_op(num,lenx)
c----------------------------------------------------------------------

reserves space for the operator record

Input parameters:

num

Number of operators for which new space is reserved.
An existing record is extended for this number of operators.

lenx

Length per operator to be reserved.