FUNCTION NUMTER has several modes of operation, but only one of these is possible while using it in other programs. If the input values are the shell's total quasispin Q multiplied by two (input argument I2Q), the shell's total spin S multiplied by two (input argument I2S), the shell's total angular momentum L multiplied by two (input argument I2L) and the quantum number l, it will find the number of the s-, p - d - shell's term, as numbered in Table 1. The other arguments of this subroutine, NK and ND, should be set to 3. In this mode, a COMMON block /MT/, is needed by the program, which is defined in BLOCK DATA TERMLS.