1 gaskelld 1.1 ! BREM.INC
 2              !
 3              ! Series of switches used by BREM* subroutines. 
 4              ! Switches should be set initially by calling BREM_INIT.
 5              
 6              	logical produce_output		! produce screen output?
 7              	logical exponentiate		! exponentiate soft photon prob?
 8              	logical include_hard		! include hard correction?
 9              	logical calculate_spence	! calculate spence functions?
10              
11              	common /bremcom/produce_output, exponentiate,
12                   >		include_hard, calculate_spence