// reset_bhXjX: reset functions for the sequence bhXjX.c

//             1. par2D is always executed.
//             2. Create BioPack globals

par2D

exists('investigator','parameter','global'):$e
if $e < 0.5 then
   create('investigator','string','global')
   investigator=''
endif 

exists('notebook','parameter'):$e
if $e < 0.5 then
   create('notebook','string','global')
   notebook=''
endif 

exists('page','parameter'):$e
if $e < 0.5 then
   create('page','string','global')
   page=''
endif 

write('line3','Macro %s is complete\n',$0)
