Tue Jun 11 11:21:46 1991Connection Machine Fortran Version: 1.0 Rev: f1010	page: 1
Source Listing File: /net/u1/npac/sibert/cmsi/cmf-sun/cmf_display.fcm
    1     1  1 	C
    2     2  1 	C Ken Jones, Thinking Machines Corporation 
    3     3  1 	C Preliminary, Not supported
    4     4  1 	C
    5     5  1 	C $Header$
    6     6  1 	C******************* CHANGE LOG *******************
    7     7  1 	C
    8     8  1 	C**************** END OF CHANGE LOG ***************
    9     9  1 	C
   10    10  1 	
   11    11  1 	C------------------------------------------------------------------------------
   12    12  1 	      SUBROUTINE FCMSR_write_to_display(image_buffer)
   13    13  1 	
   14    14  1 	        IMPLICIT NONE
   15    15  1 	
   16    16  1 	        INCLUDE '/usr/include/cm/paris-configuration-fort.h'
  548    17  1 	        INCLUDE '/usr/include/cm/CMF_defs.h'
  651    18  1 		INCLUDE '/usr/include/cm/display-fort.h'
  652    19  1 	
  702    20  1 	        INTEGER image_buffer
  703    21  1 	
  704    22  1 	        INTEGER saved_geometry, new_geometry
  705    23  1 	        INTEGER vp_set_axis_length(2)
  706    24  1 	
  707    25  1 	        vp_set_axis_length(1) = CM_geometry_axis_length(
  708    26  1 	     & CM_vp_set_geometry(CMF_get_vp_set_id(image_buffer)),1)
  709    27  1 	        vp_set_axis_length(2) = CM_geometry_axis_length(
  710    28  1 	     & CM_vp_set_geometry(CMF_get_vp_set_id(image_buffer)),2)
  711    29  1 	
  712    30  1 	        saved_geometry = CM_vp_set_geometry(CMF_get_vp_set_id(
  713    31  1 	     &                                                  image_buffer))
  714    32  1 	        new_geometry = CM_intern_geometry(vp_set_axis_length, 2)
  715    33  1 	        CALL CM_set_vp_set_geometry(CMF_get_vp_set_id(image_buffer),
  716    34  1 	     &	 						 new_geometry)
  717    35  1 	
  718    36  1 	        CALL CMSR_write_to_display_1(CMF_get_field_id(image_buffer),
  719    37  1 	     & 			           0, 0,
  720    38  1 	     &			           CMF_get_axis_extent(image_buffer, 0),
  721    39  1 	     &                             CMF_get_axis_extent(image_buffer, 1))
  722    40  1 	
  723    41  1 	        CALL CM_set_vp_set_geometry(CMF_get_vp_set_id(image_buffer),
  724    42  1 	     &                                                 saved_geometry)
  725    43  1 	
  726    44  1 	      END SUBROUTINE FCMSR_write_to_display
  727    45  1 	C------------------------------------------------------------------------------
Tue Jun 11 11:21:46 1991Connection Machine Fortran Version: 1.0 Rev: f1010	page: 2
Symbol Storage Map   File: /net/u1/npac/sibert/cmsi/cmf-sun/cmf_display.fcm
ENTRY POINTS
  Offset  Type    Name
       0  NONE    FCMSR_WRITE_TO_DISPLAY          


STORAGE BLOCKS
    Size  Block
      16  local
      16  _cmval
     394  constants




VARIABLES
  Offset    Size  Type        Block           Name
     ---       4  INT4        not-referenced  FE       CMF_ALLOCATE_TABLE              
     ---       4  INT4        not-referenced  FE       CMF_AVAILABLE_MEMORY            
     ---       4  INT4        not-referenced  FE       CMF_GET_AXES_EXTENTS_PTR        
     ---       4  INT4        not-referenced  FE       CMF_GET_AXES_MAPS_PTR           
     ---       4  INT4        not-referenced  FE       CMF_GET_AXIS_MAP                
     ---       4  INT4        not-referenced  FE       CMF_GET_DATA_TYPE               
     ---       4  INT4        not-referenced  FE       CMF_GET_DEBUG_INFO_PTR          
     ---       4  INT4        not-referenced  FE       CMF_GET_DESCRIPTOR_KIND         
     ---       4  INT4        not-referenced  FE       CMF_GET_EXPONENT_LEN            
     ---       4  INT4        not-referenced  FE       CMF_GET_FE_ADDRESS              
     ---       4  INT4        not-referenced  FE       CMF_GET_GEOMETRY_AXIS_OFFSET    
     ---       4  INT4        not-referenced  FE       CMF_GET_GEOMETRY_ID             
     ---       4  INT4        not-referenced  FE       CMF_GET_GEOMETRY_OFFSETS_PTR    
     ---       4  INT4        not-referenced  FE       CMF_GET_GEOMETRY_RANK           
     ---       4  INT4        not-referenced  FE       CMF_GET_HOME                    
     ---       4  INT4        not-referenced  FE       CMF_GET_INTEGER_LEN             
     ---       4  INT4        not-referenced  FE       CMF_GET_IS_MODIFIED             
     ---       4  INT4        not-referenced  FE       CMF_GET_OBJECT_KIND             
     ---       4  INT4        not-referenced  FE       CMF_GET_RANK                    
     ---       4  INT4        not-referenced  FE       CMF_GET_SIGNIFICAND_LEN         
     ---       4  INT4        not-referenced  FE       CMF_IS_CM_SPACE_ALLOCATED       
     ---       4  INT4        not-referenced  FE       CMF_IS_FE_SPACE_ALLOCATED       
     ---       4  INT4        not-referenced  FE       CMF_IS_SLICEWISE                
     ---       4  INT4        not-referenced  FE       CMF_SIZEOF_ARRAY_ELEMENT        
     ---       4  INT4        not-referenced  FE       CMSR_CMFB_DISPLAY_BUFFER_ID     
     ---       4  INT4        not-referenced  FE       CMSR_CMFB_DISPLAY_DISPLAY_ID    
     ---       4  INT4        not-referenced  FE       CMSR_CREATE_CMFB_DISPLAY        
     ---       4  INT4        not-referenced  FE       CMSR_CREATE_DISPLAY_MENU        
     ---       4  INT4        not-referenced  FE       CMSR_CREATE_INIT_CMFB_DISPLAY   
     ---       4  INT4        not-referenced  FE       CMSR_CREATE_INIT_X_DISPLAY      
     ---       4  INT4        not-referenced  FE       CMSR_CREATE_X_DISPLAY           
     ---       4  INT4        not-referenced  FE       CMSR_DISPLAY_BITS_PER_PIXEL     
     ---       4  LOG4        not-referenced  FE       CMSR_DISPLAY_COLOR_IS_RGB       
     ---       4  INT4        not-referenced  FE       CMSR_DISPLAY_COLOR_MAP_SIZE     
     ---       4  LOG4        not-referenced  FE       CMSR_DISPLAY_HAS_COLOR_MAP      
     ---       4  INT4        not-referenced  FE       CMSR_DISPLAY_HEIGHT             
     ---       8  REAL8       not-referenced  FE       CMSR_DISPLAY_READ_COLOR_BLUE    
Tue Jun 11 11:21:46 1991Connection Machine Fortran Version: 1.0 Rev: f1010	page: 3
Symbol Storage Map   File: /net/u1/npac/sibert/cmsi/cmf-sun/cmf_display.fcm
     ---       8  REAL8       not-referenced  FE       CMSR_DISPLAY_READ_COLOR_GREEN   
     ---       8  REAL8       not-referenced  FE       CMSR_DISPLAY_READ_COLOR_RED     
     ---       4  INT4        not-referenced  FE       CMSR_DISPLAY_TYPE               
     ---       4  INT4        not-referenced  FE       CMSR_DISPLAY_WIDTH              
     ---       4  INT4        not-referenced  FE       CMSR_DISPLAY_X_OFFSET           
     ---       4  INT4        not-referenced  FE       CMSR_DISPLAY_Y_OFFSET           
     ---       4  INT4        not-referenced  FE       CMSR_SELECTED_DISPLAY           
     ---       4  INT4        not-referenced  FE       CMSR_X_DISPLAY_DISPLAY          
     ---       4  INT4        not-referenced  FE       CMSR_X_DISPLAY_DRAWABLE         
     ---       4  INT4        not-referenced  FE       CMSR_X_DISPLAY_GC               
       8       8  REAL8       _cmval          FE       CM_TV_CM                        
       0       8  REAL8       _cmval          FE       CM_TV_REAL                      
     ---       4  INT4        dummy           FE       IMAGE_BUFFER                    
       0       4  INT4        local           FE       NEW_GEOMETRY                    
       8       4  INT4        local           FE       SAVED_GEOMETRY                  


ARRAYS
  Offset    Size  Type        Block/Class     Home     Name
       0       8  INT4        local           FE       VP_SET_AXIS_LENGTH              


PARAMETERS (Offset is within Storage Block 'constants')
  Offset  Type    Name                            Value
     162  INT4    ARRAY_ARG                       257
     158  INT4    ARRAY_GLOBAL                    513
     154  INT4    ARRAY_LOCAL                     1025
     204  INT4    CMFB_ALL                        6
     216  INT4    CMFB_BLUE                       3
     224  INT4    CMFB_CUSTOM                     2
     220  INT4    CMFB_GREEN                      2
       4  INT4    CMFB_NIL                        0
       0  INT4    CMFB_NTSC                       1
     212  INT4    CMFB_OVERLAY                    4
       0  INT4    CMFB_RED                        1
     208  INT4    CMFB_RGB                        5
       4  INT4    CMFB_SONY                       0
     126  INT4    CMF_CHARACTER                   8
     138  INT4    CMF_COMPLEX                     5
     134  INT4    CMF_DOUBLE                      6
     130  INT4    CMF_DOUBLE_COMPLEX              7
      82  INT4    CMF_DOWNWARD                    1001
      78  INT4    CMF_EXCLUSIVE                   2000
     142  INT4    CMF_FLOAT                       4
      74  INT4    CMF_INCLUSIVE                   2001
       0  INT4    CMF_LOGICAL                     1
      70  INT4    CMF_NONE                        3000
       4  INT4    CMF_NULL                        0
      66  INT4    CMF_SEGMENT_BIT                 3001
      90  INT4    CMF_SIZEOF_DESCRIPTOR           18
      62  INT4    CMF_START_BIT                   3002
     146  INT4    CMF_S_INTEGER                   3
Tue Jun 11 11:21:46 1991Connection Machine Fortran Version: 1.0 Rev: f1010	page: 4
Symbol Storage Map   File: /net/u1/npac/sibert/cmsi/cmf-sun/cmf_display.fcm
      86  INT4    CMF_UPWARD                      1000
     150  INT4    CMF_U_INTEGER                   2
       0  INT4    CMSR_CMFB_DISPLAY               1
      28  INT4    CMSR_X_DISPLAY                  2
     106  INT4    CMSSL_CHARACTER                 6
     110  INT4    CMSSL_COMPLEX                   5
     114  INT4    CMSSL_FLOAT                     4
       0  INT4    CMSSL_LOGICAL                   1
     118  INT4    CMSSL_S_INTEGER                 3
     122  INT4    CMSSL_U_INTEGER                 2
     300  INT4    CM_16_BIT                       76463
     292  INT4    CM_1_BIT_PACKED                 68143
     288  INT4    CM_2_BIT_PACKED                 70191
     296  INT4    CM_32_BIT                       78639
     284  INT4    CM_4_BIT_PACKED                 72239
     304  INT4    CM_8_BIT                        74287
       0  INT4    CM_BYTE_ARRAY                   1
       0  INT4    CM_COLUMN_MAJOR                 1
     268  INT4    CM_COMPLEX_FLOAT_DOUBLE         82991
     272  INT4    CM_COMPLEX_FLOAT_SINGLE         80815
       0  INT4    CM_DOWNWARD                     1
       4  INT4    CM_EXCLUSIVE                    0
     276  INT4    CM_FLOAT_DOUBLE                 80815
     308  INT4    CM_FLOAT_DOUBLE_ARRAY           8
     280  INT4    CM_FLOAT_SINGLE                 78639
     312  INT4    CM_FLOAT_SINGLE_ARRAY           4
     252  INT4    CM_FRAMEBUFFER_ORDER            3
     260  INT4    CM_FRONT_END_ORDER              3
       0  INT4    CM_INCLUSIVE                    1
     228  INT4    CM_LEDS_BLINK_SYNC              6
     240  INT4    CM_LEDS_DIAGNOSTICS             3
       4  INT4    CM_LEDS_OFF                     0
       0  INT4    CM_LEDS_ON                      1
     236  INT4    CM_LEDS_PERFMON                 4
     232  INT4    CM_LEDS_SYNC                    5
     244  INT4    CM_LEDS_THROB                   2
     316  INT4    CM_LONG_ARRAY                   4
       0  INT4    CM_LSB_FIRST                    1
     332  INT4    CM_MAXIMUM_EXPONENT_LENGTH      32
     340  INT4    CM_MAXIMUM_INTEGER_LENGTH       128
     328  INT4    CM_MAXIMUM_MESSAGE_LENGTH       128
     336  INT4    CM_MAXIMUM_SIGNIFICAND_LENGTH   96
     324  INT4    CM_MICROCODE_VERSION            6002
     264  INT4    CM_MSB_FIRST                    2
       4  INT4    CM_NEWS_ORDER                   0
       8  INT4    CM_NOLIMIT                      -1
       8  INT4    CM_NOLIMITS                     -1
       4  INT4    CM_NONE                         0
       8  INT4    CM_NO_AXIS                      -1
       4  INT4    CM_NO_FIELD                     0
       4  INT4    CM_ROW_MAJOR                    0
       0  INT4    CM_SEGMENT_BIT                  1
Tue Jun 11 11:21:46 1991Connection Machine Fortran Version: 1.0 Rev: f1010	page: 5
Symbol Storage Map   File: /net/u1/npac/sibert/cmsi/cmf-sun/cmf_display.fcm
       0  INT4    CM_SEND_ORDER                   1
     256  INT4    CM_SERIAL_ORDER                 2
     320  INT4    CM_SHORT_ARRAY                  2
     248  INT4    CM_START_BIT                    2
       4  INT4    CM_UPWARD                       0
     166  INT4    DEBUG_DESC                      8
     170  INT4    ERROR_DESC                      4
       0  INT4    HOME_CM                         1
      98  INT4    HOME_CM_ONLY                    3
     102  INT4    HOME_FE                         2
      94  INT4    HOME_FE_ONLY                    4
       0  INT4    MODIF                           1
       4  INT4    NOT_MODIF                       0
       0  INT4    OBJECT_DESC                     1
     174  INT4    VIEW_DESC                       2


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                   
  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                      
  INT4    function      CMFB_X_PAN                      
  INT4    function      CMFB_X_ZOOM                     
  INT4    function      CMFB_Y_PAN                      
  INT4    function      CMFB_Y_ZOOM                     
Tue Jun 11 11:21:46 1991Connection Machine Fortran Version: 1.0 Rev: f1010	page: 6
Symbol Storage Map   File: /net/u1/npac/sibert/cmsi/cmf-sun/cmf_display.fcm
  INT4    function      CMF_GET_AXIS_EXTENT             
  INT4    function      CMF_GET_FIELD_ID                
  INT4    function      CMF_GET_VP_SET_ID               
  NONE    subroutine    CMSR_WRITE_TO_DISPLAY_1         
  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  
  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            
Tue Jun 11 11:21:46 1991Connection Machine Fortran Version: 1.0 Rev: f1010	page: 7
Symbol Storage Map   File: /net/u1/npac/sibert/cmsi/cmf-sun/cmf_display.fcm
  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          
  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         
  NONE    subroutine    CM_SET_VP_SET_GEOMETRY          
  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            
Tue Jun 11 11:21:46 1991Connection Machine Fortran Version: 1.0 Rev: f1010	page: 8
Symbol Storage Map   File: /net/u1/npac/sibert/cmsi/cmf-sun/cmf_display.fcm
  INT4    function      CM_U_READ_FROM_PROCESSOR_1L     
  INT4    function      CM_VP_SET_GEOMETRY              


NAME LISTS
  Name


CONSTRUCT NAMES
  Name



Tue Jun 11 11:21:46 1991Connection Machine Fortran Version: 1.0 Rev: f1010	page: 9
Source Listing File: /net/u1/npac/sibert/cmsi/cmf-sun/cmf_display.fcm
  728    46  1 	      SUBROUTINE FCMSR_write_to_display_1(image_buffer,
  729    47  1 	     &		 			     buffer_x_offset, 
  730    48  1 	     &					     buffer_y_offset,
  731    49  1 	     &					     buffer_width, 
  732    50  1 	     &					     buffer_height)
  733    51  1 	
  734    52  1 	        IMPLICIT NONE
  735    53  1 	
  736    54  1 	        INCLUDE '/usr/include/cm/paris-configuration-fort.h'
 1268    55  1 	        INCLUDE '/usr/include/cm/CMF_defs.h'
 1371    56  1 		INCLUDE '/usr/include/cm/display-fort.h'
 1372    57  1 	
 1422    58  1 	        INTEGER  image_buffer
 1423    59  1 		INTEGER  buffer_x_offset, buffer_y_offset
 1424    60  1 		INTEGER  buffer_width, buffer_height
 1425    61  1 		INTEGER  display_x_offset, display_y_offset
 1426    62  1 	
 1427    63  1 	        INTEGER  saved_geometry, new_geometry
 1428    64  1 	        INTEGER  vp_set_axis_length(2)
 1429    65  1 	
 1430    66  1 	        vp_set_axis_length(1) = CM_geometry_axis_length(
 1431    67  1 	     & CM_vp_set_geometry(CMF_get_vp_set_id(image_buffer)),1)
 1432    68  1 	        vp_set_axis_length(2) = CM_geometry_axis_length(
 1433    69  1 	     & CM_vp_set_geometry(CMF_get_vp_set_id(image_buffer)),2)
 1434    70  1 	
 1435    71  1 	        saved_geometry = CM_vp_set_geometry(CMF_get_vp_set_id(
 1436    72  1 	     &                                                  image_buffer))
 1437    73  1 	        new_geometry = CM_intern_geometry(vp_set_axis_length, 2)
 1438    74  1 	        CALL CM_set_vp_set_geometry(CMF_get_vp_set_id(image_buffer),
 1439    75  1 	     &	 						 new_geometry)
 1440    76  1 	
 1441    77  1 	        CALL CMSR_write_to_display_1(CMF_get_field_id(image_buffer),
 1442    78  1 	     &	     			     buffer_x_offset, buffer_y_offset,
 1443    79  1 	     &				     buffer_width, buffer_height)
 1444    80  1 	
 1445    81  1 	        CALL CM_set_vp_set_geometry(CMF_get_vp_set_id(image_buffer),
 1446    82  1 	     &                                                 saved_geometry)
 1447    83  1 	
 1448    84  1 	      END SUBROUTINE FCMSR_write_to_display_1
 1449    85  1 	C------------------------------------------------------------------------------
 1450    86  1 	C This is currently broken due to a bug in CMSR_read_from_display_1
 1451    87  1 	C JBS 2/7/90
Tue Jun 11 11:21:46 1991Connection Machine Fortran Version: 1.0 Rev: f1010	page: 10
Symbol Storage Map   File: /net/u1/npac/sibert/cmsi/cmf-sun/cmf_display.fcm
ENTRY POINTS
  Offset  Type    Name
       0  NONE    FCMSR_WRITE_TO_DISPLAY_1        


STORAGE BLOCKS
    Size  Block
      16  local
      16  _cmval
     394  constants




VARIABLES
  Offset    Size  Type        Block           Name
     ---       4  INT4        dummy           FE       BUFFER_HEIGHT                   
     ---       4  INT4        dummy           FE       BUFFER_WIDTH                    
     ---       4  INT4        dummy           FE       BUFFER_X_OFFSET                 
     ---       4  INT4        dummy           FE       BUFFER_Y_OFFSET                 
     ---       4  INT4        not-referenced  FE       CMF_ALLOCATE_TABLE              
     ---       4  INT4        not-referenced  FE       CMF_AVAILABLE_MEMORY            
     ---       4  INT4        not-referenced  FE       CMF_GET_AXES_EXTENTS_PTR        
     ---       4  INT4        not-referenced  FE       CMF_GET_AXES_MAPS_PTR           
     ---       4  INT4        not-referenced  FE       CMF_GET_AXIS_EXTENT             
     ---       4  INT4        not-referenced  FE       CMF_GET_AXIS_MAP                
     ---       4  INT4        not-referenced  FE       CMF_GET_DATA_TYPE               
     ---       4  INT4        not-referenced  FE       CMF_GET_DEBUG_INFO_PTR          
     ---       4  INT4        not-referenced  FE       CMF_GET_DESCRIPTOR_KIND         
     ---       4  INT4        not-referenced  FE       CMF_GET_EXPONENT_LEN            
     ---       4  INT4        not-referenced  FE       CMF_GET_FE_ADDRESS              
     ---       4  INT4        not-referenced  FE       CMF_GET_GEOMETRY_AXIS_OFFSET    
     ---       4  INT4        not-referenced  FE       CMF_GET_GEOMETRY_ID             
     ---       4  INT4        not-referenced  FE       CMF_GET_GEOMETRY_OFFSETS_PTR    
     ---       4  INT4        not-referenced  FE       CMF_GET_GEOMETRY_RANK           
     ---       4  INT4        not-referenced  FE       CMF_GET_HOME                    
     ---       4  INT4        not-referenced  FE       CMF_GET_INTEGER_LEN             
     ---       4  INT4        not-referenced  FE       CMF_GET_IS_MODIFIED             
     ---       4  INT4        not-referenced  FE       CMF_GET_OBJECT_KIND             
     ---       4  INT4        not-referenced  FE       CMF_GET_RANK                    
     ---       4  INT4        not-referenced  FE       CMF_GET_SIGNIFICAND_LEN         
     ---       4  INT4        not-referenced  FE       CMF_IS_CM_SPACE_ALLOCATED       
     ---       4  INT4        not-referenced  FE       CMF_IS_FE_SPACE_ALLOCATED       
     ---       4  INT4        not-referenced  FE       CMF_IS_SLICEWISE                
     ---       4  INT4        not-referenced  FE       CMF_SIZEOF_ARRAY_ELEMENT        
     ---       4  INT4        not-referenced  FE       CMSR_CMFB_DISPLAY_BUFFER_ID     
     ---       4  INT4        not-referenced  FE       CMSR_CMFB_DISPLAY_DISPLAY_ID    
     ---       4  INT4        not-referenced  FE       CMSR_CREATE_CMFB_DISPLAY        
     ---       4  INT4        not-referenced  FE       CMSR_CREATE_DISPLAY_MENU        
     ---       4  INT4        not-referenced  FE       CMSR_CREATE_INIT_CMFB_DISPLAY   
     ---       4  INT4        not-referenced  FE       CMSR_CREATE_INIT_X_DISPLAY      
     ---       4  INT4        not-referenced  FE       CMSR_CREATE_X_DISPLAY           
     ---       4  INT4        not-referenced  FE       CMSR_DISPLAY_BITS_PER_PIXEL     
Tue Jun 11 11:21:46 1991Connection Machine Fortran Version: 1.0 Rev: f1010	page: 11
Symbol Storage Map   File: /net/u1/npac/sibert/cmsi/cmf-sun/cmf_display.fcm
     ---       4  LOG4        not-referenced  FE       CMSR_DISPLAY_COLOR_IS_RGB       
     ---       4  INT4        not-referenced  FE       CMSR_DISPLAY_COLOR_MAP_SIZE     
     ---       4  LOG4        not-referenced  FE       CMSR_DISPLAY_HAS_COLOR_MAP      
     ---       4  INT4        not-referenced  FE       CMSR_DISPLAY_HEIGHT             
     ---       8  REAL8       not-referenced  FE       CMSR_DISPLAY_READ_COLOR_BLUE    
     ---       8  REAL8       not-referenced  FE       CMSR_DISPLAY_READ_COLOR_GREEN   
     ---       8  REAL8       not-referenced  FE       CMSR_DISPLAY_READ_COLOR_RED     
     ---       4  INT4        not-referenced  FE       CMSR_DISPLAY_TYPE               
     ---       4  INT4        not-referenced  FE       CMSR_DISPLAY_WIDTH              
     ---       4  INT4        not-referenced  FE       CMSR_DISPLAY_X_OFFSET           
     ---       4  INT4        not-referenced  FE       CMSR_DISPLAY_Y_OFFSET           
     ---       4  INT4        not-referenced  FE       CMSR_SELECTED_DISPLAY           
     ---       4  INT4        not-referenced  FE       CMSR_X_DISPLAY_DISPLAY          
     ---       4  INT4        not-referenced  FE       CMSR_X_DISPLAY_DRAWABLE         
     ---       4  INT4        not-referenced  FE       CMSR_X_DISPLAY_GC               
       8       8  REAL8       _cmval          FE       CM_TV_CM                        
       0       8  REAL8       _cmval          FE       CM_TV_REAL                      
     ---       4  INT4        not-referenced  FE       DISPLAY_X_OFFSET                
     ---       4  INT4        not-referenced  FE       DISPLAY_Y_OFFSET                
     ---       4  INT4        dummy           FE       IMAGE_BUFFER                    
       0       4  INT4        local           FE       NEW_GEOMETRY                    
       8       4  INT4        local           FE       SAVED_GEOMETRY                  


ARRAYS
  Offset    Size  Type        Block/Class     Home     Name
       0       8  INT4        local           FE       VP_SET_AXIS_LENGTH              


PARAMETERS (Offset is within Storage Block 'constants')
  Offset  Type    Name                            Value
     162  INT4    ARRAY_ARG                       257
     158  INT4    ARRAY_GLOBAL                    513
     154  INT4    ARRAY_LOCAL                     1025
     204  INT4    CMFB_ALL                        6
     216  INT4    CMFB_BLUE                       3
     224  INT4    CMFB_CUSTOM                     2
     220  INT4    CMFB_GREEN                      2
       4  INT4    CMFB_NIL                        0
       0  INT4    CMFB_NTSC                       1
     212  INT4    CMFB_OVERLAY                    4
       0  INT4    CMFB_RED                        1
     208  INT4    CMFB_RGB                        5
       4  INT4    CMFB_SONY                       0
     126  INT4    CMF_CHARACTER                   8
     138  INT4    CMF_COMPLEX                     5
     134  INT4    CMF_DOUBLE                      6
     130  INT4    CMF_DOUBLE_COMPLEX              7
      82  INT4    CMF_DOWNWARD                    1001
      78  INT4    CMF_EXCLUSIVE                   2000
     142  INT4    CMF_FLOAT                       4
      74  INT4    CMF_INCLUSIVE                   2001
Tue Jun 11 11:21:46 1991Connection Machine Fortran Version: 1.0 Rev: f1010	page: 12
Symbol Storage Map   File: /net/u1/npac/sibert/cmsi/cmf-sun/cmf_display.fcm
       0  INT4    CMF_LOGICAL                     1
      70  INT4    CMF_NONE                        3000
       4  INT4    CMF_NULL                        0
      66  INT4    CMF_SEGMENT_BIT                 3001
      90  INT4    CMF_SIZEOF_DESCRIPTOR           18
      62  INT4    CMF_START_BIT                   3002
     146  INT4    CMF_S_INTEGER                   3
      86  INT4    CMF_UPWARD                      1000
     150  INT4    CMF_U_INTEGER                   2
       0  INT4    CMSR_CMFB_DISPLAY               1
      28  INT4    CMSR_X_DISPLAY                  2
     106  INT4    CMSSL_CHARACTER                 6
     110  INT4    CMSSL_COMPLEX                   5
     114  INT4    CMSSL_FLOAT                     4
       0  INT4    CMSSL_LOGICAL                   1
     118  INT4    CMSSL_S_INTEGER                 3
     122  INT4    CMSSL_U_INTEGER                 2
     300  INT4    CM_16_BIT                       76463
     292  INT4    CM_1_BIT_PACKED                 68143
     288  INT4    CM_2_BIT_PACKED                 70191
     296  INT4    CM_32_BIT                       78639
     284  INT4    CM_4_BIT_PACKED                 72239
     304  INT4    CM_8_BIT                        74287
       0  INT4    CM_BYTE_ARRAY                   1
       0  INT4    CM_COLUMN_MAJOR                 1
     268  INT4    CM_COMPLEX_FLOAT_DOUBLE         82991
     272  INT4    CM_COMPLEX_FLOAT_SINGLE         80815
       0  INT4    CM_DOWNWARD                     1
       4  INT4    CM_EXCLUSIVE                    0
     276  INT4    CM_FLOAT_DOUBLE                 80815
     308  INT4    CM_FLOAT_DOUBLE_ARRAY           8
     280  INT4    CM_FLOAT_SINGLE                 78639
     312  INT4    CM_FLOAT_SINGLE_ARRAY           4
     252  INT4    CM_FRAMEBUFFER_ORDER            3
     260  INT4    CM_FRONT_END_ORDER              3
       0  INT4    CM_INCLUSIVE                    1
     228  INT4    CM_LEDS_BLINK_SYNC              6
     240  INT4    CM_LEDS_DIAGNOSTICS             3
       4  INT4    CM_LEDS_OFF                     0
       0  INT4    CM_LEDS_ON                      1
     236  INT4    CM_LEDS_PERFMON                 4
     232  INT4    CM_LEDS_SYNC                    5
     244  INT4    CM_LEDS_THROB                   2
     316  INT4    CM_LONG_ARRAY                   4
       0  INT4    CM_LSB_FIRST                    1
     332  INT4    CM_MAXIMUM_EXPONENT_LENGTH      32
     340  INT4    CM_MAXIMUM_INTEGER_LENGTH       128
     328  INT4    CM_MAXIMUM_MESSAGE_LENGTH       128
     336  INT4    CM_MAXIMUM_SIGNIFICAND_LENGTH   96
     324  INT4    CM_MICROCODE_VERSION            6002
     264  INT4    CM_MSB_FIRST                    2
       4  INT4    CM_NEWS_ORDER                   0
Tue Jun 11 11:21:46 1991Connection Machine Fortran Version: 1.0 Rev: f1010	page: 13
Symbol Storage Map   File: /net/u1/npac/sibert/cmsi/cmf-sun/cmf_display.fcm
       8  INT4    CM_NOLIMIT                      -1
       8  INT4    CM_NOLIMITS                     -1
       4  INT4    CM_NONE                         0
       8  INT4    CM_NO_AXIS                      -1
       4  INT4    CM_NO_FIELD                     0
       4  INT4    CM_ROW_MAJOR                    0
       0  INT4    CM_SEGMENT_BIT                  1
       0  INT4    CM_SEND_ORDER                   1
     256  INT4    CM_SERIAL_ORDER                 2
     320  INT4    CM_SHORT_ARRAY                  2
     248  INT4    CM_START_BIT                    2
       4  INT4    CM_UPWARD                       0
     166  INT4    DEBUG_DESC                      8
     170  INT4    ERROR_DESC                      4
       0  INT4    HOME_CM                         1
      98  INT4    HOME_CM_ONLY                    3
     102  INT4    HOME_FE                         2
      94  INT4    HOME_FE_ONLY                    4
       0  INT4    MODIF                           1
       4  INT4    NOT_MODIF                       0
       0  INT4    OBJECT_DESC                     1
     174  INT4    VIEW_DESC                       2


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                   
  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                 
Tue Jun 11 11:21:46 1991Connection Machine Fortran Version: 1.0 Rev: f1010	page: 14
Symbol Storage Map   File: /net/u1/npac/sibert/cmsi/cmf-sun/cmf_display.fcm
  INT4    function      CMFB_SPARE_BUFFER               
  INT4    function      CMFB_VIDEO_STATUS               
  INT4    function      CMFB_WIDTH                      
  INT4    function      CMFB_X_PAN                      
  INT4    function      CMFB_X_ZOOM                     
  INT4    function      CMFB_Y_PAN                      
  INT4    function      CMFB_Y_ZOOM                     
  INT4    function      CMF_GET_FIELD_ID                
  INT4    function      CMF_GET_VP_SET_ID               
  NONE    subroutine    CMSR_WRITE_TO_DISPLAY_1         
  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  
  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    
Tue Jun 11 11:21:46 1991Connection Machine Fortran Version: 1.0 Rev: f1010	page: 15
Symbol Storage Map   File: /net/u1/npac/sibert/cmsi/cmf-sun/cmf_display.fcm
  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          
  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         
  NONE    subroutine    CM_SET_VP_SET_GEOMETRY          
  INT4    function      CM_S_READ_FROM_PROCESSOR_1L     
Tue Jun 11 11:21:46 1991Connection Machine Fortran Version: 1.0 Rev: f1010	page: 16
Symbol Storage Map   File: /net/u1/npac/sibert/cmsi/cmf-sun/cmf_display.fcm
  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



Tue Jun 11 11:21:46 1991Connection Machine Fortran Version: 1.0 Rev: f1010	page: 17
Source Listing File: /net/u1/npac/sibert/cmsi/cmf-sun/cmf_display.fcm
 1452    88  1 	      SUBROUTINE FCMSR_read_from_display(image_buffer)
 1453    89  1 	
 1454    90  1 	        IMPLICIT NONE
 1455    91  1 	
 1456    92  1 	        INCLUDE '/usr/include/cm/paris-configuration-fort.h'
 1988    93  1 	        INCLUDE '/usr/include/cm/CMF_defs.h'
 2091    94  1 		INCLUDE '/usr/include/cm/display-fort.h'
 2092    95  1 	
 2142    96  1 	        INTEGER image_buffer
 2143    97  1 	
 2144    98  1 	        INTEGER saved_geometry, new_geometry
 2145    99  1 	        INTEGER vp_set_axis_length(2)
 2146   100  1 	
 2147   101  1 	        vp_set_axis_length(1) = CM_geometry_axis_length(
 2148   102  1 	     & CM_vp_set_geometry(CMF_get_vp_set_id(image_buffer)),1)
 2149   103  1 	        vp_set_axis_length(2) = CM_geometry_axis_length(
 2150   104  1 	     & CM_vp_set_geometry(CMF_get_vp_set_id(image_buffer)),2)
 2151   105  1 	
 2152   106  1 	        saved_geometry = CM_vp_set_geometry(CMF_get_vp_set_id(
 2153   107  1 	     &                                                  image_buffer))
 2154   108  1 	        new_geometry = CM_intern_geometry(vp_set_axis_length, 2)
 2155   109  1 	        CALL CM_set_vp_set_geometry(CMF_get_vp_set_id(image_buffer),
 2156   110  1 	     &	 						 new_geometry)
 2157   111  1 	
 2158   112  1 	        CALL CMSR_read_from_display_1(CMF_get_field_id(image_buffer),
 2159   113  1 	     & 			           0, 0,
 2160   114  1 	     &			           CMF_get_axis_extent(image_buffer, 0),
 2161   115  1 	     &                             CMF_get_axis_extent(image_buffer, 1))
 2162   116  1 	
 2163   117  1 	        CALL CM_set_vp_set_geometry(CMF_get_vp_set_id(image_buffer),
 2164   118  1 	     &                                                 saved_geometry)
 2165   119  1 	
 2166   120  1 	      END SUBROUTINE FCMSR_read_from_display
 2167   121  1 	C------------------------------------------------------------------------------
Tue Jun 11 11:21:46 1991Connection Machine Fortran Version: 1.0 Rev: f1010	page: 18
Symbol Storage Map   File: /net/u1/npac/sibert/cmsi/cmf-sun/cmf_display.fcm
ENTRY POINTS
  Offset  Type    Name
       0  NONE    FCMSR_READ_FROM_DISPLAY         


STORAGE BLOCKS
    Size  Block
      16  local
      16  _cmval
     394  constants




VARIABLES
  Offset    Size  Type        Block           Name
     ---       4  INT4        not-referenced  FE       CMF_ALLOCATE_TABLE              
     ---       4  INT4        not-referenced  FE       CMF_AVAILABLE_MEMORY            
     ---       4  INT4        not-referenced  FE       CMF_GET_AXES_EXTENTS_PTR        
     ---       4  INT4        not-referenced  FE       CMF_GET_AXES_MAPS_PTR           
     ---       4  INT4        not-referenced  FE       CMF_GET_AXIS_MAP                
     ---       4  INT4        not-referenced  FE       CMF_GET_DATA_TYPE               
     ---       4  INT4        not-referenced  FE       CMF_GET_DEBUG_INFO_PTR          
     ---       4  INT4        not-referenced  FE       CMF_GET_DESCRIPTOR_KIND         
     ---       4  INT4        not-referenced  FE       CMF_GET_EXPONENT_LEN            
     ---       4  INT4        not-referenced  FE       CMF_GET_FE_ADDRESS              
     ---       4  INT4        not-referenced  FE       CMF_GET_GEOMETRY_AXIS_OFFSET    
     ---       4  INT4        not-referenced  FE       CMF_GET_GEOMETRY_ID             
     ---       4  INT4        not-referenced  FE       CMF_GET_GEOMETRY_OFFSETS_PTR    
     ---       4  INT4        not-referenced  FE       CMF_GET_GEOMETRY_RANK           
     ---       4  INT4        not-referenced  FE       CMF_GET_HOME                    
     ---       4  INT4        not-referenced  FE       CMF_GET_INTEGER_LEN             
     ---       4  INT4        not-referenced  FE       CMF_GET_IS_MODIFIED             
     ---       4  INT4        not-referenced  FE       CMF_GET_OBJECT_KIND             
     ---       4  INT4        not-referenced  FE       CMF_GET_RANK                    
     ---       4  INT4        not-referenced  FE       CMF_GET_SIGNIFICAND_LEN         
     ---       4  INT4        not-referenced  FE       CMF_IS_CM_SPACE_ALLOCATED       
     ---       4  INT4        not-referenced  FE       CMF_IS_FE_SPACE_ALLOCATED       
     ---       4  INT4        not-referenced  FE       CMF_IS_SLICEWISE                
     ---       4  INT4        not-referenced  FE       CMF_SIZEOF_ARRAY_ELEMENT        
     ---       4  INT4        not-referenced  FE       CMSR_CMFB_DISPLAY_BUFFER_ID     
     ---       4  INT4        not-referenced  FE       CMSR_CMFB_DISPLAY_DISPLAY_ID    
     ---       4  INT4        not-referenced  FE       CMSR_CREATE_CMFB_DISPLAY        
     ---       4  INT4        not-referenced  FE       CMSR_CREATE_DISPLAY_MENU        
     ---       4  INT4        not-referenced  FE       CMSR_CREATE_INIT_CMFB_DISPLAY   
     ---       4  INT4        not-referenced  FE       CMSR_CREATE_INIT_X_DISPLAY      
     ---       4  INT4        not-referenced  FE       CMSR_CREATE_X_DISPLAY           
     ---       4  INT4        not-referenced  FE       CMSR_DISPLAY_BITS_PER_PIXEL     
     ---       4  LOG4        not-referenced  FE       CMSR_DISPLAY_COLOR_IS_RGB       
     ---       4  INT4        not-referenced  FE       CMSR_DISPLAY_COLOR_MAP_SIZE     
     ---       4  LOG4        not-referenced  FE       CMSR_DISPLAY_HAS_COLOR_MAP      
     ---       4  INT4        not-referenced  FE       CMSR_DISPLAY_HEIGHT             
     ---       8  REAL8       not-referenced  FE       CMSR_DISPLAY_READ_COLOR_BLUE    
Tue Jun 11 11:21:46 1991Connection Machine Fortran Version: 1.0 Rev: f1010	page: 19
Symbol Storage Map   File: /net/u1/npac/sibert/cmsi/cmf-sun/cmf_display.fcm
     ---       8  REAL8       not-referenced  FE       CMSR_DISPLAY_READ_COLOR_GREEN   
     ---       8  REAL8       not-referenced  FE       CMSR_DISPLAY_READ_COLOR_RED     
     ---       4  INT4        not-referenced  FE       CMSR_DISPLAY_TYPE               
     ---       4  INT4        not-referenced  FE       CMSR_DISPLAY_WIDTH              
     ---       4  INT4        not-referenced  FE       CMSR_DISPLAY_X_OFFSET           
     ---       4  INT4        not-referenced  FE       CMSR_DISPLAY_Y_OFFSET           
     ---       4  INT4        not-referenced  FE       CMSR_SELECTED_DISPLAY           
     ---       4  INT4        not-referenced  FE       CMSR_X_DISPLAY_DISPLAY          
     ---       4  INT4        not-referenced  FE       CMSR_X_DISPLAY_DRAWABLE         
     ---       4  INT4        not-referenced  FE       CMSR_X_DISPLAY_GC               
       8       8  REAL8       _cmval          FE       CM_TV_CM                        
       0       8  REAL8       _cmval          FE       CM_TV_REAL                      
     ---       4  INT4        dummy           FE       IMAGE_BUFFER                    
       0       4  INT4        local           FE       NEW_GEOMETRY                    
       8       4  INT4        local           FE       SAVED_GEOMETRY                  


ARRAYS
  Offset    Size  Type        Block/Class     Home     Name
       0       8  INT4        local           FE       VP_SET_AXIS_LENGTH              


PARAMETERS (Offset is within Storage Block 'constants')
  Offset  Type    Name                            Value
     162  INT4    ARRAY_ARG                       257
     158  INT4    ARRAY_GLOBAL                    513
     154  INT4    ARRAY_LOCAL                     1025
     204  INT4    CMFB_ALL                        6
     216  INT4    CMFB_BLUE                       3
     224  INT4    CMFB_CUSTOM                     2
     220  INT4    CMFB_GREEN                      2
       4  INT4    CMFB_NIL                        0
       0  INT4    CMFB_NTSC                       1
     212  INT4    CMFB_OVERLAY                    4
       0  INT4    CMFB_RED                        1
     208  INT4    CMFB_RGB                        5
       4  INT4    CMFB_SONY                       0
     126  INT4    CMF_CHARACTER                   8
     138  INT4    CMF_COMPLEX                     5
     134  INT4    CMF_DOUBLE                      6
     130  INT4    CMF_DOUBLE_COMPLEX              7
      82  INT4    CMF_DOWNWARD                    1001
      78  INT4    CMF_EXCLUSIVE                   2000
     142  INT4    CMF_FLOAT                       4
      74  INT4    CMF_INCLUSIVE                   2001
       0  INT4    CMF_LOGICAL                     1
      70  INT4    CMF_NONE                        3000
       4  INT4    CMF_NULL                        0
      66  INT4    CMF_SEGMENT_BIT                 3001
      90  INT4    CMF_SIZEOF_DESCRIPTOR           18
      62  INT4    CMF_START_BIT                   3002
     146  INT4    CMF_S_INTEGER                   3
Tue Jun 11 11:21:46 1991Connection Machine Fortran Version: 1.0 Rev: f1010	page: 20
Symbol Storage Map   File: /net/u1/npac/sibert/cmsi/cmf-sun/cmf_display.fcm
      86  INT4    CMF_UPWARD                      1000
     150  INT4    CMF_U_INTEGER                   2
       0  INT4    CMSR_CMFB_DISPLAY               1
      28  INT4    CMSR_X_DISPLAY                  2
     106  INT4    CMSSL_CHARACTER                 6
     110  INT4    CMSSL_COMPLEX                   5
     114  INT4    CMSSL_FLOAT                     4
       0  INT4    CMSSL_LOGICAL                   1
     118  INT4    CMSSL_S_INTEGER                 3
     122  INT4    CMSSL_U_INTEGER                 2
     300  INT4    CM_16_BIT                       76463
     292  INT4    CM_1_BIT_PACKED                 68143
     288  INT4    CM_2_BIT_PACKED                 70191
     296  INT4    CM_32_BIT                       78639
     284  INT4    CM_4_BIT_PACKED                 72239
     304  INT4    CM_8_BIT                        74287
       0  INT4    CM_BYTE_ARRAY                   1
       0  INT4    CM_COLUMN_MAJOR                 1
     268  INT4    CM_COMPLEX_FLOAT_DOUBLE         82991
     272  INT4    CM_COMPLEX_FLOAT_SINGLE         80815
       0  INT4    CM_DOWNWARD                     1
       4  INT4    CM_EXCLUSIVE                    0
     276  INT4    CM_FLOAT_DOUBLE                 80815
     308  INT4    CM_FLOAT_DOUBLE_ARRAY           8
     280  INT4    CM_FLOAT_SINGLE                 78639
     312  INT4    CM_FLOAT_SINGLE_ARRAY           4
     252  INT4    CM_FRAMEBUFFER_ORDER            3
     260  INT4    CM_FRONT_END_ORDER              3
       0  INT4    CM_INCLUSIVE                    1
     228  INT4    CM_LEDS_BLINK_SYNC              6
     240  INT4    CM_LEDS_DIAGNOSTICS             3
       4  INT4    CM_LEDS_OFF                     0
       0  INT4    CM_LEDS_ON                      1
     236  INT4    CM_LEDS_PERFMON                 4
     232  INT4    CM_LEDS_SYNC                    5
     244  INT4    CM_LEDS_THROB                   2
     316  INT4    CM_LONG_ARRAY                   4
       0  INT4    CM_LSB_FIRST                    1
     332  INT4    CM_MAXIMUM_EXPONENT_LENGTH      32
     340  INT4    CM_MAXIMUM_INTEGER_LENGTH       128
     328  INT4    CM_MAXIMUM_MESSAGE_LENGTH       128
     336  INT4    CM_MAXIMUM_SIGNIFICAND_LENGTH   96
     324  INT4    CM_MICROCODE_VERSION            6002
     264  INT4    CM_MSB_FIRST                    2
       4  INT4    CM_NEWS_ORDER                   0
       8  INT4    CM_NOLIMIT                      -1
       8  INT4    CM_NOLIMITS                     -1
       4  INT4    CM_NONE                         0
       8  INT4    CM_NO_AXIS                      -1
       4  INT4    CM_NO_FIELD                     0
       4  INT4    CM_ROW_MAJOR                    0
       0  INT4    CM_SEGMENT_BIT                  1
Tue Jun 11 11:21:46 1991Connection Machine Fortran Version: 1.0 Rev: f1010	page: 21
Symbol Storage Map   File: /net/u1/npac/sibert/cmsi/cmf-sun/cmf_display.fcm
       0  INT4    CM_SEND_ORDER                   1
     256  INT4    CM_SERIAL_ORDER                 2
     320  INT4    CM_SHORT_ARRAY                  2
     248  INT4    CM_START_BIT                    2
       4  INT4    CM_UPWARD                       0
     166  INT4    DEBUG_DESC                      8
     170  INT4    ERROR_DESC                      4
       0  INT4    HOME_CM                         1
      98  INT4    HOME_CM_ONLY                    3
     102  INT4    HOME_FE                         2
      94  INT4    HOME_FE_ONLY                    4
       0  INT4    MODIF                           1
       4  INT4    NOT_MODIF                       0
       0  INT4    OBJECT_DESC                     1
     174  INT4    VIEW_DESC                       2


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                   
  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                      
  INT4    function      CMFB_X_PAN                      
  INT4    function      CMFB_X_ZOOM                     
  INT4    function      CMFB_Y_PAN                      
  INT4    function      CMFB_Y_ZOOM                     
Tue Jun 11 11:21:46 1991Connection Machine Fortran Version: 1.0 Rev: f1010	page: 22
Symbol Storage Map   File: /net/u1/npac/sibert/cmsi/cmf-sun/cmf_display.fcm
  INT4    function      CMF_GET_AXIS_EXTENT             
  INT4    function      CMF_GET_FIELD_ID                
  INT4    function      CMF_GET_VP_SET_ID               
  NONE    subroutine    CMSR_READ_FROM_DISPLAY_1        
  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  
  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            
Tue Jun 11 11:21:46 1991Connection Machine Fortran Version: 1.0 Rev: f1010	page: 23
Symbol Storage Map   File: /net/u1/npac/sibert/cmsi/cmf-sun/cmf_display.fcm
  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          
  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         
  NONE    subroutine    CM_SET_VP_SET_GEOMETRY          
  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            
Tue Jun 11 11:21:46 1991Connection Machine Fortran Version: 1.0 Rev: f1010	page: 24
Symbol Storage Map   File: /net/u1/npac/sibert/cmsi/cmf-sun/cmf_display.fcm
  INT4    function      CM_U_READ_FROM_PROCESSOR_1L     
  INT4    function      CM_VP_SET_GEOMETRY              


NAME LISTS
  Name


CONSTRUCT NAMES
  Name



Tue Jun 11 11:21:46 1991Connection Machine Fortran Version: 1.0 Rev: f1010	page: 25
Source Listing File: /net/u1/npac/sibert/cmsi/cmf-sun/cmf_display.fcm
 2168   122  1 	      SUBROUTINE FCMSR_read_from_display_1(image_buffer,
 2169   123  1 	     &		 			     buffer_x_offset, 
 2170   124  1 	     &					     buffer_y_offset,
 2171   125  1 	     &					     buffer_width, 
 2172   126  1 	     &					     buffer_height)
 2173   127  1 	
 2174   128  1 	        IMPLICIT NONE
 2175   129  1 	
 2176   130  1 	        INCLUDE '/usr/include/cm/paris-configuration-fort.h'
 2708   131  1 	        INCLUDE '/usr/include/cm/CMF_defs.h'
 2811   132  1 		INCLUDE '/usr/include/cm/display-fort.h'
 2812   133  1 	
 2862   134  1 	        INTEGER  image_buffer
 2863   135  1 		INTEGER  buffer_x_offset, buffer_y_offset
 2864   136  1 		INTEGER  buffer_width, buffer_height
 2865   137  1 		INTEGER  display_x_offset, display_y_offset
 2866   138  1 	
 2867   139  1 	        INTEGER  saved_geometry, new_geometry
 2868   140  1 	        INTEGER  vp_set_axis_length(2)
 2869   141  1 	
 2870   142  1 	        vp_set_axis_length(1) = CM_geometry_axis_length(
 2871   143  1 	     & CM_vp_set_geometry(CMF_get_vp_set_id(image_buffer)),1)
 2872   144  1 	        vp_set_axis_length(2) = CM_geometry_axis_length(
 2873   145  1 	     & CM_vp_set_geometry(CMF_get_vp_set_id(image_buffer)),2)
 2874   146  1 	
 2875   147  1 	        saved_geometry = CM_vp_set_geometry(CMF_get_vp_set_id(
 2876   148  1 	     &                                                  image_buffer))
 2877   149  1 	        new_geometry = CM_intern_geometry(vp_set_axis_length, 2)
 2878   150  1 	        CALL CM_set_vp_set_geometry(CMF_get_vp_set_id(image_buffer),
 2879   151  1 	     &	 						 new_geometry)
 2880   152  1 	
 2881   153  1 	        CALL CMSR_read_from_display_1(CMF_get_field_id(image_buffer),
 2882   154  1 	     &	     			      buffer_x_offset, buffer_y_offset,
 2883   155  1 	     &				      buffer_width, buffer_height)
 2884   156  1 	
 2885   157  1 	        CALL CM_set_vp_set_geometry(CMF_get_vp_set_id(image_buffer),
 2886   158  1 	     &                                                 saved_geometry)
 2887   159  1 	
 2888   160  1 	      END SUBROUTINE FCMSR_read_from_display_1
 2889   161  1 	C------------------------------------------------------------------------------
Tue Jun 11 11:21:46 1991Connection Machine Fortran Version: 1.0 Rev: f1010	page: 26
Symbol Storage Map   File: /net/u1/npac/sibert/cmsi/cmf-sun/cmf_display.fcm
ENTRY POINTS
  Offset  Type    Name
       0  NONE    FCMSR_READ_FROM_DISPLAY_1       


STORAGE BLOCKS
    Size  Block
      16  local
      16  _cmval
     394  constants




VARIABLES
  Offset    Size  Type        Block           Name
     ---       4  INT4        dummy           FE       BUFFER_HEIGHT                   
     ---       4  INT4        dummy           FE       BUFFER_WIDTH                    
     ---       4  INT4        dummy           FE       BUFFER_X_OFFSET                 
     ---       4  INT4        dummy           FE       BUFFER_Y_OFFSET                 
     ---       4  INT4        not-referenced  FE       CMF_ALLOCATE_TABLE              
     ---       4  INT4        not-referenced  FE       CMF_AVAILABLE_MEMORY            
     ---       4  INT4        not-referenced  FE       CMF_GET_AXES_EXTENTS_PTR        
     ---       4  INT4        not-referenced  FE       CMF_GET_AXES_MAPS_PTR           
     ---       4  INT4        not-referenced  FE       CMF_GET_AXIS_EXTENT             
     ---       4  INT4        not-referenced  FE       CMF_GET_AXIS_MAP                
     ---       4  INT4        not-referenced  FE       CMF_GET_DATA_TYPE               
     ---       4  INT4        not-referenced  FE       CMF_GET_DEBUG_INFO_PTR          
     ---       4  INT4        not-referenced  FE       CMF_GET_DESCRIPTOR_KIND         
     ---       4  INT4        not-referenced  FE       CMF_GET_EXPONENT_LEN            
     ---       4  INT4        not-referenced  FE       CMF_GET_FE_ADDRESS              
     ---       4  INT4        not-referenced  FE       CMF_GET_GEOMETRY_AXIS_OFFSET    
     ---       4  INT4        not-referenced  FE       CMF_GET_GEOMETRY_ID             
     ---       4  INT4        not-referenced  FE       CMF_GET_GEOMETRY_OFFSETS_PTR    
     ---       4  INT4        not-referenced  FE       CMF_GET_GEOMETRY_RANK           
     ---       4  INT4        not-referenced  FE       CMF_GET_HOME                    
     ---       4  INT4        not-referenced  FE       CMF_GET_INTEGER_LEN             
     ---       4  INT4        not-referenced  FE       CMF_GET_IS_MODIFIED             
     ---       4  INT4        not-referenced  FE       CMF_GET_OBJECT_KIND             
     ---       4  INT4        not-referenced  FE       CMF_GET_RANK                    
     ---       4  INT4        not-referenced  FE       CMF_GET_SIGNIFICAND_LEN         
     ---       4  INT4        not-referenced  FE       CMF_IS_CM_SPACE_ALLOCATED       
     ---       4  INT4        not-referenced  FE       CMF_IS_FE_SPACE_ALLOCATED       
     ---       4  INT4        not-referenced  FE       CMF_IS_SLICEWISE                
     ---       4  INT4        not-referenced  FE       CMF_SIZEOF_ARRAY_ELEMENT        
     ---       4  INT4        not-referenced  FE       CMSR_CMFB_DISPLAY_BUFFER_ID     
     ---       4  INT4        not-referenced  FE       CMSR_CMFB_DISPLAY_DISPLAY_ID    
     ---       4  INT4        not-referenced  FE       CMSR_CREATE_CMFB_DISPLAY        
     ---       4  INT4        not-referenced  FE       CMSR_CREATE_DISPLAY_MENU        
     ---       4  INT4        not-referenced  FE       CMSR_CREATE_INIT_CMFB_DISPLAY   
     ---       4  INT4        not-referenced  FE       CMSR_CREATE_INIT_X_DISPLAY      
     ---       4  INT4        not-referenced  FE       CMSR_CREATE_X_DISPLAY           
     ---       4  INT4        not-referenced  FE       CMSR_DISPLAY_BITS_PER_PIXEL     
Tue Jun 11 11:21:46 1991Connection Machine Fortran Version: 1.0 Rev: f1010	page: 27
Symbol Storage Map   File: /net/u1/npac/sibert/cmsi/cmf-sun/cmf_display.fcm
     ---       4  LOG4        not-referenced  FE       CMSR_DISPLAY_COLOR_IS_RGB       
     ---       4  INT4        not-referenced  FE       CMSR_DISPLAY_COLOR_MAP_SIZE     
     ---       4  LOG4        not-referenced  FE       CMSR_DISPLAY_HAS_COLOR_MAP      
     ---       4  INT4        not-referenced  FE       CMSR_DISPLAY_HEIGHT             
     ---       8  REAL8       not-referenced  FE       CMSR_DISPLAY_READ_COLOR_BLUE    
     ---       8  REAL8       not-referenced  FE       CMSR_DISPLAY_READ_COLOR_GREEN   
     ---       8  REAL8       not-referenced  FE       CMSR_DISPLAY_READ_COLOR_RED     
     ---       4  INT4        not-referenced  FE       CMSR_DISPLAY_TYPE               
     ---       4  INT4        not-referenced  FE       CMSR_DISPLAY_WIDTH              
     ---       4  INT4        not-referenced  FE       CMSR_DISPLAY_X_OFFSET           
     ---       4  INT4        not-referenced  FE       CMSR_DISPLAY_Y_OFFSET           
     ---       4  INT4        not-referenced  FE       CMSR_SELECTED_DISPLAY           
     ---       4  INT4        not-referenced  FE       CMSR_X_DISPLAY_DISPLAY          
     ---       4  INT4        not-referenced  FE       CMSR_X_DISPLAY_DRAWABLE         
     ---       4  INT4        not-referenced  FE       CMSR_X_DISPLAY_GC               
       8       8  REAL8       _cmval          FE       CM_TV_CM                        
       0       8  REAL8       _cmval          FE       CM_TV_REAL                      
     ---       4  INT4        not-referenced  FE       DISPLAY_X_OFFSET                
     ---       4  INT4        not-referenced  FE       DISPLAY_Y_OFFSET                
     ---       4  INT4        dummy           FE       IMAGE_BUFFER                    
       0       4  INT4        local           FE       NEW_GEOMETRY                    
       8       4  INT4        local           FE       SAVED_GEOMETRY                  


ARRAYS
  Offset    Size  Type        Block/Class     Home     Name
       0       8  INT4        local           FE       VP_SET_AXIS_LENGTH              


PARAMETERS (Offset is within Storage Block 'constants')
  Offset  Type    Name                            Value
     162  INT4    ARRAY_ARG                       257
     158  INT4    ARRAY_GLOBAL                    513
     154  INT4    ARRAY_LOCAL                     1025
     204  INT4    CMFB_ALL                        6
     216  INT4    CMFB_BLUE                       3
     224  INT4    CMFB_CUSTOM                     2
     220  INT4    CMFB_GREEN                      2
       4  INT4    CMFB_NIL                        0
       0  INT4    CMFB_NTSC                       1
     212  INT4    CMFB_OVERLAY                    4
       0  INT4    CMFB_RED                        1
     208  INT4    CMFB_RGB                        5
       4  INT4    CMFB_SONY                       0
     126  INT4    CMF_CHARACTER                   8
     138  INT4    CMF_COMPLEX                     5
     134  INT4    CMF_DOUBLE                      6
     130  INT4    CMF_DOUBLE_COMPLEX              7
      82  INT4    CMF_DOWNWARD                    1001
      78  INT4    CMF_EXCLUSIVE                   2000
     142  INT4    CMF_FLOAT                       4
      74  INT4    CMF_INCLUSIVE                   2001
Tue Jun 11 11:21:46 1991Connection Machine Fortran Version: 1.0 Rev: f1010	page: 28
Symbol Storage Map   File: /net/u1/npac/sibert/cmsi/cmf-sun/cmf_display.fcm
       0  INT4    CMF_LOGICAL                     1
      70  INT4    CMF_NONE                        3000
       4  INT4    CMF_NULL                        0
      66  INT4    CMF_SEGMENT_BIT                 3001
      90  INT4    CMF_SIZEOF_DESCRIPTOR           18
      62  INT4    CMF_START_BIT                   3002
     146  INT4    CMF_S_INTEGER                   3
      86  INT4    CMF_UPWARD                      1000
     150  INT4    CMF_U_INTEGER                   2
       0  INT4    CMSR_CMFB_DISPLAY               1
      28  INT4    CMSR_X_DISPLAY                  2
     106  INT4    CMSSL_CHARACTER                 6
     110  INT4    CMSSL_COMPLEX                   5
     114  INT4    CMSSL_FLOAT                     4
       0  INT4    CMSSL_LOGICAL                   1
     118  INT4    CMSSL_S_INTEGER                 3
     122  INT4    CMSSL_U_INTEGER                 2
     300  INT4    CM_16_BIT                       76463
     292  INT4    CM_1_BIT_PACKED                 68143
     288  INT4    CM_2_BIT_PACKED                 70191
     296  INT4    CM_32_BIT                       78639
     284  INT4    CM_4_BIT_PACKED                 72239
     304  INT4    CM_8_BIT                        74287
       0  INT4    CM_BYTE_ARRAY                   1
       0  INT4    CM_COLUMN_MAJOR                 1
     268  INT4    CM_COMPLEX_FLOAT_DOUBLE         82991
     272  INT4    CM_COMPLEX_FLOAT_SINGLE         80815
       0  INT4    CM_DOWNWARD                     1
       4  INT4    CM_EXCLUSIVE                    0
     276  INT4    CM_FLOAT_DOUBLE                 80815
     308  INT4    CM_FLOAT_DOUBLE_ARRAY           8
     280  INT4    CM_FLOAT_SINGLE                 78639
     312  INT4    CM_FLOAT_SINGLE_ARRAY           4
     252  INT4    CM_FRAMEBUFFER_ORDER            3
     260  INT4    CM_FRONT_END_ORDER              3
       0  INT4    CM_INCLUSIVE                    1
     228  INT4    CM_LEDS_BLINK_SYNC              6
     240  INT4    CM_LEDS_DIAGNOSTICS             3
       4  INT4    CM_LEDS_OFF                     0
       0  INT4    CM_LEDS_ON                      1
     236  INT4    CM_LEDS_PERFMON                 4
     232  INT4    CM_LEDS_SYNC                    5
     244  INT4    CM_LEDS_THROB                   2
     316  INT4    CM_LONG_ARRAY                   4
       0  INT4    CM_LSB_FIRST                    1
     332  INT4    CM_MAXIMUM_EXPONENT_LENGTH      32
     340  INT4    CM_MAXIMUM_INTEGER_LENGTH       128
     328  INT4    CM_MAXIMUM_MESSAGE_LENGTH       128
     336  INT4    CM_MAXIMUM_SIGNIFICAND_LENGTH   96
     324  INT4    CM_MICROCODE_VERSION            6002
     264  INT4    CM_MSB_FIRST                    2
       4  INT4    CM_NEWS_ORDER                   0
Tue Jun 11 11:21:46 1991Connection Machine Fortran Version: 1.0 Rev: f1010	page: 29
Symbol Storage Map   File: /net/u1/npac/sibert/cmsi/cmf-sun/cmf_display.fcm
       8  INT4    CM_NOLIMIT                      -1
       8  INT4    CM_NOLIMITS                     -1
       4  INT4    CM_NONE                         0
       8  INT4    CM_NO_AXIS                      -1
       4  INT4    CM_NO_FIELD                     0
       4  INT4    CM_ROW_MAJOR                    0
       0  INT4    CM_SEGMENT_BIT                  1
       0  INT4    CM_SEND_ORDER                   1
     256  INT4    CM_SERIAL_ORDER                 2
     320  INT4    CM_SHORT_ARRAY                  2
     248  INT4    CM_START_BIT                    2
       4  INT4    CM_UPWARD                       0
     166  INT4    DEBUG_DESC                      8
     170  INT4    ERROR_DESC                      4
       0  INT4    HOME_CM                         1
      98  INT4    HOME_CM_ONLY                    3
     102  INT4    HOME_FE                         2
      94  INT4    HOME_FE_ONLY                    4
       0  INT4    MODIF                           1
       4  INT4    NOT_MODIF                       0
       0  INT4    OBJECT_DESC                     1
     174  INT4    VIEW_DESC                       2


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                   
  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                 
Tue Jun 11 11:21:46 1991Connection Machine Fortran Version: 1.0 Rev: f1010	page: 30
Symbol Storage Map   File: /net/u1/npac/sibert/cmsi/cmf-sun/cmf_display.fcm
  INT4    function      CMFB_SPARE_BUFFER               
  INT4    function      CMFB_VIDEO_STATUS               
  INT4    function      CMFB_WIDTH                      
  INT4    function      CMFB_X_PAN                      
  INT4    function      CMFB_X_ZOOM                     
  INT4    function      CMFB_Y_PAN                      
  INT4    function      CMFB_Y_ZOOM                     
  INT4    function      CMF_GET_FIELD_ID                
  INT4    function      CMF_GET_VP_SET_ID               
  NONE    subroutine    CMSR_READ_FROM_DISPLAY_1        
  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  
  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    
Tue Jun 11 11:21:46 1991Connection Machine Fortran Version: 1.0 Rev: f1010	page: 31
Symbol Storage Map   File: /net/u1/npac/sibert/cmsi/cmf-sun/cmf_display.fcm
  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          
  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         
  NONE    subroutine    CM_SET_VP_SET_GEOMETRY          
  INT4    function      CM_S_READ_FROM_PROCESSOR_1L     
Tue Jun 11 11:21:46 1991Connection Machine Fortran Version: 1.0 Rev: f1010	page: 32
Symbol Storage Map   File: /net/u1/npac/sibert/cmsi/cmf-sun/cmf_display.fcm
  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



Tue Jun 11 11:21:46 1991Connection Machine Fortran Version: 1.0 Rev: f1010	page: 33
Source Listing File: /net/u1/npac/sibert/cmsi/cmf-sun/cmf_display.fcm
Tue Jun 11 11:21:46 1991Connection Machine Fortran Version: 1.0 Rev: f1010	page: 34
Utility Stats
Input File:	/net/u1/npac/sibert/cmsi/cmf-sun/cmf_display.fcm
Base File:	cmf_display
COMMAND QUALIFIERS

	cmf_display.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
