Input Instructions for HEATR

     ******************************************************************
     *                                                                *
     * card 1                                                         *
     *    nendf    unit for endf/b tape                               *
     *    nin      unit for input pendf tape                          *
     *    nout     unit for output pendf tape                         *
     *    nplot     unit for graphical check output                   *
     * card 2                                                         *
     *    matd     material to be processed                           *
     *    npk      number of partial kermas desired (default=0)       *
     *    nqa      number of user q values (default=0)                *
     *    ntemp    number of temperatures to process                  *
     *             (default=0, meaning all on pendf)                  *
     *    local    0/1=gamma rays transported/deposited locally       *
     *             (default=0)                                        *
     *    iprint   print (0 min, 1 max, 2 check) (default=0)          *
     * card 3      for npk gt 0 only                                  *
     *    mtk      mt numbers for partial kermas desired              *
     *             total (mt301) will be provided automatically.      *
     *             partial kerma for reaction mt is mt+300            *
     *             and may not be properly defined unless             *
     *             a gamma file for mt is on endf tape.               *
     *             special values allowed--                           *
     *               303   non-elastic (all but mt2)                  *
     *               304   inelastic (mt51 thru 91)                   *
     *               318   fission (mt18 or mt19, 20, 21, 38)         *
     *               401   disappearance (mt102 thru 120)             *
     *               443   total kinematic kerma (high limit)         *
     *             damage energy production values--                  *
     *               444   total                                      *
     *               445   elastic (mt2)                              *
     *               446   inelastic (mt51 thru 91)                   *
     *               447   disappearance (mt102 thru 120)             *
     *          cards 4 and 5 for nqa gt 0 only                       *
     * card 4                                                         *
     *    mta      mt numbers for users q values                      *
     * card 5                                                         *
     *    qa       user specified q values (ev)                       *
     *               (if qa.ge.99.e6, read in variable qbar           *
     *                  for this reaction)                            *
     * card 5a     variable qbar (for reactions with qa flag only)    *
     *    qbar      tab1 record giving qbar versus e (1000 words max) *
     *                                                                *
     ******************************************************************