The user-written initialization callback routine is passed to
    TPU$INITIALIZE as a bound procedure value and called to supply
    information needed to initialize DECTPU.

    Format

      INITIALIZE  [user_arg]