this implementation calls subroutine J1TEAR to make a tear. This sub-

routine calls J1MDGR to determine the row or column of maximum degree

and tears that row or column.

B.5.7 J1VIDM

J1SIM (6.13)

 The subroutine J1VIDM produces the SIM's representing the IDM's

for all of the variable indices. It examines the variable index

definitions and appropriate function index blocking factors to determine

the size of the SIM. It then calls J1SIM to generate the SIM of the

correct size. Finally, it fills in the SIM to represent the desired

IDM.

B.5.8 "iAN,'-

PCKNME (6.15)

 In order that no two data items have the same name, unique names

are generated by the subroutine NAMGEN. The names can be either real

or integer in type and are six characters in length. The last four

characters of each name are digits which serve as a sort of odometer.

Each time a name of a particular type is generated, the odometer for

that type is incremented by one. The name is packed into a vector two

words long by the subroutine PCL'.ii_.

B.5.9 RELNAM

SEARCH (6.17)

 When a data item stored in MEMORY is no longer needed it can be

released by name by calling RELNAM. This subroutine uses the function

SEARCH to locate the directory entry for the data item and i"arks the

entry as no longer needed.