3.12 SUBROUTINE SET_INPI

      subroutine set_inpi(name,ls,ival,set)
      implicit double precision (a-h,o-z)
      character*(*) name,set

Adds an integer parameter to the local list of an input set.

name:

name of the parameter

ls:

max. number of significant characters in ''name''

ival:

input value associated to name

set:

name of input set