Big Chemical Encyclopedia

Chemical substances, components, reactions, process design ...

How to Adjust the Time Step

OPEN RESULTS.PRN FOR OUTPUT AS 11 results to a file for plotting GOSUB- PRINTER FOR nx = 1 TO nstep GOSUB EQUATIONS GOSUB GAUSS FOR jrow = 1 TO nrow [Pg.38]

NEXT jrow GOSUB CHECKSTEP NEXT nx CLOSE 1 RETURN [Pg.38]

CHECKSTEP This subroutine identifies the largest relative increment [Pg.38]

IF biginc relinc THEN biginc IF biginc = relinc THEN bigone NEXT jrow [Pg.39]

PRINTER Subroutine writes a file for subsequent plotting [Pg.39]

See other pages where How to Adjust the Time Step is mentioned: [Pg.37]

SEARCH

Adjustment time