A.4. Block Diagrams for the Important
Routines
175
OPTIME = .FALSE.
. . !
IST(IS,T) = 0.
IS = LL,SS
τ = Ι,ΤΜΑΧ
r
I RET = SUMA
BND(KX,T) = 0.
PVEARN(T) = PVEARN(TOT)+(IRET-TAOPCS)/((l+R)**T)
AVCAP(TI) = AVCAP(T)+(IRET-TAOPCS)/((l+R)**T))