IPARDCL

names

/

type(tt)

init(ii)

comment(cc)

list

debug

Purpose

Parameters

name

Name of the global parameter to be declared. The first character must be a letter. The use of dollar symbol '$' and at-sign '@' is not recommended. Each name may be followed by an argument containing up to 15 dimensions, i.e. integers defining the upper bounds of an array of variables (the lower bounds are set to 1).

type(tt)

Data type of the global parameters.

• tt=0: boolean
• tt=1: short integer
• tt=2: long integer
• tt=3: single precision float
• tt=4: double precision float
• tt>4: character string with length tt

init(ii)

List of initialization values. Each constant may be preceded by a repetition factor enclosed in parentheses. Arrays are filled with the right-most subscript varying most rapidly (C, PL/I convention). Initially all parameters are reset to zero.

comment(cc)

Comment to be assigned to the specified global parameter. For an existing parameter, merely the comment is modified if no parameter extents or further keywords are specified.

list

Lists the successfully declared global parameter(s) on terminal.

debug

Debug switch. Lots of output !

Function

Remark

Examples

  IPARDCL a(3) / type(4) init( 1,2,3 )  comment(test parameter)
  IPAR a /list

  A(1..3) double          /* test parameter
  1 2 3

IPARDCL D(2,3) / TYPE(4) INIT((3)0,(3)1E3)