      set_link_options link_map=$fname(map_file_string//'.$eoi') ..
            starting_segment=13 build_level=version_id ..
            exchange_package_variable=jmv$jmtr_xcb ..
            create_only_predefined_segments=true ..
            cybil_parameter_checking=source

      initialize_build_level name=osv$os_defaults_os_name
      initialize_heap_pointer osv$mainframe_pageable_heap ..
        segment_number=pageable_segment
      initialize_heap_pointer osv$job_fixed_heap segment_number=3
      initialize_heap_pointer nav$network_paged_heap segment_number=21

      add_object_file $fname(ol_system_core_113) ring_brackets=(1, 1, 3) ..
        global_local_key=(0, 0) execute_privilege=local default_sections=(..
        (re_113, r, e), (rb_xxx, r, b), (re_113, r), (rw_113, r, w))
      add_object_file $fname(ol_system_core_133) ring_brackets=(1, 3, 3) ..
        global_local_key=(0, 0) execute_privilege=local default_sections=(..
        (re_13x, r, e), (rb_xxx, r, b), (re_13x, r), (rw_13x, r, w))
      add_object_file $fname(ol_system_core_13d) ring_brackets=(1, 3, 13) ..
        global_local_key=(0, 0) execute_privilege=local default_sections=(..
        (re_13x, r, e), (rb_xxx, r, b), (re_13x, r), (rw_13x, r, w))
      add_object_file $fname(ol_system_core_1dd) ring_brackets=(1, 13, 13) ..
        global_local_key=(0, 0) execute_privilege=local default_sections=(..
        (re_1dd, r, e), (rb_xxx, r, b), (re_1dd, r) (rw_1dd, r, w))

      " The following defines a segment common between mtr and job.
      " It is defined and mtr and is just reserved here (it is a dummy)
      define_segment attributes=(ex) ring_brackets=(1, 3, 3) ..
        number=12(16)
      define_segment attributes=(rd, wt) ring_brackets=(1, 3, 3) ..
        number=pageable_segment section_names=(rw_113,oss$mainframe_pageable,..
        oss$job_pageable) global_local_key=(0, 0)
      define_segment attributes=(rd, wt, cb) ring_brackets=(1, 3, 3) number=3 ..
        section_name=(oss$job_fixed) global_local_key=(0, 0)
      define_segment attributes=(bi) ring_brackets=(1,13,13) number=0e(16) ..
        section_names=(rb_xxx) global_local_key=(0,0)
      define_segment attributes=(rd, lp) ring_brackets=(1, 13, 13) number=20 ..
        section_names=(re_1dd, cys$run_time_space, readonly, ..
        oss$mainframe_paged_literal, r_1dd, re_1dd , rw_1dd ) global_local_key=(0,0)
      define_segment attributes=(rd, lp) ring_brackets=(1, 1, 3) number=13 ..
        section_name=(re_113) global_local_key=(0,0)
      define_segment attributes=(rd, lp) ring_brackets=(1, 3, 3) number=19 ..
        section_name=(re_13x) global_local_key=(0,0)
      define_segment attributes=(rd, wt) ring_brackets=(3, 3, 3) number=21 ..
        section_name=(oss$network_paged) global_local_key=(0,0)
      define_segment attributes=(rd wt et) ring_brackets=(1, 1, 1) number=0f(16) ..
        section_name=(jstack1) global_local_key=(0,0)
      define_segment attributes=(rd wt et) ring_brackets=(1, 1, 1) number=10(16) ..
        section_name=(jstack2) global_local_key=(0,0)
      define_segment attributes=(rd wt et) ring_brackets=(1, 1, 1) number=11(16) ..
        section_name=(jstack3) global_local_key=(0,0)
      define_segment attributes=(rd wt) ring_brackets=(1, 1, 1) number=16(16) ..
        section_name=(mls$mem_link) global_local_key=(0,0)
      define_segment attributes=(rd) ring_brackets=(13, 13, 13) number=17(16) ..
        section_name=(mlsreadl) global_local_key=(0,0)

      use_symbol_table $fname(monitor_symbols_string)
      set_symbol_table_id $fname(monitor_symbols_string)
      use_debug_table $fname(monitor_debug_table)
      generate_virtual_memory $fname(system_virtual_memory_string) ..
        symbol_table=$fname(system_symbols_string) ..
        debug_table=$fname(system_core_debug_table)
