1 " BEGIN INCLUDE FILE -- basic_xfer_vector.incl.alm 2 " 3 " Written by B. Wolman 1973 4 " Modified by M. Weaver 1975 5 " Modified by M. Weaver 1981 for new function operators 6 " Modified by M. Weaver 9/81 for new string_data_read operator 7 " Modified by D. Leskiw, May 1984 for new string operator mid$ 8 " to use code from sst$ 9 " Modified by D. Leskiw, May 1984 for new string operator left$ 10 " Modified by D. Leskiw, May 1984 for new string operator right$ 11 " 12 " Offsets in run-time transfer vector 13 " 14 equ string_assign_op,1 15 equ string_concatenate_op,2 16 equ string_compare_op,3 17 equ len_fun,4 18 equ pos_fun,5 19 equ chr_fun,6 20 equ clk_fun,7 21 equ dat_fun,8 22 equ usr_fun,9 23 equ str_fun,10 24 equ seg_fun,11 25 equ sst_fun,12 26 equ mid_fun,12 mid$ uses sst$ routine 27 equ max_fun,13 28 equ min_fun,14 29 equ change_from_string,15 30 equ change_to_string,16 31 equ argcnt_fun,17 32 equ argval_fun,18 33 " 34 equ stop_op,20 35 equ on_op,21 36 equ gosub_op,22 37 equ on_gosub_op,23 38 equ sub_call_op,24 39 equ std_sub_call_op,25 40 equ return_op,26 41 equ sub_exit_op,27 42 equ fun_call_op,145 43 equ global_fun_call_op,146 44 equ fun_return_op,147 45 equ list_sub_op,31 46 equ table_sub_op,32 47 equ inv_table_sub_op,33 48 equ error_in_statement,34 49 equ missing_line,35 50 equ unclosed_for,36 51 equ undefined_function,38 52 equ subend_op,39 53 " 54 equ use_tty_op,40 55 equ setup_fcb_op,41 56 equ scratch_op,42 57 equ margin_op,43 58 equ reset_op,44 59 equ numeric_write_op,45 60 equ string_write_op,46 61 equ numeric_read_op,47 62 equ string_read_op,48 63 equ numeric_print_op,49 64 equ string_print_op,50 65 equ print_new_line_op,51 66 equ tab_for_comma_op,52 67 equ tab_fun,53 68 equ spc_fun,54 69 equ check_eof_op,55 70 equ numeric_input_op,56 71 equ string_input_op,57 72 equ linput_op,58 73 equ end_input_op,59 74 equ lof_fun,60 75 equ loc_fun,61 76 equ mar_fun,62 77 equ numeric_data_read,63 78 equ string_data_read,148 79 equ per_fun,65 80 equ typ_fun,66 81 equ use_fcb_op,67 82 equ print_using_start_op,68 83 equ print_using_end_op,69 84 equ print_using_numeric_op,70 85 equ print_using_string_op,71 86 equ hps_fun,72 87 equ lin_fun,73 88 equ tst_fun,74 89 equ num_fun,75 90 equ file_fun,76 91 equ end_print_op,77 92 equ reset_ascii_op,78 93 equ reset_random_op,79 94 " 95 equ abs_fun,80 96 equ int_fun,81 97 equ mod_fun,82 98 equ randomize_fun,83 99 equ rnd_fun,84 100 equ sgn_fun,85 101 equ tim_fun,86 102 equ val_fun,87 103 equ sqr_fun,88 104 equ cos_fun,89 105 equ sin_fun,90 106 equ cot_fun,91 107 equ tan_fun,92 108 equ atn_fun,93 109 equ exp_fun,94 110 equ log_fun,95 111 equ clg_fun,96 112 equ pwr_fun,97 113 equ pwri_fun,98 114 " 115 equ det_fun,100 116 equ con_fun,101 117 equ idn_fun,102 118 equ inv_fun,103 119 equ trn_fun,104 120 equ zer_fun,105 121 equ nul_fun,106 122 " 123 equ list_redim_op,107 124 equ table_redim_op,108 125 equ inv_table_redim_op,109 126 " 127 equ mat_numeric_input_op,110 128 equ mat_string_input_op,111 129 equ mat_numeric_print_op,112 130 equ mat_string_print_op,113 131 equ mat_numeric_read_op,114 132 equ mat_string_read_op,115 133 equ mat_numeric_write_op,116 134 equ mat_string_write_op,117 135 equ mat_linput_op,118 136 equ mat_numeric_data_read,119 137 equ mat_string_data_read,120 138 equ mat_print_using_numeric,121 139 equ mat_print_using_string,122 140 equ mat_assign_numeric,123 141 equ mat_add,124 142 equ mat_sub,125 143 equ mat_scalar_mult,126 144 equ dot_product,127 145 equ mat_assign_string,128 146 equ mat_mult_vm,129 147 equ mat_mult_mv,130 148 equ mat_mult_mm,131 149 " 150 equ setdigits_op,132 151 equ left_fun,149 152 equ right_fun,150 153 " 154 " END INCLUDE FILE -- basic_xfer_vector.incl.alm