c=============================================================================== c COM_HVs.INC c=============================================================================== c the voltages: real zero, UTgt, UGua, UGrid1, UG1, UG2 COMMON /voltages/ zero, UTgt, UGua, UGrid1, UG1, UG2