program main
  implicit none
  integer x
  common /NAG/ x
  print *, x ! 初期化されていない x を参照している！
end program