program prog
      common /com/ abs
      intrinsic abs
      end