H A D | 20010519-1.f | 643 INTEGER ITER,IPAR1,IPAR2,NFSAV,PINBCM,PJNBCM,PDD1CM,LENCMP local in subroutine:NMDIMB 645 COMMON /DIMBI/ ITER,IPAR1,IPAR2,NFSAV,PINBCM,PJNBCM,LENCMP local in subroutine:NMDIMB 699 ITER=0 856 WRITE(OUTU,521) ITER 888 IF(ITER.EQ.ITMX) THEN 963 IF(ITER.EQ.0) LWDINI=.TRUE. 965 ITMX=ITMX+ITER 967 WRITE(OUTU,543) ITER,ITMX 1001 ITER=0 1015 DO WHILE((CVGMX.GT.TOLDIM).AND.(ITER [all...] |