%N cogeti %F $MIR/src/subs/co.for
%D Get a value from a coordinate object.
%P mrc
%: coordinates
%B
      subroutine coGetI(lu, object, iVal)

      integer   lu
      character object*(*)
      integer   iVal
  ---------------------------------------------------------------------
  Get an integer value from a coordinate object.

  Input:
    lu         Handle of the coordinate object.
    object     Name of the thing to set.
  Output:
    iVal       The value.
