1 #ifndef __BASOP 2 #define __BASOP 3 4 #include <default.h> 5 6 /* Begin Auto-Generated Part */ 7 #ifndef __HAVE_ESQ 8 #define __HAVE_ESQ 9 typedef unsigned char ESQ; 10 #endif 11 #ifndef __HAVE_CESI 12 #define __HAVE_CESI 13 typedef const ESQ*CESI; 14 #endif 15 #ifndef __HAVE_ESI 16 #define __HAVE_ESI 17 typedef ESQ*ESI; 18 #endif 19 #define EStackIndex ESI 20 #define Quantum ESQ 21 #ifndef __HAVE_SYM_STR 22 #define __HAVE_SYM_STR 23 typedef CESI SYM_STR; 24 #endif 25 #if MIN_AMS>=101 26 #define did_push_to_polar ({__need_in_use_bit;_rom_call(short,(),313);}) 27 #define push_degrees ({__need_in_use_bit;_rom_call(void,(CESI,CESI,CESI),314);}) 28 #define push_indir_name ({__need_in_use_bit;_rom_call(void,(CESI),2B2);}) 29 #define push_list_plus ({__need_in_use_bit;_rom_call(void,(CESI,CESI),3BD);}) 30 #define push_list_times ({__need_in_use_bit;_rom_call(void,(CESI,CESI),3BE);}) 31 #define push_matrix_product ({__need_in_use_bit;_rom_call(void,(CESI,CESI),3C5);}) 32 #define push_pow _rom_call(void,(CESI,CESI),30F) 33 #define push_to_cylin ({__need_in_use_bit;_rom_call(void,(),328);}) 34 #define push_to_sphere ({__need_in_use_bit;_rom_call(void,(),329);}) 35 #if MIN_AMS>=200 36 #define push_assignment ({__need_in_use_bit;_rom_call(void,(CESI),4DD);}) 37 #define push_dot_add ({__need_in_use_bit;_rom_call(void,(CESI,CESI),4A0);}) 38 #define push_dot_div ({__need_in_use_bit;_rom_call(void,(CESI,CESI),4CD);}) 39 #define push_dot_mult ({__need_in_use_bit;_rom_call(void,(CESI,CESI),4A1);}) 40 #define push_dot_sub ({__need_in_use_bit;_rom_call(void,(CESI,CESI),4A2);}) 41 #define push_radians ({__need_in_use_bit;_rom_call(void,(CESI),4B3);}) 42 #define push_substitute_no_simplify _rom_call(void,(CESI,CESI,CESI),489) 43 #if MIN_AMS>=202 44 #define push_and ({__need_in_use_bit;_rom_call(void,(CESI,CESI),5AB);}) 45 #define push_arg_minus_1 ({__need_in_use_bit;_rom_call(void,(CESI),520);}) 46 #define push_arg_plus_1 ({__need_in_use_bit;_rom_call(void,(CESI),51F);}) 47 #define push_difference ({__need_in_use_bit;_rom_call(void,(CESI,CESI),51A);}) 48 #define push_dot_exponentiate ({__need_in_use_bit;_rom_call(void,(CESI,CESI),596);}) 49 #define push_equals ({__need_in_use_bit;_rom_call(void,(CESI,CESI),5A3);}) 50 #define push_exponentiate ({__need_in_use_bit;_rom_call(void,(CESI,CESI),595);}) 51 #define push_factorial ({__need_in_use_bit;_rom_call(void,(CESI),540);}) 52 #define push_greater_than_or_equals ({__need_in_use_bit;_rom_call(void,(CESI,CESI),5A7);}) 53 #define push_greater_than ({__need_in_use_bit;_rom_call(void,(CESI,CESI),5A5);}) 54 #define push_less_than_or_equals ({__need_in_use_bit;_rom_call(void,(CESI,CESI),5A8);}) 55 #define push_less_than ({__need_in_use_bit;_rom_call(void,(CESI,CESI),5A6);}) 56 #define push_negate ({__need_in_use_bit;_rom_call(void,(CESI),524);}) 57 #define push_not_equals ({__need_in_use_bit;_rom_call(void,(CESI,CESI),5A4);}) 58 #define push_not ({__need_in_use_bit;_rom_call(void,(CESI),5AA);}) 59 #define push_or _rom_call(void,(CESI,CESI),5AC) 60 #define push_percent ({__need_in_use_bit;_rom_call(void,(CESI),555);}) 61 #define push_product ({__need_in_use_bit;_rom_call(void,(CESI,CESI),521);}) 62 #define push_ratio ({__need_in_use_bit;_rom_call(void,(CESI,CESI),526);}) 63 #define push_square ({__need_in_use_bit;_rom_call(void,(CESI),52C);}) 64 #define push_sum ({__need_in_use_bit;_rom_call(void,(CESI,CESI),594);}) 65 #if MIN_AMS>=204 66 #define push_substitute_simplify ({__need_in_use_bit;_rom_call(void,(CESI,CESI,CESI),5B9);}) 67 #define push_substitute_using_such_that ({__need_in_use_bit;_rom_call(void,(CESI,CESI,CESI),5BE);}) 68 #endif 69 #endif 70 #endif 71 #endif 72 /* End Auto-Generated Part */ 73 74 #endif 75