%N coreinit %F $MIR/src/subs/co.for
%D Finish initialising a coordinate object.
%P rjs
%: coordinates
%B
      subroutine coReinit(lu)

      integer lu
  ---------------------------------------------------------------------
  Finish initialising a coordinate object.  Identifies the celestial
  axes, if any, checks for consistency and sets up the celprm struct
  for WCSLIB.

  Input:
    lu         Handle of the coordinate object.
