EPA-340/1-85-018
SOURCE TEST CALCULATION
AND CHECK PROGRAMS FOR
HEWLETT-PACKARD 41
CALCULATORS

-------
                        EPA-340/1-85-01 £
SOURCE TEST CALCULATION
AND CHECK PROGRAMS FOR
HEWLETT-PACKARD 41
CALCULATORS

-------
                         DISTRIBUTION RECORD


   This document, Source Test Calculation and Check Programs for
Hewlett-Packard 41 Calculators, has been prepared such that future
additions and revisions can be added to update the information
therein.  A record of its distribution is being established and will
be maintained up to date so that future revisions of existing
material and additions may be distributed to document users.

   In order to enter the document user's name and address in the
distribution record, the "Distribution Record Card" below must be
filled out and mailed to the "address shown below.  Any future change
in name and/or address should also be sent to the same address.

   In addition, document users who wish copies of the calculation
and check programs on magnetic cards should send a HP program card
holder and 40 program cards with a request to the same address.

                 Mr. Frank Clay
                 Emission Measurement Branch (MD-13)
                 U. S. Environmental Protection Agency
                 Research Triangle Park, NC  27711
                      (cut along dotted line)

                     DISTRIBUTION RECORD CARD

                                                 Date
 Last Name          First        Middle Initial

 Address
 to Send 	
 Future              Street
 Revisions
 and
 Additions    City             State        •          Zip Code

If address is an
employer or affiliate (fill in)     	
                                             Employer or Affiliate

    I have received a copy of Source Test Calculation and Check
Programs for Hewlett-Packard 41 Calculators.  Please send me any re-
visions and new additions to this volume of the Handbook.

-------
                               EPA 340/1-85-018
Source Test Calculation And Check
 Programs For Hewlett-Packard 41
               Calculators
                    Prepared By
                    Frank Clay
               Emission Measurement Branch
           U.S.ENVIRONMENTAL PROTECTION AGENCY
           Emission Standards and Engineering Division
           Office Of Air Quality Planning And Standards
              Research Triangle Park, NC 27711
                   September 1985

-------
                                ACKNOWLEDGEMENT S
    This booklet was written by Mr. Frank Clay of  the U.  S. Environmental
Protection Agency's Emission Measurement Branch  (EMB),  Emission  Standards  and
Engineering Division.  The programs herein were  developed  by Mr.  Clay  to assist
the EMB and its contractors in their review and  validation of emission
measurement data in the field.  It was edited and  compiled for this  printing by
Entropy Environmentalists, Inc.  For further information,  contact Mr.  Frank
Clay at (919) 541-5543.

-------
                               TABLE OF CONTENTS
PAGE NUMBER

    1-3              Meter Box Program (DELTA H)
     4               Stack Gas Analysis (METH 3)
    5-6              Moisture Content Determination (METH 4)
     7               Nozzle Selection Program (NOZZLE)
     8               Sampling Summary Sheet
     9               Isokinetic Determination (METH 5)
    10               Stack Emissions Determination (MASSFLO)
    11               Velocity Traverse Program (METH 2)
    12               Probe Marking Program (METH 1)
    13               Number of Points (NOP)
    14               Average of Individual Delta Pg [ Tg  + 460]1/2  (PRESS)
    15               Equivalent Diameter (EDIA)
   16-17             Sample Point Times Using the Alignment Method (TIMES)
   18-19             Time Weighted Average (TWA)
    20               Sulfur Dioxide Emissions (METH 6)
    21               Flags
    22               Instructions for the HP 41
    22               Calculator Models
    22               The Calculator Keyboard
    23               The RPN System
    24               How to Manually Enter a Program
    24               How to Enter a Program Using the Card Reader
    25               How to Run a Program
    25               How to Assign a Program to  a User Key
    26               How to Use the Catalog Function
    26               How to Use the Printer
    26               How to Delete a Program

-------
                                  INTRODUCTION

     The programs presented in this booklet are used by the Emission Measurement
Branch of the Office of Air Quality, Planning, and Standards, United States Environ-
mental Protection Agency for checking field calculations, source test reports, or
                        •
for in-house tests.  The programs are written for the Hewlett-Packard 41-C, 4-1 -CY,
or the 41CX hand calculators.  The programs can be modified to run on the HP-6?
or H?-97» but the prompts would have to be eliminated and the memories reassigned
since the earlier models have smaller memories.  Since the Hewlett-Packard calculators
use the RPN System, the programs would have to also have to be modified to run on
calculators using the Algebraic Operating System common to such calculators as the
TI-58 and TI-59.

     Programs cover Methods 1 through 6, and there are two additional programs that
can be used with the Alignment Method.  A copy of each program is given along with
some brief instructions on how to use it.  Occasional examples are also included..

-------
                                                                           Page 1
                           METER BOX PROGRAM (DELTA K)

     The meter box program is used to set the Delta H of the meter box during the
sample run.  The program is more accurate and easier to use than the nomograph.
Unlike the nomograph, nothing in the program needs to be reset if there is a.
significant change in stack temperature.  Initial prompts for data input are as
follows:
     (l)  Number of thermometers in the dry gas meter
     (2)  Diameter of Nozzle
     (3)  Delta K@
     (4)  Pitot Coefficient
     (5)  Per Cent moisture
     (6)  Barometric Pressure (Inches Mercury)
     (?)  Static Pressure of Stack (inches Water)
     (8)  Molecular Weight Dry
     (9)  Molecular Weight Wet

     After the above data are entered, the program goes into a short loop and prompts
for the following data for each sample point:
    (10)  Meter inlet temperature (°F)
    (ll)  Meter outlet temperature ( F)
    (12)  Stack temperature (°F)
    (13)  Stack Delta p (Inches water)
     Note thai if the dry gas meter has only one temperature indicator, prompts 9
     and 10 will be replaced by a single prompt:  METER TEMP?

     After entering the above data, the Delta H setting for the meter box will
appear in the display.  After the Delta H is determined, pressing R/S will reset
the program for the next sample point.  The prompt that will appear in the display
will be MTR IN TEMP? if the dry gas meter has two thermometers, or METER TEMP?
if the dry gas meter has only one temperature gauge.

     When all the sample points have been completed, there is a subroutine, Subroutine
A, that can be manually executed to give the average meter temperature, average
stack temperature, average Delta K, and the average of the individual sauare roots
of [Delta p  (T  + 460)].
           s   s

-------
                                                                        Page  2
                     SPECIFIC PR03LSKS RUNNING THE METZH 3GX
     There are some problems that may occur during the course of a run.  First,
suppose a mistake is made during the input of the first nine pieces of data.   To
correct the mistake, simply go to the beginning of the program and re-enter all
data via prompts.
     Next, suppose a mistake is made entering data while taking the sample (steps
10 to 13) «  (A mistake is when a piece of incorrect data is entered and H/S is pressed.)
To correct this error, simply press R/S until you reach the meter temperature
prompt.  This will be either the KIR IN TEMP? prompt if the meter box has two  tem-
perature indicators, or the METER TEMP? prompt if the meter box has a single tem-
perature gauge.  When the prompt is reached, re-enter the correct pieces of data for
that sample point.
     Another -oroblem that can occur during a test is a process interruption.   This
means that the train must be shut down until the process is re-started.  When  the test
is resumed, it is  7iot likely that stack conditions will be identical to those when
the test was stopped, so another Delta H will have to be calculated.  Simply treat
the re-start as another point for  calculation purposes.  (Note:  data reduction will
have ~o be time weighted unless the train was stopped at the exact end of a point.)
     When the test run is concluded, one of two situations will exist:
     (l)  The test went perfectly, that is, there were no process interruptions and
no data were entered incorrectly during the run.  In this case, Subroutine A will
provide accurate summaries of the average stack temperature, meter temperature,
Delta H, and [Delta p  (T  - iw5o)]1//2.
     (2)  The test had a process interruption or some data were entered incorrectly
in the Delta H loop.  If a process interruption occurred, and no mistakes were made
entering data for the Delta H calculations, Subroutine A will give a reasonable
approximation of the average values needed for isokinetic calculation although
the final numbers will have to be time weighted for preciseness (A program labeled
TWA in the back of this booklet may be used to determine time weighted averages.)
If an error occurred while inputting data for the Delta H calculation and H/S  was
pressed through the loop, disregard Subroutine A.
     One last note - any :-l?-^l calculator will automatically turn itself off  after
ten minutes of inactivity.  This means that during port changes and process inter-
ruptions, the display would be blank when the test is resumed.  Executing tr.e ON
function will override this feature.  Tc execute the ON function, simply Dress

-------
                                                                        Page 3
XEQ ALPHA ON ALPHA.  The calculator will remain on until it is manually turned off.
Turning the calculator off automatically clears the ON function.
     The label for this program is DELTA H.  The Memory size is 019.

-------
           XE5  'BEkTfi H-
 NO.  OP TJOWKETERS OH
 3J?Y  GflS KETS??
             2.89    RUH
 BIfl  KCZZLE?
              .26    RUN
 BELTR Ha ?
             1.84    RUH
 PITOT CP ?
              .84    RUH
 5:  HOISTURE?
            13.58    RUN
 BfiR  PRESS?
            23.53    RUH
 STflTIC HOH?
             -.38    RUH
 NOL  HT DRY?
            23.55    RUH
 TOL  MT HET'
            27.47    RUN
 HTR  IN TEHP''
            82.99    RUN
 NTR  OUT TEHP?
            73.99    RUN
 STRCX TEHP'
           123.88    RUN
 SELTP P'
              .21    RUH
*DELTP * = 9.75
CEL-: '-: » 2,33
                     RUN
IfTR IH "*!P^
            32.38     RUN
flTR OUT TEHP?
            73.38     RUN
STPCK TEHP'
           123.88     RUN
DELTR P'
              .21     RUN
                    RUH

    IN  TEflP"
           82.98    RUN
    3UT TE?!??
           73.38    RUN
   CK TEHP'
          125.98    RUN
              22    RUN
                    RUN
 m IH TEHP?
             82.98
 KTR OUT TEHP?
                                                                                HETER TEHP ?
 STflCK TEHP?
 DELTB P?
 B7R  IH TEHP?
            94,88
 KTR  OUT TEHP'
            74,89
 STR.CK TEHP?
           127,89
 DSLTfl P?
              .48
*DELTfl H = 1,41


m IH TEHP?
            85,88
m OUT TEHP'
            74.98
ST3CK TEHP'
           127,88
DELT8 ?->
              ,48
*DELTa H = 1.43
                                                             RUH
                                                    73.89    RUH
            123.99     RUN
              .37    RUH

*DElTfl H = 1,33
                     RUH

KTB IH TEHP?
            83,99    RUH
m OUT TEHP?
            74.98    RUN
STUCK TEH??
           127.98    RUH
BELTfi P?
              ,36    RUH

*D£LTB H = 1.39
                     RUN


                     RUN

                     RUH

                     RUN

                     RUH


                     RUH
*DELTfl H = 1.45


m IH TEHP?
            95.38    RUN
m OUT TEHP?
            74.99    RUN
STSCK TEHF?
           127.88    RUN
KITH ??
              ,39    RUN
                     RUN
                                                                                              J.58    RUH
                                                                                STflCK TEHP?
                                                                                           127.88    RUN
                                         DELTfi P?
                                                       .36    RUH
                                         *C£LTfl  H =  1.31
                                                              RUH
                                         METER  TEHP  ?
                                                     88,58    RUH
                                        STfiCK  TEMP?

                                        DELTfl  P?
                                                    126,88    RUH
                                                       .35    RUH

                                        *DELTP H - 1,27
                                        KETER TEHP ?
                                                    88.59
                                        STOCK TEHP?

                                        DELTfi P?
                                                   127,88
RUH

RUN
                                                      ,27    RUN

                                        *DELTfl H = 8,58
                                        HETE3 TEHP ?
                                                                                           81,98
                                                                               STflCK TEHP?
                                                                                          127.89
RUH


RUN

RUH
                                                                               BELTS P?
                                                      ,29    RUH

                                        *D£LT8 H = 8.73
                                                           XE8 3
                                        TOTPL POINTS?
                                                    12.88    RUH
                                        flVE HTR TEHP * 73,
                                        flVE STK TEHP = 125.
                                        WE DELTfl H = 1.13
                                        S9RT PSTS = 13.4817
                                  Note  that Flag  05  was  set,
                                  From  this point on, only
                                  one:, meter tenrDeraturs
                                  prompt occurred.

-------
PRP   "DELTfl  H
  01+LBL  "DEL
           Tft  H"
  02  FIX  2.
  03  CF  05
  ©4  CLRG
  05  1
  06  "NO.  OF
     THERMOME"
  07  "hTERS  0
                H"
  08  flVIEW
  09  "DRY  GflS
        METER?"
  10  PROMPT
  11  X=Y?
  12  SF  05
  13  "DIP  NOZ
           ZLE?"
  14  PROMPT
  154
  16  YTX
  17  "DELTfl  H
             _  j—i l(
             •=J  :'
  13  PROMPT
  19  STO  04
  20  *
  21  846.872
  22  *
  23  "PI TOT  C
             P  O ••
  24  PROMPT
  25  X T 2
  26  *
  27  STO  05
  28  "'•:  MOIST
           LIRE?-
  29  PROMPT
  30  100
 31
     s
     ^
 34  XT-2
 35  RCL  05
 3 6  *
 37  STO  06
 38  "BfiR  PRE
 39  PROMPT
 40  STO  07
41
       STflTIC
           HOH?
 42  PROMPT
 43  13.6
 44  s
 45  RCL  07
 46  +
 47  "MOL  WT
          DRY?"
 48  PROMPT
 49  *
 50  "MOL  WT
          WET?"
 51  PROMPT
 52  s
 53  STO  08
 54  RCL  04
 55  13.6
 56  /
 57  RCL  07
 58  +
 59  RCL  08
 60  XOY
 61  s
 62  RCL  06
 63  *
 64  STO  09

 65+LBL  ©1
 66  FS?  ©5
 67  GTO  02
 68  "MTR  IN
        TEMP?"
 69  PROMPT
 70  ENTERS
 71  "MTR  OUT
        TEMP?"
 72  PROMPT
 73  +
 74  2
 75  -"
 76  ST+  11
 77  460
 78  +
 79  STO  10
 80  FC? 05
 81  GTO 03

 82+LBL 02
 83  "METER  T
        EMF  ?"
 84  PROMPT
 85  ST+ 1 1
 86  460
 87  +
88  STO  16

89+LBL  S3
90  "STOCK  T
          EMP?"
91  PROMPT
92  ST+  12
                                                                93  46©
                                                                94  +
                                                                95  STO  15
                                                                96  RCL  10
                                                                97  XOY
                                                                98  s
                                                                99  RCL  09
                                                               100  *
                                                               101  "DELTfl  P
102
103
104
105
106
107
108
109
1 10
111
112
1 13
1 14
PROMPT
STO
*
ST-f
STO
RCL
RCL
*
SORT
ST+
RCL
M

16

13
18
15
16


17
18

	 . 	 ••
flVIEW
 115  "*DELTP
           H  =  "
 116  RRCL  X
 117  RVIEW
 118  STOP
 119  FC? 55
 120  GTO 01
 121  flDV
 122  GTO 01

 123+LBL fi
 124  "TOTflL P
        OIHTS?"
 125  PROMPT
 126  STO 14
 127  RCL 11
 128  XOY
 129  s
 130  FIX 0
 131   "RVE  MTR
       TEMP  =  "
 132  flRCL  X
 133  fiVIEW
 134  FC? 55
 135  STOP
 136  RCL 12
 137  RCL 14
 138  s
 139  "fiVE  STK
       TEMP  =  "
140  flRCL  X
141   flVIEU

-------
142
143
144
145
146
147
148

149
150
151
152
153
154
155
156
157

15S
159
160
FC? 55
STOP
RCL 13
RCL 14
/
F I X 2






"PVE DEL
TO H =
fiRCL X
fiVIEW
FC? 55
STOP
RCL 17
RCL 14
/
FIX 4
••








"SQRT PS
TS =
RRCL X
RVIEW
. END.
••




-------
                                                                          Page 4

                           STACK GAS ANALYSIS (METH 3)

     This program determines the molecular weight of the stack gas.  It can deter-
mine the dry gas weight only, or it can determine both wet and dry molecular weights.
If another gas is present in the gas stream - such as SO , this can be added and
the molecular weight of the total stack effluent determined.  If the calculator
"prompts" for data none exists, (such as CO) simply press R/S and continue.

     The program uses flags for different run configurations.  The simpliest way to
use the flags is to set no flags for dry molecular weight only, and to set Flag 00
to get both wet and dry molecular weights.  In either case, some prompts will appear
that are not needed, but pressing R/S in these instances will cause the program to
continue.  If eliminating unnecessary prompts is desirable, the table below gives
the flag settings for different gas components.

                            DRY MOLECULAR WEIGHT ONLY

Stack Gas Components               Set Flag(s)
CO  and 0                          00, 01, 02, 04, and 08
CO , 0 , and CO                    00, 01, 02, and 04
CO , 0 , CO, and                   00, 01, and 02
another gas
                          WET. AND DRY MOLECULAR WEIGHTS

HO, CO , and 0                    00, 04, and 08
H20, C02, 02, and CO               00 and 04
H20, C02, 02, CO, and              00
another gas

     The label for this program is METH 3.  The Memory size is

-------
PRP  "METH  3"

  81+LBL  "MET
            H  3"
  02  FS?  00
  03  CLRG
  04  FS?  01
  05  GTO  01
  06  RCL  20
  © 7  X * 0 ?
  ©S  GTO  01
  09  RCL  22
  10  X = 0 ?
  11  GTO  0
  12  GTO  01

  13+LBL  fl
  14  ••:•: MOIST
         URE  ?"
  15  PROMPT
  16  STO  22

  17+LBL  01
  13  fl D V
  19  0
  2 0  " ': C 0 2 ? "
  21  PROMPT
  22  STO  24
  23  "'/. OXYGE
             N?"
  24  PROMPT
  25  STO  25
  26  0
  27  F S ?  03
  23  GTO  93
  29  ""-: CO  ? "
  30  PROMPT

  31+LBL  93
  32  STO  27
  33  Fi

      F S ?  04
   6  " M O L  W T
        OTHER?
   7  PROMPT
            99
  39  .01
  4. 0  *
  41  STO  23
  4 2  X = 0 ?
  43  GTO  02
  44  RCL  09
  45  X = 0 ?
 46  GTO  03
 47  10000
 48  *
 49  STO  42
 50  GTO  02

 51+LBL  03
 52  0
 53  "PPM ?
 54  PROMPT
 55  STO  42

 56+LBL  02
 57  RCL  24
 58  RCL  25
 59  +
 60  RCL  27
 61  +
 62  RCL  42
 63  .0001
 64  *
 65  STO  43
 66  +
 67  100
 68  -
 69  CHS
 70  STO  26
 71  RCL  24
 72  . 44
 73  *
 74  STO  29
 75  RCL  25
 76  .32
 77  *
 73  ST-H  29
 79  RCL  26
 80  RCL  27
 31  +
83
34
85
36
C- i'
88
89
90
91
92
93
94
95
96
97
93
C|Q
ST+  29
RCL  43
RCL  23
      29
      44
      -OQ
ST-t-
STO
RCL
flDV
FIX  2
" M W d =
ft RCL X
flVIEW
PSE
F S ?  02
STOP
100
                          100  RCL  22
                         '101  -
                          102  100
                          103  ••"
                          104  STO  23
                          195  1
                          106  RCL  23
                          107  -
                          10S  IS
                          109  *
                          110  RCL  29
                          111  RCL  23
                          1 12  *
                          113  +
                          114  STO  30
                          115  "MW  WET =

                          116  flRCL  X
                          117  flVIEW
                          IIS  flDV
                          119  FIX  4
                          126  RTH
                          121   .END.

-------
                     MOISTURE CONTENT DETERMINATION (METH 4)

     The Method. 4 program calculates moisture content.  It will also check for
saturation (as might be the case at a wet scrubber outlet) and it will calculate
the moisture content of a gas stream if a gas such as SO  is removed by peroxide
impingers before reaching the dry gas meter.  Flags are used to check for saturation
of the gas stream, or to correct for a gas removed before the dry gas meter.

     One thing that the program does not do is to make the distinction between
grams of H?0 and ml. of H.O.  The Federal Register determines moisture content by
multiplying the impinger ml. of water by 0.04707 to get standard cubic feet of
H_0 and grams of H_0 in the silica gel impinger by 0.04715 to get standard cubic
feet of H_0 from the impinger.  This is because there is a very slight difference
between a gram of HO and a ml. of H_0.  The Method 4 program assumes that grams
and ml. are the same, thus, the total of ml. -t- grams is used for calculations and
multiplied by 0.04707-

     Flags for the program are used as follows!
     (a)  Flags 3 and ^ sxe se-t for most operations.  This is when no gas was re-
          moved by peroxide impingers and stack gas saturation is not a problem

     (b)  Flag 3 is set.  A gas was removed from the sample before reaching the
          dry gas meter (S0? is an example).  The calculator will prompt for the
          per cent of the gas removed.

     (c)  Flag 04 is set.  Stack gas saturation is possible and the water collected
          in the impingers may give a higher than saturation moisture content..
          The calculator will prompt for the vapor pressure of the stack gas at
          stack temperature.  (Obtain the vapor pressure • from the chart that
          follows the METK 4 program.)

     (d)  No Flags set.  A gas was removed from the gas stream (such as SO ) be-
          fore the dry gas meter and the stack gas was checked for saturation.

     The flags in the program are used to eliminate or by-pass part of the pro-
gram.  When Flag 03 is set, the program does not prompt for Vapor Pressure.  When
Flag 04 is set, the program does not prompt for a gas removed before the dry gas

-------
                                                                             Page 6
meter.  With no flags set,  the program prompts for both "saturation" and "other
     If you forget to set  the  flag(s)  and  the  calculator prompts for data input
but none is needed,  simply press  H/S  and continue.   The  program will just take a
little longer to run.
     The label for this  program  is  MSTH b.  The  Memory  size  is  0^5,

-------
  01+LBL  "MET
 H  4"
  ©2  CLP.G
  03  1
  @4  STO  42
  05  "METER  B
 OX  Y?"
  06  PROMPT
  07  STO  ©3
  08  "DELTfi  H
 O ""
  09  PROMPT
  10  STO  04
  11  "BflR  PRE
 SS  ?"
  12  PROMPT
  13  STO  05
  14  "METER  V
 OL  ?"
  15  PROMPT
  16  STO  06
  17  "MTR  TEM
   IS  PROMPT
   19  STO  07
   20  0
   21  FS?  04
   22  GTO  99
   23  BEEP
   24  "X  OTHER
   GfiS"
   25  fiVIEW
   26  "REMOVED
   BEFORE"
   2.7  flVIEW
   2S  "DRY   GftS
   METER  ?"
   29  PROMPT
   30+LBL 99
   31   STO 09
  32  "STfiTIC
HOH  IN  1"
  33  PROMPT
  34  STO 10
  35  "STOCK  T
EMP.  "
  36   PROMPT
  37   STO IS
  33   FS? 03
  39   GTO 98
  40   BEEP
  41   "VfiPOR  P
R   IN   HG?"
  42  PROMPT
  43+LBL  93
  44  STO  19
  45  8
  46  RCL  20
  47  "ML.   WfiT
 ER  ?"
  48  PROMPT
  49  STO  20
  50  X*0?
  51  GTO  01
  52  100
  53  "5s  MOIST
 URE  ?"
  54  PROMPT
  55  STO  22
  56+LBL  01
  57  RCL  04
  53  13.6
  59  s
  60  RCL  05
  61  +
  62  STO  17
  63  RCL  06
  64  *
  65  RCL  03
  66  *
  67  17.647
  68  *
  69  RCL  07
  78  460
  71   +
  72  s
  73  STO 08
  74  100
  75  RCL 09
  76  X=0?
  77  GTO 07
  73  -
  79   .01
  80   *
  81   RCL 03
  82   XOY
  83   s
  84   STO 03
  85+LBL 07
  86   RCL 20
  87   X=0?
  88   GTO  02
  89   RCL  20
  90   .0471
  91   *
  92   STO  21
  93   100
  94  *
  95  RCL  03
  96  RCL  21
  97  +
  9 8
  99  STO  22
100  STO  13
 101+LBL  02
 102   RCL  10
 103   13.6
 104   -'
 105   RCL  05
 106   +
 107   STO  17
 108   RCL  19
 109   XOY
 1 10   s
 111   100
 1 12   *
 113   RDV
 114   fiDV
 115   STO  12
 116   100
 117   X
-------
     This chart may  be  used, wiih the Method ^ program when checking the  stack

gas for saturation.   The  chart gives the vapor pressure of water in whole  Degrees

Fahrenheit..  The  equation for stack gas saturation  isi


           of c  .   4..,   u •  4.    n  •   4.       Vapor  Pressure HOH @ Stack  Teare.  X 100
           % Saturation Moisture Consent <=     	——r—-—57—:——	
                                                       Absolute Stacx Pressure


     Hnn equals the  temperature in Degrees F.  Thus H66 =  0.6441 equals the vapor
pressure of water at 66  Fahrenheit.
                                  R71=   0.7643             Rlll=    2.673
                                  *72~   0.7911             R112 =    2.751
                                  R73=   0.S1S3             R113=    2.8^1
                                  R74=   0.3463             R114=    2.913
                                  R75=   0.3751             R115=    7.576
                                  R76=   0.9047             R116 =    3. 082
                                  R77=   0.9352             R117=    3.170
                                  R7S=   0-9667             R11S=    3.261
                                  R79=   Q.9990             R119=    3.35-^
                                           1-9323             R120=    3.448
                                      =   1-0665             R121=    3.545
                                  R32=   1-1017             R122=    3.644
                                  RS3=   1.1330             R123=    3.746
                                  R^4=   1.1752             R124=    3.350
        =    0  =T=:99             RS5=   1.1236             R125=    3.95t>
   P47=    0".SR00             R3S=   1.2530             R126=    4.065
   040=    R  ^--6^             RS7=   1.2935             R127=    4.177
              "                   RSS=   1.3351             R12S=    4.291
                                  RS^=   1-3779             R129=    4.403
   P51=    03761             **0=   1-4219             R130=    4.527
                                  R91=   1.4671             R131=    4.659
                                  R92=   1.5136             R132=    4.775
                                  R93=   1-5613             R133=    4.903
                                  R94=   1.6103             R134=    5.034
                                  R?5=   1.6607             R135=    5.163
   RS7=    0.4635             R96=   1-7124             R136=    5.305
   RSP,=    0  4P.'=;t=.             R97=   1.7655             R137=    5.445
   RS«=    R*50^             R9S=   1.3200             R13S=    5.533
   PAM=    ii!5216             R?l
-------
R151=   7.762
      _   -7

           *
   o
R130=   15.

R181=   15. 64

R182=   15.99
      -   815-                     R184=   16-70
      ~                               R1S5 =   17.67
                                                17-45
                                      R187 =   17.33

  «=      o  o~                     R188=   18.22
R157 =   8.985                     PIOQ-   IP  .«-«. ^-    ^-T.-TU

                                      R203=   24. 9ft
                                      1-x.^-t-j    i_-T--r_

                                      R204=   25.48

            -.                     R205=   26.00
R1.4-   lo.o                       R206=   26.53
R175-   i-                       R207=   27.07

                                     R20S=   27.63

                                     R209=   28.19

                                     R210=   28'75
                                     R211=   29.33

-------
                                                                           Page  7
                        NOZZLE SELECTION PROGRAM (NOZZLE.)
     This program replaces the Nomograph for determining the nozzle size.  It can
select a nozzle size based on the standard sampling rate of 0.?5 dry standard
cubic feet per minute just as the Nomograph does, or Flag 00 may be set and any
desired sampling rate may be entered.  The program requires the following inputs*
          Sam-pie Rate Fixed at 0.75 DSCFM
                 (No Flags Set)
Sample Rate to be Choosen
       (Set Flag 00]
          Stack Static Pressure, In. HO
          Barometric Pressure In. Hg.
          Stack Temperature °F.
          Per Gent Moisture
          Stack Velocity in FPS or FPM
Stack Static Pressure Ln. HO
Barometric Pressure In. Hg.
•Stack Temperature °F.
Per Cent Moisture
Stack Velocity in FPS or FPM
Desired Sample Rate
     The label for this program is NOZZLE.  The Memory size is 003.

-------
P R P   " N 0 Z Z L E "

  01*LBL   "NOZ
                ZLE"
  02   CLRG
  03   FIX   2
  04   0

  05*LBL   00
  06   "STfiTIC
            HOH   ?"
  07   PROMPT
  0 8   13.6
  09   .-"
  18   "BOR   PRE
              S S   ? "
  11   PROMPT
  12   +
  13   STO   00
  14   "STK   TEM
                P   ?"
  15   PROMPT
  16   460
  17   +
  IS   STO   01
  19   ©
  2 0   •• ;•:   HOH   ?

  21   PROMPT
  22   100

  24   1
  25   +
  2 6   R C L   0 1

  2 S   F S ?   0 0
  29   GTO   c.
  •3 y   . y 4 2 5

  31 * L B L   01
  "*''-'   *
  33   R C L   0 0

  35   STO   02
  3 6   0
  37   "STOCK   F
              PS   "•:"
  3S   PROMPT
  3 9   >-.; = n ?
  40   G T i j   a
  •i 1   60
 44+LEL   a
 45   "STflCK   F
             PM   ?"
 46   PROMPT

 47+LBL   b
 43   RCL   02
 49   XOV
 58   s
 51   PI
 52   s
 53   SQRT
 54   24
 55   *
 56   FIX  4
 57   "fiCT.   DI
          fl.   =   "
 58   flRCL  X
 59   flVIEW
 60   STOP
 61   GTO  08

 62+LBL  c
 63   "MTR  DSC
            FM  ?"
 64   PROMPT
 65   .05666-7
 t G1   ***
67  GTO  01
68   .END.
        G T 0   b

-------
                                                                           Page 8
                             SAMPLING SUMMARY SHEET
     Data from the field data sheets are recorded on the Sampling Summary Sheet.
A number is found above the column abbreviations for the various values on the
sheet.   The number is the same as the calculator memory number in which the value
is stored.  If the number has a circle around it, it is a value that will be
prompted for in the program.  If there is no circle around the number, it is a
value to be calculated by the program.  A broken circle around the number indicates
that it may or may not be used in the calculations.  Two of the numbers have a dia-
mond around them.  These two values are used on the opposite side of the sheet
for the summary of emissions calculations.


                           SUMMARY OF EMISSIONS SHEET.
     The Summary of Emissions Sheet is similar to the Sampling Summary Sheet.
The top row has four circled numbers on it; two of the calues have already been
calculated (the columns with the numbers surrounded by the diamonds on the pre-
ceeding page).  The memory numbers for the Concentrations Section are found at
the bottom of the columns instead of above them.  These are all determined by the
MASSFLO program.

     Once the labratory analysis of the samples is completed and the milligrams
of catch are determined, the emission rates for the front half, back half, and
total catch can be obtained from the MASSFLO program.

-------
                                                                                              i.iin;  .siuiiiAKV  siiKiiT

                                                                                                                        LOCA'llON
(nil




Dal »!




II
l>




(J)
Y
in




©
AH




©
I' liar.




©
V
in




©
T
in




V Hid.
in




%




l'sl




P
s




(Iti)
T
s




VP




(20)
V
w




2J
V
w




22
%M




23
Md





inn





©
<:,,2





©
()2





26
"2





'>')
CO





Taj.
— —





29
MW ,
(J





30
MW





©
c,.-<





©
/A P (T + 46(
J S S





©
)) Tt





®
1)
n





35
V
s





©
I)
s





/" -^
\3_7j
Area





38
ACFM





V
USCFM





40
%1





v  Bid. - *
              l».64 « V  

460) 100 > V IM - / - O.O/iII V W W I" IH - ICO. > .44 > a j V SM. > V M - IPO - III * ' too M - Tolal he,, of Sampling polnta Y - Meter Bon Collection Factor All - Average Orflca Prcaaure Diup, incite. II 0 llg, Abioluti IW - HW^ x Ma . 10(1 - - 85.4» < C -I/P (T • fv • • )V - Volume of Diy C.a at Meter * Condition., DCP ... _ M j T - Average Meter Tet.per.lure. (T • ^60)1 i _| l> I ' " '1 t - t B.r. « V Bid. - VoloMio of Dry C.I H " Bit. DSCf* 0.094iU E (I • 460) m V 6lJ. V » T . P >M»A . t • J n I - tti Cent olh.r (•• removed b«foi« Ury CM. llcter f - fit. tic Prc..urc of fit.ck ' C.I, Incite. 11^0 P • Stack C.. rrc..ura( Incite, llg . • T - Av.t.g. at.ck Tc.,,,r.tur.. °r VP - Vapor frci.ure -of II 0 At Stack Tcaiperatura V - Tot.| II 0 Collected In Inplngera " and Silica Gel ",«. at 611'. ECfb Par C.nt lloi.tur* by voluM Hula fraction of Dry Ca« - Votuoe I Dry 1 Volume I Ury ' Voluna I Dry ' Volu»a I Dry - Molecular Hal|lit of Itack Caa Dry Paala Molecular Wal|ltt ol Stack Caa, Ucl Baala IH - «CO "l ICO —\/i t (T « 460) I. determined by • vefa|lii| the ii)uar« root of tlte product of the velocity head ( P ) aitd the ab'aolute atack tenuer.lufe front each aauptlng point. T - Nat tioM of ta.t In •Inuta. D - Bampllni Noula Dlaoeter, Inchea n A » Area of Hoicla opening, ft . V - Stack Caa Velocity at Stack ' Condition., r.at par aacond. P - Ul.atetar of Stack, tnchea Area - Area of duct In ft ACfH - Actual Cubic faat par alnut* bSCfH - Dry Standard Cubic feet par »lnuta XI - Per Cant laoklnatlc Dry gtandaril Cubic r««t t 6«"r, 29.92 In. Iff.


-------
SAMPLED
RUN




SOURCE
DATE





0
V Std.
in









DSCFM







\


PROBE









r RO
Ml LI
CYCLOID

NT
,10
IE




CONCENTRAT
\
RUN





	 F
Or/DSCF




RONT HAL
Mg/M3




6 7
Remarks :


F 	
Lb/llr




8


\
Kg/Hr




9

\ \


Gr/DSCF




10



BACK
Mg/M3





17
HA
L




RAMS
FILTER




IONS

LF
b/llr





18





\
TOTAL





\
Kg/Hr




I

f
\
19


Gr/DSCF




HACK
HAL!'









	 TOTAL 	
Mg/M3






5
FRONT +
BACC
TOTAL





Lb/llr




20 21 22
	 .
1
Kg/Hr




23
\

-------
                                                                           Page 9
                        ISOKINETIC DETERMINATION (METH 5)

     The Method 5 program also runs the Method 3 and Method 4 programs.  Since it
runs the Method it- program, the flags used in the METH 4 program can also be used
to eliminate the prompt for % other gas removed before the dry gas meter, and the
prompt for the vapor pressure of the stack gas at stack temperature.  Forgetting to
set the flags will just cause the program to prompt for data not needed in most
cases.  Simply press R/S and continue,,  The program will just take a little longer
to run.  For practical purposes, the flags are of benefit when calculating the
isokinetic rate for a large number of runs since parts of the program can be
skipped.  Flag 04 is useful when saturation may be a problem.

     Use the flags as follows:
     (a)  For a run where no gas was removed before the dry gas meter but saturation
          may occur, set Flag 04.
     (b)  For a run where no gas was removed before the dry gas meter and saturation
          is not a problem, set Flag 03.
     (c)  For a run where no gas was removed before the dry gas meter and saturation
          is not a problem, set Flags 03 and 04.
     (d)  Setting no flags will prompt for other gas removed before the dry gas
          meter and also for vapor pressure in the case of possible saturation.
     (e)  If the pitot coefficient is other than 0.84, set flag 06 and enter the
          pitot coefficient when prompted for.
     (f)  If sampling using the Alignment Method, set Flag 07-
     (g)  If using a Fyrite for stack gas composition, set Flag 08.

     To determine the isokinetic rate using an assumed moisture content, do not
enter anything for the ML WATER prompt - simply press H/S and the calculator will
then ask for a moisture content.

     When sampling a rectangular duct and the STK DIA INCHES? prompt appears,
simply press R/S and the calculator will then prompt for AREA SQ FT?  Enter the
stack area.

     Note that when a gas such as S0_ is removed before the dry gas meter, the
pounds per hour emission rate is also calculated.
     The label for this program is METH 5.  The  Memory  size  is  045.

-------
                                      40+LBL  81                     93+LBL   B
                                      41   24                            94  RCL   34
                                      42   -•'                              05  2
PRP  "METH  5"                 43   XT2                          9g  „.
                                      44   PI                            97  XT2
  fli+LBL   -MET                 4S   *                              93  PI
              H '=;..                 46   STO  37                     99  *
  82  FIX  4                                   _^                   100  144
  03  "RUN  HUM                 47 + LBL  82                   j_ 0 j_  x
              BER"                 4S   ie0                        182  STO   41
  84  PROMPT                     49   RCL  2i                   103  RCL   IQ
  05  XEQ   "MET                 50   -                            104  46e
              H  4"                 51   180                        105  +
  86  XEQ   "MET                 52   .-                            ipjft  RCL   go
              H  3"                 J3   STO  23                   107  «
  07  PDV                          54   1                            1RR    R94S0
                                      er^C'i^I   ^~» "7                   •*• - —  . — ^ •  — —
  8 3  .34                          •-' ^   ^u'u  •*-'-'                   109*
  09  "PI TOT   C                 56   -                            tl^  FS-.   07
              P  ?"                 57   IS                          lll  RCL   43
  IM  F^^'  86                     53   *                            11^  pn^   07
  11  PROMPT                     59   RCL  29    •               1J3  R£L   ^5
  12  STO  31                     6y   RCL  23                   114  s
  13  "SQRT  PS                 6,1   *                            115  RCL   33

  14  PROMPT                     63   STO  38                   117  pr[_   1?
  15  STO  32                     64   RCL  18                   1 1 S  .-•
  16  FS?  07                     65   13.6                       1J9  Rri_   ^
  1 7  G T 0  a                      66   -•"                            ,  -. Q
  IS  GTO  b                      6.^   RCI-  95                   ^21  RCL   41
                                      6 S   •+•                            j_ ^ -,  /
  19*LBL  a                      69   STO  17                   1^-,  qTn   40
  20  "COS  SQR                 70   1                            ^^^4  RPL   77
     T   PSTS  ?"                 71  RCL  17                   125  R5L  33
  2 1  P R O M P T                     t £   s                            ±-->£  -
  •?o  C;JQ  4-P                     73RCL38                   i  ^-*
                                      74  x                            ^4  ^
  £3*LBL  b                      75  SQRT                         ^  C.TQ  -.„
  24  -TIME  MI                 76  FS?  87                   .,  ^^  Rr~  ^.X
              N  ?"                 77  GTO  c                     I"-TI*~
  25  PROMPT                     73  GTO  d                     T^.  _.n      _,
  •? K  q T n  T •?                                                          2.^  -       ^ ''
  27  " NOZZLE                   79*LBL  c                     7?^  29.92
          DIP ?"                 30  RCL  42                   1^^  L.
  23  PROMPT                     SI  GTO  •=•                     1  ^
  pc,  c-Tfi  T4.                                         •                 £^!
 31   "STK   DIP                  S3  RCL  32                   J^*   &^0
          IL i .-^ II  -^ ••                                                      """' ""   "*"' *"~ '"'
          N U H   r                                                      1 -•« d   *•-'-' ^- v
 32   PROMPT                     34 + LBL  €-                     J^f   ^^
 33   STO   36                     3 5  *                             t  ,i
 34   x*0->                         86  RCL  31                    T"   f;   *_    _,_(
 35   GTO   01                     37  *                             j4-f   ^'°  0'-"<
 36   "PREP  SQ                  S3  35.49                     ^44   ^.^.  _,

 37   PROMPT"'"'                  II  STO  35                   ;46   ^'-L,,08


 39   GTO   R2                     92  GTO  P                     ,   _TR  STI)   ="
                                                                         1 4 y   " h  "

-------
149   RRCL    X
150   RVIEW
151   FIX   2
152   RCL   17
153    "      STK   P
       RES   RBS    "
154    "h=   "
155   RRCL    X
156   RVIEW
157   RCL   21
15S    "      VOL   H
       OH   GRS   ="
159    "h   "
16@   fiRCL    X
161   RVIEW
162   RCL   22
163    "      *    MO I
       STURE    =    "
164   RRCL    X
165    RVIEW
166    FIX   3
167    RCL   23
168    -      MOL    D
       RY   GRS   ="
169    "h   "
170    RRCL    X
171    RVIEW
172    FIX   2
173    RCL   26
174    "      *    HIT
       ROGEN    =    "
175    RRCL    X
176    RVIEW
177    RCL   29
178    "      MOL    W
       T   DRY   =    "
179    RRCL   X
180    RVIEW
181    RCL   30
182   "      MOL    W
       T   WET   =    "
183    fiRCL   X
184    RVIEW
185   RCL   35
186    "      VELOC
        ITY   FPS    "
187    "h=    "
188    RRCL   X
189    RVIEW
190    RCL   37
191    "      STRCK
          RRER    =    "
192    RRCL   X
193    RVIEW
194    RCL   38
195    FIX   0
196    "
          RCFM    =
STfiCK
197   RRCL   X
198   RVIEW
199   RCL   39
200   "*   STRCK
          DSCFM   ="
201    "h   "
202   RRCL   X
203   RVIEW
204   FIX   2
205   RCL   09
206   X=0?
207   GTO   03
208   .1558
209   *
210   RCL   28
21 1    *
212   RCL   39.
213   *
214   "*OTHER
       LB/HR   =   "
215   "h   "
216   RRCL   X
217   RVTEW

218+LBL   03
219   RCL   4©
220   "      '/.   ISO
       KINETIC   "
221    "h=   "
222   "h   "
223   fiRCL   X
224   RVIEW
225   RDV
226   RDV
227   "END   OF
       FIELD   Dfl"
228   "hTfl"
229   RVIEW
230   RDV
231    RDV
232   STOP

233*LBL   H
234   1
235   RCL    17
236   .-
237   RCL   38
238   s
239   SQRT
240   RCL   32
241   *
242   RCL   31
243   *
244   85.49
245   *
246   STO    43
247   GTO    B
248    .END.

-------
                                                                           Page  10
                     STACK EMISSIONS DETERMINATION  (MASSFLO)

     The MASSFLO program calculates the  emission rates  for  the  front  half, back
half, and total catch.  It requires four inputst  volume  of the dry gas  neter at
standard conditions, stack dry  standard  cubic  feet  per  minute,  and  the front  and
back milligrams of catch.  If there is no back half catch,  press R/S  when the
back half PROMPT appears and the  calculator will determine  the  front  half emiss-
ions .and then stop.  The back side of the Sampling  Summary  Sheet (Summary of
•Emissions) has spaces  for emission results.

     The emission values that the calculator provides are preceded  by the letters
F, B, and T.  F designates Front  Half, B is for Back Half,  and  T is for  Total
Emissions.

     If the program  is being run  without the printer attached,  the  program can be
stopped when displaying values.   Since the label for each value is  scrolled accrose
the display, pressing  R/S when  the equals (=)  sign  appears  will stop  the program
and the numerical value will appear in the display.

     The label for this program is MASSFLO.. The Memory size  is 024.

-------
P R P   " M ft S S F L 0
  9 1 •*• L B L   "MRS
                SFLO"
  0 2   fl D V
  03   "RUN  HUM
                  BER"
  04   PROMPT
  05   fl D V
  06   "VOL  MTR
              STB   ?"
  07   PROMPT
  0 3   S'T O   0 1
  09   "STRCK   D
           SCFM   7"
  10   PROMPT
  11   STO   ©2
  12   "FRONT   1
         y-2   PIG   ?"
  13   PROMPT
  14   STO   03
  150
  16   " B fl C K   1 --'
           2   MG   ?"
  17   PROMPT
  13   S T 0   0 4
  1 9   ft D V
  20   fl D V
  21   R C L   03
  22   64.3

  24   RCL   91
  •^ C"    f
  26   STO   0 6
  27   RCL   04
•T 1
  4.0
  .-*  H

  42
         RCL   01

         STO   1 S
         R C L   0 6
         -f-
         S TO   2 G
         RCL   03
         RCL   ©1
       3 T 0   0 7
       RCL   0 4
       RCL   © 1
46
47
48
49
5©
51
52
53
54
55
56
57
53
59
6©
61
62
63
64
65
66
67
68
69
7©
71
T^ -O
73
74
75
76
77
73
79
30
31
32
34
35
36

37
o o
39
90

91
92
93
94

95
96
97
93

99
*
STO 17
RCL 0 7
•+•
S TO 21
RCL 02
RCL ©6
*
6©
*
7 0 0 0
X
STO 08
RCL 02
RCL 10
*
60
*
7000
S
STO 18
RCL 08
+
STO 22
RCL 08
. 4536
*
STO 09
RCL 13
. 4536
*
STO 19
RCL 09
+
STO 23
RCL 03
RCL 04
S TO 05
RCL 06
"F GR,"
SCF =
fl R C L 'A
fl V I E W
RCL 07
" F M G .-'
MM =
fl R C L ":<
fl V I E W
RCL © 3
" F L E s
R =
flRCL ^.
flVIEW
RCL 09
" F KG .-'-
R =
fl R C L •:•<







































B
••



M
••



H
••



H
••

100
101
102
103
104
105
106

107
108
109
11©

111
1 12
113
1 14

1 15
116
1 17
118

119
120
121
122
123

124
125
126
127

128
1 29
130
131

132
133
134
135

136
1 ^7
138
OVIEW
ODV
RCL 04
X = 0 ?
STOP
RCL 10
"B GRx-D
SCF = "
flRCL X
flVIEW
RCL 17
"B MG-'M
MM = "
flRCL X
flVIEW
RCL 18
"B LB/H
R = "
flRCL X
flVIEW
RCL 19
"B KG.-'H
R = "
flRCL X
flVIEW
flUV
RCL 20
"T GR.-'D
SCF = "
flRCL X
flVIEW
RCL 21
" T M G / M
MM = "
flRCL X
RVIEW
RCL 22
"T LB.--H
P. = "
flRCL X
flVIEW
RCL 23
" T K G .-' H
R = "
flRCL X
flVIEW
END

-------
                                                                         Page 11
                       VELOCITY TRAVEHSE PROGRAM (METH 2)
              •
     The velocity traverse program determines the average stack velocity in feet.
per second and feet per minute.  It gives the Actual Cubic Feet per Minute (ACFM)
as well as Dry Standard Cubic Feet per Minute (DSCFM).  If the stack is rectangular
instead of round, simply press R/S when the stack diameter prompt appears and
enter the stack area in square feet when the stack area prompt appears.  If another
gas is present in the stack^effluent - such as a high concentration of S0~» enter
the molecular weight of the gas.  The calculator will then prompt for PPM.

     The label for this program is METH 2.  The memory size is

-------
P R P    " M E 7 '-•    2  "

   @1*LBL   "MET
                     H    2"
   0 2    C L R Q
   03    "SITE    ?"
   94    PROMPT
   0 5    ©
   0 6    " S T P C K   I>
        Ifi    INCH?"
   07    PROMPT
   0S    STO   36
   0 9    X ^ 0""'
   10    GTO   01
   1-1     "ORES   SQ
                  FT   ? "
   12    PROMPT
   13   STO   37
   14   GTO   32

   15+LBL   @1
  20    *
  21    STO   37

  2 2 •*• L B L   0 2
  23    "NO   TRflV
            PT£.     ?"
  24    BEEP
  25    PROMPT
  2 6    S T 0   0 8
  27    STO   01
  2 3    " B Q P    P R E

  29    PPOMFT
  3 0    S T 0   0 5
  31    "STfiTIC
       I  H    H 0 -   ? "
  32    PROM PT
  33    STO    25
 3 S   'B T 0    2 6
 3 9   " :-:   M 0 1ST
              U R E
 4 0   P p 0 M "' T
 41    S T 0    17
 42   10 0

 ^4    C" H S
 4 5    .  0 1
 •i 1^,    :*•:
  ^7    STO    IS
  4 8    "PIT 0T    C
                     p    ^..,
  49    PR 0 M P T
  5Q    S TO    27
  51    ".'•:    CO 2.    '?
52
53
54

55
56
57
5S
59
60
61

62
63
64
65
66
67
63
69
70
71*
72
73
74
PROMPT
STO 19
••': OXY
N
PROMPT
STO 20
" "< C O
PROMPT
STO 22
0


GE
? "


o ••



"MOL WT
OTHER
PROMPT
. 01
*
STO 41
X=0?
GTO H
"PPM ?
PROMPT
STO 42
LBL fi
RCL 19
RCL 20
+
•^t i*






••






 75    RCL   22
 76
30
81
S2
O T
                                                         86
S9
90
91
RCL   42
.  0 0 0 1

STO   43

1  00

CHS
STO   21
RCL   19
.  44

STO   23
RCL   20
93   ST+    23
94   RCL    21
9'5   RCL    22
96   +
99
1 00
101
1 02
103
104
105
106
107
10S
109
1 10
111
112
1 13
1 14
115
116
1 17
1 IS
1 19
120
121
X *^. 2
123
124
125
126
127
12S
129
130
131
132
•f ""* ^
J. •-• -_«
134
13S-*
136
137
133
139
140
141
142
143
144
145
146
147
143
1 49
1 50

151
S T + 23
RCL 43
RCL 41
ST+ 23
RCL 23
RnV
FIX 2
"MWd =
fiRCL X
RVIEW
PSE
FIX 4
1 0 0
RCL 17
—
1 00
s
STO IS
1
RCL IS
—
13
*
RCL 23
RCL IS
*
+
STO 24
FIX 2
-MW WET
flRCL X
P V I E W
STO 24
1— , -j-i | |
M .L.* '•"
FIX 4
>LBL 93
HDV
flDV
RCL 06
i
-H
S T O 0 6
FIX 0
TONE 7
"DELTfi
fi R C L X
ft V I E W
S T 0 P
S T •+• 0 3
STO 0 4
"STRCK
EMP?
PROMPT

-------
152
153
154
155
156
157
15S
159
160
161
162
163
164
165
166
167
168
169
178
171
172
173
174
175
176
177
178
ST +
460
+
*
RCL
.«"
RCL
X
SQR
RCL
*
85.
*
STO
Z +
RCL
FIX
"FP
RRC
flVI
RCL
1
—
X = 0
GTO
STO
GTO
30



24

26

-r
I
27

49

04

94
0
3 =
L X
EU
©0


•<•}
04
00
03
 179*LBL
 180   RDV
04
182   MERN
183   "RVE   FPS

184   RRCL   X
185   flVIEW
186   60
187   *
183   "RVE   FPM

189   RRCL   X
190   flVIEW
191    FIX   2
192   STO   05
193   RCL   ©3
194   RCL   01
196

197
198
199
200
m
201
202
203
204
205
206
207
208

209
210
21 1
212
213
214

215
216
217
218
219
220
221
223
224
225
226
227
228
229
230
231
232
233
234
235
"RVE DEL
TR P = "
fiRCL X
flVIEW
RCL 26
"STK PRS
RBS = "
RRCL X
flVIEW
RCL 30
RCL 01
s
STO 44
FIX 0
"RVE STK
TEMP = "
flRCL X
flVIEW
RCL 05
RCL 37
*
"STOCK R
CPU = -
flRCL X
flVIEW
RCL 26
*
528
*
29 .92
RCL 44
460
+
..'
RCL 18
*
"DSCFM =
flRCL X
flVIEW
flDV
ODV
flDV
END

-------
                                                                           Page 12
                         PROBE HARKING PROGRAM (METH l)
                                                                •
     The probe marking program locates the points at which the probe should be
marked prior to sampling.  The point locations given by the program include the
nipple length and corrections are made for points that would otherwise be too
close to the stack wall - that is the outermost points that would be closer than
7 inch to the stack wall for ducts 2b inches or less in diameter, and less than
1 inch from the stack wall for ducts greater than 2^ inches in diameter.

     The label for this program is METH 1.   The Memory size is 036.

-------
PRP   "METH   1 "

  Sl+LBL   "MET
                  HI"
  S 2   fl D V
  93   fl D V
  04   C L R G
  05   " D I fl   INC
                HES?"
  06   24
  07   PROMPT
  08   STO   01
  0 9   v < = Y 7
  1 0   X E Q   a
  1 1   XEQ   b

  12*LEL   a
  13   .5
  14   STO   07
  15   GTO   fl

  1S+LBL   b
  17   1
  IS   STO   07

  19+LBL   fl
  2 0   0
  21   "NIPPLE
           INCH  ?"
  22   PROMPT
  23   STO   35
  24   "POINTS
       ONE   TRV?"
  25   PROMPT
  26   S T 0   0 6
  27   1
  "O O   _
  29   S T 0   0 S
  30   RCL   06
  31   2

  33   STO   0 2
  34   STO   0 0

  3 5 •*• L B L   0 0
  3 6   R C L   0 0
03
  42   R C L
  4 5   S Q R T
  4 6   R C L   0 1
  4. 7"   *
  •i 3   CHS
49   RCL   01
50   2
51   -'
52
53
54   RCL   07
55   X>Y?
56   XEQ   c
57   XEQ   d
        STO
        +
58+LBL 02
59
60
61
62
63
64
65
66
67
63
69
70
71
— » j— ,
r *—
T ^*
74
75
76
77
"»*- 1
f •—.'
79
80
81
32
33
84
RCL 35
-t-
STO 04
FIX 0
RCL 05
1
,_ •
STO 05
"POINT
RRCL X
flVIEW
PSE
CLD
F I X 1
RCL 04
TONE 3
VIEW X
PSE
PSE
1
S T — 00
RCL 00
X * 0 ?
GTO 00
1
STO 00
35-*-LEL   01
36   RCL   0 0
39
90
9 1
92
9 3
94
95
96
97
QR
99
1 00
101
1 02
103
1 04
1 05
1
—
3
RCL
:+:
X
S Q R T
RCL
*
RCL
+
STO
RCL
RCL
X = V' ^
X E Q
RCL



02



01

03

09
03
05

t^'
09
                                                                 0
107
10S
109
110
1 1 1
1 12
1 13
1 14
1 15
116
117
118
1 19
120
121
1 22
123
124
125
126
127
128
129
130
131
132
RCL 35
+
STO 04
RCL 05
F I X 0
1
+
STO 05
"POINT
RRCL X
fiVIEW
PSE
FIX 1
RCL 04
TONE 3
VIEW X
PSE
PSE
CLD
1
ST+ 00
RCL 06
RCL 05
v = Y "?
STOP
GTO 01
                                             133+LBL   c
                                             134   RCL   07
                                             135   GTO   02
                                             136   RTN

                                             137+LBL   d
                                             133   RCL   V
                                             139   RTN
140-*-LBL •=•
141
142
143
144
145
146
147
148
149
150
RCL 01
RCL 07
—
RCL 09
X< >Y
X < = Y ?
GTO 0 3
RCL Y
GTO 03
. END.

-------
                                                                         Page 13
                             NUMBER OF POINTS (NOP)

     This program calculates the number of total sample points needed for a
site based on the number of upstream and downstream duct diameters available and
the duct diameter in inches.  Prior to the change in the Federal Register in
September 1983 that reduced the total number of sampling points, the program was
very useful in determining the total number of sampling points at a site.  The
graph in the Federal Register has now been quite easy to read, so the program
is probably more valuable as a means to check the number of points that the source
tester determines from the Federal Register.  The program is interesting to run,
however, since it will point out errors if incorrect data should be entered.  For
example, if a duct diameter of less than 12 inches is entered, or if the number of
duct diameters are too short, an error code will result.
     The program label is NOP-  The Memory size is 005<

-------
      P R P     "  H 0 F "

0  1 •*• L B L    "  N 0 P

©2    CLRG
03    FS?    55
84    fi D V
05    3
06    "DOWHSTR
      ERM     DIR?"
07    TONE    7
©3    PR 0 MPT
09    S T 0    00
 1 0    X < = V ?
 11    GTO    00
   1-—.    •—»
   •i    O
 13    S T 0    00

 14+LBL    00
 152
 16    R CL    0 0
 17    x = Y ?
 IS    GTO    01
 19    X  > Y ?
20    GTO    01
21    "ERROR"
22    RVIEW
23    "DOWHSTR
         ERM    DIfl"
24    flV  IE W
25    "TOO    S H 0
                         RT"
26    ftV  IE W

27+LBL    02
23    TONE    7
29    GTO    02

3 0 •*• L B L    01
31    2
32    "UPSTRER
            M     D I  R ? "
33    TONE    7
34    PROMPT
35    S T 0     01
37    GTO     03

39    S T 0     01

40•*• L B L     S3
41    .5
42    P C L     0 1
 44   GTO    04
 45   X > Y ?
 46   GTO    04
 47   "ERROR"
 48   RVIEW
 49   "UPSTREfl
                 M    D I fl "
 50   fiVIEW
 51    "TOO    SHO
                          RT"
 52   RVIEW
 53   GTO    Q2

 54+LBL    04
56

57
53
59
68
61
62
63
64
6
63
          24
          "STK   DIfl
          INCHES?"
          TONE   7
          PROMPT
          STO    ©2
          FS?    55
          RDV
          X>Y?
          GTO    06
          12
          RCL    02
          XY?
79    GTO    a
30    RCL    00
O  1     O
O  i     O
O -p    '.V .--•  _ •--• T>

33    XEQ    R

3 4 •*•  L B L    a
35    RCL    00
S3    XEQ    B
39    RCL    0 0
9 0    6
9  1    x < = Y ?
9 2    X E Q    C
93    RCL    Q 0
                                                                94    5
                                                                9 5    X < = Y ?
                                                                96    XEQ    D
                                                                97    XEQ    E

                                                                98+LBL    "Y
                                                                99    24
                                                             10©    RCL    ©2
                                                             181     X>Y?
                                                             102    GTO    b
                                                             103    RCL    ©1
                                                             1©4    2.
                                                             185    X<=Y?
                                                             106    XEQ    F
107-1
1 08
1 6*9
11©
111
1 12
1 13
1 14
1 15
116
1 17
1 IS
119
12©
*LBL b
RCL ©1
1 . 75
X<=Y?
XEQ G
RCL ©1
1 . 5
X < = Y ?
XEQ H
RCL ©1
1 . 25
X< = Y?
XEQ I
XEQ J
                                                            121+LBL    "Z"
                                                            122    RCL    ©3
                                                            123    RCL    04
                                                            124    x<=Y?
                                                            125    XEQ    "K"
                                                            126    XEQ    "L"
127
123
129
13©
131
132
133
134

135
136
137
133
139
1 4©
141
142
143
144
+LBL "K"
RCL 03
GTO " M "
+LBL "L"
RCL ©4
+LBL "M"
F I X 0
"TOTflL F
01 NTS = "
RRCL X
RVIEW
FS"1 55
RD1'
FI>
FS'
RD'-
FS'
RD1'
FS'
I
: 4
"* ^i ^1
t
% c~ tr1
-— ' •— '
i
** ^i ^I

-------
  145   fiDV
  146   BEEP
  147   STOP

  148+LBL   fi
  149   8
  159   STO   S3
  151   GTO   "Y

  152+LBL   B
  153   12
  154   STO   03
  155   GTO   "V

  156+LBL   C
  157   16
  158   STO  03
  159   GTO   "Y-
  161   20
  162   STO   03
  163   GTO   "Y

  164+LBL   E
  165   24
  166   STO   03
  167   GTO   "Y

  163+LBL   F
  169   8
  170   STO   04
  171    GTO   "Z

  172+LBL   G
  173   12
 174   STO   04
 175   GTO   "Z

 176+LBL   H
 177    16
 178    STO   04
 179    GTO    "Z"

 180+LBL    I
 181   20
 182   STO   04
 183   GTO    "Z"

 184+LEL   J
 135   24
 186   STO   04
 187   GTO   "Z"
18S   .END.

-------
                                                         A                 Page
                AVERAGE OF INDIVIDUAL DELTA P  [T.  + 46o]2  (PRESS)
     The PRESS program averages the individual square roots of the Delta P  times
                                                   Q
     tack temperature + 460.  It also averages the  F of t
The program is used when summarizing the field data sheets.
                                                   Q
the stack temperature + 460.  It also averages the  F of the stack temperature.
     The Federal Register does not require the above technique to be used in
calculating the isokinetic sampling rate, but simply says that the average of all
the Delta ?  values and the average of all the stack temperatures can be placed
           S
under the square root radical and extracted once for use in the calculations.  In
the majority of cases, it will make little difference which method is used, however,
in a few stacks where there is a wide variation in the Delta P  values it will ber
                                                              s
noticeable.  The introduction of programmable hand calculators makes it just as
easy to obtain the number correctly, and requires no more effort.  If the Meter
Box Program (DELTA H) is used for the sample run, the results of the PRESS program
will already be calculated and there will be no need to use this program.  This,
of course, assumes that no errors were made entering the data in the DELTA H pro-
gram and that no interruptions occurred in the test run..

     The label for this program is PRESS.  The Memory size is 004.

-------
 P R P  " P R E S S "

 01+LBL  "PRE
              SS"
 92  CLRG
 @3  "NO.   OF
    POINTS  ?"
 04  PROMPT
 05  STO  01
 06  STO  03

 07 + LEL  01
 03  "DELTfi  P
               7"
 09  TONE  7
 10  PROMPT
 11   "STflCK  T
        EMP  ?"
 12  PROMPT
 13  ST-H  02
 14  460
 15  +
 16  *
 17  SQRT
 IS  Z +
 19  RCL 01
 20   1
 21  -
 22  STO 01
24  GTO  01
25  BEEP
26  FS?  55
27  RDV
2 S  M E R N
29  "SQRT  PS
        T3  =  "
30  PRCL  X
31  P V I E W
32  PSE
33  FSE
34  RCL  02
35  RCL  03
36  /
37  "fiVE STK
     TEMP =  "
3 S  R R C L X
39  fl V I E W
40  EH D

-------
                                                                         Page 15
                           EQUIVALENT DIAMETER (EDIA)

     The Equivalent Diameter Program is useful on pre-test survey visits at sites
where square or rectangular ducts exist.  The dimensions of the duct are measured
in inches and then enter into the program as prompted for.  The program then
determines the equivalent diameter of the duct in both feet and inches.  Once
the equivalent diameter of the duct is determined, it is possible to decide if
there is enough straight run of duct to provide an adequate sampling site.  Since
the minimum number of duct diameters for a site is 2j, simply multiply the equiva-
lent diameter by 2-f to see if the site meets the minimum requirements of Method 1.

     The label for this program is EDIA.  The Memory size is 003,

-------
        PR P     "EDI ft"

    01+LBL     "EDI
                                         ft"
    @2     FIX     1
    83      "LONG     IN
                                CH?"
    84     PROMPT
    05     STO     00
    06      "SHORT      I
                            NCH?"
   07      PROMPT
   03      STO      01
   09      ftDV
    10     flDV
   11      RCL     90
   12     *
   13     2
   14     *
   15     STO      02
   16      RCL      00
   17      RCL      01
   IS      +
   19      RCL      02
  20      X<> V
  21      s
  22       1  '-^
  23      s
  24       "EQUIV     D
          I  ft     FT     =      "
 25      fiRCL     X1
 26      flV IE W
 27      flDV
 2 9     *
 30      "EQUIV      D
         Ifl     INCHE"
 31       "hS     =      "
 32     WRCL     X
 3 3     fi V I  E W
 34     flDV
 35     flDV
36      BEEP
37      END

-------
                                                                         Page 16
              SAMPLE POINT TIMES USING THE ALIGNMENT METHOD (TIMES)

     This program calculates the individual sample times in minutes and seconds for
sample points where the Alignment Method is used.  The program requires only three
inputs:  first, there is the normal sample time per point if the Alignment Method
were not being used.  Second, there is the total number of points to be sampled.
Third, the angle of maximum flow at these points must be entered.  After these data
have been entered, the calculator provides the sample time per point in minutes
and seconds.  A decimal separates the minutes and seconds.  A time of 5 minutes
and 1^ seconds will appear in the display as 5.1^ and will be printed in the same
manner on the printer tape if the printer is used.  The program, of course, will
run with or without the printer, and executing the program without the printer
will be discussed first.  NOTE:  The first five steps of the instructions are the
same for use with or without the printer.

     1.  Engage the program by pressing XEQ ALPHA TIMES ALPHA.  NO OF POINTS? will
         appear in the display.
     2.  Enter the total number of sample points for the test and press R/S.
     3.  NORMAL TIKE? will appear in the display.  Enter the sample time per point
         in minutes that would normally be used if the Alignment Method were not
         being used.  Press R/S.
     4.  ANGLE 1. will appear in the display.  Enter angle 1 in degrees and press
         R/S.
     5.  ANGLE 2. will appear in the display.  Enter angle 2 in degrees and press
         R/S.  Continue in this manner until all angles have been entered.
     6.  When all the angles have been entered, the calculator will display the
         average angle, and pause long enough for it to be written down.  Then the
         decimal base time will be displayed.  The calculator will pause long
         enough for this number to be recorded also.
     7.  WORKING will next appear in the display.  The time for each sample point
         in minutes and seconds is now being determined.
     3.  The next message to appear in the display will be:  MIN AND SEC FOR EACH
         POINT FOLLOW.
     9.  The calculator will now begin displaying the minutes and seconds of
         sample time for each pointo  An audible tone will occur, the display will

-------
                                                                            Page 17
         briefly show the point number and. then give the minutes and seconds  for
         that -ooint.   The program stops at each point so that the time can  be re-
         corded.  Pressing R/S moves on to the next point until all the points
         have been displayed.

                       USING THE PROGRAM WITH THE PRINTER

     The program runs much the same with the printer as it does without the
printer.  Complete steps 1 through 5 on "the previous page.

     6.  After all the angles have been entered, the display will say EDIT.  Then
         the memories that contain angles will be printed on the calculator tape.
         Angle 1 is scored in memory 1 (or Register l) and will be displayed  as
         R01 - nn.  The actual angles can be checked against the corresponding
         memories and corrected if necessary.  To correct an angle, simply  store
         the correct value in the appropriate memory register.
     7.  After reviewing the angles for correctness, press R/S.  The average
         angle and the decimal base time will be displayed and printed.  The
         display will now show WORKING.  The calculator is now determining  the
         sample times in minutes and seconds for each point.
     8.  A message saying MEN AND SEC FOR EACH POINT FOLLOW will appear in  the
         display and on the tape.  Then the printer will provide a list of  mem-
         ories that give the time in minutes and seconds for each sample point.
         Thus, R01= 5«25 would indicate that sample point 1 should be sampled for
         5 minutes and 25 seconds.  The register number (or memory number)  is the
         same as tne ~ci.nt numosr.

     When using the printer, there are three mode positions in which the printer
can be operated.  They are MAN (for manual), TRACE, and NORM (for normal).  Since
tn-e TRACi node is used tc find errors in programs, it need' not oe considered  here.
T~.is leaves the MAN and NORM modes, and either may be used when running the tirogram.
Tie MAN mode is the most efficient since it prints only when instructed to  and
therefore saves printer tape.  The NORM mode prints all entries and uses more tape,
but it does provide a copy of data intut.

     The label for tr.is program is TIXES.  The Memory size is 110

-------
 PRP  "TIMES"

 01+LBL  "TIM
               ES"
 @2  CF  12
 @3  CLRG
 04  "HO  OF  P
      01 NTS  ?"
 05  PROMPT
 06  STO  26
 07  1
 03  STO  27
 09  "NORMRL
        TIME  ?"
 10  PROMPT
 11  STO  23
 12  1
 13  RCL  26
 14  .081
 15  *
 16  +
 17  STO  00
 IS  STO  29

 19+LBL  00
 20  RCL  27
 21  FIX  0
 22  TONE   7
 23  "RNGLE  "
 24  RRCL   X
 25  PROMPT
 26  ST +  30
 27  STO  IND
                00
 23  ISG  00
 29  1
 30  ST+  27
 31   RCL  26
 32  RCL  27
 33  X>Y?
 34  GTO  01
 35  GTO  00
36*LEL   01
37  FS?   55
33  GTO   92
39  GTO   03
40+LBL  02
41   "ED IT"
42   RVIEW
43   RCL  29
44   PRREGX
45   STOP
 46+LBL  ©3
 47  FIX  2
 48  RCL  30
 49  RCL  26
 50  s
 51  "RVE  RNG
         LE  =  "
 52  RRCL  X
 53  RVIEW
 54  PSE
 55  STO  31
 56  COS
 57  RCL  23
 58  X< >Y
 59  s
 60  "DECIMRL

 61  RVIEW
 62  PSE
 63  "BRSE  TI
         ME  =  "
 64  RRCL  X
 65  RVIEW
 66  PSE
 67  STO  32
 63  "PLERSE
           WRIT"
 69  RVIEW
 70  RCL  29
 71   STO  00
 72  STO  33

 73+LBL  04
 74  RCL  IND
                00
 75  ISG  00
 76  GTO  05

 77-»-LBL  05
 73  COS
 79  RCL 32
 30   *
 31   60
 82  s
 33   HMS
 34   .01
 35   /
 36   STO  IND
                33
 87   ISG 33
88   GTO  04
89   "MIN  RND
      SEC  FOR"
90   RVIEW
  91   "ERCH  PO
      INT  FOLL"
  92   "hOW"
  93   RVIEW
  94   FC?  55
  95   GTO  07
  96   CF  13
  97   SF  12
  93   RCL  29
  99   PRREGX
 100   STOP

 101+LBL  07
 102   RCL  29
 103   STO  00
 104   0
 105  STO  27

 106+LBL  03
 107   1
 103  ST+  27
 109  RCL  27
 110  FIX  0
 111   "POINT  "
 112  RRCL  X
 113  RVIEW
 114  TONE  3
 115  PSE
 116  FIX  2
 117  RCL  IND
                 00
 113  ISG  00
 119  GTO  09

120+LBL  09
 121  VIEW  X
 122  STOP
123  GTO  08
124  END

-------
                                                                           Page 18
                           TIME WEIGHTED AVERAGE (TWA)

    This  program determines time-weighted averages that must be used to calculate
the  isokinetic  sampling rate when the Alignment Method is used.  The program is
simple  to  use and prompts for data input.  It can also be used for time-weighted
averages for normal Method 5 sampling where time weighted averages are necessary
for  data reduction.  This will be discussed at the end.  of this section.
    This  program differs from most of the programs in this booklet in that the
memory  size  for this program is 110.  To execute the program, do the following:

     1.  To engage the program, press XEQ ALPHA TWA ALPHA.-
     2.  The NO. POINTS prompt will appear in the display.  Enter the total number
          of sample points.
     3.  An audible tone will be heard and the point number will momentarily
          appear on the display.  Then, the MINUTES ? prompt will appear.   Enter
          the number of whole minutes sampled at that point.  (For a point with a
          sample time of 5 rain, and 27 sec. enter "5".)   Press R/S.

     '^o  The SECONDS ? prompt will appear in the display.  Enter the seconds and
          press H/S.  (For the above example, enter 27 and press R/S.)
     5.  Enter minutes and seconds for all points.,
     6.  The total seconds for the sampling period will appear briefly in the display/
          A  message saying BEGIN DELTA H will appear briefly in the display foll-
          owed  by DELTA H 1.  Enter the first Delta H and press H/S.  Enter all
          Delta H values.
     7.  The next message in the display will be BEGIN MTR TEMP.  This will be
          followed by the TEMP IN? prompt.  Enter the inlet dry gas meter temper-
          ature and press R/S.  The TEMP OUT? prompt will then appear.  Enter the
          outlet temperature and press R/S.  Enter all inlet and outlet temperatures,,
          NOTE:  If you have a single dry gas meter temperature, set Flag 00.  This
          will  prompt for one meter temperature instead of two.
     8.  After the meter temperatures are entered, a message saying BEGIN STK TEMP
          will  appear in the display followed by STK TEMP 1.  Enter all stack
                          OT,
          temperatures in  F.
     9.  After all sxack temperatures are entered, a message saying BEGIN SQRT
          PSTS  will appear.  This will be followed by DELTA P 1.  Enter all Delta
          ?  values.

-------
                                                                            Page 19
     10.  After all Delta ? values have been entered, a message will appear briefly
          saving BEGIN COS SQRT PSTS.  This will be followed with DECREES ^X 1.
          Enter the angle in degrees of all sampling points.
     11.  At this point, the calculator will begin giving the time weighted ave-
          rages for data previously entered.  If no printer is being^ used, the
          first average will be displayed and the program will stop.  Simply press
          R/S each time a new average is desired.  The summaries from this pro-
          gram can be used with the METH 5 program to obtain the isokinetic sam-
          ple rate and volumetric flow rates.

     To use this program to obtain time-weighted averages  for for runs  where the
Alignment Method was not used,  begin by entering the minutes and seconds.   If there
is a point with an even number  of minutes and  no seconds,  enter a 0  for the seconds..
Continue to enter data as prompted for until the message:  3EGIN COS  SQRT PSTS.   At
this point, the degrees for the angles are entered if the  run used the  Alignment
Method.  Since this would not be an Alignment  Method run,  enter a 0  for the degrees
of each angle (Cos 0  = l).  After zeros have  been entered for all the  angles,  the
calculator will then provide the necessary time-weighted averages0

     The label for this program is TWA.  The Memory size  is 110»

-------
     PRP   "TWR"

 01+LBL   "TWR

 02   CLRG
 03   1
 04   STO   00
 05   "NO.   POI
           NTS   ?"
 06   PROMPT
 07   STO   50
 0S   .001
 09   *
 10   ST+   00
 11   RCL   00
 12   STO   52

 13+LBL   01
 14   1
 15   ST+   49
 16   RCL   49
 17   FIX   0
 IS   "POINT   "
 19   flRCL   X
 20   flVIEW
 21   TONE   8
 22   "MINUTES

 23   PROMPT
 24   60
 25   *
 26   "SECONDS

 27   PROMPT
 28   +
 29   ST+   51
 30   STO   IND
                    00
 31   ISG   00
 32   GTO   01
 33   RCL   52
 34   STO   00
 35   STO   53

 36+LBL   02
 37   RCL   IND
                    00
 38   ISG   00
39   GTO  03

40+LBL  03
41   RCL  51
4 2   --'
4-=:   STO   IND
                    53
 44   ISG   53
 45   GTO   ©2
 46   RCL   52
 47   STO   00
 48   RCL   51
 49   "TQTflL   S
           EC   =   "
 50   flRCL   X
 51   flVIEW
 52   BEEP
 53   "BEGIN   D
         ELTfi   H"
 54   RVIEW
 55   0
 56   STO   49

 57+LBL   04
 58   1
 59   ST+   49
 60   RCL   49
 61   "DELTfi   H
                      ••
 62   RRCL   X
 63   TONE   3
 64   PROMPT
 65   RCL   IND
                   00
 66   *
 67   ST+   54
 68   ISG   00
 69   GTO   04
 70   RCL   52
 71   STO   00
 72   BEEP
 73   "BEGIN   M
       TR  TEMP"
 74   fiVIEW

 75+LBL   05
 76   FS?   00
 77   GTO   fi
 78   GTO   B

79+LBL   R
80   "METER   T
             EMP?"
SI   TONE  8
82   PROMPT
S3   GTO   14

84+LBL  B
85   "TEMP  IN
                   O ••
86   TONE  7
87   PROMPT
88   "TEMP  OU
                 T?"
89   TONE  8
90   PROMPT
   91    +
   92   2
   93   /

   94+LBL   14
   95   RCL   IND
                      00
   96    *
   97    ST+   55
   98    ISG   00
   99   GTO   05
 100   RCL   52
 101   STO   00
 102   RCL   50
 103   61
 104   +
 105    .001
 106   *
 107   62
 108   +
 109   STO  60
 110   STO  59
 111   BEEP
 112   "BEGIN   S
         TK   TEMP"
 113   flVIEW
 1140
 115   STO  49

 116+LBL  06
 1171
 118   ST+  49
 119   RCL  49
 120   "STK  TEM
                   P   "
 121   flRCL  X
 122   TONE  7
 123   PROMPT
 124   STO  IND
                      60
 125   ISG  60
 126   GTO  07

 127+LBL  07
 128   RCL  IND
                      00
 129   *
 130   ST+  56
 131   ISG  00
 132   GTO  06
133   RCL  52
 134   STO  00
135   RCL  59
136   STO  60
137   STO  61
138   BEEP
139   "BEGIN   S
      QRT   PSTS"

-------
1 40
141    0
142    STO

143+LBL
144    1
145    ST+
146
147
148
                    .19
          ST+   49
          RCL   49
          TONE   3
          "DELTR
149
150
151

152
153
154
155
156
          RRCL   X
          PROMPT
          RCL   I Nil
                         60
          460
          SORT
          ISG   60
          GTO   09
1
1
1
1
1
1
1
1

1
1
1
1
1
1
X

1
1
1
1
1
1
53
59
60
61
6
6
•^
3
+ LBL
RCL
I
G
64 + L
6

6
6
6
6
7
7

i'
"7
i"
r
r
r'
^

6
7
3
9
0
1

•^1
"-.'
4
5
i£.
"7
S

I
SG
TO
BL
TO

SG
GTO
RCL
s
TO
0
I
._!
9
HD
00
i'
98
1
J.
1
I

6
0
5
1
1
ND
6
1
O
9



1



60
BEEP
•a
OS
• •
fl
0
s
^. f
1
BEG
SQ
h P
I
N
c
RT "
O
T O
i •— '
••
VIEW

TO
BL


.-4
«-T
4


9
^





173    ST+   49
179    RCL   <*•?
130    "DEGREES
                      £.
131    RR C L    X
132    TONE    7
133    PROMPT
134    CO S
135    RCL   IHD
                        60
186
187
188
189
190
191
192
193
194
195
196
197
198
199

200
201
202
203
204
295

206
207
203
209
210
21 1
212

213
214
215
216
217
213
T
219
220
221
222
223
•?•£> 4
225
226
227
•^ o o
229
230
231
*
ST+ 58
ISG 60
GTO 12
RCL 54
FIX 2
"DELTR H
RRCL X
fiVIEW
FC? 55
STOP
RCL 55
FIX 0
"METER T
EMP = "
flRCL X
RVIEW
FC? 55
STOP
RCL 56
"STOCK T
EMP = "
RRCL X
RVIEU
FC? 55
STOP
RCL 57
FIX 4
"SQRT PS
TS = "
flRCL X
RVIEW
FC? 55
STOP
RCL 53
"COS SQR
PSTS ="
"h "
RRCL X
RVIEW
FC? 55
STOP
FIX 2
RCL 51
60
s
"MINUTES
RRCL X
RVIEW
. END.

-------
                                                                           Page 20
                        SULFUR DIOXIDE EMISSIONS (METE 6)

     This program calculates the pounds per dry standard cubic foot of S0?
emissions, and it also calculates the emission rate in pounds of SO- produced for
each one million 3TUs of heat input.  The name of the program is METH 6, and the
memory size is 019-
     The way to use the program is to first assign it to a user key.  With the
calculator in the user mode, pressing the assigned key will engage the program.
The program will then prompt for data input.  The first prompt will be:  METH 5
OR 6 EQUIP?  Enter either a 5 or a 6.  Then continue to enter data as prompted for.
     When doing Method 6 analyses, the majority of values needed to reach the
answers remain the same.  If doing several runs, the meter volume, temperature
of the meter, and volume of titrant will vary from run to run.  If Method 5 equipments
is used in obtaining the sample, the Delta H will also be a variable.  After the
program has been run one time, the values that remain constant will not be prompted
for again.  Thus, after finding the first emission rate, pressing R/S will cause the
program to reset itself and the first prompt will be DELTA K? if using Method 5.
equipment, or METER VOL? if using Method 6 equipment.  The second analysis deter-
rdnation can be made with only four or five prompts, depending upon the type of
equipment used.
     During the course of several analyses, some of the values that were prompted
for initially may change.  The easiest way to remedy this situation is to press the
assigned USER key and start the program all over again.  All the memories will be
cleared, ajid the new data can be stored.  Another way (though not recommended) is to
refer to the METHOD 6 SUMMARY SHEET.  Above the abbreviation .for each column value
is a number.  Most of the numbers are inside a circle.  The number in the circle is
'he memory number in which that value is stored.  Therefore, if the per cent oxygen
changed, the new value could be manually stored in memory 17.  While manually storing
numbers will work, the most reliable way ^o change values is simply to run the pro-
gram from the beginning by pressing the assigned USER key.

     The label for this program is METH 6.   The Memory size is 019.

-------
PRP   "METH   6"

  01+LBL   "MET
                  H   6"
  82   CLRG
  03   C F  00
  04   "METH   5
       OR   6   EQU"
  05   "HIP   ?"
  06   PROMPT
  07   STO   13
  03   6
  09   X = Y?
  10   G T 0   01

  ll-*-LBL   02
  12   F S ?   0 O
  13   GTO   04
  14   1
  15   "METER  B
             OX   Y?"
  16   PROMPT
  17   STO   03

  1 3 •*• L B L   04
  19   0
  20   "BELTS  H
                      O ••
  21   PROMPT
  22   STO   94
  23   GTO   Q3

  2 4 * L B L   01
  25   1
  26   F S 7   0 0
  27   GTO   0 5
  23   "METER  B
             OX   Y? ••
  29   PROMPT
  30   STO   03

  3 1 •*• L B L   05
  32+LEL   03
  33   F S 7   00
  34   GTO   06
  35   "BfiR   PRE
               o o   -~? ••
  36   PROMPT
  37   STO   03

  3 3 •*• L B L   0 6
  39   "METER   V
               0 L   ? "
  40   PROM PT
  41    STO   0 6
42

43
44
45
46
47
43
49
50
51
52
53
54
55
56
57
5S
       "TEMP   MT
         R   F.   ? "
       PROMPT
       460

       STO   07
       RCL   04
       13.6

       RCL   05

       RCL   06

       17.  64
       *
       RCL   07

       RCL   03
60
61

62
63
64
6 5
66
67
63
69
FIX 4
"VOL MTR
STD = "
flRCL X
fiVIEW
PSE
PSE
STO 03
F S ? 00
GTC 07
"NORMfiLI
70
71
       PROMPT
       STO   09
72+LBL   07
73   "ML   TITR
             ft N T ? "
74   PROMPT
75   STO   10
76   FS?   00
77   GTO   03
73   0
79   "ML   BLflN
                K   ?"
30   PROMPT
31   STO   11

S2+LBL   03
S3   F S ?   00
34   GTO   0 9
35   "ML   SOL U
           T I 0 N ? "
36   PROMPT
37   S T 0   1 2
                                               88+LBL   09
                                               89   FS?   00
                                               90   GTO   10
                                               91   "ML   fiLLI
                                                          QUOT?"
                                               92   PROMPT
                                               93   STO   13

                                               94+LBL   10
                                               95   RCL   12
                                               96   RCL   13
                                               97   s
                                               93   STO   14
                                               99   RCL   10
                                             100   RCL   11
                                             101    -
                                             102   RCL   14
                                             103   *
                                             104   RCL  ©9
                                             105   *
                                             106    RCL  03
                                             107  x
                                             103    0.000070
1 09
110
1 1 1
1 12
1 13
1 14
115
116
1 17
*
SCI 2
" S O 2 L B
DSCF =
RRCL X
flVIEW
PSE
PSE
STO 15
FS? 00
                                            118
                                            119
                                            120
                                            121
                                                     GTO   11
                                                     "F   FfiCTO
                                                              R   ?"
                                                     PROMPT
                                                     STO   16
                                            122+LBL   11
                                            123  FS?   00
                                            124  GTO   12
                                            125  ""-.   OXYGE
                                                              N   ?"
                                            126  PROMPT
                                            127  STO   17

                                            12S+LEL   12
                                            129  RCL   17
                                            130  20.9
                                            131   "GOOD   LU
                                                                CK"

-------
132
133
134
135
136
137
13S
139
149
141
142
143

144
145
146
147
148
149
156
151
152
1 53
flVIEW
X< >Y
—
20. 9
X< >Y
/•*
RCL 15
*
RCL 16
*
FIX 4
"LEX 10 + 6
BTU = "
RRCL X
RVIEW
STOP
SF 00
RCL 13
6
X = Y?
GTO @3
GTO 02
.END.

-------
I'l.AiiT


;',I\M'\A-:\> .;
                                                      1-iETIIOIJ  6  LUJH.'IAHK JIIEET



                                                                         LOCATION
(un
              '~~N   ' .  v
              i  )  .   '. 'I i

     Y  =
      in
:•  box Correction Factor



                nro  Drop,
               ge  Orfice

          inches H0
P bar.  =  barometric Pressure.,  inches

          II;-,, Absolute



^J  =  Volume ot  Dry Gas at  Meter

 111    Condi llona, DCF



T  -  Avui'a,':e Meter Tuni[)eratui'e,   F.
 in


V  Jtd. -  Volume of Dry Caii  at j'i'P,
 m             n
                                          V  - Volume  of  Titrant (ml.)
                                           if


                                          Vtb = Volume of Titrant blank (ml.)



                                          V  ..     Volume  of Solution (ml.)
                                           soln                           '


                                          V  = Volume  of  Aliquot (ml.)
                                           a


                                          Lb/D;JCF  =  Pounds per Dry Standard

                                                     Cubic I'bot Emission Hate



                                          F = F Fac tor
                                                 ^oJ  - Per Cent Oxygen
                                                                                       E = Emission Rate  in Pounds of

                                                                                           Pollutant  per  One Million

                                                                                           BTU Heat Input.
                                                                                           d
                                                                                             Dry  Standard Cubic  Feut  141

                                                                                             29.92 in.  llg.
     H  =  Normali ty of Titrant

-------
                                                                           Page 21
                                      FLAGS
     The chart below gives the Flags used in the programs and program name for

which the Flag is used.
00



01



02

03
05

06

07

08
PROGRAM LABEL

  NOZZLE


  METH 3



  METH 3



  METH 3

  METH 4


  METH U.


  DELTA H


  METH 5


  METH 5


  METH 3
                                                    FUNCTION

                                  Flag is set to choose a sample rate other than
                                  0.75 DSCFM.

                                  Flag is set when determining wet and dry molecular
                                  weights of stack gas only, i.e., when running the
                                  METH 3 program alone.

                                  Set this Flag plus Flags 00 and 02 to get dry
                                  molecular weight only when running METH 3 program
                                  only.

                                  Same as above.

                                  Flag is set to prevent calculator from prompting
                                  for vapor pressure of water at stack temperature.

                                  Flag is set to prevent calculator from prompting
                                  for other gas removed before the dry gas meter.

                                  This Flag is set if the meter box has only one
                                  indicator for temperature.  This is done automatically.

                                  This Flag is set if the pitot coefficient is other
                                  than 0,8^.

                                  This Flag is set if the Alignment Method was used
                                  in obtaining the sample.

                                  This Flag can be se^ to eliminate the CO prompt
                                  from the Method 3 program assuming no CO is present
                                  in the stack gas, or if a Fyrite is used and CO
                                  is not determined.

-------
                                                                           Page 22
                           INSTRUCTIONS FOR THE HP 41
     The instructions that follow in this section briefly outline the operation of
the HP 41 for use with the programs contained in this booklet.   The following areas
will be discussed•

     Calculator Models
     The Keyboard
     The RPN System
     How to Manually Enter a Program
     How to Enter a Program Using the Card Reader
     How to Run a Program
     How to Assign a Program to a User Key
     How to Use the Catalogue Function
     How to Use the Printer

                                CALCULATOR MODELS
     There are presently three models of the HP 41 calculator that these programs
can be used with.  The models are the HP 41-C, the H? 41-CV, and the HP41-CX.  The
newer calculators,  the 41-CV and 41-CX are acceptable as is.  The older model HP-41C
will require either an 82170A QUAD module, or four of the 82106-A memory modules.

                             THE CALCULATOR KEYBOARD
     The description of the keyboard is for those individuals that are unfamiliar
with the H? 41 calculators.  Only a few of the keys are discussed and those familiar
with the keyboard may wish to skip this discussion.
     Immediately below the display of the HP 41 are the toggle keys.  Reading from
left to right, the  toggle keys are ON  USER and PrfGK  ALPHA.  The ON key turns the
calculator on ar.d off.  The USER toggle key enters the USER mode where either a
program or a function can be assigned to a key (the USER mode will be discussed
later.)  The PRGM toggle key is used to enter the Program mode for either loading,
writing, or correcting a program.  The ALPHA mode is used for entering letters of
the alphabet into the display.
     There are sone other keys used in running the programs in this booklet that
are important.  They are the Shift key, the Execute key, the Enter key, the Clear
key, and the Run/Stop key.
     The yellow key on the left side of the keyboard is the Shift key.  This key is
used to get to the  functions written in yellow above the main keys.

-------
                                                                         Page 23
     There are some other keys used in running the programs in this booklet that
are important.  They are the Shift key, the Execute key, the Enter key, The Clear
key, and the Run/Stop key.
     The yellow key on the left side of the keyboard is the Shift Key.  This key
is used to get to the functions written in yellow above the main keys.
     To the right of the yellow Shift key is the Execute (XEQ) key.  This key is
used when executing a program or function.
     Below the Shift and. Execute keys is the ENTER key.  This key is used to enter
numbers into the display when manually operating the calculator and will be dis-
cussed in the RPN section that follows^
     Three keys from the right of the ENTER key is a key with an arrow pointing to
the left.  This key is used for clearing the display.
     The bottom right-hand key is the Hun/Stop key..  This key is pressed to either
start or stop a program.

                                 THE RPN SYSTEM

     This discussion is for those who have never used a calculator that uses the
RPN system, or for those who may have limited experience with HP calculators or
the H? itl.  These who are familiar with the RPN system may want to skip this part.
     The H? k-1 uses the RPN system or Reverse Polish Notation as it is also called.
This logic is based on a mathametical logic known as "Polish Notation" developed.
by  a noted Polish logician, Jan Lukasiewicz (l3?8 - 195&).  Conventional algebraic
logic places operators between relevant numbers (2 times 3 for example) whereas
Lukasiewicz's notation specifies the operators before the variables.  A variation
of  this logic that places the operators after the variables is called Reverse
Polish Notation (2 ENTER, 3 times for example).  Hewlett-Packard has choosen the
RPN system for greater efficiency in digital computations.
     VTnen. using the RPN system to perform computations, the ENTER key is usually
pressed to enter the first number.  In multiplying 2 times 3, the 2 key is pressed
and then the ENTER key.  Next, the 3 is pressed followed by the times key.  The
answer 6 appears in the display.  If at this point, you wish to get the square root
of  6, it is not necessary to press the ENTER key again; simply press the scuare
root key and the answer will appear in the display.  With a little practice and
referral to the HP Owner's Manua_, using the RPN system will become quite easy.

-------
                                                                         Page 24

                         HOW TO MANUALLY ENTER A PROGRAM

     A program can be manually entered into the calculator; however, it is somewhat
time consuming.  For this reason, a card reader is recommended.  Although the card
reader is an additional expenditure, one card reader can be used to program several
calculators.
     Before manually keying in a program, the memory size of the calculator must
be set.  This needs to be done only once before the first program is entered.  To
set the memory size, press the XEQ key, followed by the ALPHA toggle key.  Then
spell SIZE and press the ALPHA toggle key again.  At this point, SIZE will appear
in the display followed by three blank spaces.  The memory size may now be entered.,
Most of the programs will run with a memory size of 045 or less.  The Alignment
Method programs require a memory size of 110.  Unless the Alignment programs are
going to be used, a memory size of 045 is recommendedo
     To manually enter a program, press the PRGM toggle key.  Then press the
Shift key fallowed by the GTO key.  Next, press the decimal key twice.  PACKING
should appear briefly in the display.
     The next step is to enter the program label.  To do this, press the Shift key
followed by the L3L key.  Now press the ALPHA toggle key in order to spell the
program label and press ALPHA again.  From this point on, enter the program as it
printed in the booklet.  The last line in the program is another PACKING function,
that is, the shift key, the GTO key, and the decimal key twice.  The PACKING function-
places an END statement at the bottom of the program.  Before loading another pro-
gram, the PACKING function should be executed again.
     While it is time consuming to enter programs manually, there is also another
problem.  The calculator will not hold all the programs in the booklet at one time.
This means that some programs may have to be cleared so that others may be entered.
If a card reader is not available, then the most frequently used programs could be
manually entered and left in the calculator memory.  For the purpose of checking
the isokinetic sampling rate, the METH 3, METH 4, METH 5, and PRESS programs would
be the programs to store.

                  HOW TO ENTER A PROGRAM USING THE CARD READER

     Entering a program into the calculator memory using a card reader is very
simple and fast.  First, the memory size must be set as discussed in the proceeding
section.  Next, the PACKING function should be executed by pressing the Shift key,

-------
                                                                         Page  25
the GTO key, and the decimal key twice.  The program cards may now be processed
through the card reader.  The card is placed into the slot on the right hand side
of the card reader.  If the program uses the whole card, or more than one  card,
the calculator will prompt for additional input.  The display will say RDY 02  OF 04,
or something similar since the order in which the cards are entered makes  no diff-
erence.  If the display prompts for additional input, take the previously  run  card
and turn it upside down and run it through the card reader again.  When the last
track (each card has two tracks) has been entered, WORKING will appear in  the  displaya
At this point, the entire program has been placed into the calculator memory.
     Before entering another program, it is important to execute the PACKING fun-
ction.  The PACKING function moves the previously entered program from the bottom
of the program memory towards the top of the memory; making it possible to enter
the next program without writing over part of the previously entered program.

                              KOW TO HUN A PROGRAM

     Running a program is very simple.  Simply press the XSQ key, the ALPHA toggle
key, spell the program label, and press the ALPHA toggle key again.  The program
will be engaged and the first prompt will appear.  Simply enter the data prompted
for and press the R/S key.  After all the data have been entered, the calculator
will then provide the- answers.
     Some of the programs begin with the prompt RUN NUMBER?  If using a urinterr,
the Run Number may be entered-by using the ALPHA mode.  Simoly tress the ALPHA
toggle key, spell the run number, and press the ALPHA toggle key again.   The run
number will be printed at the top of the printer tape,

                      HOW TO ASSIGN A PROGRAM TO A USER KEY

     Assigning a program to a USER key is quite easy.  .Simply press the Shift key,
tr.e ASN key and the ALPHA toggle key.  ASN _ will appear in the display.  Key in
the program label and press the ALPHA toggle key again.  A dash will appear to the
rignt of the program label.  Pressing one of the calculator keys will assisn the
program to that key.  Whenever you want to run the program that was just assigned
zo the user key, simply press the USER tog-le key and the key to which zhe pro-
gram was assigned.  The program will be engaged and the first prompt will appear
     A USER key is si .-.ply an easier way of calling ut or executing = —0=~=-i
                                                    -            ^ —• Z?  O* -**'^ •

-------
                                                                         Page 26

                         HOW TO USE THE CATALOG FUNCTION

     The CATALOG function lists the programs stored in the calculator memory.
To execute this function, press the Shift key, the CATALOG key, and the "1" key,
The calculator will begin listing the programs in its memory.  The program label(s)
will appear in the display followed by an END statement.  The CATALOG function is a
handy way to get to the beginning of a program for programming purposes.  By press-
ing R/S at the appropriate time, the beginning of the program may be reached.
Pressing the PRGM toggle key will then display the first line of the program.

                             HOW TO USE THE PRINTER.

     The printer plugs into one of the ports on the HP 41 (consult the Owner's
Manual for the proper port).  The printer has three modes:  these are MAN (manual),
TRACE, and NORM (normal).  The TRACE mode is useful when trying to find errors
in programs since it prints every operation the calculator performs while running
that program.  The NORM mode is most frequently used.  It prints all the prompts
found in a program and it also prints all the answers.  The MAN mode prints only
when instructed to by the program.  This 
-------