require '_h2ph_pre.ph';

no warnings qw(redefine misc);

unless(defined(&_TERM_H_)) {
    eval 'sub _TERM_H_ () {1;}' unless defined(&_TERM_H_);
    unless(defined(&ERR)) {
	eval 'sub ERR () {(-1);}' unless defined(&ERR);
	eval 'sub OK () {(0);}' unless defined(&OK);
    }
    eval("sub TICODE_bw () { 0; }") unless defined(&TICODE_bw);
    eval("sub TICODE_am () { 1; }") unless defined(&TICODE_am);
    eval("sub TICODE_bce () { 2; }") unless defined(&TICODE_bce);
    eval("sub TICODE_ccc () { 3; }") unless defined(&TICODE_ccc);
    eval("sub TICODE_xhp () { 4; }") unless defined(&TICODE_xhp);
    eval("sub TICODE_xhpa () { 5; }") unless defined(&TICODE_xhpa);
    eval("sub TICODE_cpix () { 6; }") unless defined(&TICODE_cpix);
    eval("sub TICODE_crxm () { 7; }") unless defined(&TICODE_crxm);
    eval("sub TICODE_xt () { 8; }") unless defined(&TICODE_xt);
    eval("sub TICODE_xenl () { 9; }") unless defined(&TICODE_xenl);
    eval("sub TICODE_eo () { 10; }") unless defined(&TICODE_eo);
    eval("sub TICODE_gn () { 11; }") unless defined(&TICODE_gn);
    eval("sub TICODE_hc () { 12; }") unless defined(&TICODE_hc);
    eval("sub TICODE_chts () { 13; }") unless defined(&TICODE_chts);
    eval("sub TICODE_km () { 14; }") unless defined(&TICODE_km);
    eval("sub TICODE_daisy () { 15; }") unless defined(&TICODE_daisy);
    eval("sub TICODE_hs () { 16; }") unless defined(&TICODE_hs);
    eval("sub TICODE_hls () { 17; }") unless defined(&TICODE_hls);
    eval("sub TICODE_in () { 18; }") unless defined(&TICODE_in);
    eval("sub TICODE_lpix () { 19; }") unless defined(&TICODE_lpix);
    eval("sub TICODE_da () { 20; }") unless defined(&TICODE_da);
    eval("sub TICODE_db () { 21; }") unless defined(&TICODE_db);
    eval("sub TICODE_mir () { 22; }") unless defined(&TICODE_mir);
    eval("sub TICODE_msgr () { 23; }") unless defined(&TICODE_msgr);
    eval("sub TICODE_nxon () { 24; }") unless defined(&TICODE_nxon);
    eval("sub TICODE_xsb () { 25; }") unless defined(&TICODE_xsb);
    eval("sub TICODE_npc () { 26; }") unless defined(&TICODE_npc);
    eval("sub TICODE_ndscr () { 27; }") unless defined(&TICODE_ndscr);
    eval("sub TICODE_nrrmc () { 28; }") unless defined(&TICODE_nrrmc);
    eval("sub TICODE_os () { 29; }") unless defined(&TICODE_os);
    eval("sub TICODE_mc5i () { 30; }") unless defined(&TICODE_mc5i);
    eval("sub TICODE_xvpa () { 31; }") unless defined(&TICODE_xvpa);
    eval("sub TICODE_sam () { 32; }") unless defined(&TICODE_sam);
    eval("sub TICODE_eslok () { 33; }") unless defined(&TICODE_eslok);
    eval("sub TICODE_hz () { 34; }") unless defined(&TICODE_hz);
    eval("sub TICODE_ul () { 35; }") unless defined(&TICODE_ul);
    eval("sub TICODE_xon () { 36; }") unless defined(&TICODE_xon);
    eval 'sub TIFLAGMAX () { &TICODE_xon;}' unless defined(&TIFLAGMAX);
    eval 'sub t_auto_left_margin {
        my($t) = @_;
	    eval q(($t)-> $flags[ &TICODE_bw]);
    }' unless defined(&t_auto_left_margin);
    eval 'sub t_auto_right_margin {
        my($t) = @_;
	    eval q(($t)-> $flags[ &TICODE_am]);
    }' unless defined(&t_auto_right_margin);
    eval 'sub t_back_color_erase {
        my($t) = @_;
	    eval q(($t)-> $flags[ &TICODE_bce]);
    }' unless defined(&t_back_color_erase);
    eval 'sub t_can_change {
        my($t) = @_;
	    eval q(($t)-> $flags[ &TICODE_ccc]);
    }' unless defined(&t_can_change);
    eval 'sub t_ceol_standout_glitch {
        my($t) = @_;
	    eval q(($t)-> $flags[ &TICODE_xhp]);
    }' unless defined(&t_ceol_standout_glitch);
    eval 'sub t_col_addr_glitch {
        my($t) = @_;
	    eval q(($t)-> $flags[ &TICODE_xhpa]);
    }' unless defined(&t_col_addr_glitch);
    eval 'sub t_cpi_changes_res {
        my($t) = @_;
	    eval q(($t)-> $flags[ &TICODE_cpix]);
    }' unless defined(&t_cpi_changes_res);
    eval 'sub t_cr_cancels_micro_mode {
        my($t) = @_;
	    eval q(($t)-> $flags[ &TICODE_crxm]);
    }' unless defined(&t_cr_cancels_micro_mode);
    eval 'sub t_dest_tabs_magic_smso {
        my($t) = @_;
	    eval q(($t)-> $flags[ &TICODE_xt]);
    }' unless defined(&t_dest_tabs_magic_smso);
    eval 'sub t_eat_newline_glitch {
        my($t) = @_;
	    eval q(($t)-> $flags[ &TICODE_xenl]);
    }' unless defined(&t_eat_newline_glitch);
    eval 'sub t_erase_overstrike {
        my($t) = @_;
	    eval q(($t)-> $flags[ &TICODE_eo]);
    }' unless defined(&t_erase_overstrike);
    eval 'sub t_generic_type {
        my($t) = @_;
	    eval q(($t)-> $flags[ &TICODE_gn]);
    }' unless defined(&t_generic_type);
    eval 'sub t_hard_copy {
        my($t) = @_;
	    eval q(($t)-> $flags[ &TICODE_hc]);
    }' unless defined(&t_hard_copy);
    eval 'sub t_hard_cursor {
        my($t) = @_;
	    eval q(($t)-> $flags[ &TICODE_chts]);
    }' unless defined(&t_hard_cursor);
    eval 'sub t_has_meta_key {
        my($t) = @_;
	    eval q(($t)-> $flags[ &TICODE_km]);
    }' unless defined(&t_has_meta_key);
    eval 'sub t_has_print_wheel {
        my($t) = @_;
	    eval q(($t)-> $flags[ &TICODE_daisy]);
    }' unless defined(&t_has_print_wheel);
    eval 'sub t_has_status_line {
        my($t) = @_;
	    eval q(($t)-> $flags[ &TICODE_hs]);
    }' unless defined(&t_has_status_line);
    eval 'sub t_hue_light_saturation {
        my($t) = @_;
	    eval q(($t)-> $flags[ &TICODE_hls]);
    }' unless defined(&t_hue_light_saturation);
    eval 'sub t_insert_null_glitch {
        my($t) = @_;
	    eval q(($t)-> $flags[ &TICODE_in]);
    }' unless defined(&t_insert_null_glitch);
    eval 'sub t_lpi_changes_yes {
        my($t) = @_;
	    eval q(($t)-> $flags[ &TICODE_lpix]);
    }' unless defined(&t_lpi_changes_yes);
    eval 'sub t_memory_above {
        my($t) = @_;
	    eval q(($t)-> $flags[ &TICODE_da]);
    }' unless defined(&t_memory_above);
    eval 'sub t_memory_below {
        my($t) = @_;
	    eval q(($t)-> $flags[ &TICODE_db]);
    }' unless defined(&t_memory_below);
    eval 'sub t_move_insert_mode {
        my($t) = @_;
	    eval q(($t)-> $flags[ &TICODE_mir]);
    }' unless defined(&t_move_insert_mode);
    eval 'sub t_move_standout_mode {
        my($t) = @_;
	    eval q(($t)-> $flags[ &TICODE_msgr]);
    }' unless defined(&t_move_standout_mode);
    eval 'sub t_needs_xon_xoff {
        my($t) = @_;
	    eval q(($t)-> $flags[ &TICODE_nxon]);
    }' unless defined(&t_needs_xon_xoff);
    eval 'sub t_no_esc_ctlc {
        my($t) = @_;
	    eval q(($t)-> $flags[ &TICODE_xsb]);
    }' unless defined(&t_no_esc_ctlc);
    eval 'sub t_no_pad_char {
        my($t) = @_;
	    eval q(($t)-> $flags[ &TICODE_npc]);
    }' unless defined(&t_no_pad_char);
    eval 'sub t_non_dest_scroll_region {
        my($t) = @_;
	    eval q(($t)-> $flags[ &TICODE_ndscr]);
    }' unless defined(&t_non_dest_scroll_region);
    eval 'sub t_non_rev_rmcup {
        my($t) = @_;
	    eval q(($t)-> $flags[ &TICODE_nrrmc]);
    }' unless defined(&t_non_rev_rmcup);
    eval 'sub t_over_strike {
        my($t) = @_;
	    eval q(($t)-> $flags[ &TICODE_os]);
    }' unless defined(&t_over_strike);
    eval 'sub t_prtr_silent {
        my($t) = @_;
	    eval q(($t)-> $flags[ &TICODE_mc5i]);
    }' unless defined(&t_prtr_silent);
    eval 'sub t_row_addr_glitch {
        my($t) = @_;
	    eval q(($t)-> $flags[ &TICODE_xvpa]);
    }' unless defined(&t_row_addr_glitch);
    eval 'sub t_semi_auto_right_margin {
        my($t) = @_;
	    eval q(($t)-> $flags[ &TICODE_sam]);
    }' unless defined(&t_semi_auto_right_margin);
    eval 'sub t_status_line_esc_ok {
        my($t) = @_;
	    eval q(($t)-> $flags[ &TICODE_eslok]);
    }' unless defined(&t_status_line_esc_ok);
    eval 'sub t_tilde_glitch {
        my($t) = @_;
	    eval q(($t)-> $flags[ &TICODE_hz]);
    }' unless defined(&t_tilde_glitch);
    eval 'sub t_transparent_underline {
        my($t) = @_;
	    eval q(($t)-> $flags[ &TICODE_ul]);
    }' unless defined(&t_transparent_underline);
    eval 'sub t_xon_xoff {
        my($t) = @_;
	    eval q(($t)-> $flags[ &TICODE_xon]);
    }' unless defined(&t_xon_xoff);
    eval 'sub auto_left_margin () { &t_auto_left_margin( &cur_term);}' unless defined(&auto_left_margin);
    eval 'sub auto_right_margin () { &t_auto_right_margin( &cur_term);}' unless defined(&auto_right_margin);
    eval 'sub back_color_erase () { &t_back_color_erase( &cur_term);}' unless defined(&back_color_erase);
    eval 'sub can_change () { &t_can_change( &cur_term);}' unless defined(&can_change);
    eval 'sub ceol_standout_glitch () { &t_ceol_standout_glitch( &cur_term);}' unless defined(&ceol_standout_glitch);
    eval 'sub col_addr_glitch () { &t_col_addr_glitch( &cur_term);}' unless defined(&col_addr_glitch);
    eval 'sub cpi_changes_res () { &t_cpi_changes_res( &cur_term);}' unless defined(&cpi_changes_res);
    eval 'sub cr_cancels_micro_mode () { &t_cr_cancels_micro_mode( &cur_term);}' unless defined(&cr_cancels_micro_mode);
    eval 'sub dest_tabs_magic_smso () { &t_dest_tabs_magic_smso( &cur_term);}' unless defined(&dest_tabs_magic_smso);
    eval 'sub eat_newline_glitch () { &t_eat_newline_glitch( &cur_term);}' unless defined(&eat_newline_glitch);
    eval 'sub erase_overstrike () { &t_erase_overstrike( &cur_term);}' unless defined(&erase_overstrike);
    eval 'sub generic_type () { &t_generic_type( &cur_term);}' unless defined(&generic_type);
    eval 'sub hard_copy () { &t_hard_copy( &cur_term);}' unless defined(&hard_copy);
    eval 'sub hard_cursor () { &t_hard_cursor( &cur_term);}' unless defined(&hard_cursor);
    eval 'sub has_meta_key () { &t_has_meta_key( &cur_term);}' unless defined(&has_meta_key);
    eval 'sub has_print_wheel () { &t_has_print_wheel( &cur_term);}' unless defined(&has_print_wheel);
    eval 'sub has_status_line () { &t_has_status_line( &cur_term);}' unless defined(&has_status_line);
    eval 'sub hue_light_saturation () { &t_hue_light_saturation( &cur_term);}' unless defined(&hue_light_saturation);
    eval 'sub insert_null_glitch () { &t_insert_null_glitch( &cur_term);}' unless defined(&insert_null_glitch);
    eval 'sub lpi_changes_yes () { &t_lpi_changes_yes( &cur_term);}' unless defined(&lpi_changes_yes);
    eval 'sub memory_above () { &t_memory_above( &cur_term);}' unless defined(&memory_above);
    eval 'sub memory_below () { &t_memory_below( &cur_term);}' unless defined(&memory_below);
    eval 'sub move_insert_mode () { &t_move_insert_mode( &cur_term);}' unless defined(&move_insert_mode);
    eval 'sub move_standout_mode () { &t_move_standout_mode( &cur_term);}' unless defined(&move_standout_mode);
    eval 'sub needs_xon_xoff () { &t_needs_xon_xoff( &cur_term);}' unless defined(&needs_xon_xoff);
    eval 'sub no_esc_ctlc () { &t_no_esc_ctlc( &cur_term);}' unless defined(&no_esc_ctlc);
    eval 'sub no_pad_char () { &t_no_pad_char( &cur_term);}' unless defined(&no_pad_char);
    eval 'sub non_dest_scroll_region () { &t_non_dest_scroll_region( &cur_term);}' unless defined(&non_dest_scroll_region);
    eval 'sub non_rev_rmcup () { &t_non_rev_rmcup( &cur_term);}' unless defined(&non_rev_rmcup);
    eval 'sub over_strike () { &t_over_strike( &cur_term);}' unless defined(&over_strike);
    eval 'sub prtr_silent () { &t_prtr_silent( &cur_term);}' unless defined(&prtr_silent);
    eval 'sub row_addr_glitch () { &t_row_addr_glitch( &cur_term);}' unless defined(&row_addr_glitch);
    eval 'sub semi_auto_right_margin () { &t_semi_auto_right_margin( &cur_term);}' unless defined(&semi_auto_right_margin);
    eval 'sub status_line_esc_ok () { &t_status_line_esc_ok( &cur_term);}' unless defined(&status_line_esc_ok);
    eval 'sub tilde_glitch () { &t_tilde_glitch( &cur_term);}' unless defined(&tilde_glitch);
    eval 'sub transparent_underline () { &t_transparent_underline( &cur_term);}' unless defined(&transparent_underline);
    eval 'sub xon_xoff () { &t_xon_xoff( &cur_term);}' unless defined(&xon_xoff);
    eval("sub TICODE_bitwin () { 0; }") unless defined(&TICODE_bitwin);
    eval("sub TICODE_bitype () { 1; }") unless defined(&TICODE_bitype);
    eval("sub TICODE_bufsz () { 2; }") unless defined(&TICODE_bufsz);
    eval("sub TICODE_btns () { 3; }") unless defined(&TICODE_btns);
    eval("sub TICODE_cols () { 4; }") unless defined(&TICODE_cols);
    eval("sub TICODE_spinh () { 5; }") unless defined(&TICODE_spinh);
    eval("sub TICODE_spinv () { 6; }") unless defined(&TICODE_spinv);
    eval("sub TICODE_it () { 7; }") unless defined(&TICODE_it);
    eval("sub TICODE_lh () { 8; }") unless defined(&TICODE_lh);
    eval("sub TICODE_lw () { 9; }") unless defined(&TICODE_lw);
    eval("sub TICODE_lines () { 10; }") unless defined(&TICODE_lines);
    eval("sub TICODE_lm () { 11; }") unless defined(&TICODE_lm);
    eval("sub TICODE_ma () { 12; }") unless defined(&TICODE_ma);
    eval("sub TICODE_xmc () { 13; }") unless defined(&TICODE_xmc);
    eval("sub TICODE_colors () { 14; }") unless defined(&TICODE_colors);
    eval("sub TICODE_maddr () { 15; }") unless defined(&TICODE_maddr);
    eval("sub TICODE_mjump () { 16; }") unless defined(&TICODE_mjump);
    eval("sub TICODE_pairs () { 17; }") unless defined(&TICODE_pairs);
    eval("sub TICODE_wnum () { 18; }") unless defined(&TICODE_wnum);
    eval("sub TICODE_mcs () { 19; }") unless defined(&TICODE_mcs);
    eval("sub TICODE_mls () { 20; }") unless defined(&TICODE_mls);
    eval("sub TICODE_ncv () { 21; }") unless defined(&TICODE_ncv);
    eval("sub TICODE_nlab () { 22; }") unless defined(&TICODE_nlab);
    eval("sub TICODE_npins () { 23; }") unless defined(&TICODE_npins);
    eval("sub TICODE_orc () { 24; }") unless defined(&TICODE_orc);
    eval("sub TICODE_orl () { 25; }") unless defined(&TICODE_orl);
    eval("sub TICODE_orhi () { 26; }") unless defined(&TICODE_orhi);
    eval("sub TICODE_orvi () { 27; }") unless defined(&TICODE_orvi);
    eval("sub TICODE_pb () { 28; }") unless defined(&TICODE_pb);
    eval("sub TICODE_cps () { 29; }") unless defined(&TICODE_cps);
    eval("sub TICODE_vt () { 30; }") unless defined(&TICODE_vt);
    eval("sub TICODE_widcs () { 31; }") unless defined(&TICODE_widcs);
    eval("sub TICODE_wsl () { 32; }") unless defined(&TICODE_wsl);
    eval 'sub TINUMMAX () { &TICODE_wsl;}' unless defined(&TINUMMAX);
    eval 'sub t_bit_image_entwining {
        my($t) = @_;
	    eval q(($t)-> $nums[ &TICODE_bitwin]);
    }' unless defined(&t_bit_image_entwining);
    eval 'sub t_bit_image_type {
        my($t) = @_;
	    eval q(($t)-> $nums[ &TICODE_bitype]);
    }' unless defined(&t_bit_image_type);
    eval 'sub t_buffer_capacity {
        my($t) = @_;
	    eval q(($t)-> $nums[ &TICODE_bufsz]);
    }' unless defined(&t_buffer_capacity);
    eval 'sub t_buttons {
        my($t) = @_;
	    eval q(($t)-> $nums[ &TICODE_btns]);
    }' unless defined(&t_buttons);
    eval 'sub t_columns {
        my($t) = @_;
	    eval q(($t)-> $nums[ &TICODE_cols]);
    }' unless defined(&t_columns);
    eval 'sub t_dot_horz_spacing {
        my($t) = @_;
	    eval q(($t)-> $nums[ &TICODE_spinh]);
    }' unless defined(&t_dot_horz_spacing);
    eval 'sub t_dot_vert_spacing {
        my($t) = @_;
	    eval q(($t)-> $nums[ &TICODE_spinv]);
    }' unless defined(&t_dot_vert_spacing);
    eval 'sub t_init_tabs {
        my($t) = @_;
	    eval q(($t)-> $nums[ &TICODE_it]);
    }' unless defined(&t_init_tabs);
    eval 'sub t_label_height {
        my($t) = @_;
	    eval q(($t)-> $nums[ &TICODE_lh]);
    }' unless defined(&t_label_height);
    eval 'sub t_label_width {
        my($t) = @_;
	    eval q(($t)-> $nums[ &TICODE_lw]);
    }' unless defined(&t_label_width);
    eval 'sub t_lines {
        my($t) = @_;
	    eval q(($t)-> $nums[ &TICODE_lines]);
    }' unless defined(&t_lines);
    eval 'sub t_lines_of_memory {
        my($t) = @_;
	    eval q(($t)-> $nums[ &TICODE_lm]);
    }' unless defined(&t_lines_of_memory);
    eval 'sub t_max_attributes {
        my($t) = @_;
	    eval q(($t)-> $nums[ &TICODE_ma]);
    }' unless defined(&t_max_attributes);
    eval 'sub t_magic_cookie_glitch {
        my($t) = @_;
	    eval q(($t)-> $nums[ &TICODE_xmc]);
    }' unless defined(&t_magic_cookie_glitch);
    eval 'sub t_max_colors {
        my($t) = @_;
	    eval q(($t)-> $nums[ &TICODE_colors]);
    }' unless defined(&t_max_colors);
    eval 'sub t_max_micro_address {
        my($t) = @_;
	    eval q(($t)-> $nums[ &TICODE_maddr]);
    }' unless defined(&t_max_micro_address);
    eval 'sub t_max_micro_jump {
        my($t) = @_;
	    eval q(($t)-> $nums[ &TICODE_mjump]);
    }' unless defined(&t_max_micro_jump);
    eval 'sub t_max_pairs {
        my($t) = @_;
	    eval q(($t)-> $nums[ &TICODE_pairs]);
    }' unless defined(&t_max_pairs);
    eval 'sub t_maximum_windows {
        my($t) = @_;
	    eval q(($t)-> $nums[ &TICODE_wnum]);
    }' unless defined(&t_maximum_windows);
    eval 'sub t_micro_col_size {
        my($t) = @_;
	    eval q(($t)-> $nums[ &TICODE_mcs]);
    }' unless defined(&t_micro_col_size);
    eval 'sub t_micro_line_size {
        my($t) = @_;
	    eval q(($t)-> $nums[ &TICODE_mls]);
    }' unless defined(&t_micro_line_size);
    eval 'sub t_no_color_video {
        my($t) = @_;
	    eval q(($t)-> $nums[ &TICODE_ncv]);
    }' unless defined(&t_no_color_video);
    eval 'sub t_num_labels {
        my($t) = @_;
	    eval q(($t)-> $nums[ &TICODE_nlab]);
    }' unless defined(&t_num_labels);
    eval 'sub t_number_of_pins {
        my($t) = @_;
	    eval q(($t)-> $nums[ &TICODE_npins]);
    }' unless defined(&t_number_of_pins);
    eval 'sub t_output_res_char {
        my($t) = @_;
	    eval q(($t)-> $nums[ &TICODE_orc]);
    }' unless defined(&t_output_res_char);
    eval 'sub t_output_res_line {
        my($t) = @_;
	    eval q(($t)-> $nums[ &TICODE_orl]);
    }' unless defined(&t_output_res_line);
    eval 'sub t_output_res_horz_inch {
        my($t) = @_;
	    eval q(($t)-> $nums[ &TICODE_orhi]);
    }' unless defined(&t_output_res_horz_inch);
    eval 'sub t_output_res_vert_inch {
        my($t) = @_;
	    eval q(($t)-> $nums[ &TICODE_orvi]);
    }' unless defined(&t_output_res_vert_inch);
    eval 'sub t_padding_baud_rate {
        my($t) = @_;
	    eval q(($t)-> $nums[ &TICODE_pb]);
    }' unless defined(&t_padding_baud_rate);
    eval 'sub t_print_rate {
        my($t) = @_;
	    eval q(($t)-> $nums[ &TICODE_cps]);
    }' unless defined(&t_print_rate);
    eval 'sub t_virtual_terminal {
        my($t) = @_;
	    eval q(($t)-> $nums[ &TICODE_vt]);
    }' unless defined(&t_virtual_terminal);
    eval 'sub t_wide_char_size {
        my($t) = @_;
	    eval q(($t)-> $nums[ &TICODE_widcs]);
    }' unless defined(&t_wide_char_size);
    eval 'sub t_width_status_line {
        my($t) = @_;
	    eval q(($t)-> $nums[ &TICODE_wsl]);
    }' unless defined(&t_width_status_line);
    eval 'sub bit_image_entwining () { &t_bit_image_entwining( &cur_term);}' unless defined(&bit_image_entwining);
    eval 'sub bit_image_type () { &t_bit_image_type( &cur_term);}' unless defined(&bit_image_type);
    eval 'sub buffer_capacity () { &t_buffer_capacity( &cur_term);}' unless defined(&buffer_capacity);
    eval 'sub buttons () { &t_buttons( &cur_term);}' unless defined(&buttons);
    eval 'sub columns () { &t_columns( &cur_term);}' unless defined(&columns);
    eval 'sub dot_horz_spacing () { &t_dot_horz_spacing( &cur_term);}' unless defined(&dot_horz_spacing);
    eval 'sub dot_vert_spacing () { &t_dot_vert_spacing( &cur_term);}' unless defined(&dot_vert_spacing);
    eval 'sub init_tabs () { &t_init_tabs( &cur_term);}' unless defined(&init_tabs);
    eval 'sub label_height () { &t_label_height( &cur_term);}' unless defined(&label_height);
    eval 'sub label_width () { &t_label_width( &cur_term);}' unless defined(&label_width);
    eval 'sub lines () { &t_lines( &cur_term);}' unless defined(&lines);
    eval 'sub lines_of_memory () { &t_lines_of_memory( &cur_term);}' unless defined(&lines_of_memory);
    eval 'sub max_attributes () { &t_max_attributes( &cur_term);}' unless defined(&max_attributes);
    eval 'sub magic_cookie_glitch () { &t_magic_cookie_glitch( &cur_term);}' unless defined(&magic_cookie_glitch);
    eval 'sub max_colors () { &t_max_colors( &cur_term);}' unless defined(&max_colors);
    eval 'sub max_micro_address () { &t_max_micro_address( &cur_term);}' unless defined(&max_micro_address);
    eval 'sub max_micro_jump () { &t_max_micro_jump( &cur_term);}' unless defined(&max_micro_jump);
    eval 'sub max_pairs () { &t_max_pairs( &cur_term);}' unless defined(&max_pairs);
    eval 'sub maximum_windows () { &t_maximum_windows( &cur_term);}' unless defined(&maximum_windows);
    eval 'sub micro_col_size () { &t_micro_col_size( &cur_term);}' unless defined(&micro_col_size);
    eval 'sub micro_line_size () { &t_micro_line_size( &cur_term);}' unless defined(&micro_line_size);
    eval 'sub no_color_video () { &t_no_color_video( &cur_term);}' unless defined(&no_color_video);
    eval 'sub num_labels () { &t_num_labels( &cur_term);}' unless defined(&num_labels);
    eval 'sub number_of_pins () { &t_number_of_pins( &cur_term);}' unless defined(&number_of_pins);
    eval 'sub output_res_char () { &t_output_res_char( &cur_term);}' unless defined(&output_res_char);
    eval 'sub output_res_line () { &t_output_res_line( &cur_term);}' unless defined(&output_res_line);
    eval 'sub output_res_horz_inch () { &t_output_res_horz_inch( &cur_term);}' unless defined(&output_res_horz_inch);
    eval 'sub output_res_vert_inch () { &t_output_res_vert_inch( &cur_term);}' unless defined(&output_res_vert_inch);
    eval 'sub padding_baud_rate () { &t_padding_baud_rate( &cur_term);}' unless defined(&padding_baud_rate);
    eval 'sub print_rate () { &t_print_rate( &cur_term);}' unless defined(&print_rate);
    eval 'sub virtual_terminal () { &t_virtual_terminal( &cur_term);}' unless defined(&virtual_terminal);
    eval 'sub wide_char_size () { &t_wide_char_size( &cur_term);}' unless defined(&wide_char_size);
    eval 'sub width_status_line () { &t_width_status_line( &cur_term);}' unless defined(&width_status_line);
    eval("sub TICODE_acsc () { 0; }") unless defined(&TICODE_acsc);
    eval("sub TICODE_scesa () { 1; }") unless defined(&TICODE_scesa);
    eval("sub TICODE_cbt () { 2; }") unless defined(&TICODE_cbt);
    eval("sub TICODE_bel () { 3; }") unless defined(&TICODE_bel);
    eval("sub TICODE_bicr () { 4; }") unless defined(&TICODE_bicr);
    eval("sub TICODE_binel () { 5; }") unless defined(&TICODE_binel);
    eval("sub TICODE_birep () { 6; }") unless defined(&TICODE_birep);
    eval("sub TICODE_cr () { 7; }") unless defined(&TICODE_cr);
    eval("sub TICODE_cpi () { 8; }") unless defined(&TICODE_cpi);
    eval("sub TICODE_lpi () { 9; }") unless defined(&TICODE_lpi);
    eval("sub TICODE_chr () { 10; }") unless defined(&TICODE_chr);
    eval("sub TICODE_cvr () { 11; }") unless defined(&TICODE_cvr);
    eval("sub TICODE_csr () { 12; }") unless defined(&TICODE_csr);
    eval("sub TICODE_rmp () { 13; }") unless defined(&TICODE_rmp);
    eval("sub TICODE_csnm () { 14; }") unless defined(&TICODE_csnm);
    eval("sub TICODE_tbc () { 15; }") unless defined(&TICODE_tbc);
    eval("sub TICODE_mgc () { 16; }") unless defined(&TICODE_mgc);
    eval("sub TICODE_clear () { 17; }") unless defined(&TICODE_clear);
    eval("sub TICODE_el1 () { 18; }") unless defined(&TICODE_el1);
    eval("sub TICODE_el () { 19; }") unless defined(&TICODE_el);
    eval("sub TICODE_ed () { 20; }") unless defined(&TICODE_ed);
    eval("sub TICODE_csin () { 21; }") unless defined(&TICODE_csin);
    eval("sub TICODE_colornm () { 22; }") unless defined(&TICODE_colornm);
    eval("sub TICODE_hpa () { 23; }") unless defined(&TICODE_hpa);
    eval("sub TICODE_cmdch () { 24; }") unless defined(&TICODE_cmdch);
    eval("sub TICODE_cwin () { 25; }") unless defined(&TICODE_cwin);
    eval("sub TICODE_cup () { 26; }") unless defined(&TICODE_cup);
    eval("sub TICODE_cud1 () { 27; }") unless defined(&TICODE_cud1);
    eval("sub TICODE_home () { 28; }") unless defined(&TICODE_home);
    eval("sub TICODE_civis () { 29; }") unless defined(&TICODE_civis);
    eval("sub TICODE_cub1 () { 30; }") unless defined(&TICODE_cub1);
    eval("sub TICODE_mrcup () { 31; }") unless defined(&TICODE_mrcup);
    eval("sub TICODE_cnorm () { 32; }") unless defined(&TICODE_cnorm);
    eval("sub TICODE_cuf1 () { 33; }") unless defined(&TICODE_cuf1);
    eval("sub TICODE_ll () { 34; }") unless defined(&TICODE_ll);
    eval("sub TICODE_cuu1 () { 35; }") unless defined(&TICODE_cuu1);
    eval("sub TICODE_cvvis () { 36; }") unless defined(&TICODE_cvvis);
    eval("sub TICODE_defbi () { 37; }") unless defined(&TICODE_defbi);
    eval("sub TICODE_defc () { 38; }") unless defined(&TICODE_defc);
    eval("sub TICODE_dch1 () { 39; }") unless defined(&TICODE_dch1);
    eval("sub TICODE_dl1 () { 40; }") unless defined(&TICODE_dl1);
    eval("sub TICODE_devt () { 41; }") unless defined(&TICODE_devt);
    eval("sub TICODE_dial () { 42; }") unless defined(&TICODE_dial);
    eval("sub TICODE_dsl () { 43; }") unless defined(&TICODE_dsl);
    eval("sub TICODE_dclk () { 44; }") unless defined(&TICODE_dclk);
    eval("sub TICODE_dispc () { 45; }") unless defined(&TICODE_dispc);
    eval("sub TICODE_hd () { 46; }") unless defined(&TICODE_hd);
    eval("sub TICODE_enacs () { 47; }") unless defined(&TICODE_enacs);
    eval("sub TICODE_endbi () { 48; }") unless defined(&TICODE_endbi);
    eval("sub TICODE_smacs () { 49; }") unless defined(&TICODE_smacs);
    eval("sub TICODE_smam () { 50; }") unless defined(&TICODE_smam);
    eval("sub TICODE_blink () { 51; }") unless defined(&TICODE_blink);
    eval("sub TICODE_bold () { 52; }") unless defined(&TICODE_bold);
    eval("sub TICODE_smcup () { 53; }") unless defined(&TICODE_smcup);
    eval("sub TICODE_smdc () { 54; }") unless defined(&TICODE_smdc);
    eval("sub TICODE_dim () { 55; }") unless defined(&TICODE_dim);
    eval("sub TICODE_swidm () { 56; }") unless defined(&TICODE_swidm);
    eval("sub TICODE_sdrfq () { 57; }") unless defined(&TICODE_sdrfq);
    eval("sub TICODE_ehhlm () { 58; }") unless defined(&TICODE_ehhlm);
    eval("sub TICODE_smir () { 59; }") unless defined(&TICODE_smir);
    eval("sub TICODE_sitm () { 60; }") unless defined(&TICODE_sitm);
    eval("sub TICODE_elhlm () { 61; }") unless defined(&TICODE_elhlm);
    eval("sub TICODE_slm () { 62; }") unless defined(&TICODE_slm);
    eval("sub TICODE_elohlm () { 63; }") unless defined(&TICODE_elohlm);
    eval("sub TICODE_smicm () { 64; }") unless defined(&TICODE_smicm);
    eval("sub TICODE_snlq () { 65; }") unless defined(&TICODE_snlq);
    eval("sub TICODE_snrmq () { 66; }") unless defined(&TICODE_snrmq);
    eval("sub TICODE_smpch () { 67; }") unless defined(&TICODE_smpch);
    eval("sub TICODE_prot () { 68; }") unless defined(&TICODE_prot);
    eval("sub TICODE_rev () { 69; }") unless defined(&TICODE_rev);
    eval("sub TICODE_erhlm () { 70; }") unless defined(&TICODE_erhlm);
    eval("sub TICODE_smsc () { 71; }") unless defined(&TICODE_smsc);
    eval("sub TICODE_invis () { 72; }") unless defined(&TICODE_invis);
    eval("sub TICODE_sshm () { 73; }") unless defined(&TICODE_sshm);
    eval("sub TICODE_smso () { 74; }") unless defined(&TICODE_smso);
    eval("sub TICODE_ssubm () { 75; }") unless defined(&TICODE_ssubm);
    eval("sub TICODE_ssupm () { 76; }") unless defined(&TICODE_ssupm);
    eval("sub TICODE_ethlm () { 77; }") unless defined(&TICODE_ethlm);
    eval("sub TICODE_smul () { 78; }") unless defined(&TICODE_smul);
    eval("sub TICODE_sum () { 79; }") unless defined(&TICODE_sum);
    eval("sub TICODE_evhlm () { 80; }") unless defined(&TICODE_evhlm);
    eval("sub TICODE_smxon () { 81; }") unless defined(&TICODE_smxon);
    eval("sub TICODE_ech () { 82; }") unless defined(&TICODE_ech);
    eval("sub TICODE_rmacs () { 83; }") unless defined(&TICODE_rmacs);
    eval("sub TICODE_rmam () { 84; }") unless defined(&TICODE_rmam);
    eval("sub TICODE_sgr0 () { 85; }") unless defined(&TICODE_sgr0);
    eval("sub TICODE_rmcup () { 86; }") unless defined(&TICODE_rmcup);
    eval("sub TICODE_rmdc () { 87; }") unless defined(&TICODE_rmdc);
    eval("sub TICODE_rwidm () { 88; }") unless defined(&TICODE_rwidm);
    eval("sub TICODE_rmir () { 89; }") unless defined(&TICODE_rmir);
    eval("sub TICODE_ritm () { 90; }") unless defined(&TICODE_ritm);
    eval("sub TICODE_rlm () { 91; }") unless defined(&TICODE_rlm);
    eval("sub TICODE_rmicm () { 92; }") unless defined(&TICODE_rmicm);
    eval("sub TICODE_rmpch () { 93; }") unless defined(&TICODE_rmpch);
    eval("sub TICODE_rmsc () { 94; }") unless defined(&TICODE_rmsc);
    eval("sub TICODE_rshm () { 95; }") unless defined(&TICODE_rshm);
    eval("sub TICODE_rmso () { 96; }") unless defined(&TICODE_rmso);
    eval("sub TICODE_rsubm () { 97; }") unless defined(&TICODE_rsubm);
    eval("sub TICODE_rsupm () { 98; }") unless defined(&TICODE_rsupm);
    eval("sub TICODE_rmul () { 99; }") unless defined(&TICODE_rmul);
    eval("sub TICODE_rum () { 100; }") unless defined(&TICODE_rum);
    eval("sub TICODE_rmxon () { 101; }") unless defined(&TICODE_rmxon);
    eval("sub TICODE_pause () { 102; }") unless defined(&TICODE_pause);
    eval("sub TICODE_hook () { 103; }") unless defined(&TICODE_hook);
    eval("sub TICODE_flash () { 104; }") unless defined(&TICODE_flash);
    eval("sub TICODE_ff () { 105; }") unless defined(&TICODE_ff);
    eval("sub TICODE_fsl () { 106; }") unless defined(&TICODE_fsl);
    eval("sub TICODE_getm () { 107; }") unless defined(&TICODE_getm);
    eval("sub TICODE_wingo () { 108; }") unless defined(&TICODE_wingo);
    eval("sub TICODE_hup () { 109; }") unless defined(&TICODE_hup);
    eval("sub TICODE_is1 () { 110; }") unless defined(&TICODE_is1);
    eval("sub TICODE_is2 () { 111; }") unless defined(&TICODE_is2);
    eval("sub TICODE_is3 () { 112; }") unless defined(&TICODE_is3);
    eval("sub TICODE_if () { 113; }") unless defined(&TICODE_if);
    eval("sub TICODE_iprog () { 114; }") unless defined(&TICODE_iprog);
    eval("sub TICODE_initc () { 115; }") unless defined(&TICODE_initc);
    eval("sub TICODE_initp () { 116; }") unless defined(&TICODE_initp);
    eval("sub TICODE_ich1 () { 117; }") unless defined(&TICODE_ich1);
    eval("sub TICODE_il1 () { 118; }") unless defined(&TICODE_il1);
    eval("sub TICODE_ip () { 119; }") unless defined(&TICODE_ip);
    eval("sub TICODE_ka1 () { 120; }") unless defined(&TICODE_ka1);
    eval("sub TICODE_ka3 () { 121; }") unless defined(&TICODE_ka3);
    eval("sub TICODE_kb2 () { 122; }") unless defined(&TICODE_kb2);
    eval("sub TICODE_kbs () { 123; }") unless defined(&TICODE_kbs);
    eval("sub TICODE_kbeg () { 124; }") unless defined(&TICODE_kbeg);
    eval("sub TICODE_kcbt () { 125; }") unless defined(&TICODE_kcbt);
    eval("sub TICODE_kc1 () { 126; }") unless defined(&TICODE_kc1);
    eval("sub TICODE_kc3 () { 127; }") unless defined(&TICODE_kc3);
    eval("sub TICODE_kcan () { 128; }") unless defined(&TICODE_kcan);
    eval("sub TICODE_ktbc () { 129; }") unless defined(&TICODE_ktbc);
    eval("sub TICODE_kclr () { 130; }") unless defined(&TICODE_kclr);
    eval("sub TICODE_kclo () { 131; }") unless defined(&TICODE_kclo);
    eval("sub TICODE_kcmd () { 132; }") unless defined(&TICODE_kcmd);
    eval("sub TICODE_kcpy () { 133; }") unless defined(&TICODE_kcpy);
    eval("sub TICODE_kcrt () { 134; }") unless defined(&TICODE_kcrt);
    eval("sub TICODE_kctab () { 135; }") unless defined(&TICODE_kctab);
    eval("sub TICODE_kdch1 () { 136; }") unless defined(&TICODE_kdch1);
    eval("sub TICODE_kdl1 () { 137; }") unless defined(&TICODE_kdl1);
    eval("sub TICODE_kcud1 () { 138; }") unless defined(&TICODE_kcud1);
    eval("sub TICODE_krmir () { 139; }") unless defined(&TICODE_krmir);
    eval("sub TICODE_kend () { 140; }") unless defined(&TICODE_kend);
    eval("sub TICODE_kent () { 141; }") unless defined(&TICODE_kent);
    eval("sub TICODE_kel () { 142; }") unless defined(&TICODE_kel);
    eval("sub TICODE_ked () { 143; }") unless defined(&TICODE_ked);
    eval("sub TICODE_kext () { 144; }") unless defined(&TICODE_kext);
    eval("sub TICODE_kf0 () { 145; }") unless defined(&TICODE_kf0);
    eval("sub TICODE_kf1 () { 146; }") unless defined(&TICODE_kf1);
    eval("sub TICODE_kf2 () { 147; }") unless defined(&TICODE_kf2);
    eval("sub TICODE_kf3 () { 148; }") unless defined(&TICODE_kf3);
    eval("sub TICODE_kf4 () { 149; }") unless defined(&TICODE_kf4);
    eval("sub TICODE_kf5 () { 150; }") unless defined(&TICODE_kf5);
    eval("sub TICODE_kf6 () { 151; }") unless defined(&TICODE_kf6);
    eval("sub TICODE_kf7 () { 152; }") unless defined(&TICODE_kf7);
    eval("sub TICODE_kf8 () { 153; }") unless defined(&TICODE_kf8);
    eval("sub TICODE_kf9 () { 154; }") unless defined(&TICODE_kf9);
    eval("sub TICODE_kf10 () { 155; }") unless defined(&TICODE_kf10);
    eval("sub TICODE_kf11 () { 156; }") unless defined(&TICODE_kf11);
    eval("sub TICODE_kf12 () { 157; }") unless defined(&TICODE_kf12);
    eval("sub TICODE_kf13 () { 158; }") unless defined(&TICODE_kf13);
    eval("sub TICODE_kf14 () { 159; }") unless defined(&TICODE_kf14);
    eval("sub TICODE_kf15 () { 160; }") unless defined(&TICODE_kf15);
    eval("sub TICODE_kf16 () { 161; }") unless defined(&TICODE_kf16);
    eval("sub TICODE_kf17 () { 162; }") unless defined(&TICODE_kf17);
    eval("sub TICODE_kf18 () { 163; }") unless defined(&TICODE_kf18);
    eval("sub TICODE_kf19 () { 164; }") unless defined(&TICODE_kf19);
    eval("sub TICODE_kf20 () { 165; }") unless defined(&TICODE_kf20);
    eval("sub TICODE_kf21 () { 166; }") unless defined(&TICODE_kf21);
    eval("sub TICODE_kf22 () { 167; }") unless defined(&TICODE_kf22);
    eval("sub TICODE_kf23 () { 168; }") unless defined(&TICODE_kf23);
    eval("sub TICODE_kf24 () { 169; }") unless defined(&TICODE_kf24);
    eval("sub TICODE_kf25 () { 170; }") unless defined(&TICODE_kf25);
    eval("sub TICODE_kf26 () { 171; }") unless defined(&TICODE_kf26);
    eval("sub TICODE_kf27 () { 172; }") unless defined(&TICODE_kf27);
    eval("sub TICODE_kf28 () { 173; }") unless defined(&TICODE_kf28);
    eval("sub TICODE_kf29 () { 174; }") unless defined(&TICODE_kf29);
    eval("sub TICODE_kf30 () { 175; }") unless defined(&TICODE_kf30);
    eval("sub TICODE_kf31 () { 176; }") unless defined(&TICODE_kf31);
    eval("sub TICODE_kf32 () { 177; }") unless defined(&TICODE_kf32);
    eval("sub TICODE_kf33 () { 178; }") unless defined(&TICODE_kf33);
    eval("sub TICODE_kf34 () { 179; }") unless defined(&TICODE_kf34);
    eval("sub TICODE_kf35 () { 180; }") unless defined(&TICODE_kf35);
    eval("sub TICODE_kf36 () { 181; }") unless defined(&TICODE_kf36);
    eval("sub TICODE_kf37 () { 182; }") unless defined(&TICODE_kf37);
    eval("sub TICODE_kf38 () { 183; }") unless defined(&TICODE_kf38);
    eval("sub TICODE_kf39 () { 184; }") unless defined(&TICODE_kf39);
    eval("sub TICODE_kf40 () { 185; }") unless defined(&TICODE_kf40);
    eval("sub TICODE_kf41 () { 186; }") unless defined(&TICODE_kf41);
    eval("sub TICODE_kf42 () { 187; }") unless defined(&TICODE_kf42);
    eval("sub TICODE_kf43 () { 188; }") unless defined(&TICODE_kf43);
    eval("sub TICODE_kf44 () { 189; }") unless defined(&TICODE_kf44);
    eval("sub TICODE_kf45 () { 190; }") unless defined(&TICODE_kf45);
    eval("sub TICODE_kf46 () { 191; }") unless defined(&TICODE_kf46);
    eval("sub TICODE_kf47 () { 192; }") unless defined(&TICODE_kf47);
    eval("sub TICODE_kf48 () { 193; }") unless defined(&TICODE_kf48);
    eval("sub TICODE_kf49 () { 194; }") unless defined(&TICODE_kf49);
    eval("sub TICODE_kf50 () { 195; }") unless defined(&TICODE_kf50);
    eval("sub TICODE_kf51 () { 196; }") unless defined(&TICODE_kf51);
    eval("sub TICODE_kf52 () { 197; }") unless defined(&TICODE_kf52);
    eval("sub TICODE_kf53 () { 198; }") unless defined(&TICODE_kf53);
    eval("sub TICODE_kf54 () { 199; }") unless defined(&TICODE_kf54);
    eval("sub TICODE_kf55 () { 200; }") unless defined(&TICODE_kf55);
    eval("sub TICODE_kf56 () { 201; }") unless defined(&TICODE_kf56);
    eval("sub TICODE_kf57 () { 202; }") unless defined(&TICODE_kf57);
    eval("sub TICODE_kf58 () { 203; }") unless defined(&TICODE_kf58);
    eval("sub TICODE_kf59 () { 204; }") unless defined(&TICODE_kf59);
    eval("sub TICODE_kf60 () { 205; }") unless defined(&TICODE_kf60);
    eval("sub TICODE_kf61 () { 206; }") unless defined(&TICODE_kf61);
    eval("sub TICODE_kf62 () { 207; }") unless defined(&TICODE_kf62);
    eval("sub TICODE_kf63 () { 208; }") unless defined(&TICODE_kf63);
    eval("sub TICODE_kfnd () { 209; }") unless defined(&TICODE_kfnd);
    eval("sub TICODE_khlp () { 210; }") unless defined(&TICODE_khlp);
    eval("sub TICODE_khome () { 211; }") unless defined(&TICODE_khome);
    eval("sub TICODE_kich1 () { 212; }") unless defined(&TICODE_kich1);
    eval("sub TICODE_kil1 () { 213; }") unless defined(&TICODE_kil1);
    eval("sub TICODE_kcub1 () { 214; }") unless defined(&TICODE_kcub1);
    eval("sub TICODE_kll () { 215; }") unless defined(&TICODE_kll);
    eval("sub TICODE_kmrk () { 216; }") unless defined(&TICODE_kmrk);
    eval("sub TICODE_kmsg () { 217; }") unless defined(&TICODE_kmsg);
    eval("sub TICODE_kmous () { 218; }") unless defined(&TICODE_kmous);
    eval("sub TICODE_kmov () { 219; }") unless defined(&TICODE_kmov);
    eval("sub TICODE_knxt () { 220; }") unless defined(&TICODE_knxt);
    eval("sub TICODE_knp () { 221; }") unless defined(&TICODE_knp);
    eval("sub TICODE_kopn () { 222; }") unless defined(&TICODE_kopn);
    eval("sub TICODE_kopt () { 223; }") unless defined(&TICODE_kopt);
    eval("sub TICODE_kpp () { 224; }") unless defined(&TICODE_kpp);
    eval("sub TICODE_kprv () { 225; }") unless defined(&TICODE_kprv);
    eval("sub TICODE_kprt () { 226; }") unless defined(&TICODE_kprt);
    eval("sub TICODE_krdo () { 227; }") unless defined(&TICODE_krdo);
    eval("sub TICODE_kref () { 228; }") unless defined(&TICODE_kref);
    eval("sub TICODE_krfr () { 229; }") unless defined(&TICODE_krfr);
    eval("sub TICODE_krpl () { 230; }") unless defined(&TICODE_krpl);
    eval("sub TICODE_krst () { 231; }") unless defined(&TICODE_krst);
    eval("sub TICODE_kres () { 232; }") unless defined(&TICODE_kres);
    eval("sub TICODE_kcuf1 () { 233; }") unless defined(&TICODE_kcuf1);
    eval("sub TICODE_ksav () { 234; }") unless defined(&TICODE_ksav);
    eval("sub TICODE_kBEG () { 235; }") unless defined(&TICODE_kBEG);
    eval("sub TICODE_kCAN () { 236; }") unless defined(&TICODE_kCAN);
    eval("sub TICODE_kCMD () { 237; }") unless defined(&TICODE_kCMD);
    eval("sub TICODE_kCPY () { 238; }") unless defined(&TICODE_kCPY);
    eval("sub TICODE_kCRT () { 239; }") unless defined(&TICODE_kCRT);
    eval("sub TICODE_kDC () { 240; }") unless defined(&TICODE_kDC);
    eval("sub TICODE_kDL () { 241; }") unless defined(&TICODE_kDL);
    eval("sub TICODE_kslt () { 242; }") unless defined(&TICODE_kslt);
    eval("sub TICODE_kEND () { 243; }") unless defined(&TICODE_kEND);
    eval("sub TICODE_kEOL () { 244; }") unless defined(&TICODE_kEOL);
    eval("sub TICODE_kEXT () { 245; }") unless defined(&TICODE_kEXT);
    eval("sub TICODE_kind () { 246; }") unless defined(&TICODE_kind);
    eval("sub TICODE_kFND () { 247; }") unless defined(&TICODE_kFND);
    eval("sub TICODE_kHLP () { 248; }") unless defined(&TICODE_kHLP);
    eval("sub TICODE_kHOM () { 249; }") unless defined(&TICODE_kHOM);
    eval("sub TICODE_kIC () { 250; }") unless defined(&TICODE_kIC);
    eval("sub TICODE_kLFT () { 251; }") unless defined(&TICODE_kLFT);
    eval("sub TICODE_kMSG () { 252; }") unless defined(&TICODE_kMSG);
    eval("sub TICODE_kMOV () { 253; }") unless defined(&TICODE_kMOV);
    eval("sub TICODE_kNXT () { 254; }") unless defined(&TICODE_kNXT);
    eval("sub TICODE_kOPT () { 255; }") unless defined(&TICODE_kOPT);
    eval("sub TICODE_kPRV () { 256; }") unless defined(&TICODE_kPRV);
    eval("sub TICODE_kPRT () { 257; }") unless defined(&TICODE_kPRT);
    eval("sub TICODE_kri () { 258; }") unless defined(&TICODE_kri);
    eval("sub TICODE_kRDO () { 259; }") unless defined(&TICODE_kRDO);
    eval("sub TICODE_kRPL () { 260; }") unless defined(&TICODE_kRPL);
    eval("sub TICODE_kRIT () { 261; }") unless defined(&TICODE_kRIT);
    eval("sub TICODE_kRES () { 262; }") unless defined(&TICODE_kRES);
    eval("sub TICODE_kSAV () { 263; }") unless defined(&TICODE_kSAV);
    eval("sub TICODE_kSPD () { 264; }") unless defined(&TICODE_kSPD);
    eval("sub TICODE_khts () { 265; }") unless defined(&TICODE_khts);
    eval("sub TICODE_kUND () { 266; }") unless defined(&TICODE_kUND);
    eval("sub TICODE_kspd () { 267; }") unless defined(&TICODE_kspd);
    eval("sub TICODE_kund () { 268; }") unless defined(&TICODE_kund);
    eval("sub TICODE_kcuu1 () { 269; }") unless defined(&TICODE_kcuu1);
    eval("sub TICODE_rmkx () { 270; }") unless defined(&TICODE_rmkx);
    eval("sub TICODE_smkx () { 271; }") unless defined(&TICODE_smkx);
    eval("sub TICODE_lf0 () { 272; }") unless defined(&TICODE_lf0);
    eval("sub TICODE_lf1 () { 273; }") unless defined(&TICODE_lf1);
    eval("sub TICODE_lf2 () { 274; }") unless defined(&TICODE_lf2);
    eval("sub TICODE_lf3 () { 275; }") unless defined(&TICODE_lf3);
    eval("sub TICODE_lf4 () { 276; }") unless defined(&TICODE_lf4);
    eval("sub TICODE_lf5 () { 277; }") unless defined(&TICODE_lf5);
    eval("sub TICODE_lf6 () { 278; }") unless defined(&TICODE_lf6);
    eval("sub TICODE_lf7 () { 279; }") unless defined(&TICODE_lf7);
    eval("sub TICODE_lf8 () { 280; }") unless defined(&TICODE_lf8);
    eval("sub TICODE_lf9 () { 281; }") unless defined(&TICODE_lf9);
    eval("sub TICODE_lf10 () { 282; }") unless defined(&TICODE_lf10);
    eval("sub TICODE_fln () { 283; }") unless defined(&TICODE_fln);
    eval("sub TICODE_rmln () { 284; }") unless defined(&TICODE_rmln);
    eval("sub TICODE_smln () { 285; }") unless defined(&TICODE_smln);
    eval("sub TICODE_rmm () { 286; }") unless defined(&TICODE_rmm);
    eval("sub TICODE_smm () { 287; }") unless defined(&TICODE_smm);
    eval("sub TICODE_mhpa () { 288; }") unless defined(&TICODE_mhpa);
    eval("sub TICODE_mcud1 () { 289; }") unless defined(&TICODE_mcud1);
    eval("sub TICODE_mcub1 () { 290; }") unless defined(&TICODE_mcub1);
    eval("sub TICODE_mcuf1 () { 291; }") unless defined(&TICODE_mcuf1);
    eval("sub TICODE_mvpa () { 292; }") unless defined(&TICODE_mvpa);
    eval("sub TICODE_mcuu1 () { 293; }") unless defined(&TICODE_mcuu1);
    eval("sub TICODE_minfo () { 294; }") unless defined(&TICODE_minfo);
    eval("sub TICODE_nel () { 295; }") unless defined(&TICODE_nel);
    eval("sub TICODE_porder () { 296; }") unless defined(&TICODE_porder);
    eval("sub TICODE_oc () { 297; }") unless defined(&TICODE_oc);
    eval("sub TICODE_op () { 298; }") unless defined(&TICODE_op);
    eval("sub TICODE_pad () { 299; }") unless defined(&TICODE_pad);
    eval("sub TICODE_dch () { 300; }") unless defined(&TICODE_dch);
    eval("sub TICODE_dl () { 301; }") unless defined(&TICODE_dl);
    eval("sub TICODE_cud () { 302; }") unless defined(&TICODE_cud);
    eval("sub TICODE_mcud () { 303; }") unless defined(&TICODE_mcud);
    eval("sub TICODE_ich () { 304; }") unless defined(&TICODE_ich);
    eval("sub TICODE_indn () { 305; }") unless defined(&TICODE_indn);
    eval("sub TICODE_il () { 306; }") unless defined(&TICODE_il);
    eval("sub TICODE_cub () { 307; }") unless defined(&TICODE_cub);
    eval("sub TICODE_mcub () { 308; }") unless defined(&TICODE_mcub);
    eval("sub TICODE_cuf () { 309; }") unless defined(&TICODE_cuf);
    eval("sub TICODE_mcuf () { 310; }") unless defined(&TICODE_mcuf);
    eval("sub TICODE_rin () { 311; }") unless defined(&TICODE_rin);
    eval("sub TICODE_cuu () { 312; }") unless defined(&TICODE_cuu);
    eval("sub TICODE_mcuu () { 313; }") unless defined(&TICODE_mcuu);
    eval("sub TICODE_pctrm () { 314; }") unless defined(&TICODE_pctrm);
    eval("sub TICODE_pfkey () { 315; }") unless defined(&TICODE_pfkey);
    eval("sub TICODE_pfloc () { 316; }") unless defined(&TICODE_pfloc);
    eval("sub TICODE_pfxl () { 317; }") unless defined(&TICODE_pfxl);
    eval("sub TICODE_pfx () { 318; }") unless defined(&TICODE_pfx);
    eval("sub TICODE_pln () { 319; }") unless defined(&TICODE_pln);
    eval("sub TICODE_mc0 () { 320; }") unless defined(&TICODE_mc0);
    eval("sub TICODE_mc5p () { 321; }") unless defined(&TICODE_mc5p);
    eval("sub TICODE_mc4 () { 322; }") unless defined(&TICODE_mc4);
    eval("sub TICODE_mc5 () { 323; }") unless defined(&TICODE_mc5);
    eval("sub TICODE_pulse () { 324; }") unless defined(&TICODE_pulse);
    eval("sub TICODE_qdial () { 325; }") unless defined(&TICODE_qdial);
    eval("sub TICODE_rmclk () { 326; }") unless defined(&TICODE_rmclk);
    eval("sub TICODE_rep () { 327; }") unless defined(&TICODE_rep);
    eval("sub TICODE_rfi () { 328; }") unless defined(&TICODE_rfi);
    eval("sub TICODE_reqmp () { 329; }") unless defined(&TICODE_reqmp);
    eval("sub TICODE_rs1 () { 330; }") unless defined(&TICODE_rs1);
    eval("sub TICODE_rs2 () { 331; }") unless defined(&TICODE_rs2);
    eval("sub TICODE_rs3 () { 332; }") unless defined(&TICODE_rs3);
    eval("sub TICODE_rf () { 333; }") unless defined(&TICODE_rf);
    eval("sub TICODE_rc () { 334; }") unless defined(&TICODE_rc);
    eval("sub TICODE_vpa () { 335; }") unless defined(&TICODE_vpa);
    eval("sub TICODE_sc () { 336; }") unless defined(&TICODE_sc);
    eval("sub TICODE_scesc () { 337; }") unless defined(&TICODE_scesc);
    eval("sub TICODE_ind () { 338; }") unless defined(&TICODE_ind);
    eval("sub TICODE_ri () { 339; }") unless defined(&TICODE_ri);
    eval("sub TICODE_scs () { 340; }") unless defined(&TICODE_scs);
    eval("sub TICODE_s0ds () { 341; }") unless defined(&TICODE_s0ds);
    eval("sub TICODE_s1ds () { 342; }") unless defined(&TICODE_s1ds);
    eval("sub TICODE_s2ds () { 343; }") unless defined(&TICODE_s2ds);
    eval("sub TICODE_s3ds () { 344; }") unless defined(&TICODE_s3ds);
    eval("sub TICODE_sgr1 () { 345; }") unless defined(&TICODE_sgr1);
    eval("sub TICODE_setab () { 346; }") unless defined(&TICODE_setab);
    eval("sub TICODE_setaf () { 347; }") unless defined(&TICODE_setaf);
    eval("sub TICODE_sgr () { 348; }") unless defined(&TICODE_sgr);
    eval("sub TICODE_setb () { 349; }") unless defined(&TICODE_setb);
    eval("sub TICODE_smgb () { 350; }") unless defined(&TICODE_smgb);
    eval("sub TICODE_smgbp () { 351; }") unless defined(&TICODE_smgbp);
    eval("sub TICODE_sclk () { 352; }") unless defined(&TICODE_sclk);
    eval("sub TICODE_setcolor () { 353; }") unless defined(&TICODE_setcolor);
    eval("sub TICODE_scp () { 354; }") unless defined(&TICODE_scp);
    eval("sub TICODE_setf () { 355; }") unless defined(&TICODE_setf);
    eval("sub TICODE_smgl () { 356; }") unless defined(&TICODE_smgl);
    eval("sub TICODE_smglp () { 357; }") unless defined(&TICODE_smglp);
    eval("sub TICODE_smglr () { 358; }") unless defined(&TICODE_smglr);
    eval("sub TICODE_slines () { 359; }") unless defined(&TICODE_slines);
    eval("sub TICODE_slength () { 360; }") unless defined(&TICODE_slength);
    eval("sub TICODE_smgr () { 361; }") unless defined(&TICODE_smgr);
    eval("sub TICODE_smgrp () { 362; }") unless defined(&TICODE_smgrp);
    eval("sub TICODE_hts () { 363; }") unless defined(&TICODE_hts);
    eval("sub TICODE_smgtb () { 364; }") unless defined(&TICODE_smgtb);
    eval("sub TICODE_smgt () { 365; }") unless defined(&TICODE_smgt);
    eval("sub TICODE_smgtp () { 366; }") unless defined(&TICODE_smgtp);
    eval("sub TICODE_wind () { 367; }") unless defined(&TICODE_wind);
    eval("sub TICODE_sbim () { 368; }") unless defined(&TICODE_sbim);
    eval("sub TICODE_scsd () { 369; }") unless defined(&TICODE_scsd);
    eval("sub TICODE_rbim () { 370; }") unless defined(&TICODE_rbim);
    eval("sub TICODE_rcsd () { 371; }") unless defined(&TICODE_rcsd);
    eval("sub TICODE_subcs () { 372; }") unless defined(&TICODE_subcs);
    eval("sub TICODE_supcs () { 373; }") unless defined(&TICODE_supcs);
    eval("sub TICODE_ht () { 374; }") unless defined(&TICODE_ht);
    eval("sub TICODE_docr () { 375; }") unless defined(&TICODE_docr);
    eval("sub TICODE_tsl () { 376; }") unless defined(&TICODE_tsl);
    eval("sub TICODE_tone () { 377; }") unless defined(&TICODE_tone);
    eval("sub TICODE_u0 () { 378; }") unless defined(&TICODE_u0);
    eval("sub TICODE_u1 () { 379; }") unless defined(&TICODE_u1);
    eval("sub TICODE_u2 () { 380; }") unless defined(&TICODE_u2);
    eval("sub TICODE_u3 () { 381; }") unless defined(&TICODE_u3);
    eval("sub TICODE_u4 () { 382; }") unless defined(&TICODE_u4);
    eval("sub TICODE_u5 () { 383; }") unless defined(&TICODE_u5);
    eval("sub TICODE_u6 () { 384; }") unless defined(&TICODE_u6);
    eval("sub TICODE_u7 () { 385; }") unless defined(&TICODE_u7);
    eval("sub TICODE_u8 () { 386; }") unless defined(&TICODE_u8);
    eval("sub TICODE_u9 () { 387; }") unless defined(&TICODE_u9);
    eval("sub TICODE_uc () { 388; }") unless defined(&TICODE_uc);
    eval("sub TICODE_hu () { 389; }") unless defined(&TICODE_hu);
    eval("sub TICODE_wait () { 390; }") unless defined(&TICODE_wait);
    eval("sub TICODE_xoffc () { 391; }") unless defined(&TICODE_xoffc);
    eval("sub TICODE_xonc () { 392; }") unless defined(&TICODE_xonc);
    eval("sub TICODE_zerom () { 393; }") unless defined(&TICODE_zerom);
    eval 'sub TISTRMAX () { &TICODE_zerom;}' unless defined(&TISTRMAX);
    eval 'sub t_acs_chars {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_acsc]);
    }' unless defined(&t_acs_chars);
    eval 'sub t_alt_scancode_esc {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_scesa]);
    }' unless defined(&t_alt_scancode_esc);
    eval 'sub t_back_tab {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_cbt]);
    }' unless defined(&t_back_tab);
    eval 'sub t_bell {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_bel]);
    }' unless defined(&t_bell);
    eval 'sub t_bit_image_carriage_return {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_bicr]);
    }' unless defined(&t_bit_image_carriage_return);
    eval 'sub t_bit_image_newline {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_binel]);
    }' unless defined(&t_bit_image_newline);
    eval 'sub t_bit_image_repeat {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_birep]);
    }' unless defined(&t_bit_image_repeat);
    eval 'sub t_carriage_return {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_cr]);
    }' unless defined(&t_carriage_return);
    eval 'sub t_change_char_pitch {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_cpi]);
    }' unless defined(&t_change_char_pitch);
    eval 'sub t_change_line_pitch {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_lpi]);
    }' unless defined(&t_change_line_pitch);
    eval 'sub t_change_res_horz {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_chr]);
    }' unless defined(&t_change_res_horz);
    eval 'sub t_change_res_vert {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_cvr]);
    }' unless defined(&t_change_res_vert);
    eval 'sub t_change_scroll_region {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_csr]);
    }' unless defined(&t_change_scroll_region);
    eval 'sub t_char_padding {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_rmp]);
    }' unless defined(&t_char_padding);
    eval 'sub t_char_set_names {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_csnm]);
    }' unless defined(&t_char_set_names);
    eval 'sub t_clear_all_tabs {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_tbc]);
    }' unless defined(&t_clear_all_tabs);
    eval 'sub t_clear_margins {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_mgc]);
    }' unless defined(&t_clear_margins);
    eval 'sub t_clear_screen {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_clear]);
    }' unless defined(&t_clear_screen);
    eval 'sub t_clr_bol {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_el1]);
    }' unless defined(&t_clr_bol);
    eval 'sub t_clr_eol {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_el]);
    }' unless defined(&t_clr_eol);
    eval 'sub t_clr_eos {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_ed]);
    }' unless defined(&t_clr_eos);
    eval 'sub t_code_set_init {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_csin]);
    }' unless defined(&t_code_set_init);
    eval 'sub t_color_names {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_colornm]);
    }' unless defined(&t_color_names);
    eval 'sub t_column_address {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_hpa]);
    }' unless defined(&t_column_address);
    eval 'sub t_command_character {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_cmdch]);
    }' unless defined(&t_command_character);
    eval 'sub t_create_window {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_cwin]);
    }' unless defined(&t_create_window);
    eval 'sub t_cursor_address {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_cup]);
    }' unless defined(&t_cursor_address);
    eval 'sub t_cursor_down {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_cud1]);
    }' unless defined(&t_cursor_down);
    eval 'sub t_cursor_home {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_home]);
    }' unless defined(&t_cursor_home);
    eval 'sub t_cursor_invisible {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_civis]);
    }' unless defined(&t_cursor_invisible);
    eval 'sub t_cursor_left {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_cub1]);
    }' unless defined(&t_cursor_left);
    eval 'sub t_cursor_mem_address {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_mrcup]);
    }' unless defined(&t_cursor_mem_address);
    eval 'sub t_cursor_normal {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_cnorm]);
    }' unless defined(&t_cursor_normal);
    eval 'sub t_cursor_right {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_cuf1]);
    }' unless defined(&t_cursor_right);
    eval 'sub t_cursor_to_ll {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_ll]);
    }' unless defined(&t_cursor_to_ll);
    eval 'sub t_cursor_up {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_cuu1]);
    }' unless defined(&t_cursor_up);
    eval 'sub t_cursor_visible {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_cvvis]);
    }' unless defined(&t_cursor_visible);
    eval 'sub t_define_bit_image_region {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_defbi]);
    }' unless defined(&t_define_bit_image_region);
    eval 'sub t_define_char {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_defc]);
    }' unless defined(&t_define_char);
    eval 'sub t_delete_character {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_dch1]);
    }' unless defined(&t_delete_character);
    eval 'sub t_delete_line {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_dl1]);
    }' unless defined(&t_delete_line);
    eval 'sub t_device_type {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_devt]);
    }' unless defined(&t_device_type);
    eval 'sub t_dial_phone {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_dial]);
    }' unless defined(&t_dial_phone);
    eval 'sub t_dis_status_line {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_dsl]);
    }' unless defined(&t_dis_status_line);
    eval 'sub t_display_clock {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_dclk]);
    }' unless defined(&t_display_clock);
    eval 'sub t_display_pc_char {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_dispc]);
    }' unless defined(&t_display_pc_char);
    eval 'sub t_down_half_time {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_hd]);
    }' unless defined(&t_down_half_time);
    eval 'sub t_ena_acs {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_enacs]);
    }' unless defined(&t_ena_acs);
    eval 'sub t_end_bit_image_region {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_endbi]);
    }' unless defined(&t_end_bit_image_region);
    eval 'sub t_enter_alt_charset_mode {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_smacs]);
    }' unless defined(&t_enter_alt_charset_mode);
    eval 'sub t_enter_am_mode {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_smam]);
    }' unless defined(&t_enter_am_mode);
    eval 'sub t_enter_blink_mode {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_blink]);
    }' unless defined(&t_enter_blink_mode);
    eval 'sub t_enter_bold_mode {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_bold]);
    }' unless defined(&t_enter_bold_mode);
    eval 'sub t_enter_ca_mode {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_smcup]);
    }' unless defined(&t_enter_ca_mode);
    eval 'sub t_enter_delete_mode {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_smdc]);
    }' unless defined(&t_enter_delete_mode);
    eval 'sub t_enter_dim_mode {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_dim]);
    }' unless defined(&t_enter_dim_mode);
    eval 'sub t_enter_doublewide_mode {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_swidm]);
    }' unless defined(&t_enter_doublewide_mode);
    eval 'sub t_enter_draft_quality {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_sdrfq]);
    }' unless defined(&t_enter_draft_quality);
    eval 'sub t_enter_horizontal_hl_mode {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_ehhlm]);
    }' unless defined(&t_enter_horizontal_hl_mode);
    eval 'sub t_enter_insert_mode {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_smir]);
    }' unless defined(&t_enter_insert_mode);
    eval 'sub t_enter_italics_mode {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_sitm]);
    }' unless defined(&t_enter_italics_mode);
    eval 'sub t_enter_left_hl_mode {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_elhlm]);
    }' unless defined(&t_enter_left_hl_mode);
    eval 'sub t_enter_leftward_mode {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_slm]);
    }' unless defined(&t_enter_leftward_mode);
    eval 'sub t_enter_low_hl_mode {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_elohlm]);
    }' unless defined(&t_enter_low_hl_mode);
    eval 'sub t_enter_micro_mode {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_smicm]);
    }' unless defined(&t_enter_micro_mode);
    eval 'sub t_enter_near_quality_letter {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_snlq]);
    }' unless defined(&t_enter_near_quality_letter);
    eval 'sub t_enter_normal_quality {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_snrmq]);
    }' unless defined(&t_enter_normal_quality);
    eval 'sub t_enter_pc_charset_mode {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_smpch]);
    }' unless defined(&t_enter_pc_charset_mode);
    eval 'sub t_enter_protected_mode {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_prot]);
    }' unless defined(&t_enter_protected_mode);
    eval 'sub t_enter_reverse_mode {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_rev]);
    }' unless defined(&t_enter_reverse_mode);
    eval 'sub t_enter_right_hl_mode {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_erhlm]);
    }' unless defined(&t_enter_right_hl_mode);
    eval 'sub t_enter_scancode_mode {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_smsc]);
    }' unless defined(&t_enter_scancode_mode);
    eval 'sub t_enter_secure_mode {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_invis]);
    }' unless defined(&t_enter_secure_mode);
    eval 'sub t_enter_shadow_mode {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_sshm]);
    }' unless defined(&t_enter_shadow_mode);
    eval 'sub t_enter_standout_mode {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_smso]);
    }' unless defined(&t_enter_standout_mode);
    eval 'sub t_enter_subscript_mode {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_ssubm]);
    }' unless defined(&t_enter_subscript_mode);
    eval 'sub t_enter_superscript_mode {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_ssupm]);
    }' unless defined(&t_enter_superscript_mode);
    eval 'sub t_enter_top_hl_mode {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_ethlm]);
    }' unless defined(&t_enter_top_hl_mode);
    eval 'sub t_enter_underline_mode {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_smul]);
    }' unless defined(&t_enter_underline_mode);
    eval 'sub t_enter_upward_mode {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_sum]);
    }' unless defined(&t_enter_upward_mode);
    eval 'sub t_enter_vertical_hl_mode {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_evhlm]);
    }' unless defined(&t_enter_vertical_hl_mode);
    eval 'sub t_enter_xon_mode {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_smxon]);
    }' unless defined(&t_enter_xon_mode);
    eval 'sub t_erase_chars {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_ech]);
    }' unless defined(&t_erase_chars);
    eval 'sub t_exit_alt_charset_mode {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_rmacs]);
    }' unless defined(&t_exit_alt_charset_mode);
    eval 'sub t_exit_am_mode {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_rmam]);
    }' unless defined(&t_exit_am_mode);
    eval 'sub t_exit_attribute_mode {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_sgr0]);
    }' unless defined(&t_exit_attribute_mode);
    eval 'sub t_exit_ca_mode {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_rmcup]);
    }' unless defined(&t_exit_ca_mode);
    eval 'sub t_exit_delete_mode {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_rmdc]);
    }' unless defined(&t_exit_delete_mode);
    eval 'sub t_exit_doublewide_mode {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_rwidm]);
    }' unless defined(&t_exit_doublewide_mode);
    eval 'sub t_exit_insert_mode {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_rmir]);
    }' unless defined(&t_exit_insert_mode);
    eval 'sub t_exit_italics_mode {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_ritm]);
    }' unless defined(&t_exit_italics_mode);
    eval 'sub t_exit_leftward_mode {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_rlm]);
    }' unless defined(&t_exit_leftward_mode);
    eval 'sub t_exit_micro_mode {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_rmicm]);
    }' unless defined(&t_exit_micro_mode);
    eval 'sub t_exit_pc_charset_mode {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_rmpch]);
    }' unless defined(&t_exit_pc_charset_mode);
    eval 'sub t_exit_scancode_mode {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_rmsc]);
    }' unless defined(&t_exit_scancode_mode);
    eval 'sub t_exit_shadow_mode {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_rshm]);
    }' unless defined(&t_exit_shadow_mode);
    eval 'sub t_exit_standout_mode {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_rmso]);
    }' unless defined(&t_exit_standout_mode);
    eval 'sub t_exit_subscript_mode {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_rsubm]);
    }' unless defined(&t_exit_subscript_mode);
    eval 'sub t_exit_superscript_mode {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_rsupm]);
    }' unless defined(&t_exit_superscript_mode);
    eval 'sub t_exit_underline_mode {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_rmul]);
    }' unless defined(&t_exit_underline_mode);
    eval 'sub t_exit_upward_mode {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_rum]);
    }' unless defined(&t_exit_upward_mode);
    eval 'sub t_exit_xon_mode {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_rmxon]);
    }' unless defined(&t_exit_xon_mode);
    eval 'sub t_fixed_pause {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_pause]);
    }' unless defined(&t_fixed_pause);
    eval 'sub t_flash_hook {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_hook]);
    }' unless defined(&t_flash_hook);
    eval 'sub t_flash_screen {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_flash]);
    }' unless defined(&t_flash_screen);
    eval 'sub t_form_feed {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_ff]);
    }' unless defined(&t_form_feed);
    eval 'sub t_from_status_line {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_fsl]);
    }' unless defined(&t_from_status_line);
    eval 'sub t_get_mouse {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_getm]);
    }' unless defined(&t_get_mouse);
    eval 'sub t_goto_window {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_wingo]);
    }' unless defined(&t_goto_window);
    eval 'sub t_hangup {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_hup]);
    }' unless defined(&t_hangup);
    eval 'sub t_init_1string {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_is1]);
    }' unless defined(&t_init_1string);
    eval 'sub t_init_2string {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_is2]);
    }' unless defined(&t_init_2string);
    eval 'sub t_init_3string {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_is3]);
    }' unless defined(&t_init_3string);
    eval 'sub t_init_file {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_if]);
    }' unless defined(&t_init_file);
    eval 'sub t_init_prog {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_iprog]);
    }' unless defined(&t_init_prog);
    eval 'sub t_initialize_color {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_initc]);
    }' unless defined(&t_initialize_color);
    eval 'sub t_initialize_pair {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_initp]);
    }' unless defined(&t_initialize_pair);
    eval 'sub t_insert_character {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_ich1]);
    }' unless defined(&t_insert_character);
    eval 'sub t_insert_line {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_il1]);
    }' unless defined(&t_insert_line);
    eval 'sub t_insert_padding {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_ip]);
    }' unless defined(&t_insert_padding);
    eval 'sub t_key_a1 {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_ka1]);
    }' unless defined(&t_key_a1);
    eval 'sub t_key_a3 {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_ka3]);
    }' unless defined(&t_key_a3);
    eval 'sub t_key_b2 {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kb2]);
    }' unless defined(&t_key_b2);
    eval 'sub t_key_backspace {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kbs]);
    }' unless defined(&t_key_backspace);
    eval 'sub t_key_beg {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kbeg]);
    }' unless defined(&t_key_beg);
    eval 'sub t_key_btab {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kcbt]);
    }' unless defined(&t_key_btab);
    eval 'sub t_key_c1 {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kc1]);
    }' unless defined(&t_key_c1);
    eval 'sub t_key_c3 {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kc3]);
    }' unless defined(&t_key_c3);
    eval 'sub t_key_cancel {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kcan]);
    }' unless defined(&t_key_cancel);
    eval 'sub t_key_catab {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_ktbc]);
    }' unless defined(&t_key_catab);
    eval 'sub t_key_clear {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kclr]);
    }' unless defined(&t_key_clear);
    eval 'sub t_key_close {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kclo]);
    }' unless defined(&t_key_close);
    eval 'sub t_key_command {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kcmd]);
    }' unless defined(&t_key_command);
    eval 'sub t_key_copy {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kcpy]);
    }' unless defined(&t_key_copy);
    eval 'sub t_key_create {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kcrt]);
    }' unless defined(&t_key_create);
    eval 'sub t_key_ctab {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kctab]);
    }' unless defined(&t_key_ctab);
    eval 'sub t_key_dc {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kdch1]);
    }' unless defined(&t_key_dc);
    eval 'sub t_key_dl {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kdl1]);
    }' unless defined(&t_key_dl);
    eval 'sub t_key_down {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kcud1]);
    }' unless defined(&t_key_down);
    eval 'sub t_key_eic {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_krmir]);
    }' unless defined(&t_key_eic);
    eval 'sub t_key_end {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kend]);
    }' unless defined(&t_key_end);
    eval 'sub t_key_enter {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kent]);
    }' unless defined(&t_key_enter);
    eval 'sub t_key_eol {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kel]);
    }' unless defined(&t_key_eol);
    eval 'sub t_key_eos {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_ked]);
    }' unless defined(&t_key_eos);
    eval 'sub t_key_exit {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kext]);
    }' unless defined(&t_key_exit);
    eval 'sub t_key_f0 {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kf0]);
    }' unless defined(&t_key_f0);
    eval 'sub t_key_f1 {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kf1]);
    }' unless defined(&t_key_f1);
    eval 'sub t_key_f2 {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kf2]);
    }' unless defined(&t_key_f2);
    eval 'sub t_key_f3 {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kf3]);
    }' unless defined(&t_key_f3);
    eval 'sub t_key_f4 {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kf4]);
    }' unless defined(&t_key_f4);
    eval 'sub t_key_f5 {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kf5]);
    }' unless defined(&t_key_f5);
    eval 'sub t_key_f6 {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kf6]);
    }' unless defined(&t_key_f6);
    eval 'sub t_key_f7 {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kf7]);
    }' unless defined(&t_key_f7);
    eval 'sub t_key_f8 {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kf8]);
    }' unless defined(&t_key_f8);
    eval 'sub t_key_f9 {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kf9]);
    }' unless defined(&t_key_f9);
    eval 'sub t_key_f10 {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kf10]);
    }' unless defined(&t_key_f10);
    eval 'sub t_key_f11 {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kf11]);
    }' unless defined(&t_key_f11);
    eval 'sub t_key_f12 {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kf12]);
    }' unless defined(&t_key_f12);
    eval 'sub t_key_f13 {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kf13]);
    }' unless defined(&t_key_f13);
    eval 'sub t_key_f14 {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kf14]);
    }' unless defined(&t_key_f14);
    eval 'sub t_key_f15 {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kf15]);
    }' unless defined(&t_key_f15);
    eval 'sub t_key_f16 {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kf16]);
    }' unless defined(&t_key_f16);
    eval 'sub t_key_f17 {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kf17]);
    }' unless defined(&t_key_f17);
    eval 'sub t_key_f18 {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kf18]);
    }' unless defined(&t_key_f18);
    eval 'sub t_key_f19 {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kf19]);
    }' unless defined(&t_key_f19);
    eval 'sub t_key_f20 {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kf20]);
    }' unless defined(&t_key_f20);
    eval 'sub t_key_f21 {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kf21]);
    }' unless defined(&t_key_f21);
    eval 'sub t_key_f22 {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kf22]);
    }' unless defined(&t_key_f22);
    eval 'sub t_key_f23 {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kf23]);
    }' unless defined(&t_key_f23);
    eval 'sub t_key_f24 {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kf24]);
    }' unless defined(&t_key_f24);
    eval 'sub t_key_f25 {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kf25]);
    }' unless defined(&t_key_f25);
    eval 'sub t_key_f26 {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kf26]);
    }' unless defined(&t_key_f26);
    eval 'sub t_key_f27 {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kf27]);
    }' unless defined(&t_key_f27);
    eval 'sub t_key_f28 {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kf28]);
    }' unless defined(&t_key_f28);
    eval 'sub t_key_f29 {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kf29]);
    }' unless defined(&t_key_f29);
    eval 'sub t_key_f30 {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kf30]);
    }' unless defined(&t_key_f30);
    eval 'sub t_key_f31 {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kf31]);
    }' unless defined(&t_key_f31);
    eval 'sub t_key_f32 {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kf32]);
    }' unless defined(&t_key_f32);
    eval 'sub t_key_f33 {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kf33]);
    }' unless defined(&t_key_f33);
    eval 'sub t_key_f34 {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kf34]);
    }' unless defined(&t_key_f34);
    eval 'sub t_key_f35 {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kf35]);
    }' unless defined(&t_key_f35);
    eval 'sub t_key_f36 {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kf36]);
    }' unless defined(&t_key_f36);
    eval 'sub t_key_f37 {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kf37]);
    }' unless defined(&t_key_f37);
    eval 'sub t_key_f38 {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kf38]);
    }' unless defined(&t_key_f38);
    eval 'sub t_key_f39 {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kf39]);
    }' unless defined(&t_key_f39);
    eval 'sub t_key_f40 {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kf40]);
    }' unless defined(&t_key_f40);
    eval 'sub t_key_f41 {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kf41]);
    }' unless defined(&t_key_f41);
    eval 'sub t_key_f42 {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kf42]);
    }' unless defined(&t_key_f42);
    eval 'sub t_key_f43 {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kf43]);
    }' unless defined(&t_key_f43);
    eval 'sub t_key_f44 {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kf44]);
    }' unless defined(&t_key_f44);
    eval 'sub t_key_f45 {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kf45]);
    }' unless defined(&t_key_f45);
    eval 'sub t_key_f46 {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kf46]);
    }' unless defined(&t_key_f46);
    eval 'sub t_key_f47 {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kf47]);
    }' unless defined(&t_key_f47);
    eval 'sub t_key_f48 {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kf48]);
    }' unless defined(&t_key_f48);
    eval 'sub t_key_f49 {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kf49]);
    }' unless defined(&t_key_f49);
    eval 'sub t_key_f50 {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kf50]);
    }' unless defined(&t_key_f50);
    eval 'sub t_key_f51 {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kf51]);
    }' unless defined(&t_key_f51);
    eval 'sub t_key_f52 {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kf52]);
    }' unless defined(&t_key_f52);
    eval 'sub t_key_f53 {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kf53]);
    }' unless defined(&t_key_f53);
    eval 'sub t_key_f54 {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kf54]);
    }' unless defined(&t_key_f54);
    eval 'sub t_key_f55 {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kf55]);
    }' unless defined(&t_key_f55);
    eval 'sub t_key_f56 {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kf56]);
    }' unless defined(&t_key_f56);
    eval 'sub t_key_f57 {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kf57]);
    }' unless defined(&t_key_f57);
    eval 'sub t_key_f58 {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kf58]);
    }' unless defined(&t_key_f58);
    eval 'sub t_key_f59 {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kf59]);
    }' unless defined(&t_key_f59);
    eval 'sub t_key_f60 {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kf60]);
    }' unless defined(&t_key_f60);
    eval 'sub t_key_f61 {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kf61]);
    }' unless defined(&t_key_f61);
    eval 'sub t_key_f62 {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kf62]);
    }' unless defined(&t_key_f62);
    eval 'sub t_key_f63 {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kf63]);
    }' unless defined(&t_key_f63);
    eval 'sub t_key_find {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kfnd]);
    }' unless defined(&t_key_find);
    eval 'sub t_key_help {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_khlp]);
    }' unless defined(&t_key_help);
    eval 'sub t_key_home {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_khome]);
    }' unless defined(&t_key_home);
    eval 'sub t_key_ic {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kich1]);
    }' unless defined(&t_key_ic);
    eval 'sub t_key_il {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kil1]);
    }' unless defined(&t_key_il);
    eval 'sub t_key_left {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kcub1]);
    }' unless defined(&t_key_left);
    eval 'sub t_key_ll {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kll]);
    }' unless defined(&t_key_ll);
    eval 'sub t_key_mark {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kmrk]);
    }' unless defined(&t_key_mark);
    eval 'sub t_key_message {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kmsg]);
    }' unless defined(&t_key_message);
    eval 'sub t_key_mouse {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kmous]);
    }' unless defined(&t_key_mouse);
    eval 'sub t_key_move {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kmov]);
    }' unless defined(&t_key_move);
    eval 'sub t_key_next {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_knxt]);
    }' unless defined(&t_key_next);
    eval 'sub t_key_npage {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_knp]);
    }' unless defined(&t_key_npage);
    eval 'sub t_key_open {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kopn]);
    }' unless defined(&t_key_open);
    eval 'sub t_key_options {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kopt]);
    }' unless defined(&t_key_options);
    eval 'sub t_key_ppage {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kpp]);
    }' unless defined(&t_key_ppage);
    eval 'sub t_key_previous {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kprv]);
    }' unless defined(&t_key_previous);
    eval 'sub t_key_print {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kprt]);
    }' unless defined(&t_key_print);
    eval 'sub t_key_redo {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_krdo]);
    }' unless defined(&t_key_redo);
    eval 'sub t_key_reference {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kref]);
    }' unless defined(&t_key_reference);
    eval 'sub t_key_refresh {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_krfr]);
    }' unless defined(&t_key_refresh);
    eval 'sub t_key_replace {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_krpl]);
    }' unless defined(&t_key_replace);
    eval 'sub t_key_restart {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_krst]);
    }' unless defined(&t_key_restart);
    eval 'sub t_key_resume {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kres]);
    }' unless defined(&t_key_resume);
    eval 'sub t_key_right {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kcuf1]);
    }' unless defined(&t_key_right);
    eval 'sub t_key_save {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_ksav]);
    }' unless defined(&t_key_save);
    eval 'sub t_key_sbeg {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kBEG]);
    }' unless defined(&t_key_sbeg);
    eval 'sub t_key_scancel {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kCAN]);
    }' unless defined(&t_key_scancel);
    eval 'sub t_key_scommand {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kCMD]);
    }' unless defined(&t_key_scommand);
    eval 'sub t_key_scopy {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kCPY]);
    }' unless defined(&t_key_scopy);
    eval 'sub t_key_screate {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kCRT]);
    }' unless defined(&t_key_screate);
    eval 'sub t_key_sdc {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kDC]);
    }' unless defined(&t_key_sdc);
    eval 'sub t_key_sdl {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kDL]);
    }' unless defined(&t_key_sdl);
    eval 'sub t_key_select {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kslt]);
    }' unless defined(&t_key_select);
    eval 'sub t_key_send {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kEND]);
    }' unless defined(&t_key_send);
    eval 'sub t_key_seol {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kEOL]);
    }' unless defined(&t_key_seol);
    eval 'sub t_key_sexit {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kEXT]);
    }' unless defined(&t_key_sexit);
    eval 'sub t_key_sf {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kind]);
    }' unless defined(&t_key_sf);
    eval 'sub t_key_sfind {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kFND]);
    }' unless defined(&t_key_sfind);
    eval 'sub t_key_shelp {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kHLP]);
    }' unless defined(&t_key_shelp);
    eval 'sub t_key_shome {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kHOM]);
    }' unless defined(&t_key_shome);
    eval 'sub t_key_sic {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kIC]);
    }' unless defined(&t_key_sic);
    eval 'sub t_key_sleft {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kLFT]);
    }' unless defined(&t_key_sleft);
    eval 'sub t_key_smessage {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kMSG]);
    }' unless defined(&t_key_smessage);
    eval 'sub t_key_smove {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kMOV]);
    }' unless defined(&t_key_smove);
    eval 'sub t_key_snext {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kNXT]);
    }' unless defined(&t_key_snext);
    eval 'sub t_key_soptions {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kOPT]);
    }' unless defined(&t_key_soptions);
    eval 'sub t_key_sprevious {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kPRV]);
    }' unless defined(&t_key_sprevious);
    eval 'sub t_key_sprint {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kPRT]);
    }' unless defined(&t_key_sprint);
    eval 'sub t_key_sr {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kri]);
    }' unless defined(&t_key_sr);
    eval 'sub t_key_sredo {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kRDO]);
    }' unless defined(&t_key_sredo);
    eval 'sub t_key_sreplace {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kRPL]);
    }' unless defined(&t_key_sreplace);
    eval 'sub t_key_sright {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kRIT]);
    }' unless defined(&t_key_sright);
    eval 'sub t_key_srsume {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kRES]);
    }' unless defined(&t_key_srsume);
    eval 'sub t_key_ssave {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kSAV]);
    }' unless defined(&t_key_ssave);
    eval 'sub t_key_ssuspend {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kSPD]);
    }' unless defined(&t_key_ssuspend);
    eval 'sub t_key_stab {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_khts]);
    }' unless defined(&t_key_stab);
    eval 'sub t_key_sundo {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kUND]);
    }' unless defined(&t_key_sundo);
    eval 'sub t_key_suspend {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kspd]);
    }' unless defined(&t_key_suspend);
    eval 'sub t_key_undo {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kund]);
    }' unless defined(&t_key_undo);
    eval 'sub t_key_up {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_kcuu1]);
    }' unless defined(&t_key_up);
    eval 'sub t_keypad_local {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_rmkx]);
    }' unless defined(&t_keypad_local);
    eval 'sub t_keypad_xmit {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_smkx]);
    }' unless defined(&t_keypad_xmit);
    eval 'sub t_lab_f0 {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_lf0]);
    }' unless defined(&t_lab_f0);
    eval 'sub t_lab_f1 {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_lf1]);
    }' unless defined(&t_lab_f1);
    eval 'sub t_lab_f2 {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_lf2]);
    }' unless defined(&t_lab_f2);
    eval 'sub t_lab_f3 {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_lf3]);
    }' unless defined(&t_lab_f3);
    eval 'sub t_lab_f4 {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_lf4]);
    }' unless defined(&t_lab_f4);
    eval 'sub t_lab_f5 {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_lf5]);
    }' unless defined(&t_lab_f5);
    eval 'sub t_lab_f6 {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_lf6]);
    }' unless defined(&t_lab_f6);
    eval 'sub t_lab_f7 {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_lf7]);
    }' unless defined(&t_lab_f7);
    eval 'sub t_lab_f8 {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_lf8]);
    }' unless defined(&t_lab_f8);
    eval 'sub t_lab_f9 {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_lf9]);
    }' unless defined(&t_lab_f9);
    eval 'sub t_lab_f10 {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_lf10]);
    }' unless defined(&t_lab_f10);
    eval 'sub t_label_format {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_fln]);
    }' unless defined(&t_label_format);
    eval 'sub t_label_off {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_rmln]);
    }' unless defined(&t_label_off);
    eval 'sub t_label_on {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_smln]);
    }' unless defined(&t_label_on);
    eval 'sub t_meta_off {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_rmm]);
    }' unless defined(&t_meta_off);
    eval 'sub t_meta_on {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_smm]);
    }' unless defined(&t_meta_on);
    eval 'sub t_micro_column_address {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_mhpa]);
    }' unless defined(&t_micro_column_address);
    eval 'sub t_micro_down {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_mcud1]);
    }' unless defined(&t_micro_down);
    eval 'sub t_micro_left {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_mcub1]);
    }' unless defined(&t_micro_left);
    eval 'sub t_micro_right {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_mcuf1]);
    }' unless defined(&t_micro_right);
    eval 'sub t_micro_row_address {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_mvpa]);
    }' unless defined(&t_micro_row_address);
    eval 'sub t_micro_up {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_mcuu1]);
    }' unless defined(&t_micro_up);
    eval 'sub t_mouse_info {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_minfo]);
    }' unless defined(&t_mouse_info);
    eval 'sub t_newline {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_nel]);
    }' unless defined(&t_newline);
    eval 'sub t_order_of_pins {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_porder]);
    }' unless defined(&t_order_of_pins);
    eval 'sub t_orig_colors {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_oc]);
    }' unless defined(&t_orig_colors);
    eval 'sub t_orig_pair {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_op]);
    }' unless defined(&t_orig_pair);
    eval 'sub t_pad_char {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_pad]);
    }' unless defined(&t_pad_char);
    eval 'sub t_parm_dch {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_dch]);
    }' unless defined(&t_parm_dch);
    eval 'sub t_parm_delete_line {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_dl]);
    }' unless defined(&t_parm_delete_line);
    eval 'sub t_parm_down_cursor {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_cud]);
    }' unless defined(&t_parm_down_cursor);
    eval 'sub t_parm_down_micro {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_mcud]);
    }' unless defined(&t_parm_down_micro);
    eval 'sub t_parm_ich {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_ich]);
    }' unless defined(&t_parm_ich);
    eval 'sub t_parm_index {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_indn]);
    }' unless defined(&t_parm_index);
    eval 'sub t_parm_insert_line {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_il]);
    }' unless defined(&t_parm_insert_line);
    eval 'sub t_parm_left_cursor {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_cub]);
    }' unless defined(&t_parm_left_cursor);
    eval 'sub t_parm_left_micro {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_mcub]);
    }' unless defined(&t_parm_left_micro);
    eval 'sub t_parm_right_cursor {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_cuf]);
    }' unless defined(&t_parm_right_cursor);
    eval 'sub t_parm_right_micro {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_mcuf]);
    }' unless defined(&t_parm_right_micro);
    eval 'sub t_parm_rindex {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_rin]);
    }' unless defined(&t_parm_rindex);
    eval 'sub t_parm_up_cursor {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_cuu]);
    }' unless defined(&t_parm_up_cursor);
    eval 'sub t_parm_up_micro {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_mcuu]);
    }' unless defined(&t_parm_up_micro);
    eval 'sub t_pc_term_options {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_pctrm]);
    }' unless defined(&t_pc_term_options);
    eval 'sub t_pkey_key {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_pfkey]);
    }' unless defined(&t_pkey_key);
    eval 'sub t_pkey_local {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_pfloc]);
    }' unless defined(&t_pkey_local);
    eval 'sub t_pkey_plab {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_pfxl]);
    }' unless defined(&t_pkey_plab);
    eval 'sub t_pkey_xmit {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_pfx]);
    }' unless defined(&t_pkey_xmit);
    eval 'sub t_plab_norm {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_pln]);
    }' unless defined(&t_plab_norm);
    eval 'sub t_print_screen {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_mc0]);
    }' unless defined(&t_print_screen);
    eval 'sub t_ptr_non {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_mc5p]);
    }' unless defined(&t_ptr_non);
    eval 'sub t_ptr_off {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_mc4]);
    }' unless defined(&t_ptr_off);
    eval 'sub t_ptr_on {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_mc5]);
    }' unless defined(&t_ptr_on);
    eval 'sub t_pulse {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_pulse]);
    }' unless defined(&t_pulse);
    eval 'sub t_quick_dial {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_qdial]);
    }' unless defined(&t_quick_dial);
    eval 'sub t_remove_clock {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_rmclk]);
    }' unless defined(&t_remove_clock);
    eval 'sub t_repeat_char {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_rep]);
    }' unless defined(&t_repeat_char);
    eval 'sub t_req_for_input {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_rfi]);
    }' unless defined(&t_req_for_input);
    eval 'sub t_req_mouse_pos {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_reqmp]);
    }' unless defined(&t_req_mouse_pos);
    eval 'sub t_reset_1string {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_rs1]);
    }' unless defined(&t_reset_1string);
    eval 'sub t_reset_2string {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_rs2]);
    }' unless defined(&t_reset_2string);
    eval 'sub t_reset_3string {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_rs3]);
    }' unless defined(&t_reset_3string);
    eval 'sub t_reset_file {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_rf]);
    }' unless defined(&t_reset_file);
    eval 'sub t_restore_cursor {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_rc]);
    }' unless defined(&t_restore_cursor);
    eval 'sub t_row_address {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_vpa]);
    }' unless defined(&t_row_address);
    eval 'sub t_save_cursor {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_sc]);
    }' unless defined(&t_save_cursor);
    eval 'sub t_scancode_escape {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_scesc]);
    }' unless defined(&t_scancode_escape);
    eval 'sub t_scroll_forward {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_ind]);
    }' unless defined(&t_scroll_forward);
    eval 'sub t_scroll_reverse {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_ri]);
    }' unless defined(&t_scroll_reverse);
    eval 'sub t_select_char_set {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_scs]);
    }' unless defined(&t_select_char_set);
    eval 'sub t_set0_des_seq {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_s0ds]);
    }' unless defined(&t_set0_des_seq);
    eval 'sub t_set1_des_seq {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_s1ds]);
    }' unless defined(&t_set1_des_seq);
    eval 'sub t_set2_des_seq {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_s2ds]);
    }' unless defined(&t_set2_des_seq);
    eval 'sub t_set3_des_seq {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_s3ds]);
    }' unless defined(&t_set3_des_seq);
    eval 'sub t_set_a_attributes {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_sgr1]);
    }' unless defined(&t_set_a_attributes);
    eval 'sub t_set_a_background {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_setab]);
    }' unless defined(&t_set_a_background);
    eval 'sub t_set_a_foreground {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_setaf]);
    }' unless defined(&t_set_a_foreground);
    eval 'sub t_set_attributes {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_sgr]);
    }' unless defined(&t_set_attributes);
    eval 'sub t_set_background {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_setb]);
    }' unless defined(&t_set_background);
    eval 'sub t_set_bottom_margin {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_smgb]);
    }' unless defined(&t_set_bottom_margin);
    eval 'sub t_set_bottom_margin_parm {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_smgbp]);
    }' unless defined(&t_set_bottom_margin_parm);
    eval 'sub t_set_clock {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_sclk]);
    }' unless defined(&t_set_clock);
    eval 'sub t_set_color_band {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_setcolor]);
    }' unless defined(&t_set_color_band);
    eval 'sub t_set_color_pair {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_scp]);
    }' unless defined(&t_set_color_pair);
    eval 'sub t_set_foreground {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_setf]);
    }' unless defined(&t_set_foreground);
    eval 'sub t_set_left_margin {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_smgl]);
    }' unless defined(&t_set_left_margin);
    eval 'sub t_set_left_margin_parm {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_smglp]);
    }' unless defined(&t_set_left_margin_parm);
    eval 'sub t_set_lr_margin {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_smglr]);
    }' unless defined(&t_set_lr_margin);
    eval 'sub t_set_page_length {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_slines]);
    }' unless defined(&t_set_page_length);
    eval 'sub t_set_pglen_inch {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_slength]);
    }' unless defined(&t_set_pglen_inch);
    eval 'sub t_set_right_margin {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_smgr]);
    }' unless defined(&t_set_right_margin);
    eval 'sub t_set_right_margin_parm {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_smgrp]);
    }' unless defined(&t_set_right_margin_parm);
    eval 'sub t_set_tab {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_hts]);
    }' unless defined(&t_set_tab);
    eval 'sub t_set_tb_margin {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_smgtb]);
    }' unless defined(&t_set_tb_margin);
    eval 'sub t_set_top_margin {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_smgt]);
    }' unless defined(&t_set_top_margin);
    eval 'sub t_set_top_margin_parm {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_smgtp]);
    }' unless defined(&t_set_top_margin_parm);
    eval 'sub t_set_window {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_wind]);
    }' unless defined(&t_set_window);
    eval 'sub t_start_bit_image {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_sbim]);
    }' unless defined(&t_start_bit_image);
    eval 'sub t_start_char_set_def {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_scsd]);
    }' unless defined(&t_start_char_set_def);
    eval 'sub t_stop_bit_image {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_rbim]);
    }' unless defined(&t_stop_bit_image);
    eval 'sub t_stop_char_set_def {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_rcsd]);
    }' unless defined(&t_stop_char_set_def);
    eval 'sub t_subscript_characters {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_subcs]);
    }' unless defined(&t_subscript_characters);
    eval 'sub t_superscript_characters {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_supcs]);
    }' unless defined(&t_superscript_characters);
    eval 'sub t_tab {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_ht]);
    }' unless defined(&t_tab);
    eval 'sub t_these_cause_cr {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_docr]);
    }' unless defined(&t_these_cause_cr);
    eval 'sub t_to_status_line {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_tsl]);
    }' unless defined(&t_to_status_line);
    eval 'sub t_tone {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_tone]);
    }' unless defined(&t_tone);
    eval 'sub t_user0 {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_u0]);
    }' unless defined(&t_user0);
    eval 'sub t_user1 {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_u1]);
    }' unless defined(&t_user1);
    eval 'sub t_user2 {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_u2]);
    }' unless defined(&t_user2);
    eval 'sub t_user3 {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_u3]);
    }' unless defined(&t_user3);
    eval 'sub t_user4 {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_u4]);
    }' unless defined(&t_user4);
    eval 'sub t_user5 {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_u5]);
    }' unless defined(&t_user5);
    eval 'sub t_user6 {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_u6]);
    }' unless defined(&t_user6);
    eval 'sub t_user7 {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_u7]);
    }' unless defined(&t_user7);
    eval 'sub t_user8 {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_u8]);
    }' unless defined(&t_user8);
    eval 'sub t_user9 {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_u9]);
    }' unless defined(&t_user9);
    eval 'sub t_underline_char {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_uc]);
    }' unless defined(&t_underline_char);
    eval 'sub t_up_half_line {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_hu]);
    }' unless defined(&t_up_half_line);
    eval 'sub t_wait_tone {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_wait]);
    }' unless defined(&t_wait_tone);
    eval 'sub t_xoff_character {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_xoffc]);
    }' unless defined(&t_xoff_character);
    eval 'sub t_xon_character {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_xonc]);
    }' unless defined(&t_xon_character);
    eval 'sub t_zero_motion {
        my($t) = @_;
	    eval q(($t)-> $strs[ &TICODE_zerom]);
    }' unless defined(&t_zero_motion);
    eval 'sub acs_chars () { &t_acs_chars( &cur_term);}' unless defined(&acs_chars);
    eval 'sub alt_scancode_esc () { &t_alt_scancode_esc( &cur_term);}' unless defined(&alt_scancode_esc);
    eval 'sub back_tab () { &t_back_tab( &cur_term);}' unless defined(&back_tab);
    eval 'sub bell () { &t_bell( &cur_term);}' unless defined(&bell);
    eval 'sub bit_image_carriage_return () { &t_bit_image_carriage_return( &cur_term);}' unless defined(&bit_image_carriage_return);
    eval 'sub bit_image_newline () { &t_bit_image_newline( &cur_term);}' unless defined(&bit_image_newline);
    eval 'sub bit_image_repeat () { &t_bit_image_repeat( &cur_term);}' unless defined(&bit_image_repeat);
    eval 'sub carriage_return () { &t_carriage_return( &cur_term);}' unless defined(&carriage_return);
    eval 'sub change_char_pitch () { &t_change_char_pitch( &cur_term);}' unless defined(&change_char_pitch);
    eval 'sub change_line_pitch () { &t_change_line_pitch( &cur_term);}' unless defined(&change_line_pitch);
    eval 'sub change_res_horz () { &t_change_res_horz( &cur_term);}' unless defined(&change_res_horz);
    eval 'sub change_res_vert () { &t_change_res_vert( &cur_term);}' unless defined(&change_res_vert);
    eval 'sub change_scroll_region () { &t_change_scroll_region( &cur_term);}' unless defined(&change_scroll_region);
    eval 'sub char_padding () { &t_char_padding( &cur_term);}' unless defined(&char_padding);
    eval 'sub char_set_names () { &t_char_set_names( &cur_term);}' unless defined(&char_set_names);
    eval 'sub clear_all_tabs () { &t_clear_all_tabs( &cur_term);}' unless defined(&clear_all_tabs);
    eval 'sub clear_margins () { &t_clear_margins( &cur_term);}' unless defined(&clear_margins);
    eval 'sub clear_screen () { &t_clear_screen( &cur_term);}' unless defined(&clear_screen);
    eval 'sub clr_bol () { &t_clr_bol( &cur_term);}' unless defined(&clr_bol);
    eval 'sub clr_eol () { &t_clr_eol( &cur_term);}' unless defined(&clr_eol);
    eval 'sub clr_eos () { &t_clr_eos( &cur_term);}' unless defined(&clr_eos);
    eval 'sub code_set_init () { &t_code_set_init( &cur_term);}' unless defined(&code_set_init);
    eval 'sub color_names () { &t_color_names( &cur_term);}' unless defined(&color_names);
    eval 'sub column_address () { &t_column_address( &cur_term);}' unless defined(&column_address);
    eval 'sub command_character () { &t_command_character( &cur_term);}' unless defined(&command_character);
    eval 'sub create_window () { &t_create_window( &cur_term);}' unless defined(&create_window);
    eval 'sub cursor_address () { &t_cursor_address( &cur_term);}' unless defined(&cursor_address);
    eval 'sub cursor_down () { &t_cursor_down( &cur_term);}' unless defined(&cursor_down);
    eval 'sub cursor_home () { &t_cursor_home( &cur_term);}' unless defined(&cursor_home);
    eval 'sub cursor_invisible () { &t_cursor_invisible( &cur_term);}' unless defined(&cursor_invisible);
    eval 'sub cursor_left () { &t_cursor_left( &cur_term);}' unless defined(&cursor_left);
    eval 'sub cursor_mem_address () { &t_cursor_mem_address( &cur_term);}' unless defined(&cursor_mem_address);
    eval 'sub cursor_normal () { &t_cursor_normal( &cur_term);}' unless defined(&cursor_normal);
    eval 'sub cursor_right () { &t_cursor_right( &cur_term);}' unless defined(&cursor_right);
    eval 'sub cursor_to_ll () { &t_cursor_to_ll( &cur_term);}' unless defined(&cursor_to_ll);
    eval 'sub cursor_up () { &t_cursor_up( &cur_term);}' unless defined(&cursor_up);
    eval 'sub cursor_visible () { &t_cursor_visible( &cur_term);}' unless defined(&cursor_visible);
    eval 'sub define_bit_image_region () { &t_define_bit_image_region( &cur_term);}' unless defined(&define_bit_image_region);
    eval 'sub define_char () { &t_define_char( &cur_term);}' unless defined(&define_char);
    eval 'sub delete_character () { &t_delete_character( &cur_term);}' unless defined(&delete_character);
    eval 'sub delete_line () { &t_delete_line( &cur_term);}' unless defined(&delete_line);
    eval 'sub device_type () { &t_device_type( &cur_term);}' unless defined(&device_type);
    eval 'sub dial_phone () { &t_dial_phone( &cur_term);}' unless defined(&dial_phone);
    eval 'sub dis_status_line () { &t_dis_status_line( &cur_term);}' unless defined(&dis_status_line);
    eval 'sub display_clock () { &t_display_clock( &cur_term);}' unless defined(&display_clock);
    eval 'sub display_pc_char () { &t_display_pc_char( &cur_term);}' unless defined(&display_pc_char);
    eval 'sub down_half_time () { &t_down_half_time( &cur_term);}' unless defined(&down_half_time);
    eval 'sub ena_acs () { &t_ena_acs( &cur_term);}' unless defined(&ena_acs);
    eval 'sub end_bit_image_region () { &t_end_bit_image_region( &cur_term);}' unless defined(&end_bit_image_region);
    eval 'sub enter_alt_charset_mode () { &t_enter_alt_charset_mode( &cur_term);}' unless defined(&enter_alt_charset_mode);
    eval 'sub enter_am_mode () { &t_enter_am_mode( &cur_term);}' unless defined(&enter_am_mode);
    eval 'sub enter_blink_mode () { &t_enter_blink_mode( &cur_term);}' unless defined(&enter_blink_mode);
    eval 'sub enter_bold_mode () { &t_enter_bold_mode( &cur_term);}' unless defined(&enter_bold_mode);
    eval 'sub enter_ca_mode () { &t_enter_ca_mode( &cur_term);}' unless defined(&enter_ca_mode);
    eval 'sub enter_delete_mode () { &t_enter_delete_mode( &cur_term);}' unless defined(&enter_delete_mode);
    eval 'sub enter_dim_mode () { &t_enter_dim_mode( &cur_term);}' unless defined(&enter_dim_mode);
    eval 'sub enter_doublewide_mode () { &t_enter_doublewide_mode( &cur_term);}' unless defined(&enter_doublewide_mode);
    eval 'sub enter_draft_quality () { &t_enter_draft_quality( &cur_term);}' unless defined(&enter_draft_quality);
    eval 'sub enter_horizontal_hl_mode () { &t_enter_horizontal_hl_mode( &cur_term);}' unless defined(&enter_horizontal_hl_mode);
    eval 'sub enter_insert_mode () { &t_enter_insert_mode( &cur_term);}' unless defined(&enter_insert_mode);
    eval 'sub enter_italics_mode () { &t_enter_italics_mode( &cur_term);}' unless defined(&enter_italics_mode);
    eval 'sub enter_left_hl_mode () { &t_enter_left_hl_mode( &cur_term);}' unless defined(&enter_left_hl_mode);
    eval 'sub enter_leftward_mode () { &t_enter_leftward_mode( &cur_term);}' unless defined(&enter_leftward_mode);
    eval 'sub enter_low_hl_mode () { &t_enter_low_hl_mode( &cur_term);}' unless defined(&enter_low_hl_mode);
    eval 'sub enter_micro_mode () { &t_enter_micro_mode( &cur_term);}' unless defined(&enter_micro_mode);
    eval 'sub enter_near_quality_letter () { &t_enter_near_quality_letter( &cur_term);}' unless defined(&enter_near_quality_letter);
    eval 'sub enter_normal_quality () { &t_enter_normal_quality( &cur_term);}' unless defined(&enter_normal_quality);
    eval 'sub enter_pc_charset_mode () { &t_enter_pc_charset_mode( &cur_term);}' unless defined(&enter_pc_charset_mode);
    eval 'sub enter_protected_mode () { &t_enter_protected_mode( &cur_term);}' unless defined(&enter_protected_mode);
    eval 'sub enter_reverse_mode () { &t_enter_reverse_mode( &cur_term);}' unless defined(&enter_reverse_mode);
    eval 'sub enter_right_hl_mode () { &t_enter_right_hl_mode( &cur_term);}' unless defined(&enter_right_hl_mode);
    eval 'sub enter_scancode_mode () { &t_enter_scancode_mode( &cur_term);}' unless defined(&enter_scancode_mode);
    eval 'sub enter_secure_mode () { &t_enter_secure_mode( &cur_term);}' unless defined(&enter_secure_mode);
    eval 'sub enter_shadow_mode () { &t_enter_shadow_mode( &cur_term);}' unless defined(&enter_shadow_mode);
    eval 'sub enter_standout_mode () { &t_enter_standout_mode( &cur_term);}' unless defined(&enter_standout_mode);
    eval 'sub enter_subscript_mode () { &t_enter_subscript_mode( &cur_term);}' unless defined(&enter_subscript_mode);
    eval 'sub enter_superscript_mode () { &t_enter_superscript_mode( &cur_term);}' unless defined(&enter_superscript_mode);
    eval 'sub enter_top_hl_mode () { &t_enter_top_hl_mode( &cur_term);}' unless defined(&enter_top_hl_mode);
    eval 'sub enter_underline_mode () { &t_enter_underline_mode( &cur_term);}' unless defined(&enter_underline_mode);
    eval 'sub enter_upward_mode () { &t_enter_upward_mode( &cur_term);}' unless defined(&enter_upward_mode);
    eval 'sub enter_vertical_hl_mode () { &t_enter_vertical_hl_mode( &cur_term);}' unless defined(&enter_vertical_hl_mode);
    eval 'sub enter_xon_mode () { &t_enter_xon_mode( &cur_term);}' unless defined(&enter_xon_mode);
    eval 'sub erase_chars () { &t_erase_chars( &cur_term);}' unless defined(&erase_chars);
    eval 'sub exit_alt_charset_mode () { &t_exit_alt_charset_mode( &cur_term);}' unless defined(&exit_alt_charset_mode);
    eval 'sub exit_am_mode () { &t_exit_am_mode( &cur_term);}' unless defined(&exit_am_mode);
    eval 'sub exit_attribute_mode () { &t_exit_attribute_mode( &cur_term);}' unless defined(&exit_attribute_mode);
    eval 'sub exit_ca_mode () { &t_exit_ca_mode( &cur_term);}' unless defined(&exit_ca_mode);
    eval 'sub exit_delete_mode () { &t_exit_delete_mode( &cur_term);}' unless defined(&exit_delete_mode);
    eval 'sub exit_doublewide_mode () { &t_exit_doublewide_mode( &cur_term);}' unless defined(&exit_doublewide_mode);
    eval 'sub exit_insert_mode () { &t_exit_insert_mode( &cur_term);}' unless defined(&exit_insert_mode);
    eval 'sub exit_italics_mode () { &t_exit_italics_mode( &cur_term);}' unless defined(&exit_italics_mode);
    eval 'sub exit_leftward_mode () { &t_exit_leftward_mode( &cur_term);}' unless defined(&exit_leftward_mode);
    eval 'sub exit_micro_mode () { &t_exit_micro_mode( &cur_term);}' unless defined(&exit_micro_mode);
    eval 'sub exit_pc_charset_mode () { &t_exit_pc_charset_mode( &cur_term);}' unless defined(&exit_pc_charset_mode);
    eval 'sub exit_scancode_mode () { &t_exit_scancode_mode( &cur_term);}' unless defined(&exit_scancode_mode);
    eval 'sub exit_shadow_mode () { &t_exit_shadow_mode( &cur_term);}' unless defined(&exit_shadow_mode);
    eval 'sub exit_standout_mode () { &t_exit_standout_mode( &cur_term);}' unless defined(&exit_standout_mode);
    eval 'sub exit_subscript_mode () { &t_exit_subscript_mode( &cur_term);}' unless defined(&exit_subscript_mode);
    eval 'sub exit_superscript_mode () { &t_exit_superscript_mode( &cur_term);}' unless defined(&exit_superscript_mode);
    eval 'sub exit_underline_mode () { &t_exit_underline_mode( &cur_term);}' unless defined(&exit_underline_mode);
    eval 'sub exit_upward_mode () { &t_exit_upward_mode( &cur_term);}' unless defined(&exit_upward_mode);
    eval 'sub exit_xon_mode () { &t_exit_xon_mode( &cur_term);}' unless defined(&exit_xon_mode);
    eval 'sub fixed_pause () { &t_fixed_pause( &cur_term);}' unless defined(&fixed_pause);
    eval 'sub flash_hook () { &t_flash_hook( &cur_term);}' unless defined(&flash_hook);
    eval 'sub flash_screen () { &t_flash_screen( &cur_term);}' unless defined(&flash_screen);
    eval 'sub form_feed () { &t_form_feed( &cur_term);}' unless defined(&form_feed);
    eval 'sub from_status_line () { &t_from_status_line( &cur_term);}' unless defined(&from_status_line);
    eval 'sub get_mouse () { &t_get_mouse( &cur_term);}' unless defined(&get_mouse);
    eval 'sub goto_window () { &t_goto_window( &cur_term);}' unless defined(&goto_window);
    eval 'sub hangup () { &t_hangup( &cur_term);}' unless defined(&hangup);
    eval 'sub init_1string () { &t_init_1string( &cur_term);}' unless defined(&init_1string);
    eval 'sub init_2string () { &t_init_2string( &cur_term);}' unless defined(&init_2string);
    eval 'sub init_3string () { &t_init_3string( &cur_term);}' unless defined(&init_3string);
    eval 'sub init_file () { &t_init_file( &cur_term);}' unless defined(&init_file);
    eval 'sub init_prog () { &t_init_prog( &cur_term);}' unless defined(&init_prog);
    eval 'sub initialize_color () { &t_initialize_color( &cur_term);}' unless defined(&initialize_color);
    eval 'sub initialize_pair () { &t_initialize_pair( &cur_term);}' unless defined(&initialize_pair);
    eval 'sub insert_character () { &t_insert_character( &cur_term);}' unless defined(&insert_character);
    eval 'sub insert_line () { &t_insert_line( &cur_term);}' unless defined(&insert_line);
    eval 'sub insert_padding () { &t_insert_padding( &cur_term);}' unless defined(&insert_padding);
    eval 'sub key_a1 () { &t_key_a1( &cur_term);}' unless defined(&key_a1);
    eval 'sub key_a3 () { &t_key_a3( &cur_term);}' unless defined(&key_a3);
    eval 'sub key_b2 () { &t_key_b2( &cur_term);}' unless defined(&key_b2);
    eval 'sub key_backspace () { &t_key_backspace( &cur_term);}' unless defined(&key_backspace);
    eval 'sub key_beg () { &t_key_beg( &cur_term);}' unless defined(&key_beg);
    eval 'sub key_btab () { &t_key_btab( &cur_term);}' unless defined(&key_btab);
    eval 'sub key_c1 () { &t_key_c1( &cur_term);}' unless defined(&key_c1);
    eval 'sub key_c3 () { &t_key_c3( &cur_term);}' unless defined(&key_c3);
    eval 'sub key_cancel () { &t_key_cancel( &cur_term);}' unless defined(&key_cancel);
    eval 'sub key_catab () { &t_key_catab( &cur_term);}' unless defined(&key_catab);
    eval 'sub key_clear () { &t_key_clear( &cur_term);}' unless defined(&key_clear);
    eval 'sub key_close () { &t_key_close( &cur_term);}' unless defined(&key_close);
    eval 'sub key_command () { &t_key_command( &cur_term);}' unless defined(&key_command);
    eval 'sub key_copy () { &t_key_copy( &cur_term);}' unless defined(&key_copy);
    eval 'sub key_create () { &t_key_create( &cur_term);}' unless defined(&key_create);
    eval 'sub key_ctab () { &t_key_ctab( &cur_term);}' unless defined(&key_ctab);
    eval 'sub key_dc () { &t_key_dc( &cur_term);}' unless defined(&key_dc);
    eval 'sub key_dl () { &t_key_dl( &cur_term);}' unless defined(&key_dl);
    eval 'sub key_down () { &t_key_down( &cur_term);}' unless defined(&key_down);
    eval 'sub key_eic () { &t_key_eic( &cur_term);}' unless defined(&key_eic);
    eval 'sub key_end () { &t_key_end( &cur_term);}' unless defined(&key_end);
    eval 'sub key_enter () { &t_key_enter( &cur_term);}' unless defined(&key_enter);
    eval 'sub key_eol () { &t_key_eol( &cur_term);}' unless defined(&key_eol);
    eval 'sub key_eos () { &t_key_eos( &cur_term);}' unless defined(&key_eos);
    eval 'sub key_exit () { &t_key_exit( &cur_term);}' unless defined(&key_exit);
    eval 'sub key_f0 () { &t_key_f0( &cur_term);}' unless defined(&key_f0);
    eval 'sub key_f1 () { &t_key_f1( &cur_term);}' unless defined(&key_f1);
    eval 'sub key_f2 () { &t_key_f2( &cur_term);}' unless defined(&key_f2);
    eval 'sub key_f3 () { &t_key_f3( &cur_term);}' unless defined(&key_f3);
    eval 'sub key_f4 () { &t_key_f4( &cur_term);}' unless defined(&key_f4);
    eval 'sub key_f5 () { &t_key_f5( &cur_term);}' unless defined(&key_f5);
    eval 'sub key_f6 () { &t_key_f6( &cur_term);}' unless defined(&key_f6);
    eval 'sub key_f7 () { &t_key_f7( &cur_term);}' unless defined(&key_f7);
    eval 'sub key_f8 () { &t_key_f8( &cur_term);}' unless defined(&key_f8);
    eval 'sub key_f9 () { &t_key_f9( &cur_term);}' unless defined(&key_f9);
    eval 'sub key_f10 () { &t_key_f10( &cur_term);}' unless defined(&key_f10);
    eval 'sub key_f11 () { &t_key_f11( &cur_term);}' unless defined(&key_f11);
    eval 'sub key_f12 () { &t_key_f12( &cur_term);}' unless defined(&key_f12);
    eval 'sub key_f13 () { &t_key_f13( &cur_term);}' unless defined(&key_f13);
    eval 'sub key_f14 () { &t_key_f14( &cur_term);}' unless defined(&key_f14);
    eval 'sub key_f15 () { &t_key_f15( &cur_term);}' unless defined(&key_f15);
    eval 'sub key_f16 () { &t_key_f16( &cur_term);}' unless defined(&key_f16);
    eval 'sub key_f17 () { &t_key_f17( &cur_term);}' unless defined(&key_f17);
    eval 'sub key_f18 () { &t_key_f18( &cur_term);}' unless defined(&key_f18);
    eval 'sub key_f19 () { &t_key_f19( &cur_term);}' unless defined(&key_f19);
    eval 'sub key_f20 () { &t_key_f20( &cur_term);}' unless defined(&key_f20);
    eval 'sub key_f21 () { &t_key_f21( &cur_term);}' unless defined(&key_f21);
    eval 'sub key_f22 () { &t_key_f22( &cur_term);}' unless defined(&key_f22);
    eval 'sub key_f23 () { &t_key_f23( &cur_term);}' unless defined(&key_f23);
    eval 'sub key_f24 () { &t_key_f24( &cur_term);}' unless defined(&key_f24);
    eval 'sub key_f25 () { &t_key_f25( &cur_term);}' unless defined(&key_f25);
    eval 'sub key_f26 () { &t_key_f26( &cur_term);}' unless defined(&key_f26);
    eval 'sub key_f27 () { &t_key_f27( &cur_term);}' unless defined(&key_f27);
    eval 'sub key_f28 () { &t_key_f28( &cur_term);}' unless defined(&key_f28);
    eval 'sub key_f29 () { &t_key_f29( &cur_term);}' unless defined(&key_f29);
    eval 'sub key_f30 () { &t_key_f30( &cur_term);}' unless defined(&key_f30);
    eval 'sub key_f31 () { &t_key_f31( &cur_term);}' unless defined(&key_f31);
    eval 'sub key_f32 () { &t_key_f32( &cur_term);}' unless defined(&key_f32);
    eval 'sub key_f33 () { &t_key_f33( &cur_term);}' unless defined(&key_f33);
    eval 'sub key_f34 () { &t_key_f34( &cur_term);}' unless defined(&key_f34);
    eval 'sub key_f35 () { &t_key_f35( &cur_term);}' unless defined(&key_f35);
    eval 'sub key_f36 () { &t_key_f36( &cur_term);}' unless defined(&key_f36);
    eval 'sub key_f37 () { &t_key_f37( &cur_term);}' unless defined(&key_f37);
    eval 'sub key_f38 () { &t_key_f38( &cur_term);}' unless defined(&key_f38);
    eval 'sub key_f39 () { &t_key_f39( &cur_term);}' unless defined(&key_f39);
    eval 'sub key_f40 () { &t_key_f40( &cur_term);}' unless defined(&key_f40);
    eval 'sub key_f41 () { &t_key_f41( &cur_term);}' unless defined(&key_f41);
    eval 'sub key_f42 () { &t_key_f42( &cur_term);}' unless defined(&key_f42);
    eval 'sub key_f43 () { &t_key_f43( &cur_term);}' unless defined(&key_f43);
    eval 'sub key_f44 () { &t_key_f44( &cur_term);}' unless defined(&key_f44);
    eval 'sub key_f45 () { &t_key_f45( &cur_term);}' unless defined(&key_f45);
    eval 'sub key_f46 () { &t_key_f46( &cur_term);}' unless defined(&key_f46);
    eval 'sub key_f47 () { &t_key_f47( &cur_term);}' unless defined(&key_f47);
    eval 'sub key_f48 () { &t_key_f48( &cur_term);}' unless defined(&key_f48);
    eval 'sub key_f49 () { &t_key_f49( &cur_term);}' unless defined(&key_f49);
    eval 'sub key_f50 () { &t_key_f50( &cur_term);}' unless defined(&key_f50);
    eval 'sub key_f51 () { &t_key_f51( &cur_term);}' unless defined(&key_f51);
    eval 'sub key_f52 () { &t_key_f52( &cur_term);}' unless defined(&key_f52);
    eval 'sub key_f53 () { &t_key_f53( &cur_term);}' unless defined(&key_f53);
    eval 'sub key_f54 () { &t_key_f54( &cur_term);}' unless defined(&key_f54);
    eval 'sub key_f55 () { &t_key_f55( &cur_term);}' unless defined(&key_f55);
    eval 'sub key_f56 () { &t_key_f56( &cur_term);}' unless defined(&key_f56);
    eval 'sub key_f57 () { &t_key_f57( &cur_term);}' unless defined(&key_f57);
    eval 'sub key_f58 () { &t_key_f58( &cur_term);}' unless defined(&key_f58);
    eval 'sub key_f59 () { &t_key_f59( &cur_term);}' unless defined(&key_f59);
    eval 'sub key_f60 () { &t_key_f60( &cur_term);}' unless defined(&key_f60);
    eval 'sub key_f61 () { &t_key_f61( &cur_term);}' unless defined(&key_f61);
    eval 'sub key_f62 () { &t_key_f62( &cur_term);}' unless defined(&key_f62);
    eval 'sub key_f63 () { &t_key_f63( &cur_term);}' unless defined(&key_f63);
    eval 'sub key_find () { &t_key_find( &cur_term);}' unless defined(&key_find);
    eval 'sub key_help () { &t_key_help( &cur_term);}' unless defined(&key_help);
    eval 'sub key_home () { &t_key_home( &cur_term);}' unless defined(&key_home);
    eval 'sub key_ic () { &t_key_ic( &cur_term);}' unless defined(&key_ic);
    eval 'sub key_il () { &t_key_il( &cur_term);}' unless defined(&key_il);
    eval 'sub key_left () { &t_key_left( &cur_term);}' unless defined(&key_left);
    eval 'sub key_ll () { &t_key_ll( &cur_term);}' unless defined(&key_ll);
    eval 'sub key_mark () { &t_key_mark( &cur_term);}' unless defined(&key_mark);
    eval 'sub key_message () { &t_key_message( &cur_term);}' unless defined(&key_message);
    eval 'sub key_mouse () { &t_key_mouse( &cur_term);}' unless defined(&key_mouse);
    eval 'sub key_move () { &t_key_move( &cur_term);}' unless defined(&key_move);
    eval 'sub key_next () { &t_key_next( &cur_term);}' unless defined(&key_next);
    eval 'sub key_npage () { &t_key_npage( &cur_term);}' unless defined(&key_npage);
    eval 'sub key_open () { &t_key_open( &cur_term);}' unless defined(&key_open);
    eval 'sub key_options () { &t_key_options( &cur_term);}' unless defined(&key_options);
    eval 'sub key_ppage () { &t_key_ppage( &cur_term);}' unless defined(&key_ppage);
    eval 'sub key_previous () { &t_key_previous( &cur_term);}' unless defined(&key_previous);
    eval 'sub key_print () { &t_key_print( &cur_term);}' unless defined(&key_print);
    eval 'sub key_redo () { &t_key_redo( &cur_term);}' unless defined(&key_redo);
    eval 'sub key_reference () { &t_key_reference( &cur_term);}' unless defined(&key_reference);
    eval 'sub key_refresh () { &t_key_refresh( &cur_term);}' unless defined(&key_refresh);
    eval 'sub key_replace () { &t_key_replace( &cur_term);}' unless defined(&key_replace);
    eval 'sub key_restart () { &t_key_restart( &cur_term);}' unless defined(&key_restart);
    eval 'sub key_resume () { &t_key_resume( &cur_term);}' unless defined(&key_resume);
    eval 'sub key_right () { &t_key_right( &cur_term);}' unless defined(&key_right);
    eval 'sub key_save () { &t_key_save( &cur_term);}' unless defined(&key_save);
    eval 'sub key_sbeg () { &t_key_sbeg( &cur_term);}' unless defined(&key_sbeg);
    eval 'sub key_scancel () { &t_key_scancel( &cur_term);}' unless defined(&key_scancel);
    eval 'sub key_scommand () { &t_key_scommand( &cur_term);}' unless defined(&key_scommand);
    eval 'sub key_scopy () { &t_key_scopy( &cur_term);}' unless defined(&key_scopy);
    eval 'sub key_screate () { &t_key_screate( &cur_term);}' unless defined(&key_screate);
    eval 'sub key_sdc () { &t_key_sdc( &cur_term);}' unless defined(&key_sdc);
    eval 'sub key_sdl () { &t_key_sdl( &cur_term);}' unless defined(&key_sdl);
    eval 'sub key_select () { &t_key_select( &cur_term);}' unless defined(&key_select);
    eval 'sub key_send () { &t_key_send( &cur_term);}' unless defined(&key_send);
    eval 'sub key_seol () { &t_key_seol( &cur_term);}' unless defined(&key_seol);
    eval 'sub key_sexit () { &t_key_sexit( &cur_term);}' unless defined(&key_sexit);
    eval 'sub key_sf () { &t_key_sf( &cur_term);}' unless defined(&key_sf);
    eval 'sub key_sfind () { &t_key_sfind( &cur_term);}' unless defined(&key_sfind);
    eval 'sub key_shelp () { &t_key_shelp( &cur_term);}' unless defined(&key_shelp);
    eval 'sub key_shome () { &t_key_shome( &cur_term);}' unless defined(&key_shome);
    eval 'sub key_sic () { &t_key_sic( &cur_term);}' unless defined(&key_sic);
    eval 'sub key_sleft () { &t_key_sleft( &cur_term);}' unless defined(&key_sleft);
    eval 'sub key_smessage () { &t_key_smessage( &cur_term);}' unless defined(&key_smessage);
    eval 'sub key_smove () { &t_key_smove( &cur_term);}' unless defined(&key_smove);
    eval 'sub key_snext () { &t_key_snext( &cur_term);}' unless defined(&key_snext);
    eval 'sub key_soptions () { &t_key_soptions( &cur_term);}' unless defined(&key_soptions);
    eval 'sub key_sprevious () { &t_key_sprevious( &cur_term);}' unless defined(&key_sprevious);
    eval 'sub key_sprint () { &t_key_sprint( &cur_term);}' unless defined(&key_sprint);
    eval 'sub key_sr () { &t_key_sr( &cur_term);}' unless defined(&key_sr);
    eval 'sub key_sredo () { &t_key_sredo( &cur_term);}' unless defined(&key_sredo);
    eval 'sub key_sreplace () { &t_key_sreplace( &cur_term);}' unless defined(&key_sreplace);
    eval 'sub key_sright () { &t_key_sright( &cur_term);}' unless defined(&key_sright);
    eval 'sub key_srsume () { &t_key_srsume( &cur_term);}' unless defined(&key_srsume);
    eval 'sub key_ssave () { &t_key_ssave( &cur_term);}' unless defined(&key_ssave);
    eval 'sub key_ssuspend () { &t_key_ssuspend( &cur_term);}' unless defined(&key_ssuspend);
    eval 'sub key_stab () { &t_key_stab( &cur_term);}' unless defined(&key_stab);
    eval 'sub key_sundo () { &t_key_sundo( &cur_term);}' unless defined(&key_sundo);
    eval 'sub key_suspend () { &t_key_suspend( &cur_term);}' unless defined(&key_suspend);
    eval 'sub key_undo () { &t_key_undo( &cur_term);}' unless defined(&key_undo);
    eval 'sub key_up () { &t_key_up( &cur_term);}' unless defined(&key_up);
    eval 'sub keypad_local () { &t_keypad_local( &cur_term);}' unless defined(&keypad_local);
    eval 'sub keypad_xmit () { &t_keypad_xmit( &cur_term);}' unless defined(&keypad_xmit);
    eval 'sub lab_f0 () { &t_lab_f0( &cur_term);}' unless defined(&lab_f0);
    eval 'sub lab_f1 () { &t_lab_f1( &cur_term);}' unless defined(&lab_f1);
    eval 'sub lab_f2 () { &t_lab_f2( &cur_term);}' unless defined(&lab_f2);
    eval 'sub lab_f3 () { &t_lab_f3( &cur_term);}' unless defined(&lab_f3);
    eval 'sub lab_f4 () { &t_lab_f4( &cur_term);}' unless defined(&lab_f4);
    eval 'sub lab_f5 () { &t_lab_f5( &cur_term);}' unless defined(&lab_f5);
    eval 'sub lab_f6 () { &t_lab_f6( &cur_term);}' unless defined(&lab_f6);
    eval 'sub lab_f7 () { &t_lab_f7( &cur_term);}' unless defined(&lab_f7);
    eval 'sub lab_f8 () { &t_lab_f8( &cur_term);}' unless defined(&lab_f8);
    eval 'sub lab_f9 () { &t_lab_f9( &cur_term);}' unless defined(&lab_f9);
    eval 'sub lab_f10 () { &t_lab_f10( &cur_term);}' unless defined(&lab_f10);
    eval 'sub label_format () { &t_label_format( &cur_term);}' unless defined(&label_format);
    eval 'sub label_off () { &t_label_off( &cur_term);}' unless defined(&label_off);
    eval 'sub label_on () { &t_label_on( &cur_term);}' unless defined(&label_on);
    eval 'sub meta_off () { &t_meta_off( &cur_term);}' unless defined(&meta_off);
    eval 'sub meta_on () { &t_meta_on( &cur_term);}' unless defined(&meta_on);
    eval 'sub micro_column_address () { &t_micro_column_address( &cur_term);}' unless defined(&micro_column_address);
    eval 'sub micro_down () { &t_micro_down( &cur_term);}' unless defined(&micro_down);
    eval 'sub micro_left () { &t_micro_left( &cur_term);}' unless defined(&micro_left);
    eval 'sub micro_right () { &t_micro_right( &cur_term);}' unless defined(&micro_right);
    eval 'sub micro_row_address () { &t_micro_row_address( &cur_term);}' unless defined(&micro_row_address);
    eval 'sub micro_up () { &t_micro_up( &cur_term);}' unless defined(&micro_up);
    eval 'sub mouse_info () { &t_mouse_info( &cur_term);}' unless defined(&mouse_info);
    eval 'sub newline () { &t_newline( &cur_term);}' unless defined(&newline);
    eval 'sub order_of_pins () { &t_order_of_pins( &cur_term);}' unless defined(&order_of_pins);
    eval 'sub orig_colors () { &t_orig_colors( &cur_term);}' unless defined(&orig_colors);
    eval 'sub orig_pair () { &t_orig_pair( &cur_term);}' unless defined(&orig_pair);
    eval 'sub pad_char () { &t_pad_char( &cur_term);}' unless defined(&pad_char);
    eval 'sub parm_dch () { &t_parm_dch( &cur_term);}' unless defined(&parm_dch);
    eval 'sub parm_delete_line () { &t_parm_delete_line( &cur_term);}' unless defined(&parm_delete_line);
    eval 'sub parm_down_cursor () { &t_parm_down_cursor( &cur_term);}' unless defined(&parm_down_cursor);
    eval 'sub parm_down_micro () { &t_parm_down_micro( &cur_term);}' unless defined(&parm_down_micro);
    eval 'sub parm_ich () { &t_parm_ich( &cur_term);}' unless defined(&parm_ich);
    eval 'sub parm_index () { &t_parm_index( &cur_term);}' unless defined(&parm_index);
    eval 'sub parm_insert_line () { &t_parm_insert_line( &cur_term);}' unless defined(&parm_insert_line);
    eval 'sub parm_left_cursor () { &t_parm_left_cursor( &cur_term);}' unless defined(&parm_left_cursor);
    eval 'sub parm_left_micro () { &t_parm_left_micro( &cur_term);}' unless defined(&parm_left_micro);
    eval 'sub parm_right_cursor () { &t_parm_right_cursor( &cur_term);}' unless defined(&parm_right_cursor);
    eval 'sub parm_right_micro () { &t_parm_right_micro( &cur_term);}' unless defined(&parm_right_micro);
    eval 'sub parm_rindex () { &t_parm_rindex( &cur_term);}' unless defined(&parm_rindex);
    eval 'sub parm_up_cursor () { &t_parm_up_cursor( &cur_term);}' unless defined(&parm_up_cursor);
    eval 'sub parm_up_micro () { &t_parm_up_micro( &cur_term);}' unless defined(&parm_up_micro);
    eval 'sub pc_term_options () { &t_pc_term_options( &cur_term);}' unless defined(&pc_term_options);
    eval 'sub pkey_key () { &t_pkey_key( &cur_term);}' unless defined(&pkey_key);
    eval 'sub pkey_local () { &t_pkey_local( &cur_term);}' unless defined(&pkey_local);
    eval 'sub pkey_plab () { &t_pkey_plab( &cur_term);}' unless defined(&pkey_plab);
    eval 'sub pkey_xmit () { &t_pkey_xmit( &cur_term);}' unless defined(&pkey_xmit);
    eval 'sub plab_norm () { &t_plab_norm( &cur_term);}' unless defined(&plab_norm);
    eval 'sub print_screen () { &t_print_screen( &cur_term);}' unless defined(&print_screen);
    eval 'sub ptr_non () { &t_ptr_non( &cur_term);}' unless defined(&ptr_non);
    eval 'sub ptr_off () { &t_ptr_off( &cur_term);}' unless defined(&ptr_off);
    eval 'sub ptr_on () { &t_ptr_on( &cur_term);}' unless defined(&ptr_on);
    eval 'sub pulse () { &t_pulse( &cur_term);}' unless defined(&pulse);
    eval 'sub quick_dial () { &t_quick_dial( &cur_term);}' unless defined(&quick_dial);
    eval 'sub remove_clock () { &t_remove_clock( &cur_term);}' unless defined(&remove_clock);
    eval 'sub repeat_char () { &t_repeat_char( &cur_term);}' unless defined(&repeat_char);
    eval 'sub req_for_input () { &t_req_for_input( &cur_term);}' unless defined(&req_for_input);
    eval 'sub req_mouse_pos () { &t_req_mouse_pos( &cur_term);}' unless defined(&req_mouse_pos);
    eval 'sub reset_1string () { &t_reset_1string( &cur_term);}' unless defined(&reset_1string);
    eval 'sub reset_2string () { &t_reset_2string( &cur_term);}' unless defined(&reset_2string);
    eval 'sub reset_3string () { &t_reset_3string( &cur_term);}' unless defined(&reset_3string);
    eval 'sub reset_file () { &t_reset_file( &cur_term);}' unless defined(&reset_file);
    eval 'sub restore_cursor () { &t_restore_cursor( &cur_term);}' unless defined(&restore_cursor);
    eval 'sub row_address () { &t_row_address( &cur_term);}' unless defined(&row_address);
    eval 'sub save_cursor () { &t_save_cursor( &cur_term);}' unless defined(&save_cursor);
    eval 'sub scancode_escape () { &t_scancode_escape( &cur_term);}' unless defined(&scancode_escape);
    eval 'sub scroll_forward () { &t_scroll_forward( &cur_term);}' unless defined(&scroll_forward);
    eval 'sub scroll_reverse () { &t_scroll_reverse( &cur_term);}' unless defined(&scroll_reverse);
    eval 'sub select_char_set () { &t_select_char_set( &cur_term);}' unless defined(&select_char_set);
    eval 'sub set0_des_seq () { &t_set0_des_seq( &cur_term);}' unless defined(&set0_des_seq);
    eval 'sub set1_des_seq () { &t_set1_des_seq( &cur_term);}' unless defined(&set1_des_seq);
    eval 'sub set2_des_seq () { &t_set2_des_seq( &cur_term);}' unless defined(&set2_des_seq);
    eval 'sub set3_des_seq () { &t_set3_des_seq( &cur_term);}' unless defined(&set3_des_seq);
    eval 'sub set_a_attributes () { &t_set_a_attributes( &cur_term);}' unless defined(&set_a_attributes);
    eval 'sub set_a_background () { &t_set_a_background( &cur_term);}' unless defined(&set_a_background);
    eval 'sub set_a_foreground () { &t_set_a_foreground( &cur_term);}' unless defined(&set_a_foreground);
    eval 'sub set_attributes () { &t_set_attributes( &cur_term);}' unless defined(&set_attributes);
    eval 'sub set_background () { &t_set_background( &cur_term);}' unless defined(&set_background);
    eval 'sub set_bottom_margin () { &t_set_bottom_margin( &cur_term);}' unless defined(&set_bottom_margin);
    eval 'sub set_bottom_margin_parm () { &t_set_bottom_margin_parm( &cur_term);}' unless defined(&set_bottom_margin_parm);
    eval 'sub set_clock () { &t_set_clock( &cur_term);}' unless defined(&set_clock);
    eval 'sub set_color_band () { &t_set_color_band( &cur_term);}' unless defined(&set_color_band);
    eval 'sub set_color_pair () { &t_set_color_pair( &cur_term);}' unless defined(&set_color_pair);
    eval 'sub set_foreground () { &t_set_foreground( &cur_term);}' unless defined(&set_foreground);
    eval 'sub set_left_margin () { &t_set_left_margin( &cur_term);}' unless defined(&set_left_margin);
    eval 'sub set_left_margin_parm () { &t_set_left_margin_parm( &cur_term);}' unless defined(&set_left_margin_parm);
    eval 'sub set_lr_margin () { &t_set_lr_margin( &cur_term);}' unless defined(&set_lr_margin);
    eval 'sub set_page_length () { &t_set_page_length( &cur_term);}' unless defined(&set_page_length);
    eval 'sub set_pglen_inch () { &t_set_pglen_inch( &cur_term);}' unless defined(&set_pglen_inch);
    eval 'sub set_right_margin () { &t_set_right_margin( &cur_term);}' unless defined(&set_right_margin);
    eval 'sub set_right_margin_parm () { &t_set_right_margin_parm( &cur_term);}' unless defined(&set_right_margin_parm);
    eval 'sub set_tab () { &t_set_tab( &cur_term);}' unless defined(&set_tab);
    eval 'sub set_tb_margin () { &t_set_tb_margin( &cur_term);}' unless defined(&set_tb_margin);
    eval 'sub set_top_margin () { &t_set_top_margin( &cur_term);}' unless defined(&set_top_margin);
    eval 'sub set_top_margin_parm () { &t_set_top_margin_parm( &cur_term);}' unless defined(&set_top_margin_parm);
    eval 'sub set_window () { &t_set_window( &cur_term);}' unless defined(&set_window);
    eval 'sub start_bit_image () { &t_start_bit_image( &cur_term);}' unless defined(&start_bit_image);
    eval 'sub start_char_set_def () { &t_start_char_set_def( &cur_term);}' unless defined(&start_char_set_def);
    eval 'sub stop_bit_image () { &t_stop_bit_image( &cur_term);}' unless defined(&stop_bit_image);
    eval 'sub stop_char_set_def () { &t_stop_char_set_def( &cur_term);}' unless defined(&stop_char_set_def);
    eval 'sub subscript_characters () { &t_subscript_characters( &cur_term);}' unless defined(&subscript_characters);
    eval 'sub superscript_characters () { &t_superscript_characters( &cur_term);}' unless defined(&superscript_characters);
    eval 'sub tab () { &t_tab( &cur_term);}' unless defined(&tab);
    eval 'sub these_cause_cr () { &t_these_cause_cr( &cur_term);}' unless defined(&these_cause_cr);
    eval 'sub to_status_line () { &t_to_status_line( &cur_term);}' unless defined(&to_status_line);
    eval 'sub tone () { &t_tone( &cur_term);}' unless defined(&tone);
    eval 'sub user0 () { &t_user0( &cur_term);}' unless defined(&user0);
    eval 'sub user1 () { &t_user1( &cur_term);}' unless defined(&user1);
    eval 'sub user2 () { &t_user2( &cur_term);}' unless defined(&user2);
    eval 'sub user3 () { &t_user3( &cur_term);}' unless defined(&user3);
    eval 'sub user4 () { &t_user4( &cur_term);}' unless defined(&user4);
    eval 'sub user5 () { &t_user5( &cur_term);}' unless defined(&user5);
    eval 'sub user6 () { &t_user6( &cur_term);}' unless defined(&user6);
    eval 'sub user7 () { &t_user7( &cur_term);}' unless defined(&user7);
    eval 'sub user8 () { &t_user8( &cur_term);}' unless defined(&user8);
    eval 'sub user9 () { &t_user9( &cur_term);}' unless defined(&user9);
    eval 'sub underline_char () { &t_underline_char( &cur_term);}' unless defined(&underline_char);
    eval 'sub up_half_line () { &t_up_half_line( &cur_term);}' unless defined(&up_half_line);
    eval 'sub wait_tone () { &t_wait_tone( &cur_term);}' unless defined(&wait_tone);
    eval 'sub xoff_character () { &t_xoff_character( &cur_term);}' unless defined(&xoff_character);
    eval 'sub xon_character () { &t_xon_character( &cur_term);}' unless defined(&xon_character);
    eval 'sub zero_motion () { &t_zero_motion( &cur_term);}' unless defined(&zero_motion);
    unless(defined(&_TERMINFO)) {
    }
    require 'sys/cdefs.ph';
    if(defined(&TPARM_TLPARM)) {
    }
    if(defined(&TPARM_VARARGS)) {
	eval 'sub tparm () { &tiparm;}' unless defined(&tparm);
	eval 'sub ti_parm () { &ti_tiparm;}' unless defined(&ti_parm);
    }
    require 'termcap.ph';
}
1;
