1c Constants and flags for the Coulomb Attenuated Schrodinger Equation (CASE) 2c The coulomb operator can be attenuated using the error function 3c 4 double precision cam_omega 5 logical cam_exch, doscreen 6 double precision cam_alpha, cam_beta 7 logical cam_srhf 8c 9 common/case_var1/cam_omega 10 common/case_var2/cam_exch, doscreen 11 common/case_var3/cam_alpha,cam_beta 12 common/case_var4/cam_srhf 13c 14c $Id$ 15