Λ.4. Block Diagrams for the Important
Routines
179
BND(IfT)-BND(I,T)+
GODBAR(KX,TEQ)
TEQ • TEQ+1
GODBAR (KX, J) - 0·
J - ΤΙ,ΤΜΑΧ