real, target :: areal
  pointertoreal => areal