dcl	1 basic_operators_frame	aligned based(bo_pt),
	2 pr(0:7)			ptr,
	2 prev_sp			ptr,
	2 next_sp			ptr,
	2 return_ptr		ptr,
	2 entry_ptr		ptr,
	2 operator_and_lp_ptr	ptr,
	2 arglist_ptr		ptr,
	2 reserved		bit(72),
	2 on_unit_relp(2)		bit(18) unaligned,
	2 translator_id		bit(18) unaligned,
	2 operator_return_offset	bit(18) unaligned,
	2 regs,
	  3 xr(0:7)		bit(18) unaligned,
	  3 (a_reg,q_reg)		fixed bin(35),
	  3 rest_of_regs(2)		bit(36) aligned,
	2 print_using_pt		ptr,		/* N.B. this holds return loc, pos in struc must be the same
						   as for ep basic as debuggers depend on this */
	2 abort_label		label,
	2 conversion_label		label,
	2 size_label		label,
	2 on_units(2),
	  3 name			ptr,
	  3 body			ptr,
	  3 size			fixed bin,
	  3 next			fixed bin,
	2 program_header		ptr,
	2 text_base_ptr		ptr,
	2 string_segment		ptr,
	2 fcb_pt			ptr,
	2 arglist1(2)		ptr,
	2 runtime_arglist(2)	ptr,
	2 cpu_start		fixed bin(71),
	2 determinant		float bin(63),
	2 fcb(0:16)		ptr unaligned,
	2 precision_lng 		fixed bin(17) unaligned,
	2 file_number		fixed bin(17) unaligned,
	2 (error_number,pdl)	fixed bin,
	2 program_header_offset	bit(18) aligned,
	2 numeric_data		unaligned,
	  3 (finish,start)		fixed bin(17),
	2 string_data		unaligned,
	  3 (finish,start)		fixed bin(17),
	2 random			fixed bin,
	2 first_frame		bit(18),
	2 last_frame		bit(18),
	2 next_frame		bit(18),
	2 number_read		fixed bin,
	2 (pu_pos,pu_length)	fixed bin,
	2 definitions		ptr unal,
	2 fn_temp1		fixed bin,
	2 fn_temp2		fixed bin,
	2 entryname		ptr unal,
	2 flags			unaligned,
	  3 non_basic_caller	bit(1),
	  3 main_program		bit(1),
	  3 quits_disabled		bit(1),
	  3 had_quit		bit(1),
	  3 ignore_handler		bit(1),
	  3 filler		bit(13),
	2 number_length		fixed bin(17) unaligned,
	2 string_value		bit(36),
	2 temporaries(3)		aligned,
	  3 temp			float bin,
	  3 tpad			bit(36),
	2 arg(1)			ptr;

dcl	1 d_basic_operators_frame	aligned based(bo_pt),
	2 x_pr(0:7)			ptr,
	2 x_prev_sp			ptr,
	2 x_next_sp			ptr,
	2 x_return_ptr		ptr,
	2 x_entry_ptr		ptr,
	2 x_operator_and_lp_ptr	ptr,
	2 x_arglist_ptr		ptr,
	2 x_reserved		bit(72),
	2 x_on_unit_relp(2)		bit(18) unaligned,
	2 x_translator_id		bit(18) unaligned,
	2 x_operator_return_offset	bit(18) unaligned,
	2 x_regs,
	  3 x_xr(0:7)		bit(18) unaligned,
	  3 (x_a_reg,x_q_reg)	fixed bin,
	  3 x_rest_of_regs(2)		bit(36) aligned,
	2 x_print_using_pt		ptr,
	2 x_abort_label		label,
	2 x_conversion_label		label,
	2 x_size_label		label,
	2 x_on_units(2),
	  3 x_name			ptr,
	  3 x_body			ptr,
	  3 x_size			fixed bin,
	  3 x_next			fixed bin,
	2 x_program_header		ptr,
	2 x_text_base_ptr		ptr,
	2 x_string_segment		ptr,
	2 x_fcb_pt			ptr,
	2 x_arglist1(2)		ptr,
	2 x_runtime_arglist(2)	ptr,
	2 x_cpu_start		fixed bin(71),
	2 x_determinant		float bin(63),
	2 x_fcb(0:16)		ptr unaligned,
	2 x_precision_lng 		fixed bin(17) unaligned,
	2 x_file_number		fixed bin(17) unaligned,
	2 x_error_number		fixed bin,
	2 x_pdl			fixed bin,
	2 x_program_header_offset	bit(18) aligned,
	2 x_numeric_data		unaligned,
	  3 (x_finish,x_start)	fixed bin(17),
	2 x_string_data		unaligned,
	  3 (x_finish,x_start)	fixed bin(17),
	2 x_random			fixed bin,
	2 x_first_frame		bit(18),
	2 x_last_frame		bit(18),
	2 x_next_frame		bit(18),
	2 x_number_read		fixed bin,
	2 (x_pu_pos,x_pu_length)	fixed bin,
	2 x_definitions		ptr unal,
	2 x_fn_temp1		fixed bin,
	2 x_fn_temp2		fixed bin,
	2 x_entryname		ptr unal,
	2 x_flags			unaligned,
	  3 x_non_basic_caller	bit(1),
	  3 x_main_program		bit(1),
	  3 x_quits_disabled		bit(1),
	  3 x_had_quit		bit(1),
	  3 x_filler		bit(14),
	2 x_number_length		fixed bin(17) unaligned,
	2 x_string_value		bit(36),
	2 d_temp(3)		float bin(63),
	2 x_arg(1)			ptr;


*/
                                          -----------------------------------------------------------


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

*/