Wed Jun 12 16:56:58 1991Connection Machine Fortran Version: 1.0 Rev: f1010	page: 1
Source Listing File: /net/u1/npac/sibert/cmsi/cmf-sun/rainbow.fcm
    1     1  1 	C  Alternative rainbows for 8-bit framebuffer operation
    2     2  1 	C  File:  rainbow.fcm
    3     3  1 	C  
    4     4  1 	C  Author:  Ernest Sibert
    5     5  1 	C	    eesibert@top.cis.syr.edu
    6     6  1 	C	    12 June 1991
    7     7  1 	C
    8     8  1 	C  This file defines two subroutines which may be called to write
    9     9  1 	C  special color tables to a CM framebuffer.  The framebuffer must
   10    10  1 	C  be attached and initialized.
   11    11  1 	C
   12    12  1 	C  Each of the color tables can be summarized as:
   13    13  1 	C
   14    14  1 	C    index     red     green    blue       result
   15    15  1 	C    -----     ---     -----    ----       ------
   16    16  1 	C       0        0        0        0        black
   17    17  1 	C       1      255        0        0        red
   18    18  1 	C       .        |        .        |
   19    19  1 	C       .        |        .        |      "spectral"
   20    20  1 	C       .        |        .        |
   21    21  1 	C      64      255      255        0        yellow
   22    22  1 	C       .        .        |        |
   23    23  1 	C       .        .        |        |      "spectral"
   24    24  1 	C       .        .        |        |
   25    25  1 	C     128        0      255        0        green
   26    26  1 	C       .        |        .        .
   27    27  1 	C       .        |        .        .      "spectral"
   28    28  1 	C       .        |        .        .
   29    29  1 	C     192        0        0      255        blue
   30    30  1 	C       .        .        |        |
   31    31  1 	C       .        .        |        |     "non-spectral"
   32    32  1 	C       .        .        |        |
   33    33  1 	C     255      252        0      255        magenta
   34    34  1 	C
   35    35  1 	C  The argument to each subroutine is an integer which is the
   36    36  1 	C  CMFB display-id (not the same as the display-id used by the
   37    37  1 	C  generic interface routines; it may be obtained using
   38    38  1 	C  CMSR_cmfb_display_display_id).
   39    39  1 	C
   40    40  1 	C     subroutine rainbow_luts(cmfb_disp_id)
   41    41  1 	C
   42    42  1 	C	writes a color table as above.  Where the color value is
   43    43  1 	C 	changing the variation is essentially linear with delta-v = 4.
   44    44  1 	C	This is exactly the color table generated by the old V5.0
   45    45  1 	C	routine CMFB_rainbow_luts.
   46    46  1 	C
   47    47  1 	C     subroutine quad_rainbow(cmfb_disp_id)
   48    48  1 	C
   49    49  1 	C	writes a color table as above.  Where the color value is
   50    50  1 	C 	changing the variation is quadratic, changing more rapidly
   51    51  1 	C	near 0, less rapidly near 255.
   52    52  1 	C
Wed Jun 12 16:56:58 1991Connection Machine Fortran Version: 1.0 Rev: f1010	page: 2
Source Listing File: /net/u1/npac/sibert/cmsi/cmf-sun/rainbow.fcm
   53    53  1 	C  The program defines a COMMON block named RAINBOW (frontend data only).
   54    54  1 	
   55    55  1 	
   56    56  1 	      BLOCK DATA Rainbows
   57    57  1 	
   58    58  1 		COMMON /RAINBOW/ lr, lg, lb, qr, qg, qb
   59    59  1 		integer, array(256) :: lr, lg, lb, qr, qg, qb
   60    60  1 	CMF$	LAYOUT lr(:serial), lg(:serial), lb(:serial)
   61    61  1 	CMF$	LAYOUT qr(:serial), qg(:serial), qb(:serial)
   62    62  1 	
   63    63  1 	C --- Rainbow-lutz tables:
   64    64  1 		DATA lr /		!red
   65    65  1 	     &    0,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,
   66    66  1 	     &  255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,
   67    67  1 	     &  255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,
   68    68  1 	     &  255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,
   69    69  1 	     &  255,251,247,243,239,235,231,227,223,219,215,211,207,203,199,195,
   70    70  1 	     &  191,187,183,179,175,171,167,163,159,155,151,147,143,139,135,131,
   71    71  1 	     &  127,123,119,115,111,107,103, 99, 95, 91, 87, 83, 79, 75, 71, 67,
   72    72  1 	     &   63, 59, 55, 51, 47, 43, 39, 35, 31, 27, 23, 19, 15, 11,  7,  3,
   73    73  1 	     &    0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
   74    74  1 	     &    0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
   75    75  1 	     &    0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
   76    76  1 	     &    0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
   77    77  1 	     &    0,  4,  8, 12, 16, 20, 24, 28, 32, 36, 40, 44, 48, 52, 56, 60,
   78    78  1 	     &   64, 68, 72, 76, 80, 84, 88, 92, 96,100,104,108,112,116,120,124,
   79    79  1 	     &  128,132,136,140,144,148,152,156,160,164,168,172,176,180,184,188,
   80    80  1 	     &  192,196,200,204,208,212,216,220,224,228,232,236,240,244,248,252/
   81    81  1 		DATA lg /		! green
   82    82  1 	     &    0,  4,  8, 12, 16, 20, 24, 28, 32, 36, 40, 44, 48, 52, 56, 60,
   83    83  1 	     &   64, 68, 72, 76, 80, 84, 88, 92, 96,100,104,108,112,116,120,124,
   84    84  1 	     &  128,132,136,140,144,148,152,156,160,164,168,172,176,180,184,188,
   85    85  1 	     &  192,196,200,204,208,212,216,220,224,228,232,236,240,244,248,252,
   86    86  1 	     &  255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,
   87    87  1 	     &  255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,
   88    88  1 	     &  255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,
   89    89  1 	     &  255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,
   90    90  1 	     &  255,251,247,243,239,235,231,227,223,219,215,211,207,203,199,195,
   91    91  1 	     &  191,187,183,179,175,171,167,163,159,155,151,147,143,139,135,131,
   92    92  1 	     &  127,123,119,115,111,107,103, 99, 95, 91, 87, 83, 79, 75, 71, 67,
   93    93  1 	     &   63, 59, 55, 51, 47, 43, 39, 35, 31, 27, 23, 19, 15, 11,  7,  3,
   94    94  1 	     &    0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
   95    95  1 	     &    0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
   96    96  1 	     &    0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
   97    97  1 	     &    0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0/
   98    98  1 		DATA lb /		! blue
   99    99  1 	     &    0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
  100   100  1 	     &    0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
  101   101  1 	     &    0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
  102   102  1 	     &    0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
  103   103  1 	     &    0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
  104   104  1 	     &    0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
Wed Jun 12 16:56:58 1991Connection Machine Fortran Version: 1.0 Rev: f1010	page: 3
Source Listing File: /net/u1/npac/sibert/cmsi/cmf-sun/rainbow.fcm
  105   105  1 	     &    0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
  106   106  1 	     &    0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
  107   107  1 	     &    0,  4,  8, 12, 16, 20, 24, 28, 32, 36, 40, 44, 48, 52, 56, 60,
  108   108  1 	     &   64, 68, 72, 76, 80, 84, 88, 92, 96,100,104,108,112,116,120,124,
  109   109  1 	     &  128,132,136,140,144,148,152,156,160,164,168,172,176,180,184,188,
  110   110  1 	     &  192,196,200,204,208,212,216,220,224,228,232,236,240,244,248,252,
  111   111  1 	     &  255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,
  112   112  1 	     &  255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,
  113   113  1 	     &  255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,
  114   114  1 	     &  255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255/
  115   115  1 	
  116   116  1 	C --- Quadratic rainbow tables:
  117   117  1 		DATA qr /		! red
  118   118  1 	     &    0,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,
  119   119  1 	     &  255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,
  120   120  1 	     &  255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,
  121   121  1 	     &  255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,
  122   122  1 	     &  255,254,252,251,250,249,247,246,244,242,240,239,237,234,232,230,
  123   123  1 	     &  228,225,222,220,217,214,211,208,205,202,198,195,192,188,184,180,
  124   124  1 	     &  177,173,168,164,160,156,151,147,142,137,132,128,123,117,112,107,
  125   125  1 	     &  102, 96, 90, 85, 79, 73, 67, 61, 55, 49, 42, 36, 30, 23, 16,  9,
  126   126  1 	     &    0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
  127   127  1 	     &    0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
  128   128  1 	     &    0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
  129   129  1 	     &    0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
  130   130  1 	     &    0,  6, 13, 20, 27, 33, 40, 46, 53, 59, 65, 71, 77, 83, 88, 94,
  131   131  1 	     &  100,105,110,116,121,126,131,136,141,145,150,154,159,163,167,171,
  132   132  1 	     &  176,179,183,187,191,194,198,201,205,208,211,214,217,220,222,225,
  133   133  1 	     &  228,230,232,235,237,239,241,243,245,246,248,249,251,252,253,254/
  134   134  1 		DATA qg /		! green
  135   135  1 	     &    0,  0,  7, 13, 20, 27, 33, 40, 46, 53, 59, 65, 71, 77, 83, 89,
  136   136  1 	     &   94,100,105,111,116,121,126,131,136,141,146,150,155,159,164,168,
  137   137  1 	     &  172,176,180,184,188,191,195,198,202,205,208,212,215,218,220,223,
  138   138  1 	     &  226,228,231,233,235,238,240,242,244,245,247,249,250,252,253,254,
  139   139  1 	     &  255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,
  140   140  1 	     &  255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,
  141   141  1 	     &  255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,
  142   142  1 	     &  255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,
  143   143  1 	     &  255,254,252,251,250,249,247,246,244,242,240,239,237,234,232,230,
  144   144  1 	     &  228,225,222,220,217,214,211,208,205,202,198,195,192,188,184,180,
  145   145  1 	     &  177,173,168,164,160,156,151,147,142,137,132,128,123,117,112,107,
  146   146  1 	     &  102, 96, 90, 85, 79, 73, 67, 61, 55, 49, 42, 36, 30, 23, 16,  9,
  147   147  1 	     &    0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
  148   148  1 	     &    0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
  149   149  1 	     &    0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
  150   150  1 	     &    0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0/
  151   151  1 		DATA qb /		! blue
  152   152  1 	     &    0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
  153   153  1 	     &    0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
  154   154  1 	     &    0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
  155   155  1 	     &    0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
  156   156  1 	     &    0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
Wed Jun 12 16:56:58 1991Connection Machine Fortran Version: 1.0 Rev: f1010	page: 4
Source Listing File: /net/u1/npac/sibert/cmsi/cmf-sun/rainbow.fcm
  157   157  1 	     &    0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
  158   158  1 	     &    0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
  159   159  1 	     &    0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
  160   160  1 	     &    0,  6, 13, 20, 27, 33, 40, 46, 53, 59, 65, 71, 77, 83, 88, 94,
  161   161  1 	     &  100,105,110,116,121,126,131,136,141,145,150,154,159,163,167,171,
  162   162  1 	     &  176,179,183,187,191,194,198,201,205,208,211,214,217,220,222,225,
  163   163  1 	     &  228,230,232,235,237,239,241,243,245,246,248,249,251,252,253,254,
  164   164  1 	     &  255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,
  165   165  1 	     &  255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,
  166   166  1 	     &  255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,
  167   167  1 	     &  255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255/
  168   168  1 	
  169   169  1 	      END BLOCK DATA Rainbows
  170   170  1 	
  171   171  1 	
  172   172  1 	C  Install "rainbow_luts" color table, as for the V5.0 function
  173   173  1 	C  CMFB_rainbow_luts.
  174   174  1 	
Wed Jun 12 16:56:58 1991Connection Machine Fortran Version: 1.0 Rev: f1010	page: 5
Symbol Storage Map   File: /net/u1/npac/sibert/cmsi/cmf-sun/rainbow.fcm
ENTRY POINTS
  Offset  Type    Name


STORAGE BLOCKS
    Size  Block
    6144  _rainbow
    4080  constants




VARIABLES
  Offset    Size  Type        Block           Name


ARRAYS
  Offset    Size  Type        Block/Class     Home     Name
    2048    1024  INT4        _rainbow        FE       LB                              
    1024    1024  INT4        _rainbow        FE       LG                              
       0    1024  INT4        _rainbow        FE       LR                              
    5120    1024  INT4        _rainbow        FE       QB                              
    4096    1024  INT4        _rainbow        FE       QG                              
    3072    1024  INT4        _rainbow        FE       QR                              


PARAMETERS (Offset is within Storage Block 'constants')
  Offset  Type    Name                            Value


INTRINSIC PROCEDURES
  Name


STATEMENT FUNCTIONS
  Type    Name


EXTERNALS
  Type    Unit_Kind     Name


NAME LISTS
  Name


CONSTRUCT NAMES
  Name



Wed Jun 12 16:56:58 1991Connection Machine Fortran Version: 1.0 Rev: f1010	page: 6
Source Listing File: /net/u1/npac/sibert/cmsi/cmf-sun/rainbow.fcm
  175   175  1 	      subroutine rainbow_luts(dispp)
  176   176  1 		integer dispp		! CMFB display id
  177   177  1 	
  178   178  1 		include '/usr/include/cm/paris-configuration-fort.h'
  179   179  1 	
  711   180  1 		COMMON /RAINBOW/ lr, lg, lb
  712   181  1 		integer, array(256) :: lr, lg, lb
  713   182  1 	CMF$	LAYOUT lr(:serial), lg(:serial), lb(:serial)
  714   183  1 	
  715   184  1 		call CMFB_write_color_table(dispp, CMFB_red,   lr)
  716   185  1 		call CMFB_write_color_table(dispp, CMFB_green, lg)
  717   186  1 		call CMFB_write_color_table(dispp, CMFB_blue,  lb)
  718   187  1 	
  719   188  1 	      end subroutine rainbow_luts
  720   189  1 	
  721   190  1 	
  722   191  1 	C  Rainbow with quadratic transitions - same scheme as rainbow_luts
  723   192  1 	C  above, but transitions between 0 and 255 are quadratic, changing
  724   193  1 	C  more rapidly near 0, less rapidly near 255.
  725   194  1 	
Wed Jun 12 16:56:58 1991Connection Machine Fortran Version: 1.0 Rev: f1010	page: 7
Symbol Storage Map   File: /net/u1/npac/sibert/cmsi/cmf-sun/rainbow.fcm
ENTRY POINTS
  Offset  Type    Name
       0  NONE    RAINBOW_LUTS                    


STORAGE BLOCKS
    Size  Block
      16  _cmval
    3072  _rainbow
     206  constants




VARIABLES
  Offset    Size  Type        Block           Name
       8       8  REAL8       _cmval          FE       CM_TV_CM                        
       0       8  REAL8       _cmval          FE       CM_TV_REAL                      
     ---       4  INT4        dummy           FE       DISPP                           


ARRAYS
  Offset    Size  Type        Block/Class     Home     Name
    2048    1024  INT4        _rainbow        FE       LB                              
    1024    1024  INT4        _rainbow        FE       LG                              
       0    1024  INT4        _rainbow        FE       LR                              


PARAMETERS (Offset is within Storage Block 'constants')
  Offset  Type    Name                            Value
       8  INT4    CMFB_ALL                        6
       4  INT4    CMFB_BLUE                       3
      36  INT4    CMFB_CUSTOM                     2
      24  INT4    CMFB_GREEN                      2
      32  INT4    CMFB_NIL                        0
      28  INT4    CMFB_NTSC                       1
      16  INT4    CMFB_OVERLAY                    4
      28  INT4    CMFB_RED                        1
      12  INT4    CMFB_RGB                        5
      32  INT4    CMFB_SONY                       0
     112  INT4    CM_16_BIT                       76463
     104  INT4    CM_1_BIT_PACKED                 68143
     100  INT4    CM_2_BIT_PACKED                 70191
     108  INT4    CM_32_BIT                       78639
      96  INT4    CM_4_BIT_PACKED                 72239
     116  INT4    CM_8_BIT                        74287
      28  INT4    CM_BYTE_ARRAY                   1
      28  INT4    CM_COLUMN_MAJOR                 1
      80  INT4    CM_COMPLEX_FLOAT_DOUBLE         82991
      84  INT4    CM_COMPLEX_FLOAT_SINGLE         80815
      28  INT4    CM_DOWNWARD                     1
      32  INT4    CM_EXCLUSIVE                    0
      88  INT4    CM_FLOAT_DOUBLE                 80815
Wed Jun 12 16:56:58 1991Connection Machine Fortran Version: 1.0 Rev: f1010	page: 8
Symbol Storage Map   File: /net/u1/npac/sibert/cmsi/cmf-sun/rainbow.fcm
     120  INT4    CM_FLOAT_DOUBLE_ARRAY           8
      92  INT4    CM_FLOAT_SINGLE                 78639
     124  INT4    CM_FLOAT_SINGLE_ARRAY           4
      64  INT4    CM_FRAMEBUFFER_ORDER            3
      72  INT4    CM_FRONT_END_ORDER              3
      28  INT4    CM_INCLUSIVE                    1
      40  INT4    CM_LEDS_BLINK_SYNC              6
      52  INT4    CM_LEDS_DIAGNOSTICS             3
      32  INT4    CM_LEDS_OFF                     0
      28  INT4    CM_LEDS_ON                      1
      48  INT4    CM_LEDS_PERFMON                 4
      44  INT4    CM_LEDS_SYNC                    5
      56  INT4    CM_LEDS_THROB                   2
     128  INT4    CM_LONG_ARRAY                   4
      28  INT4    CM_LSB_FIRST                    1
     144  INT4    CM_MAXIMUM_EXPONENT_LENGTH      32
     152  INT4    CM_MAXIMUM_INTEGER_LENGTH       128
     140  INT4    CM_MAXIMUM_MESSAGE_LENGTH       128
     148  INT4    CM_MAXIMUM_SIGNIFICAND_LENGTH   96
     136  INT4    CM_MICROCODE_VERSION            6002
      76  INT4    CM_MSB_FIRST                    2
      32  INT4    CM_NEWS_ORDER                   0
       0  INT4    CM_NOLIMIT                      -1
       0  INT4    CM_NOLIMITS                     -1
      32  INT4    CM_NONE                         0
       0  INT4    CM_NO_AXIS                      -1
      32  INT4    CM_NO_FIELD                     0
      32  INT4    CM_ROW_MAJOR                    0
      28  INT4    CM_SEGMENT_BIT                  1
      28  INT4    CM_SEND_ORDER                   1
      68  INT4    CM_SERIAL_ORDER                 2
     132  INT4    CM_SHORT_ARRAY                  2
      60  INT4    CM_START_BIT                    2
      32  INT4    CM_UPWARD                       0


INTRINSIC PROCEDURES
  Name


STATEMENT FUNCTIONS
  Type    Name


EXTERNALS
  Type    Unit_Kind     Name
  INT4    function      CMFB_ATTACH_DISPLAY             
  INT4    function      CMFB_AVAILABLE_DISPLAYS         
  INT4    function      CMFB_BITS_PER_PIXEL             
  INT4    function      CMFB_CREATE_CMFB_GEOMETRY       
  INT4    function      CMFB_CURRENT_BUFFER             
  INT4    function      CMFB_CURSOR_VISIBLE             
  INT4    function      CMFB_CURSOR_X                   
  INT4    function      CMFB_CURSOR_Y                   
Wed Jun 12 16:56:58 1991Connection Machine Fortran Version: 1.0 Rev: f1010	page: 9
Symbol Storage Map   File: /net/u1/npac/sibert/cmsi/cmf-sun/rainbow.fcm
  INT4    function      CMFB_FE_MY_SHUFFLE_ADDRESS      
  INT4    function      CMFB_FE_SHUFFLE_FROM_X_Y        
  INT4    function      CMFB_FE_X_FROM_SHUFFLE          
  INT4    function      CMFB_FE_Y_FROM_SHUFFLE          
  INT4    function      CMFB_HEIGHT                     
  INT4    function      CMFB_INTERN_CMFB_GEOMETRY       
  INT4    function      CMFB_MAKE_DISPLAY_ID            
  INT4    function      CMFB_MONITOR_ID                 
  INT4    function      CMFB_OVERLAY_STATUS             
  INT4    function      CMFB_READ_COLOR                 
  INT4    function      CMFB_READ_OVERLAY_COLOR         
  INT4    function      CMFB_READ_PIXEL                 
  INT4    function      CMFB_SPARE_BUFFER               
  INT4    function      CMFB_VIDEO_STATUS               
  INT4    function      CMFB_WIDTH                      
  NONE    subroutine    CMFB_WRITE_COLOR_TABLE          
  INT4    function      CMFB_X_PAN                      
  INT4    function      CMFB_X_ZOOM                     
  INT4    function      CMFB_Y_PAN                      
  INT4    function      CMFB_Y_ZOOM                     
  INT4    function      CM_ADD_OFFSET_TO_FIELD_ID       
  INT4    function      CM_ALLOCATE_HEAP_FIELD          
  INT4    function      CM_ALLOCATE_HEAP_FIELD_VP_SET   
  INT4    function      CM_ALLOCATE_STACK_FIELD         
  INT4    function      CM_ALLOCATE_STACK_FIELD_VP_SET  
  INT4    function      CM_ALLOCATE_VP_SET              
  INT4    function      CM_ATTACHED                     
  INT4    function      CM_AVAILABLE_MEMORY             
  INT4    function      CM_CARRY_FLAG                   
  INT4    function      CM_CONTEXT_FLAG                 
  INT4    function      CM_CREATE_DETAILED_GEOMETRY     
  INT4    function      CM_CREATE_GEOMETRY              
  INT4    function      CM_CURRENT_VP_SET               
  CMPX8   function      CM_C_READ_FROM_PROCESSOR_1L     
  INT4    function      CM_DECLARE_VP_SET               
  INT4    function      CM_DO_NOT_NOTIFY_TOKEN          
  INT4    function      CM_FE_ARRAY_FORMAT              
  INT4    function      CM_FE_DEPOSIT_NEWS_COORDINATE   
  INT4    function      CM_FE_EXTRACT_MULTI_COORDINATE  
  INT4    function      CM_FE_EXTRACT_NEWS_COORDINATE   
  INT4    function      CM_FE_FROM_GRAY_CODE            
  INT4    function      CM_FE_GRAY_CODE_FROM_INTEGER    
  INT4    function      CM_FE_INTEGER_FROM_GRAY_CODE    
  INT4    function      CM_FE_MAKE_NEWS_COORDINATE      
  INT4    function      CM_FE_MAKE_NEWS_MASK            
  INT4    function      CM_FE_PACKED_ARRAY_FORMAT       
  INT4    function      CM_FE_STRUCTURE_ARRAY_FORMAT    
  INT4    function      CM_FE_TO_GRAY_CODE              
  INT4    function      CM_FIELD_VP_SET                 
  REAL8   function      CM_F_READ_FROM_PROCESSOR_1L     
  INT4    function      CM_GEOMETRY_AXIS_LENGTH         
  INT4    function      CM_GEOMETRY_AXIS_OFF_CHIP_BITS  
Wed Jun 12 16:56:58 1991Connection Machine Fortran Version: 1.0 Rev: f1010	page: 10
Symbol Storage Map   File: /net/u1/npac/sibert/cmsi/cmf-sun/rainbow.fcm
  INT4    function      CM_GEOMETRY_AXIS_OFF_CHIP_POS   
  INT4    function      CM_GEOMETRY_AXIS_ON_CHIP_BITS   
  INT4    function      CM_GEOMETRY_AXIS_ON_CHIP_POS    
  INT4    function      CM_GEOMETRY_AXIS_ORDERING       
  INT4    function      CM_GEOMETRY_AXIS_VP_RATIO       
  INT4    function      CM_GEOMETRY_COORDINATE_LENGTH   
  INT4    function      CM_GEOMETRY_RANK                
  INT4    function      CM_GEOMETRY_SEND_ADDRESS_LENGTH 
  INT4    function      CM_GEOMETRY_SERIAL_NUMBER       
  INT4    function      CM_GEOMETRY_TOTAL_PROCESSORS    
  INT4    function      CM_GEOMETRY_TOTAL_VP_RATIO      
  INT4    function      CM_GLOBAL_COUNT_BIT             
  INT4    function      CM_GLOBAL_COUNT_BIT_ALWAYS      
  INT4    function      CM_GLOBAL_COUNT_CONTEXT         
  INT4    function      CM_GLOBAL_COUNT_OVERFLOW        
  INT4    function      CM_GLOBAL_COUNT_TEST            
  CMPX8   function      CM_GLOBAL_C_ADD_1L              
  REAL8   function      CM_GLOBAL_F_ADD_1L              
  REAL8   function      CM_GLOBAL_F_MAX_1L              
  REAL8   function      CM_GLOBAL_F_MIN_1L              
  INT4    function      CM_GLOBAL_LOGAND_1L             
  INT4    function      CM_GLOBAL_LOGAND_BIT            
  INT4    function      CM_GLOBAL_LOGAND_BIT_ALWAYS     
  INT4    function      CM_GLOBAL_LOGAND_CONTEXT        
  INT4    function      CM_GLOBAL_LOGAND_OVERFLOW       
  INT4    function      CM_GLOBAL_LOGAND_TEST           
  INT4    function      CM_GLOBAL_LOGIOR_1L             
  INT4    function      CM_GLOBAL_LOGIOR_BIT            
  INT4    function      CM_GLOBAL_LOGIOR_BIT_ALWAYS     
  INT4    function      CM_GLOBAL_LOGIOR_CONTEXT        
  INT4    function      CM_GLOBAL_LOGIOR_OVERFLOW       
  INT4    function      CM_GLOBAL_LOGIOR_TEST           
  INT4    function      CM_GLOBAL_LOGXOR_1L             
  INT4    function      CM_GLOBAL_S_ADD_1L              
  INT4    function      CM_GLOBAL_S_MAX_1L              
  INT4    function      CM_GLOBAL_S_MIN_1L              
  INT4    function      CM_GLOBAL_U_ADD_1L              
  INT4    function      CM_GLOBAL_U_MAX_1L              
  INT4    function      CM_GLOBAL_U_MAX_S_INTLEN_1L     
  INT4    function      CM_GLOBAL_U_MAX_U_INTLEN_1L     
  INT4    function      CM_GLOBAL_U_MIN_1L              
  INT4    function      CM_INTERN_DETAILED_GEOMETRY     
  INT4    function      CM_INTERN_GEOMETRY              
  INT4    function      CM_INTERN_IDENTICAL_VP_SET      
  INT4    function      CM_IS_FIELD_AN_ALIAS            
  INT4    function      CM_IS_FIELD_IN_HEAP             
  INT4    function      CM_IS_FIELD_IN_STACK            
  INT4    function      CM_IS_FIELD_VALID               
  INT4    function      CM_IS_STACK_FIELD_NEWER         
  INT4    function      CM_IS_VP_SET_VALID              
  INT4    function      CM_MAKE_FIELD_ALIAS             
  INT4    function      CM_NEXT_STACK_FIELD_ID          
Wed Jun 12 16:56:58 1991Connection Machine Fortran Version: 1.0 Rev: f1010	page: 11
Symbol Storage Map   File: /net/u1/npac/sibert/cmsi/cmf-sun/rainbow.fcm
  INT4    function      CM_NUMBER_OF_TIMERS             
  INT4    function      CM_OVERFLOW_FLAG                
  INT4    function      CM_PHYSICAL_VP_SET              
  INT4    function      CM_PHYS_MEMORY_LEN              
  INT4    function      CM_PHYS_MEMORY_LIMIT            
  INT4    function      CM_PHYS_PROCESSORS_LEN          
  INT4    function      CM_PHYS_PROCESSORS_LIMIT        
  INT4    function      CM_SET_SYSTEM_LEDS_MODE         
  INT4    function      CM_S_READ_FROM_PROCESSOR_1L     
  INT4    function      CM_TEST_FLAG                    
  REAL8   function      CM_TIMER_READ_CM_BUSY           
  REAL8   function      CM_TIMER_READ_CM_IDLE           
  REAL8   function      CM_TIMER_READ_ELAPSED           
  INT4    function      CM_TIMER_READ_RUN_STATE         
  INT4    function      CM_TIMER_READ_STARTS            
  INT4    function      CM_U_READ_FROM_PROCESSOR_1L     
  INT4    function      CM_VP_SET_GEOMETRY              


NAME LISTS
  Name


CONSTRUCT NAMES
  Name



Wed Jun 12 16:56:58 1991Connection Machine Fortran Version: 1.0 Rev: f1010	page: 12
Source Listing File: /net/u1/npac/sibert/cmsi/cmf-sun/rainbow.fcm
  726   195  1 	      subroutine quad_rainbow(dispp)
  727   196  1 		integer dispp		! CMFB display id
  728   197  1 	
  729   198  1 		include '/usr/include/cm/paris-configuration-fort.h'
  730   199  1 	
 1262   200  1 		COMMON /RAINBOW/ qr, qg, qb
 1263   201  1 		integer, array(256) :: qr, qg, qb
 1264   202  1 	CMF$	LAYOUT qr(:serial), qg(:serial), qb(:serial)
 1265   203  1 	
 1266   204  1 		call CMFB_write_color_table(dispp, CMFB_red,   qr)
 1267   205  1 		call CMFB_write_color_table(dispp, CMFB_green, qg)
 1268   206  1 		call CMFB_write_color_table(dispp, CMFB_blue,  qb)
 1269   207  1 	
 1270   208  1 	      end subroutine quad_rainbow
 1271   209  1 	
 1272   210  1 	C-----------------------------------------------------------------------
 1273   211  1 	C----&ssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssss
 1274   212  1 	C00000000111111111122222222223333333333444444444455555555556666666666777
 1275   213  1 	C23456789012345678901234567890123456789012345678901234567890123456789012
 1276   214  1 	C-----------------------------------------------------------------------
 1277   215  1 	Column chart to confirm that DATA statements fit in 72 columns.
Wed Jun 12 16:56:58 1991Connection Machine Fortran Version: 1.0 Rev: f1010	page: 13
Symbol Storage Map   File: /net/u1/npac/sibert/cmsi/cmf-sun/rainbow.fcm
ENTRY POINTS
  Offset  Type    Name
       0  NONE    QUAD_RAINBOW                    


STORAGE BLOCKS
    Size  Block
      16  _cmval
    3072  _rainbow
     206  constants




VARIABLES
  Offset    Size  Type        Block           Name
       8       8  REAL8       _cmval          FE       CM_TV_CM                        
       0       8  REAL8       _cmval          FE       CM_TV_REAL                      
     ---       4  INT4        dummy           FE       DISPP                           


ARRAYS
  Offset    Size  Type        Block/Class     Home     Name
    2048    1024  INT4        _rainbow        FE       QB                              
    1024    1024  INT4        _rainbow        FE       QG                              
       0    1024  INT4        _rainbow        FE       QR                              


PARAMETERS (Offset is within Storage Block 'constants')
  Offset  Type    Name                            Value
       8  INT4    CMFB_ALL                        6
       4  INT4    CMFB_BLUE                       3
      36  INT4    CMFB_CUSTOM                     2
      24  INT4    CMFB_GREEN                      2
      32  INT4    CMFB_NIL                        0
      28  INT4    CMFB_NTSC                       1
      16  INT4    CMFB_OVERLAY                    4
      28  INT4    CMFB_RED                        1
      12  INT4    CMFB_RGB                        5
      32  INT4    CMFB_SONY                       0
     112  INT4    CM_16_BIT                       76463
     104  INT4    CM_1_BIT_PACKED                 68143
     100  INT4    CM_2_BIT_PACKED                 70191
     108  INT4    CM_32_BIT                       78639
      96  INT4    CM_4_BIT_PACKED                 72239
     116  INT4    CM_8_BIT                        74287
      28  INT4    CM_BYTE_ARRAY                   1
      28  INT4    CM_COLUMN_MAJOR                 1
      80  INT4    CM_COMPLEX_FLOAT_DOUBLE         82991
      84  INT4    CM_COMPLEX_FLOAT_SINGLE         80815
      28  INT4    CM_DOWNWARD                     1
      32  INT4    CM_EXCLUSIVE                    0
      88  INT4    CM_FLOAT_DOUBLE                 80815
Wed Jun 12 16:56:58 1991Connection Machine Fortran Version: 1.0 Rev: f1010	page: 14
Symbol Storage Map   File: /net/u1/npac/sibert/cmsi/cmf-sun/rainbow.fcm
     120  INT4    CM_FLOAT_DOUBLE_ARRAY           8
      92  INT4    CM_FLOAT_SINGLE                 78639
     124  INT4    CM_FLOAT_SINGLE_ARRAY           4
      64  INT4    CM_FRAMEBUFFER_ORDER            3
      72  INT4    CM_FRONT_END_ORDER              3
      28  INT4    CM_INCLUSIVE                    1
      40  INT4    CM_LEDS_BLINK_SYNC              6
      52  INT4    CM_LEDS_DIAGNOSTICS             3
      32  INT4    CM_LEDS_OFF                     0
      28  INT4    CM_LEDS_ON                      1
      48  INT4    CM_LEDS_PERFMON                 4
      44  INT4    CM_LEDS_SYNC                    5
      56  INT4    CM_LEDS_THROB                   2
     128  INT4    CM_LONG_ARRAY                   4
      28  INT4    CM_LSB_FIRST                    1
     144  INT4    CM_MAXIMUM_EXPONENT_LENGTH      32
     152  INT4    CM_MAXIMUM_INTEGER_LENGTH       128
     140  INT4    CM_MAXIMUM_MESSAGE_LENGTH       128
     148  INT4    CM_MAXIMUM_SIGNIFICAND_LENGTH   96
     136  INT4    CM_MICROCODE_VERSION            6002
      76  INT4    CM_MSB_FIRST                    2
      32  INT4    CM_NEWS_ORDER                   0
       0  INT4    CM_NOLIMIT                      -1
       0  INT4    CM_NOLIMITS                     -1
      32  INT4    CM_NONE                         0
       0  INT4    CM_NO_AXIS                      -1
      32  INT4    CM_NO_FIELD                     0
      32  INT4    CM_ROW_MAJOR                    0
      28  INT4    CM_SEGMENT_BIT                  1
      28  INT4    CM_SEND_ORDER                   1
      68  INT4    CM_SERIAL_ORDER                 2
     132  INT4    CM_SHORT_ARRAY                  2
      60  INT4    CM_START_BIT                    2
      32  INT4    CM_UPWARD                       0


INTRINSIC PROCEDURES
  Name


STATEMENT FUNCTIONS
  Type    Name


EXTERNALS
  Type    Unit_Kind     Name
  INT4    function      CMFB_ATTACH_DISPLAY             
  INT4    function      CMFB_AVAILABLE_DISPLAYS         
  INT4    function      CMFB_BITS_PER_PIXEL             
  INT4    function      CMFB_CREATE_CMFB_GEOMETRY       
  INT4    function      CMFB_CURRENT_BUFFER             
  INT4    function      CMFB_CURSOR_VISIBLE             
  INT4    function      CMFB_CURSOR_X                   
  INT4    function      CMFB_CURSOR_Y                   
Wed Jun 12 16:56:58 1991Connection Machine Fortran Version: 1.0 Rev: f1010	page: 15
Symbol Storage Map   File: /net/u1/npac/sibert/cmsi/cmf-sun/rainbow.fcm
  INT4    function      CMFB_FE_MY_SHUFFLE_ADDRESS      
  INT4    function      CMFB_FE_SHUFFLE_FROM_X_Y        
  INT4    function      CMFB_FE_X_FROM_SHUFFLE          
  INT4    function      CMFB_FE_Y_FROM_SHUFFLE          
  INT4    function      CMFB_HEIGHT                     
  INT4    function      CMFB_INTERN_CMFB_GEOMETRY       
  INT4    function      CMFB_MAKE_DISPLAY_ID            
  INT4    function      CMFB_MONITOR_ID                 
  INT4    function      CMFB_OVERLAY_STATUS             
  INT4    function      CMFB_READ_COLOR                 
  INT4    function      CMFB_READ_OVERLAY_COLOR         
  INT4    function      CMFB_READ_PIXEL                 
  INT4    function      CMFB_SPARE_BUFFER               
  INT4    function      CMFB_VIDEO_STATUS               
  INT4    function      CMFB_WIDTH                      
  NONE    subroutine    CMFB_WRITE_COLOR_TABLE          
  INT4    function      CMFB_X_PAN                      
  INT4    function      CMFB_X_ZOOM                     
  INT4    function      CMFB_Y_PAN                      
  INT4    function      CMFB_Y_ZOOM                     
  INT4    function      CM_ADD_OFFSET_TO_FIELD_ID       
  INT4    function      CM_ALLOCATE_HEAP_FIELD          
  INT4    function      CM_ALLOCATE_HEAP_FIELD_VP_SET   
  INT4    function      CM_ALLOCATE_STACK_FIELD         
  INT4    function      CM_ALLOCATE_STACK_FIELD_VP_SET  
  INT4    function      CM_ALLOCATE_VP_SET              
  INT4    function      CM_ATTACHED                     
  INT4    function      CM_AVAILABLE_MEMORY             
  INT4    function      CM_CARRY_FLAG                   
  INT4    function      CM_CONTEXT_FLAG                 
  INT4    function      CM_CREATE_DETAILED_GEOMETRY     
  INT4    function      CM_CREATE_GEOMETRY              
  INT4    function      CM_CURRENT_VP_SET               
  CMPX8   function      CM_C_READ_FROM_PROCESSOR_1L     
  INT4    function      CM_DECLARE_VP_SET               
  INT4    function      CM_DO_NOT_NOTIFY_TOKEN          
  INT4    function      CM_FE_ARRAY_FORMAT              
  INT4    function      CM_FE_DEPOSIT_NEWS_COORDINATE   
  INT4    function      CM_FE_EXTRACT_MULTI_COORDINATE  
  INT4    function      CM_FE_EXTRACT_NEWS_COORDINATE   
  INT4    function      CM_FE_FROM_GRAY_CODE            
  INT4    function      CM_FE_GRAY_CODE_FROM_INTEGER    
  INT4    function      CM_FE_INTEGER_FROM_GRAY_CODE    
  INT4    function      CM_FE_MAKE_NEWS_COORDINATE      
  INT4    function      CM_FE_MAKE_NEWS_MASK            
  INT4    function      CM_FE_PACKED_ARRAY_FORMAT       
  INT4    function      CM_FE_STRUCTURE_ARRAY_FORMAT    
  INT4    function      CM_FE_TO_GRAY_CODE              
  INT4    function      CM_FIELD_VP_SET                 
  REAL8   function      CM_F_READ_FROM_PROCESSOR_1L     
  INT4    function      CM_GEOMETRY_AXIS_LENGTH         
  INT4    function      CM_GEOMETRY_AXIS_OFF_CHIP_BITS  
Wed Jun 12 16:56:58 1991Connection Machine Fortran Version: 1.0 Rev: f1010	page: 16
Symbol Storage Map   File: /net/u1/npac/sibert/cmsi/cmf-sun/rainbow.fcm
  INT4    function      CM_GEOMETRY_AXIS_OFF_CHIP_POS   
  INT4    function      CM_GEOMETRY_AXIS_ON_CHIP_BITS   
  INT4    function      CM_GEOMETRY_AXIS_ON_CHIP_POS    
  INT4    function      CM_GEOMETRY_AXIS_ORDERING       
  INT4    function      CM_GEOMETRY_AXIS_VP_RATIO       
  INT4    function      CM_GEOMETRY_COORDINATE_LENGTH   
  INT4    function      CM_GEOMETRY_RANK                
  INT4    function      CM_GEOMETRY_SEND_ADDRESS_LENGTH 
  INT4    function      CM_GEOMETRY_SERIAL_NUMBER       
  INT4    function      CM_GEOMETRY_TOTAL_PROCESSORS    
  INT4    function      CM_GEOMETRY_TOTAL_VP_RATIO      
  INT4    function      CM_GLOBAL_COUNT_BIT             
  INT4    function      CM_GLOBAL_COUNT_BIT_ALWAYS      
  INT4    function      CM_GLOBAL_COUNT_CONTEXT         
  INT4    function      CM_GLOBAL_COUNT_OVERFLOW        
  INT4    function      CM_GLOBAL_COUNT_TEST            
  CMPX8   function      CM_GLOBAL_C_ADD_1L              
  REAL8   function      CM_GLOBAL_F_ADD_1L              
  REAL8   function      CM_GLOBAL_F_MAX_1L              
  REAL8   function      CM_GLOBAL_F_MIN_1L              
  INT4    function      CM_GLOBAL_LOGAND_1L             
  INT4    function      CM_GLOBAL_LOGAND_BIT            
  INT4    function      CM_GLOBAL_LOGAND_BIT_ALWAYS     
  INT4    function      CM_GLOBAL_LOGAND_CONTEXT        
  INT4    function      CM_GLOBAL_LOGAND_OVERFLOW       
  INT4    function      CM_GLOBAL_LOGAND_TEST           
  INT4    function      CM_GLOBAL_LOGIOR_1L             
  INT4    function      CM_GLOBAL_LOGIOR_BIT            
  INT4    function      CM_GLOBAL_LOGIOR_BIT_ALWAYS     
  INT4    function      CM_GLOBAL_LOGIOR_CONTEXT        
  INT4    function      CM_GLOBAL_LOGIOR_OVERFLOW       
  INT4    function      CM_GLOBAL_LOGIOR_TEST           
  INT4    function      CM_GLOBAL_LOGXOR_1L             
  INT4    function      CM_GLOBAL_S_ADD_1L              
  INT4    function      CM_GLOBAL_S_MAX_1L              
  INT4    function      CM_GLOBAL_S_MIN_1L              
  INT4    function      CM_GLOBAL_U_ADD_1L              
  INT4    function      CM_GLOBAL_U_MAX_1L              
  INT4    function      CM_GLOBAL_U_MAX_S_INTLEN_1L     
  INT4    function      CM_GLOBAL_U_MAX_U_INTLEN_1L     
  INT4    function      CM_GLOBAL_U_MIN_1L              
  INT4    function      CM_INTERN_DETAILED_GEOMETRY     
  INT4    function      CM_INTERN_GEOMETRY              
  INT4    function      CM_INTERN_IDENTICAL_VP_SET      
  INT4    function      CM_IS_FIELD_AN_ALIAS            
  INT4    function      CM_IS_FIELD_IN_HEAP             
  INT4    function      CM_IS_FIELD_IN_STACK            
  INT4    function      CM_IS_FIELD_VALID               
  INT4    function      CM_IS_STACK_FIELD_NEWER         
  INT4    function      CM_IS_VP_SET_VALID              
  INT4    function      CM_MAKE_FIELD_ALIAS             
  INT4    function      CM_NEXT_STACK_FIELD_ID          
Wed Jun 12 16:56:58 1991Connection Machine Fortran Version: 1.0 Rev: f1010	page: 17
Symbol Storage Map   File: /net/u1/npac/sibert/cmsi/cmf-sun/rainbow.fcm
  INT4    function      CM_NUMBER_OF_TIMERS             
  INT4    function      CM_OVERFLOW_FLAG                
  INT4    function      CM_PHYSICAL_VP_SET              
  INT4    function      CM_PHYS_MEMORY_LEN              
  INT4    function      CM_PHYS_MEMORY_LIMIT            
  INT4    function      CM_PHYS_PROCESSORS_LEN          
  INT4    function      CM_PHYS_PROCESSORS_LIMIT        
  INT4    function      CM_SET_SYSTEM_LEDS_MODE         
  INT4    function      CM_S_READ_FROM_PROCESSOR_1L     
  INT4    function      CM_TEST_FLAG                    
  REAL8   function      CM_TIMER_READ_CM_BUSY           
  REAL8   function      CM_TIMER_READ_CM_IDLE           
  REAL8   function      CM_TIMER_READ_ELAPSED           
  INT4    function      CM_TIMER_READ_RUN_STATE         
  INT4    function      CM_TIMER_READ_STARTS            
  INT4    function      CM_U_READ_FROM_PROCESSOR_1L     
  INT4    function      CM_VP_SET_GEOMETRY              


NAME LISTS
  Name


CONSTRUCT NAMES
  Name



Wed Jun 12 16:56:58 1991Connection Machine Fortran Version: 1.0 Rev: f1010	page: 18
Source Listing File: /net/u1/npac/sibert/cmsi/cmf-sun/rainbow.fcm
Wed Jun 12 16:56:58 1991Connection Machine Fortran Version: 1.0 Rev: f1010	page: 19
Utility Stats
Input File:	/net/u1/npac/sibert/cmsi/cmf-sun/rainbow.fcm
Base File:	rainbow
COMMAND QUALIFIERS

	rainbow.fcm -noslicewise -cmdebug -directive -machine_code -noobject -list 

	analysis_data
	check = (no bounds,overflow,no underflow )
	continuations = 19
	debug
	directives
	f77
	i4
	ifconvert
	level_of_vectorization = 100
	list
	machine_code
	optimize = (local,no global,no code_motion )
	overlap
	show = (no dictionary,no include,no map,no preprocessor,no single )
	standard = (no syntax,no source,no semantic )
	warnings = (no declarations,general,no ultrix,no vaxeln )
	cmdebug
	peephole
	new_modifies
	const
	transp
	cp_last
	bb_merge
	meoptimize
	mecopypropagate
	memergetemps
	merge
	amode
	pescheduler
	peschalias
	pemultadd
