next up previous contents index
Next: Accessing Information Up: Editing operations Previous: Printing after System

Changing Logical unit numbers for output and message files

 

The output file, containing the histograms, is by default the line printer file, where also error messages will be written.

The names of the result and error files can be redefined using:

CALL HERMES (LERR)

Action: Replaces the logical unit value of the file containing the results (HOUTPU) or the error message (HERMES).

Input parameters:
LOUT
logical unit number of the file with the printed output
LERR
logical unit number of the file with error messages

Example of printing options

      SUBROUTINE HEXAM4
*.==========>
*.           TEST PRINTING OPTIONS
*..=========> ( R.Brun )
      DATA XMIN,XMAX/0.,1./
*.___________________________________________
*
*             Get hist 110 from data base
*
      CALL HRGET(110,'hexam.dat',' ')
*
*             Book 2 new histograms
*
      CALL HBOOK1(1000,'TEST OF PRINTING OPTIONS',40,1.,41.,0.)
      CALL HBOOK1(2000,'TEST OF BIG BIN',20,XMIN,XMAX,0.)
      CALL HIDOPT(1000,'ERRO')
*
*             Fills new IDs
*
      DO 10 I=1,40
         J=2*I-1
         W=HI(110,J)+HI(110,J+1)
         CALL HFILL(1000,FLOAT(I),0.,W)
  10  CONTINUE
*
      DO 20 I=1,20
         J=5*I
         W=SQRT(HI(110,J))
         CALL HIX(2000,I,X)
         CALL HF1(2000,X,W)
  20  CONTINUE
*
*             Set various printing options
*
      CALL HIDOPT(110,'BLAC')
      CALL HIDOPT(110,'NPLO')
      CALL HIDOPT(110,'NPST')
      CALL HPHIST(110,'HIST',1)
      CALL HMAXIM(110,100.)
      CALL HIDOPT(110,'1EVL')
      CALL HIDOPT(110,'NPCH')
      CALL HPHIST(110,'HIST',1)
*
      CALL HIDOPT(1000,'NPCH')
      CALL HIDOPT(1000,'NPCO')
      CALL HPROT(1000,'HIST',1)
      CALL HIDOPT(1000,'LOGY')
      CALL HPRINT(1000)
      CALL HIDOPT(1000,'INTE')
      CALL HIDOPT(1000,'PERR')
      CALL HIDOPT(1000,'ROTA')
      CALL HPRINT(1000)
*
      CALL HBIGBI(2000,5)
      CALL HIDOPT(2000,'NPCO')
      CALL HIDOPT(2000,'NPLO')
      CALL HPRINT(2000)
*
      END

 THIS HISTOGRAM IS FILLED ACCORDING TO THE FUNCTION HTFUN1                       
 
 HBOOK     ID =       110                                        DATE  17/12/91              NO =   8
 
      172                                    7
      168                                    X
      164                                    X
      160                                   2X
      156                                   XX 5
      152                                   XX5X
      148                                   XXXX7
      144                                 25XXXXX
      140                                 XXXXXXX5
      136                                 XXXXXXXX
      132                                 XXXXXXXX
      128                                 XXXXXXXX2
      124                                5XXXXXXXXX
      120                               5XXXXXXXXXX
      116                               XXXXXXXXXXX
      112                               XXXXXXXXXXX
      108                               XXXXXXXXXXX
      104                              5XXXXXXXXXXX2
      100                              XXXXXXXXXXXXX
       96                              XXXXXXXXXXXXX 7
       92                              XXXXXXXXXXXXX7X
       88                             XXXXXXXXXXXXXXXX
       84                             XXXXXXXXXXXXXXXX 5                              2 7
       80                             XXXXXXXXXXXXXXXX X                        2     X X  5
       76                             XXXXXXXXXXXXXXXX X                        X2X  2X X  X
       72                             XXXXXXXXXXXXXXXX XX                       XXX2 XX X  X 2
       68                             XXXXXXXXXXXXXXXX2XX                    2  XXXX2XXXX2XXXX
       64                             XXXXXXXXXXXXXXXXXXX                  75X  XXXXXXXXXXXXXX7
       60                           X XXXXXXXXXXXXXXXXXXX                  XXX 7XXXXXXXXXXXXXXX
       56                           XXXXXXXXXXXXXXXXXXXXX                  XXX2XXXXXXXXXXXXXXXX 5
       52                           XXXXXXXXXXXXXXXXXXXXXX               X5XXXXXXXXXXXXXXXXXXXX2X
       48                          5XXXXXXXXXXXXXXXXXXXXXX2              XXXXXXXXXXXXXXXXXXXXXXXX
       44                          XXXXXXXXXXXXXXXXXXXXXXXX             5XXXXXXXXXXXXXXXXXXXXXXXX5  X
       40                          XXXXXXXXXXXXXXXXXXXXXXXX2           7XXXXXXXXXXXXXXXXXXXXXXXXXX  X
       36                          XXXXXXXXXXXXXXXXXXXXXXXXX           XXXXXXXXXXXXXXXXXXXXXXXXXXX52XX
       32                          XXXXXXXXXXXXXXXXXXXXXXXXX    2     5XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
       28                         7XXXXXXXXXXXXXXXXXXXXXXXXX7 5 X 7  2XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX2 X
       24                       2XXXXXXXXXXXXXXXXXXXXXXXXXXXX2X X X2 XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX X25
       20                      5XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX X5XX5XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX 7
       16                      XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX5XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX7X
       12                     7XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX77
        8                 5 5XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX5727
        4            5225XX5XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
 
 CHANNELS 100   0                                                                                                  1   
           10   0        1         2         3         4         5         6         7         8         9         0   
            1   1234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890   
 
 CONTENTS 100                          1111111111111                                                                
           10                 112224658012445755432099687543222121221233455666557776678686676664543343222221111     
            1.       21124626818147606828212710478511552225771649871850922032539736953183588893942434650812591167574
\finalnewpage
 THIS HISTOGRAM IS FILLED ACCORDING TO THE FUNCTION HTFUN1                       
 
 HBOOK     ID =       110                                        DATE  17/12/91              NO =   9
 
      100                              XXXXXXXXXXXXX
       96                              XXXXXXXXXXXXX 7
       92                              XXXXXXXXXXXXX7X
       88                             XXXXXXXXXXXXXXXX
       84                             XXXXXXXXXXXXXXXX 5                              2 7
       80                             XXXXXXXXXXXXXXXX X                        2     X X  5
       76                             XXXXXXXXXXXXXXXX X                        X2X  2X X  X
       72                             XXXXXXXXXXXXXXXX XX                       XXX2 XX X  X 2
       68                             XXXXXXXXXXXXXXXX2XX                    2  XXXX2XXXX2XXXX
       64                             XXXXXXXXXXXXXXXXXXX                  75X  XXXXXXXXXXXXXX7
       60                           X XXXXXXXXXXXXXXXXXXX                  XXX 7XXXXXXXXXXXXXXX
       56                           XXXXXXXXXXXXXXXXXXXXX                  XXX2XXXXXXXXXXXXXXXX 5
       52                           XXXXXXXXXXXXXXXXXXXXXX               X5XXXXXXXXXXXXXXXXXXXX2X
       48                          5XXXXXXXXXXXXXXXXXXXXXX2              XXXXXXXXXXXXXXXXXXXXXXXX
       44                          XXXXXXXXXXXXXXXXXXXXXXXX             5XXXXXXXXXXXXXXXXXXXXXXXX5  X
       40                          XXXXXXXXXXXXXXXXXXXXXXXX2           7XXXXXXXXXXXXXXXXXXXXXXXXXX  X
       36                          XXXXXXXXXXXXXXXXXXXXXXXXX           XXXXXXXXXXXXXXXXXXXXXXXXXXX52XX
       32                          XXXXXXXXXXXXXXXXXXXXXXXXX    2     5XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
       28                         7XXXXXXXXXXXXXXXXXXXXXXXXX7 5 X 7  2XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX2 X
       24                       2XXXXXXXXXXXXXXXXXXXXXXXXXXXX2X X X2 XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX X25
       20                      5XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX X5XX5XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX 7
       16                      XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX5XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX7X
       12                     7XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX77
        8                 5 5XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX5727
        4            5225XX5XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
 
 CONTENTS 100                          1111111111111                                                                
           10                 112224658012445755432099687543222121221233455666557776678686676664543343222221111     
            1.       21124626818147606828212710478511552225771649871850922032539736953183588893942434650812591167574
 
 TEST OF PRINTING OPTIONS                                                        
 
 HBOOK     ID =      1000                                        DATE  17/12/91              NO =  10
 
     100                               1   1   1   1   1   1   2   2   2   2   2   2   3   3   3
      10       1   3   4   6   8   9   1   2   4   6   7   9   0   2   4   5   7   8   0   2   3
       1.      6   2   8   4   0   6   2   8   4   0   6   2   8   4   0   6   2   8   4   0   6
 
  LOW EDGE I---I---I---I---I---I---I---I---I---I---I---I---I---I---I---I---I---I---I---I---I---I---
     2
     2
     3      O
     4      O
     5      IOI
     6       OI
     7        IOI
     8           IO-I
     9               IO-I
    10                      I-O-I
    11                                I-O--I
    12                                                  I--O--I
    13                                                              I--O---I
    14                                                                        I---O---I
    15                                                                                   I---O---I
    16                                                                             I---O----I
    17                                                                         I---O---I
    18                                                          I---O---I
    19                                                 I--O--I
    20                                       I--O--I
    21                                  I-O--I
    22                        I-O-I
    23                IO-I
    24              IO-I
    25                IO-I
    26                IO-I
    27               IO-I
    28                     I-O-I
    29                           I-O-I
    30                               I-O--I
    31                                  I--O--I
    32                               I-O--I
    33                                        I--O--I
    34                                       I--O--I
    35                                     I--O--I
    36                                        I--O--I
    37                                       I--O---I
    38                                       I--O--I
    39                                     I--O--I
    40                               I-O--I
  LOW EDGE I---I---I---I---I---I---I---I---I---I---I---I---I---I---I---I---I---I---I---I---I---I---
 
     100                               1   1   1   1   1   1   2   2   2   2   2   2   3   3   3
      10       1   3   4   6   8   9   1   2   4   6   7   9   0   2   4   5   7   8   0   2   3
       1.      6   2   8   4   0   6   2   8   4   0   6   2   8   4   0   6   2   8   4   0   6
 
 * ENTRIES =         40      * ALL CHANNELS = 0.4556E+04      * UNDERFLOW = 0.0000E+00      * OVERFLOW = 0.0000E+00
 * BIN WID = 0.1000E+01      * MEAN VALUE   = 0.2331E+02      * R . M . S = 0.9558E+01
\finalnewpage
 TEST OF PRINTING OPTIONS                                                        
 
 HBOOK     ID =      1000                                        DATE  17/12/91              NO =  11
 
      354.814                 0I
      316.228                0I00
      281.838               II  I
      251.189               0    0
      223.872              I     II
      199.526              0      0
      177.828              I      II            I  II
      158.489                      0            00I000I
      141.254             I        II         0 II0III0
      125.893             0         0        0II      II
      112.202             I                 II 0       0
      100                            I      0
       89.125            I           0      I
       79.433            0           I     I
       70.795            I                 0
       63.096                              I
       56.234           I             I II
       50.119           0             0I00I
       44.668           I             I0II0
       39.811           I              I  I
       35.481          I               I
       31.623          0
       28.184          I
       25.119          I
       22.387
       19.953
       17.783         I
       15.849         I
       14.125         0
       12.589         I
       11.22         II
       10            I
        8.913       I0
        7.943       II
        7.079       II
        6.31        0I
        5.623       II
        5.012       I
        4.467       I
        3.981       I
        3.548     II
        3.162     II
        2.818     II
        2.512     II
        2.239     00
 
 LOW-EDGE  10            1111111111222222222233333333334
            1.  1234567890123456789012345678901234567890
 
 * ENTRIES =         40      * ALL CHANNELS = 0.4556E+04      * UNDERFLOW = 0.0000E+00      * OVERFLOW = 0.0000E+00
 * BIN WID = 0.1000E+01      * MEAN VALUE   = 0.2331E+02      * R . M . S = 0.9558E+01
 
\finalnewpage

 TEST OF PRINTING OPTIONS                                                        
 
 HBOOK     ID =      1000                                        DATE  17/12/91              NO =  12
 
                         100                                                                       1   1   1   1   2   3
                          10                               1   1   1   1   2   3   3   5   6   7   0   2   5   9   5   1
                           1.  2   2   3   3   5   6   7   0   2   5   9   5   1   9   0   3   9   0   5   8   9   1   6
                           0   0   5   1   9   0   3   9   0   5   8   9   1   6   8   1   1   4   0   8   4   5   1   2
                           0   0   1   6   8   1   1   4   0   9   5   5   2   2   1   2   0   3   0   9   9   3   9   3
 
  LOW EDGE  INTEGRAT   ERRORS  I---I---I---I---I---I---I---I---I---I---I---I---I---I---I---I---I---I---I---I---I---I---I--
     2
     2
     3         2         1.414 O--------I
     4         4         1.414 O--------I
     5        10         2.449           I--------O-----I
     6        18         2.828                 I-------O----I
     7        32         3.742                             I----O---I
     8        61         5.385                                           I---O--I
     9       106         6.708                                                    I--O-I
    10       179         8.544                                                             I-O-I
    11       295        10.77                                                                      I-O-I
    12       485        13.784                                                                              I-OI
    13       725        15.492                                                                                   IOI
    14      1008        16.823                                                                                      IOI
    15      1336        18.111                                                                                        IOI
    16      1640        17.436                                                                                       IOI
    17      1925        16.882                                                                                      IOI
    18      2151        15.033                                                                                 I-OI
    19      2337        13.638                                                                              IO-I
    20      2484        12.124                                                                          IO-I
    21      2608        11.136                                                                       IO-I
    22      2690         9.055                                                               I-O-I
    23      2738         6.928                                                     I--O-I
    24      2778         6.325                                                  I--O-I
    25      2825         6.856                                                     I-O--I
    26      2873         6.928                                                     I--O-I
    27      2916         6.557                                                   I--O-I
    28      2985         8.307                                                            I-O-I
    29      3079         9.695                                                                  IO-I
    30      3192        10.63                                                                      I-OI
    31      3319        11.269                                                                       I-OI
    32      3431        10.583                                                                     IO-I
    33      3581        12.247                                                                          I-OI
    34      3726        12.042                                                                         I-OI
    35      3864        11.747                                                                         IO-I
    36      4013        12.207                                                                          IO-I
    37      4161        12.166                                                                          IO-I
    38      4307        12.083                                                                          IOI
    39      4444        11.705                                                                        I-OI
    40      4556        10.583                                                                     IO-I
  LOW EDGE  INTEGRAT   ERRORS  I---I---I---I---I---I---I---I---I---I---I---I---I---I---I---I---I---I---I---I---I---I---I--
 
                         100                                                                       1   1   1   1   2   3
                          10                               1   1   1   1   2   3   3   5   6   7   0   2   5   9   5   1
                           1.  2   2   3   3   5   6   7   0   2   5   9   5   1   9   0   3   9   0   5   8   9   1   6
                           0   0   5   1   9   0   3   9   0   5   8   9   1   6   8   1   1   4   0   8   4   5   1   2
                           0   0   1   6   8   1   1   4   0   9   5   5   2   2   1   2   0   3   0   9   9   3   9   3
 
 * ENTRIES =         40      * ALL CHANNELS = 0.4556E+04      * UNDERFLOW = 0.0000E+00      * OVERFLOW = 0.0000E+00
 * BIN WID = 0.1000E+01      * MEAN VALUE   = 0.2331E+02      * R . M . S = 0.9558E+01
\finalnewpage
 TEST OF BIG BIN                                                                 
 
 HBOOK     ID =      2000                                        DATE  17/12/91              NO =  13
 
       13.25                             -----
       13                                I   I
       12.75                             I   I
       12.5                              I   I
       12.25                             I   I
       12                                I   I
       11.75                             I   I
       11.5                              I   I
       11.25                             I   I-----
       11                           -----I        I
       10.75                        I             I
       10.5                         I             I
       10.25                        I             I
       10                           I             I
        9.75                        I             I
        9.5                         I             I
        9.25                        I             I-----
        9                           I                  I                    -----
        8.75                        I                  I                    I   I-----
        8.5                         I                  I                    I        I
        8.25                        I                  I                    I        I-----
        8                           I                  I               -----I             I
        7.75                        I                  I               I                  I
        7.5                         I                  I               I                  I
        7.25                        I                  I               I                  I
        7                      -----I                  I               I                  I-----
        6.75                   I                       I               I                       I-----
        6.5                    I                       I               I                            I
        6.25                   I                       I               I                            I
        6                      I                       I               I                            I
        5.75                   I                       I               I                            I
        5.5                    I                       I          -----I                            I
        5.25                   I                       I-----     I                                 I
        5                      I                            I     I                                 I
        4.75                   I                            I     I                                 I-----
        4.5                    I                            I     I                                      I
        4.25                   I                            I-----I                                      I
        4                      I                                                                         I
        3.75                   I                                                                         I
        3.5               -----I                                                                         I-----
        3.25              I                                                                                   I
        3                 I                                                                                   I
        2.75              I                                                                                   I
        2.5               I                                                                                   I
        2.25              I                                                                                   I
        2            -----I                                                                                   I-----
        1.75         I                                                                                             I
        1.5          I                                                                                             I
        1.25         I                                                                                             I
        1            I                                                                                             I
         .75         I                                                                                             I
         .5          I                                                                                             I
         .25         I                                                                                             I
 
 CHANNELS  10       0                                            1                                                 2   
            1       1    2    3    4    5    6    7    8    9    0    1    2    3    4    5    6    7    8    9    0   
 
 * ENTRIES =         20      * ALL CHANNELS = 0.1282E+03      * UNDERFLOW = 0.0000E+00      * OVERFLOW = 0.0000E+00
 * BIN WID = 0.5000E-01      * MEAN VALUE   = 0.4963E+00      * R . M . S = 0.2391E+00


Last update: Tue May 16 09:09:27 METDST 1995