Page:4SIGHT manual- a computer program for modelling degradation of underground low level waste concrete vaults (IA 4sightmanualcomp5612snyd).pdf/91

4.

⟨Global variables 4⟩ $\equiv$ 
 long elapsed_time;

See also sections 12, 19, 20, 21, 29, 31, 40, 63, and 69. This code is used in section 2.

5. System Setup.

#define CTRL_BRK_ON 1
#define GET_TIME O

⟨System setup 5⟩ $\equiv$  
 printf(banner);
 elapsed_time = biostime (GET_TIME, $0_{L}$); /* get BIOS timer value */
 ⟨Determine STDIN 30⟩;
 i=setcbrk (CTRL_BRK_ON);    /* check ctrl-brk every system call */
 ctrlbrk (control_break);
 signal (SIGFPE, div.0);
 initialize ion_data();

This code is used in section 2.

6. Parse Input.

⟨Parse input 6⟩ $\equiv$
 i = yyparse();

This code is used in section 2.

7. Parameter Initialization.

⟨Parameter initialization 7⟩ $\equiv$
 initialize parameters();
 update_pressures();
 aci_guidlines();
 chemical_equilibrium (FALSE);
 chemical_equilibrium (FALSE);
 chemical_equilibrium (FALSE);
 ⟨Print initial system state 74⟩;

This code is used in section 2.

8. Ion Transport.

⟨Ion transport 8⟩ $\equiv$
 ion_diffusion();
 chemicalequilibrium(TRUE);
 advance_sulfate_front();

This code is used in section 2.

9. Adjust Parameters.

⟨Adjust parameters 9⟩ $\equiv$ 
  ⟨Advance global clock 70⟩;
  ⟨Adjust physical parameters 68⟩;
  update_pressures();
  ⟨Update the porosities 67⟩;

This code is used in section 2.