THIS FILE IS DAMAGED 165 166 167 171 173 173 add constant bit(9) initial dcl 17-8 ref 237 addr builtin function dcl 24 ref 87 aggregate based bit(1) level 2 packed packed unaligned dcl 22-27 ref 87 array based structure level 1 dcl 11-1 in procedure "subscripter" array 12 based pointer level 2 in structure "symbol" packed packed unaligned dcl 10-3 in procedure "subscripter" ref 38 attributes 31 based structure level 2 dcl 10-3 b parameter pointer dcl 234 in procedure "addf" ref 232 239 244 249 255 b 000110 automatic pointer dcl 15 in procedure "subscripter" set ref 31* 32 33 34 39* 71 71 71 74 74 74 92 92 96 96 96 98 98 98 102 103 107 107 110 112 112 112 112 115 115 117 117 117 117 122 122 122 122 129* 129 138* 140 142 binary 31(29) based bit(1) level 4 packed packed unaligned dcl 10-3 ref 175 bit 31(03) based bit(1) level 4 packed packed unaligned dcl 10-3 ref 175 bit_ constant fixed bin(3,0) initial dcl 18-5 ref 181 bits 12(06) based structure level 2 packed packed unaligned dcl 12-3 bits_per_character 000006 constant fixed bin(31,0) initial dcl 23-5 set ref 182 183* 183* blk parameter pointer dcl 15 set ref 13 86* 156 156 block based structure level 1 dcl 8-5 block_node 4 based pointer level 2 packed packed unaligned dcl 10-3 ref 104 bound based structure level 1 dcl 11-21 bound_ck 000001 constant bit(9) initial dcl 17-8 set ref 100* bounds 12 based pointer level 2 packed packed unaligned dcl 11-1 ref 39 c 000156 automatic pointer dcl 234 set ref 252* 254 255 257 c_lower 1 based fixed bin(24,0) level 2 dcl 11-21 set ref 32* 71 71 96 c_multiplier 3 based fixed bin(24,0) level 2 dcl 11-21 set ref 34* 107 107 110 112 112 112 112 c_offset 1 based fixed bin(24,0) level 2 dcl 12-3 set ref 193 197* c_subscript 000127 automatic fixed bin(31,0) dcl 18 set ref 63* 71 74 95* 107 115 117 117* 117* 117* 117* 127* c_sum 000126 automatic fixed bin(31,0) dcl 18 set ref 26* 107* 107 162* 162 166* 166 182* 182 195* c_upper 2 based fixed bin(24,0) level 2 dcl 11-21 set ref 33* 74 74 98 c_virtual_origin 4 based fixed bin(24,0) level 2 dcl 11-1 ref 166 c_word_size 26 based fixed bin(24,0) level 2 dcl 10-3 set ref 156* 156 character_ constant fixed bin(3,0) initial dcl 18-5 ref 175 coff 000130 automatic fixed bin(31,0) dcl 18 set ref 193* 195* 197 compiler_developed 32(35) based structure level 3 packed packed unaligned dcl 10-3 convert$to_integer 000016 constant entry external dcl 2-66 ref 88 copy_expression 000020 constant entry external dcl 2-94 ref 80 102 103 115 115 117 117 117 117 122 122 122 122 149 171 173 173 create_bound 000022 constant entry external dcl 2-118 ref 31 create_list 000024 constant entry external dcl 2-147 ref 45 138 create_operator 000026 constant entry external dcl 2-152 ref 100 170 208 252 cunits 000125 automatic fixed bin(3,0) dcl 17 set ref 194* 195* 198 data_type 31 based structure level 3 packed packed unaligned dcl 10-3 dec_integer constant bit(9) initial dcl 20-3 ref 60 declare_constant$integer 000030 constant entry external dcl 2-234 ref 95 96 98 112 112 112 112 117 117 117 117 127 183 183 def_context based structure level 1 dcl 22-8 def_this_context based structure level 1 dcl 22-27 e 000102 automatic pointer dcl 15 set ref 148* 149* 155 192 193 194 195 195 196 197 198 199 204 204 208 209 210 213 214 215 217 element 1 based pointer array level 2 packed packed unaligned dcl 14-6 set ref 59 124* 127* 140* 140 entry 31(09) based bit(1) level 4 packed packed unaligned dcl 10-3 ref 42 expression_semantics 000012 constant entry external dcl 1-105 ref 86 104 fo_in_qual 12(22) based bit(1) level 3 packed packed unaligned dcl 12-3 set ref 195* high_bound 3(18) based fixed bin(17,0) level 2 packed packed unaligned dcl 9-1 ref 33 i 000121 automatic fixed bin(15,0) dcl 16 set ref 57* 59 124 127* 139* 140 140* info 11 based structure level 2 packed packed unaligned dcl 12-3 integer_type 000000 constant bit(36) initial dcl 23-71 set ref 88* k 000122 automatic fixed bin(15,0) dcl 16 set ref 35* 40* 41 42 45* 57 135 137 156 label based structure level 1 dcl 9-1 label_node constant bit(9) initial dcl 19-5 ref 29 159 list based structure level 1 dcl 14-6 low_bound 3 based fixed bin(17,0) level 2 packed packed unaligned dcl 9-1 ref 32 162 lower 5 based pointer level 2 packed packed unaligned dcl 11-21 set ref 71 92 96 96* 102* m parameter fixed bin(15,0) dcl 223 set ref 221 226* max builtin function dcl 24 ref 156 misc_attributes 31(19) based structure level 3 packed packed unaligned dcl 10-3 mod_bit constant bit(9) initial dcl 17-8 ref 20 mod_byte constant bit(9) initial dcl 17-8 ref 20 mod_half constant bit(9) initial dcl 17-8 ref 20 modword_in_offset 11(35) based bit(1) level 4 packed packed unaligned dcl 12-3 set ref 195 199* mult constant bit(9) initial dcl 17-8 ref 251 multiplier 7 based pointer level 2 packed packed unaligned dcl 11-21 set ref 115* 115* 117* 117* 117* 117* 122* 122* 122* 122* n 000120 automatic fixed bin(15,0) dcl 16 set ref 28* 41 42 57 57 124 127 135 137 n_minus_k 000123 automatic fixed bin(15,0) dcl 16 set ref 137* 138* 139 negate 000002 constant bit(9) initial dcl 17-8 set ref 170* next 14 based pointer level 2 packed packed unaligned dcl 11-21 ref 129 node based structure level 1 dcl 19-27 null builtin function dcl 24 ref 27 47 71 74 77 83 92 92 92 95 96 98 107 115 124 124 144 153 167 167 183 204 239 number 0(21) based fixed bin(14,0) level 2 packed packed unaligned dcl 14-6 ref 28 number_of_dimensions 1(07) based fixed bin(7,0) level 2 packed packed unaligned dcl 11-1 ref 40 off 000114 automatic pointer dcl 15 set ref 192* 195* 196 offset 5 based pointer level 2 packed packed unaligned dcl 12-3 set ref 192 196* 204 209 210* offset_adder 000014 constant entry external dcl 1-172 ref 195 offset_units 1(31) based fixed bin(3,0) level 2 packed packed unaligned dcl 11-1 ref 165 op_table 000131 automatic bit(9) initial array dcl 20 set ref 20* 20* 20* 20* 208* opcode 000160 automatic bit(9) dcl 235 set ref 237* 246* 251* 252* operand 1 based pointer array level 2 packed packed unaligned dcl 16-6 set ref 101* 102* 103* 171* 209* 254* 255* operator based structure level 1 dcl 16-6 operator_node constant bit(9) initial dcl 19-5 ref 80 other 11(33) based structure level 3 packed packed unaligned dcl 12-3 packed 33 based bit(1) level 4 packed packed unaligned dcl 10-3 ref 215 padded_ref 12(06) based bit(1) level 3 packed packed unaligned dcl 12-3 set ref 215* pdssl 000116 automatic pointer dcl 15 set ref 45* 47* 124 124 127 153 155 pl1_stat_$eis_mode 000010 external static bit(1) dcl 22 ref 175 204 plio_ssl 22 based pointer level 2 packed packed unaligned dcl 8-5 ref 156 156 prefix 12(12) based bit(12) level 2 packed packed unaligned dcl 13-9 ref 92 ptr 31(05) based bit(1) level 4 packed packed unaligned dcl 10-3 ref 175 put_data_sw 0(12) based bit(1) level 2 packed packed unaligned dcl 12-3 ref 45 q 000112 automatic pointer dcl 15 set ref 100* 101 102 103 104* 208* 209 210 ref_count 0(18) based fixed bin(17,0) level 2 packed packed unaligned dcl 12-3 set ref 214* reference 15 based pointer level 2 in structure "symbol" packed packed unaligned dcl 10-3 in procedure "subscripter" ref 149 reference based structure level 1 dcl 12-3 in procedure "subscripter" s parameter pointer dcl 15 set ref 13 29 32 33 38 42 104 149 149 159 162 175 175 175 215 226* semantic_translator$abort 000036 constant entry external dcl 224 ref 226 share_expression 000032 constant entry external dcl 2-454 ref 124 shared 0(11) based bit(1) level 2 packed packed unaligned dcl 12-3 set ref 213* statement based structure level 1 dcl 13-9 stmnt parameter pointer dcl 15 set ref 13 86* 92 104* sub constant bit(9) initial dcl 17-8 ref 246 subs parameter pointer dcl 15 set ref 13 28 59 140 142* 144* subscript 000100 automatic pointer dcl 15 set ref 59* 60 60 63* 77* 80 80* 80 83 86* 86* 88* 88* 92 95 95* 101 104* 107 110* 112* 112* 115 122* 122* 124 124* subscript_list 7 based pointer level 2 packed packed unaligned dcl 12-3 set ref 155* substr builtin function dcl 24 ref 92 sum 000104 automatic pointer dcl 15 set ref 27* 110* 110* 112* 112* 115* 115* 117* 117* 122* 122* 167 170* 171 173* 173* 183 183* 183* 195* symbol based structure level 1 dcl 10-3 symbol_node constant bit(9) initial dcl 19-5 ref 149 this_context 000135 automatic bit(36) dcl 22-5 set ref 85* 86* 87 104* token based structure level 1 dcl 15-3 token_node constant bit(9) initial dcl 19-5 ref 60 token_to_binary 000034 constant entry external dcl 2-459 ref 63 tree parameter pointer dcl 15 ref 13 45 148 149 149 type based bit(9) level 2 in structure "node" packed packed unaligned dcl 19-27 in procedure "subscripter" ref 29 60 80 149 159 type 0(09) based bit(9) level 2 in structure "token" packed packed unaligned dcl 15-3 in procedure "subscripter" ref 60 units 000124 automatic fixed bin(3,0) dcl 17 in procedure "subscripter" set ref 161* 165* 175 181* 195* units 0(14) based fixed bin(3,0) level 2 in structure "reference" packed packed unaligned dcl 12-3 in procedure "subscripter" set ref 194 198* 204 208 upper 6 based pointer level 2 packed packed unaligned dcl 11-21 set ref 74 92 98 98* 103* virtual_origin 7 based pointer level 2 packed packed unaligned dcl 11-1 set ref 167 171* 173* 173* word_ constant fixed bin(3,0) initial dcl 18-5 ref 161 204 NAMES DECLARED BY DECLARE STATEMENT AND NEVER REFERENCED. a_format internal static bit(9) initial dcl 17-8 abs_fun internal static bit(9) initial dcl 17-8 acos_fun internal static bit(9) initial dcl 17-8 acosd_fun internal static bit(9) initial dcl 17-8 addbitno_fun internal static bit(9) initial dcl 17-8 addcharno_fun internal static bit(9) initial dcl 17-8 addr_fun internal static bit(9) initial dcl 17-8 addr_fun_bits internal static bit(9) initial dcl 17-8 addrel_fun internal static bit(9) initial dcl 17-8 adjust_count 000000 constant entry external dcl 2-20 alloc_semantics 000000 constant entry external dcl 1-7 alloc_semantics$init_only 000000 constant entry external dcl 1-12 allocation_fun internal static bit(9) initial dcl 17-8 allot_auto internal static bit(9) initial dcl 17-8 allot_based internal static bit(9) initial dcl 17-8 allot_ctl internal static bit(9) initial dcl 17-8 allot_var internal static bit(9) initial dcl 17-8 and internal static bit(9) initial dcl 20-3 and_bits internal static bit(9) initial dcl 17-8 arg_desc_type internal static bit(36) initial dcl 23-71 array_node internal static bit(9) initial dcl 19-5 arrow internal static bit(9) initial dcl 20-3 asin_fun internal static bit(9) initial dcl 17-8 asind_fun internal static bit(9) initial dcl 17-8 assign internal static bit(9) initial dcl 17-8 assign_by_name internal static bit(9) initial dcl 17-8 assign_round internal static bit(9) initial dcl 17-8 assign_size_ck internal static bit(9) initial dcl 17-8 assign_zero internal static bit(9) initial dcl 17-8 assignment internal static bit(9) initial dcl 20-3 asterisk internal static bit(9) initial dcl 20-3 atan_fun internal static bit(9) initial dcl 17-8 atand_fun internal static bit(9) initial dcl 17-8 b_format internal static bit(9) initial dcl 17-8 baseno_fun internal static bit(9) initial dcl 17-8 baseptr_fun internal static bit(9) initial dcl 17-8 bin_integer internal static bit(9) initial dcl 20-3 binary_to_octal_string 000000 constant entry external dcl 2-38 binary_to_octal_var_string 000000 constant entry external dcl 2-43 bindec 000000 constant entry external dcl 2-23 bindec$vs 000000 constant entry external dcl 2-28 binoct 000000 constant entry external dcl 2-33 bit_pointer internal static bit(9) initial dcl 17-8 bit_string internal static bit(9) initial dcl 20-3 bit_to_char internal static bit(9) initial dcl 17-8 bit_to_word internal static bit(9) initial dcl 17-8 bit_type internal static bit(36) initial dcl 23-71 bitno_fun internal static bit(9) initial dcl 17-8 bits_per_binary_exponent internal static fixed bin(31,0) initial dcl 23-5 bits_per_decimal_digit internal static fixed bin(31,0) initial dcl 23-5 bits_per_digit internal static fixed bin(31,1) initial dcl 23-69 bits_per_double internal static fixed bin(31,0) initial dcl 23-5 bits_per_half internal static fixed bin(31,0) initial dcl 23-5 bits_per_packed_ptr internal static fixed bin(31,0) initial dcl 23-5 bits_per_word internal static fixed bin(31,0) initial dcl 23-5 block_node internal static bit(9) initial dcl 19-5 bn_format internal static bit(9) initial dcl 17-8 bool_fun internal static bit(9) initial dcl 17-8 bound_node internal static bit(9) initial dcl 19-5 builtin 000000 constant entry external dcl 1-17 builtin_type internal static bit(36) initial dcl 23-71 by_compiler internal static bit(3) initial dcl 21-5 by_context internal static bit(3) initial dcl 21-5 by_declare internal static bit(3) initial dcl 21-5 by_explicit_context internal static bit(3) initial dcl 21-5 by_implication internal static bit(3) initial dcl 21-5 by_name_agg_node internal static bit(9) initial dcl 19-5 byte_fun internal static bit(9) initial dcl 17-8 c_format internal static bit(9) initial dcl 17-8 cat internal static bit(9) initial dcl 20-3 cat_string internal static bit(9) initial dcl 17-8 ceil_fun internal static bit(9) initial dcl 17-8 char builtin function dcl 24 char_string internal static bit(9) initial dcl 20-3 char_to_word internal static bit(9) initial dcl 17-8 char_type internal static bit(36) initial dcl 23-71 characters_per_double internal static fixed bin(31,0) initial dcl 23-5 characters_per_half internal static fixed bin(31,0) initial dcl 23-5 characters_per_word internal static fixed bin(31,0) initial dcl 23-5 charno_fun internal static bit(9) initial dcl 17-8 check_star_extents 000000 constant entry external dcl 1-27 clock_fun internal static bit(9) initial dcl 17-8 close_file internal static bit(9) initial dcl 17-8 codeptr_fun internal static bit(9) initial dcl 17-8 colon internal static bit(9) initial dcl 20-3 column_format internal static bit(9) initial dcl 17-8 comma internal static bit(9) initial dcl 20-3 compare_declaration 000000 constant entry external dcl 1-31 compare_expression 000000 constant entry external dcl 2-48 complex_fun internal static bit(9) initial dcl 17-8 complex_type internal static bit(36) initial dcl 23-71 conjg_fun internal static bit(9) initial dcl 17-8 constant_length 000000 constant entry external dcl 2-54 context automatic bit(36) dcl 22-5 context_node internal static bit(9) initial dcl 19-5 context_processor 000000 constant entry external dcl 1-38 convert 000000 constant entry external dcl 2-60 convert$from_builtin 000000 constant entry external dcl 2-72 convert$to_target 000000 constant entry external dcl 2-88 convert$to_target_fb 000000 constant entry external dcl 2-82 convert$validate 000000 constant entry external dcl 2-78 copy_expression$copy_sons 000000 constant entry external dcl 2-99 copy_string internal static bit(9) initial dcl 17-8 copy_unique_expression 000000 constant entry external dcl 2-103 copy_words internal static bit(9) initial dcl 17-8 cos_fun internal static bit(9) initial dcl 17-8 cosd_fun internal static bit(9) initial dcl 17-8 create_array 000000 constant entry external dcl 2-108 create_block 000000 constant entry external dcl 2-112 create_context 000000 constant entry external dcl 2-122 create_cross_reference 000000 constant entry external dcl 2-128 create_default 000000 constant entry external dcl 2-132 create_identifier 000000 constant entry external dcl 2-136 create_label 000000 constant entry external dcl 2-140 create_reference 000000 constant entry external dcl 2-158 create_statement 000000 constant entry external dcl 2-163 create_statement$prologue 000000 constant entry external dcl 2-171 create_storage 000000 constant entry external dcl 2-179 create_symbol 000000 constant entry external dcl 2-184 create_token 000000 constant entry external dcl 2-191 create_token$init_hash_table 000000 constant entry external dcl 2-197 create_token$protected 000000 constant entry external dcl 2-199 cross_reference_node internal static bit(9) initial dcl 19-5 dec_integer_type internal static bit(36) initial dcl 23-71 decbin 000000 constant entry external dcl 2-206 declare 000000 constant entry external dcl 1-41 declare_constant 000000 constant entry external dcl 2-211 declare_constant$bit 000000 constant entry external dcl 2-219 declare_constant$char 000000 constant entry external dcl 2-224 declare_constant$desc 000000 constant entry external dcl 2-229 declare_descriptor 000000 constant entry external dcl 2-239 declare_descriptor$ctl 000000 constant entry external dcl 2-249 declare_descriptor$param 000000 constant entry external dcl 2-259 declare_integer 000000 constant entry external dcl 2-269 declare_picture 000000 constant entry external dcl 2-274 declare_picture_temp 000000 constant entry external dcl 2-279 declare_pointer 000000 constant entry external dcl 2-287 declare_structure 000000 constant entry external dcl 1-44 declare_temporary 000000 constant entry external dcl 2-292 decode_node_id 000000 constant entry external dcl 2-300 decode_source_id 000000 constant entry external dcl 2-306 default_area_size internal static fixed bin(31,0) initial dcl 23-5 default_fix_bin_p internal static fixed bin(31,0) initial dcl 23-5 default_fix_dec_p internal static fixed bin(31,0) initial dcl 23-5 default_flt_bin_p internal static fixed bin(31,0) initial dcl 23-5 default_flt_dec_p internal static fixed bin(31,0) initial dcl 23-5 default_node internal static bit(9) initial dcl 19-5 defined_reference 000000 constant entry external dcl 1-47 delete_file internal static bit(9) initial dcl 17-8 desc_size internal static bit(9) initial dcl 17-8 digit_ internal static fixed bin(3,0) initial dcl 18-5 digit_to_bit internal static bit(9) initial dcl 17-8 div internal static bit(9) initial dcl 17-8 do_fun internal static bit(9) initial dcl 17-8 do_semantics 000000 constant entry external dcl 1-57 do_spec internal static bit(9) initial dcl 17-8 e_format internal static bit(9) initial dcl 17-8 empty_area internal static bit(9) initial dcl 17-8 enable_on internal static bit(9) initial dcl 17-8 entry_var_type internal static bit(36) initial dcl 23-71 environmentptr_fun internal static bit(9) initial dcl 17-8 eq internal static bit(9) initial dcl 20-3 equal internal static bit(9) initial dcl 17-8 error 000000 constant entry external dcl 2-314 error$omit_text 000000 constant entry external dcl 2-319 error_ 000000 constant entry external dcl 2-324 error_$finish 000000 constant entry external dcl 2-343 error_$initialize_error 000000 constant entry external dcl 2-341 error_$no_text 000000 constant entry external dcl 2-334 ex_prologue internal static bit(9) initial dcl 17-8 exp internal static bit(9) initial dcl 17-8 exp_fun internal static bit(9) initial dcl 17-8 expand_assign 000000 constant entry external dcl 1-62 expand_by_name 000000 constant entry external dcl 1-71 expand_infix 000000 constant entry external dcl 1-76 expand_initial 000000 constant entry external dcl 1-84 expand_prefix 000000 constant entry external dcl 1-89 expand_primitive 000000 constant entry external dcl 1-97 expon internal static bit(9) initial dcl 20-3 f_format internal static bit(9) initial dcl 17-8 fill_refer 000000 constant entry external dcl 1-113 fixed builtin function dcl 24 fixed_bin internal static bit(9) initial dcl 20-3 fixed_dec internal static bit(9) initial dcl 20-3 float_bin internal static bit(9) initial dcl 20-3 float_dec internal static bit(9) initial dcl 20-3 floor_fun internal static bit(9) initial dcl 17-8 format_value_node internal static bit(9) initial dcl 19-5 fortran_read internal static bit(9) initial dcl 17-8 fortran_write internal static bit(9) initial dcl 17-8 free_based internal static bit(9) initial dcl 17-8 free_ctl internal static bit(9) initial dcl 17-8 free_node 000000 constant entry external dcl 2-345 free_var internal static bit(9) initial dcl 17-8 ftn_file_manip internal static bit(9) initial dcl 17-8 ftn_trans_loop internal static bit(9) initial dcl 17-8 function 000000 constant entry external dcl 1-125 ge internal static bit(9) initial dcl 20-3 generic_selector 000000 constant entry external dcl 1-134 get_array_size 000000 constant entry external dcl 2-348 get_data_trans internal static bit(9) initial dcl 17-8 get_edit_trans internal static bit(9) initial dcl 17-8 get_file internal static bit(9) initial dcl 17-8 get_list_trans internal static bit(9) initial dcl 17-8 get_size 000000 constant entry external dcl 2-352 get_string internal static bit(9) initial dcl 17-8 greater_or_equal internal static bit(9) initial dcl 17-8 greater_than internal static bit(9) initial dcl 17-8 gt internal static bit(9) initial dcl 20-3 half_ internal static fixed bin(3,0) initial dcl 18-5 half_to_word internal static bit(9) initial dcl 17-8 i_bin_integer internal static bit(9) initial dcl 20-3 i_dec_integer internal static bit(9) initial dcl 20-3 i_fixed_bin internal static bit(9) initial dcl 20-3 i_fixed_dec internal static bit(9) initial dcl 20-3 i_float_bin internal static bit(9) initial dcl 20-3 i_float_dec internal static bit(9) initial dcl 20-3 identifier internal static bit(9) initial dcl 20-3 imag_fun internal static bit(9) initial dcl 17-8 index_after_fun internal static bit(9) initial dcl 17-8 index_before_fun internal static bit(9) initial dcl 17-8 index_fun internal static bit(9) initial dcl 17-8 index_rev_fun internal static bit(9) initial dcl 17-8 io_data_list_semantics 000000 constant entry external dcl 1-143 io_data_list_semantics$format_list_semantics 000000 constant entry external dcl 1-120 io_semantics 000000 constant entry external dcl 1-148 is_arith_constant internal static bit(9) initial dcl 20-47 is_arithmetic_constant internal static bit(9) initial dcl 20-47 is_constant internal static bit(9) initial dcl 20-47 is_decimal_constant internal static bit(9) initial dcl 20-47 is_delimiter internal static bit(9) initial dcl 20-47 is_float_constant internal static bit(9) initial dcl 20-47 is_identifier internal static bit(9) initial dcl 20-47 is_imaginary_constant internal static bit(9) initial dcl 20-47 is_integral_constant internal static bit(9) initial dcl 20-47 is_isub internal static bit(9) initial dcl 20-47 isub internal static bit(9) initial dcl 20-3 join internal static bit(9) initial dcl 17-8 jump internal static bit(9) initial dcl 17-8 jump_false internal static bit(9) initial dcl 17-8 jump_if_eq internal static bit(9) initial dcl 17-8 jump_if_ge internal static bit(9) initial dcl 17-8 jump_if_gt internal static bit(9) initial dcl 17-8 jump_if_le internal static bit(9) initial dcl 17-8 jump_if_lt internal static bit(9) initial dcl 17-8 jump_if_ne internal static bit(9) initial dcl 17-8 jump_true internal static bit(9) initial dcl 17-8 l_parn internal static bit(9) initial dcl 17-8 label_array_element_node internal static bit(9) initial dcl 19-5 le internal static bit(9) initial dcl 20-3 left_parn internal static bit(9) initial dcl 20-3 length_fun internal static bit(9) initial dcl 17-8 less_or_equal internal static bit(9) initial dcl 17-8 less_than internal static bit(9) initial dcl 17-8 line_format internal static bit(9) initial dcl 17-8 list_node internal static bit(9) initial dcl 19-5 local_label_var_type internal static bit(36) initial dcl 23-71 locate_file internal static bit(9) initial dcl 17-8 lock_file internal static bit(9) initial dcl 17-8 lock_fun internal static bit(9) initial dcl 17-8 log10_fun internal static bit(9) initial dcl 17-8 log2_fun internal static bit(9) initial dcl 17-8 log_fun internal static bit(9) initial dcl 17-8 lookup 000000 constant entry external dcl 1-153 loop internal static bit(9) initial dcl 17-8 lt internal static bit(9) initial dcl 20-3 machine_state_node internal static bit(9) initial dcl 19-5 make_desc internal static bit(9) initial dcl 17-8 make_non_quick 000000 constant entry external dcl 1-162 match_arguments 000000 constant entry external dcl 1-166 max_area_size internal static fixed bin(31,0) initial dcl 23-5 max_bit_string internal static fixed bin(31,0) initial dcl 23-5 max_bit_string_constant internal static fixed bin(31,0) initial dcl 23-5 max_block_number internal static fixed bin(17,0) initial dcl 8-74 max_char_string internal static fixed bin(31,0) initial dcl 23-5 max_char_string_constant internal static fixed bin(31,0) initial dcl 23-5 max_fun internal static bit(9) initial dcl 17-8 max_identifier_length internal static fixed bin(31,0) initial dcl 23-5 max_index_register_value internal static fixed bin(31,0) initial dcl 23-5 max_length_precision internal static fixed bin(31,0) initial dcl 23-5 max_list_elements internal static fixed bin(17,0) initial dcl 14-12 max_number_of_dimensions internal static fixed bin(31,0) initial dcl 23-5 max_number_of_operands internal static fixed bin(15,0) initial dcl 16-15 max_offset_precision internal static fixed bin(31,0) initial dcl 23-5 max_p_bin_or_dec internal static fixed bin(31,0) initial dcl 23-5 max_p_dec internal static fixed bin(31,0) initial dcl 23-5 max_p_fix_bin_1 internal static fixed bin(31,0) initial dcl 23-5 max_p_fix_bin_2 internal static fixed bin(31,0) initial dcl 23-5 max_p_flt_bin_1 internal static fixed bin(31,0) initial dcl 23-5 max_p_flt_bin_2 internal static fixed bin(31,0) initial dcl 23-5 max_scale internal static fixed bin(31,0) initial dcl 23-5 max_signed_index_register_value internal static fixed bin(31,0) initial dcl 23-5 max_signed_xreg_precision internal static fixed bin(31,0) initial dcl 23-5 max_uns_xreg_precision internal static fixed bin(31,0) initial dcl 23-5 max_words_per_variable internal static fixed bin(31,0) initial dcl 23-5 merge_attributes 000000 constant entry external dcl 2-355 min_area_size internal static fixed bin(31,0) initial dcl 23-5 min_fun internal static bit(9) initial dcl 17-8 min_scale internal static fixed bin(31,0) initial dcl 23-5 minus internal static bit(9) initial dcl 20-3 mod2_ internal static fixed bin(3,0) initial dcl 18-5 mod4_ internal static fixed bin(3,0) initial dcl 18-5 mod_fun internal static bit(9) initial dcl 17-8 mod_word internal static bit(9) initial dcl 17-8 ne internal static bit(9) initial dcl 20-3 ngt internal static bit(9) initial dcl 20-3 nlt internal static bit(9) initial dcl 20-3 no_token internal static bit(9) initial dcl 20-3 nop internal static bit(9) initial dcl 17-8 not internal static bit(9) initial dcl 20-3 not_bits internal static bit(9) initial dcl 17-8 not_equal internal static bit(9) initial dcl 17-8 off_fun internal static bit(9) initial dcl 17-8 open_file internal static bit(9) initial dcl 17-8 operator_semantics ----------------------------------------------------------- Historical Background This edition of the Multics software materials and documentation is provided and donated to Massachusetts Institute of Technology by Group BULL including BULL HN Information Systems Inc. as a contribution to computer science knowledge. This donation is made also to give evidence of the common contributions of Massachusetts Institute of Technology, Bell Laboratories, General Electric, Honeywell Information Systems Inc., Honeywell BULL Inc., Groupe BULL and BULL HN Information Systems Inc. to the development of this operating system. Multics development was initiated by Massachusetts Institute of Technology Project MAC (1963-1970), renamed the MIT Laboratory for Computer Science and Artificial Intelligence in the mid 1970s, under the leadership of Professor Fernando Jose Corbato. Users consider that Multics provided the best software architecture for managing computer hardware properly and for executing programs. Many subsequent operating systems incorporated Multics principles. Multics was distributed in 1975 to 2000 by Group Bull in Europe , and in the U.S. by Bull HN Information Systems Inc., as successor in interest by change in name only to Honeywell Bull Inc. and Honeywell Information Systems Inc. . ----------------------------------------------------------- Permission to use, copy, modify, and distribute these programs and their documentation for any purpose and without fee is hereby granted,provided that the below copyright notice and historical background appear in all copies and that both the copyright notice and historical background and this permission notice appear in supporting documentation, and that the names of MIT, HIS, BULL or BULL HN not be used in advertising or publicity pertaining to distribution of the programs without specific prior written permission. Copyright 1972 by Massachusetts Institute of Technology and Honeywell Information Systems Inc. Copyright 2006 by BULL HN Information Systems Inc. Copyright 2006 by Bull SAS All Rights Reserved