#ifdef XLISP_STAT

/************************************************************************/

/************************************************************************/

/** **/

/** Object Methods **/

/** **/

/************************************************************************/

/************************************************************************/

/* objects.c */

{ NULL, S, xsmessage_method }, /* 300 */

{ NULL, S, xsreparent_object },

{ NULL, S, xshas_slot },

{ NULL, S, xshas_method },

{ NULL, S, xsadd_slot },

{ NULL, S, xsdelete_slot },

{ NULL, S, xsadd_method },

{ NULL, S, xsdelete_method },

{ NULL, S, xsshow_object },

{ NULL, S, xsobject_isnew },

{ NULL, S, xsparents },

{ NULL, S, xsprecedence_list },

{ NULL, S, xsobject_slots },

{ NULL, S, xsobject_methods },

{ NULL, S, xsobject_documentation },

{ NULL, S, xsmakeproto },

#ifndef NOGRAPHICS

/* hardware-objects */

{ NULL, S, xsobject_null_method },

{ NULL, S, xsobject_null_method },

{ NULL, S, xsobject_null_method },

/* windows.c */

{ NULL, S, xsshowwindow },

{ NULL, S, xshidewindow },

{ NULL, S, xshidewindow },

{ NULL, S, xswindow_title },

{ NULL, S, xswindow_location },

{ NULL, S, xswindow_size },

{ NULL, S, xswindow_frame_location },

{ NULL, S, xswindow_frame_size },

{ NULL, S, xsobject_null_method },

{ NULL, S, xsobject_null_method },

{ NULL, S, xsobject_null_method },

{ NULL, S, xsobject_null_method },

{ NULL, S, xsobject_null_method },

{ NULL, S, xsobject_null_method },

{ NULL, S, xsobject_null_method },

{ NULL, S, xsobject_null_method },

{ NULL, S, xsobject_null_method },

{ NULL, S, xsobject_null_method },

{ NULL, S, xsobject_null_method },

#ifdef MACINTOSH

/* edit.c */

{ NULL, S, xsedit_window_isnew },

{ NULL, S, xsedit_window_allocate },

{ NULL, S, xsedit_window_cut },

{ NULL, S, xsedit_window_copy },

{ NULL, S, xsedit_window_paste },

{ NULL, S, xsedit_window_revert },

{ NULL, S, xsedit_window_save },

{ NULL, S, xsedit_window_save_as },

{ NULL, S, xsedit_window_save_copy },

{ NULL, S, xsedit_window_paste_stream },

{ NULL, S, xsedit_window_paste_string },

{ NULL, S, xsedit_window_flush_window },

{ NULL, S, xsedit_window_selection_stream},

{ NULL, S, xsedit_window_remove },

{ NULL, S, xsedit_window_remove },

{ NULL, S, xsedit_window_remove },

{ NULL, S, xsedit_window_activate },

{ NULL, S, xsedit_window_update },

{ NULL, S, xsedit_window_find },

{ NULL, S, xslistener_isnew },

{ NULL, S, xslistener_allocate },

{ NULL, S, xshidewindow },

{ NULL, S, xshidewindow },

{ NULL, S, xshidewindow },

#endif /* MACINTOSH */

/* menus.c */

{ NULL, S, xsmenu_isnew },

{ NULL, S, xsallocate_menu },

{ NULL, S, xsdispose_menu },

{ NULL, S, xsinstall_menu },

{ NULL, S, xsremove_menu },

{ NULL, S, xsmenu_enabled },

{ NULL, S, xsupdate_menu },

{ NULL, S, xsallocated_p },

{ NULL, S, xsmenu_title },

{ NULL, S, xsmenu_items },

{ NULL, S, xsinstalled_p },

{ NULL, S, xsappend_items },

{ NULL, S, xsdelete_items },

{ NULL, S, xsmenu_select },

{ NULL, S, xsmenu_popup },

#ifdef MACINTOSH

{ NULL, S, xsapple_menu_isnew },

{ NULL, S, xsapple_menu_select },

#endif /* MACINTOSH */

{ NULL, S, xsitem_isnew },

{ NULL, S, xsitem_title },

{ NULL, S, xsitem_key },

{ NULL, S, xsitem_mark },

{ NULL, S, xsitem_style },

{ NULL, S, xsitem_action },

{ NULL, S, xsitem_enabled },

{ NULL, S, xsitem_installed_p },

{ NULL, S, xsitem_update },

{ NULL, S, xsitem_do_action },

/* dialog.c */

{ NULL, S, xsdialog_isnew },

{ NULL, S, xsdialog_allocate },

{ NULL, S, xsdialog_remove },

{ NULL, S, xsdialog_remove },

{ NULL, S, xsdialog_remove },

{ NULL, S, xsdialog_allocated_p },

{ NULL, S, xsdialog_default_button },

{ NULL, S, xsdialog_modal },

{ NULL, S, xsdialog_item_do_action },

{ NULL, S, xsdialog_item_action },

{ NULL, S, xsbutton_item_isnew },

{ NULL, S, xstoggle_item_isnew },

{ NULL, S, xstoggle_item_value },

{ NULL, S, xstext_item_isnew },

{ NULL, S, xstext_item_text },

{ NULL, S, xschoice_item_isnew },

{ NULL, S, xschoice_item_value },

{ NULL, S, xsscroll_item_isnew },

{ NULL, S, xsscroll_item_value },

{ NULL, S, xsscroll_item_max },

{ NULL, S, xsscroll_item_min },

{ NULL, S, xsscroll_item_action },

{ NULL, S, xslist_item_isnew },

{ NULL, S, xslist_item_action },

{ NULL, S, xslist_item_text },

{ NULL, S, xslist_item_selection },

/* xsiviewwindow.c */

{ NULL, S, iview_window_isnew },

{ NULL, S, iview_window_allocate },

{ NULL, S, iview_window_idle_on },

{ NULL, S, iview_window_menu },

{ NULL, S, xsiview_window_update },

{ NULL, S, xsiview_window_activate },

{ NULL, S, iview_window_remove },

{ NULL, S, iview_window_remove },

{ NULL, S, iview_window_remove },

{ NULL, S, iview_window_while_button_down},

{ NULL, S, iview_window_show_window },

{ NULL, S, xsobject_null_method },

{ NULL, S, xsobject_null_method },

{ NULL, S, xsobject_null_method },

{ NULL, S, xsobject_null_method },

{ NULL, S, xsobject_null_method },

{ NULL, S, xsobject_null_method },

{ NULL, S, xsobject_null_method },

{ NULL, S, xsobject_null_method },

{ NULL, S, iview_window_canvas_width },

{ NULL, S, iview_window_canvas_height },

{ NULL, S, iview_window_line_type },

{ NULL, S, iview_window_draw_mode },

{ NULL, S, iview_window_draw_color },

{ NULL, S, iview_window_back_color },

{ NULL, S, iview_window_use_color },

{ NULL, S, iview_window_reverse_colors },

{ NULL, S, iview_window_view_rect },

{ NULL, S, iview_window_line_width },

{ NULL, S, iview_window_clip_rect },

{ NULL, S, iview_window_cursor },

{ NULL, S, iview_window_has_h_scroll },

{ NULL, S, iview_window_has_v_scroll },

{ NULL, S, iview_window_scroll },

{ NULL, S, iview_window_h_scroll_incs },

{ NULL, S, iview_window_v_scroll_incs },

{ NULL, S, iview_window_draw_line },

{ NULL, S, iview_window_draw_point },

{ NULL, S, iview_window_erase_rect },

{ NULL, S, iview_window_frame_rect },

{ NULL, S, iview_window_paint_rect },

{ NULL, S, iview_window_erase_oval },

{ NULL, S, iview_window_frame_oval },

{ NULL, S, iview_window_paint_oval },

{ NULL, S, iview_window_erase_arc },

{ NULL, S, iview_window_frame_arc },

{ NULL, S, iview_window_paint_arc },

{ NULL, S, iview_window_erase_poly },

{ NULL, S, iview_window_frame_poly },

{ NULL, S, iview_window_paint_poly },

{ NULL, S, iview_window_text_ascent },

{ NULL, S, iview_window_text_descent },

{ NULL, S, iview_window_text_width },

{ NULL, S, iview_window_draw_string },

{ NULL, S, iview_window_draw_string_up },

{ NULL, S, iview_window_draw_text },

{ NULL, S, iview_window_draw_text_up },

{ NULL, S, iview_window_draw_symbol },

{ NULL, S, iview_window_replace_symbol },

{ NULL, S, iview_window_start_buffering },

{ NULL, S, iview_window_buffer_to_screen},

#ifdef MACINTOSH

{ NULL, S, iview_window_copy_to_clip },

#endif /* MACINTOSH */

{ NULL, S, iview_window_drag_grey_rect },

{ NULL, S, iview_window_dump_image },

{ NULL, S, gw_draw_bitmap },

/* xsiview.c */

{ NULL, S, iview_isnew },

{ NULL, S, iview_allocate },

{ NULL, S, iview_std_resize },

{ NULL, S, iview_std_redraw },

{ NULL, S, iview_std_redraw_background },

{ NULL, S, iview_std_clear_content },

{ NULL, S, iview_std_redraw_content },

{ NULL, S, xsobject_null_method },

{ NULL, S, xsobject_null_method },

{ NULL, S, xsobject_null_method },

{ NULL, S, iview_std_adjust_screen },

{ NULL, S, iview_std_adjust_points_in_rect},

{ NULL, S, iview_std_adjust_screen_point},

{ NULL, S, iview_std_mark_points_in_rect},

{ NULL, S, iview_content_rect },

{ NULL, S, iview_content_origin },

{ NULL, S, iview_content_variables },

{ NULL, S, iview_click_range },

{ NULL, S, iview_mouse_mode },

{ NULL, S, iview_showing_labels },

{ NULL, S, iview_margin },

{ NULL, S, iview_fixed_aspect },

{ NULL, S, iview_dirty },

{ NULL, S, iview_x_axis },

{ NULL, S, iview_y_axis },

{ NULL, S, iview_brush },

{ NULL, S, iview_erase_brush },

{ NULL, S, iview_draw_brush },

{ NULL, S, iview_move_brush },

{ NULL, S, iview_resize_brush },

{ NULL, S, iview_do_click },

{ NULL, S, iview_do_motion },

{ NULL, S, iview_std_click },

{ NULL, S, iview_std_click },

{ NULL, S, iview_std_motion },

{ NULL, S, iview_unselect_all_points },

{ NULL, S, iview_erase_selection },

{ NULL, S, iview_mask_selection },

{ NULL, S, iview_unmask_all_points },

{ NULL, S, iview_points_showing },

{ NULL, S, iview_points_hilited },

{ NULL, S, iview_points_selected },

{ NULL, S, iview_points_selected },

{ NULL, S, iview_show_all_points },

{ NULL, S, iview_all_points_showing },

{ NULL, S, iview_all_points_unmasked },

{ NULL, S, iview_any_points_selected },

{ NULL, S, iview_linked },

{ NULL, S, iview_links },

{ NULL, S, iview_num_variables },

{ NULL, S, iview_variable_label },

{ NULL, S, iview_range },

{ NULL, S, iview_scaled_range },

{ NULL, S, iview_screen_range },

{ NULL, S, iview_transformation },

{ NULL, S, iview_apply_transformation },

{ NULL, S, iview_add_points },

{ NULL, S, iview_clear_points },

{ NULL, S, iview_num_points },

{ NULL, S, iview_point_coordinate },

{ NULL, S, iview_point_screen_coordinate},

{ NULL, S, iview_point_transformed_coordinate },

{ NULL, S, iview_point_masked },

{ NULL, S, iview_point_color },

{ NULL, S, iview_point_state },

{ NULL, S, iview_point_screen_state },

{ NULL, S, iview_point_marked },

{ NULL, S, iview_point_label },

{ NULL, S, iview_point_symbol },

{ NULL, S, iview_point_selected },

{ NULL, S, iview_point_hilited },

{ NULL, S, iview_point_showing },

{ NULL, S, iview_add_lines },

{ NULL, S, iview_clear_lines },

{ NULL, S, iview_num_lines },

{ NULL, S, iview_line_coordinate },

{ NULL, S, iview_line_screen_coordinate },

{ NULL, S, iview_line_transformed_coordinate },

{ NULL, S, iview_line_masked },

{ NULL, S, iview_line_color },

{ NULL, S, iview_line_next },

{ NULL, S, iview_line_type },

{ NULL, S, iview_line_width },

#ifdef USESTRINGS

{ NULL, S, iview_add_strings },

{ NULL, S, iview_clear_strings },

{ NULL, S, iview_num_strings },

{ NULL, S, iview_string_coordinate },

{ NULL, S, iview_string_screen_coordinate},

{ NULL, S, iview_string_transformed_coordinate },

{ NULL, S, iview_string_masked },

{ NULL, S, iview_string_color },

{ NULL, S, iview_string_modifiers },

#endif /* USESTRINGS */

{ NULL, S, iview_draw_data_points },

{ NULL, S, iview_draw_data_lines },

#ifdef USESTRINGS

{ NULL, S, iview_draw_data_strings },

#endif /* USESTRINGS */

{ NULL, S, iview_rotate_2 },

{ NULL, S, iview_adjust_to_data },

{ NULL, S, iview_visible_range },

{ NULL, S, iview_scale_to_range },

{ NULL, S, iview_scale },

{ NULL, S, iview_shift },

{ NULL, S, iview_clear_masks },

{ NULL, S, iview_slice_variable },

{ NULL, S, iview_real_to_screen },

{ NULL, S, iview_screen_to_real },

{ NULL, S, iview_scaled_to_screen },

{ NULL, S, iview_screen_to_scaled },

{ NULL, S, iview_points_in_rect },

{ NULL, S, iview_adjust_depth_cuing },

{ NULL, S, iview_spin_allocate },

{ NULL, S, iview_spin_content_variables },

{ NULL, S, iview_spin_showing_axes },

{ NULL, S, iview_spin_depth_cuing },

{ NULL, S, iview_spin_resize },

{ NULL, S, iview_spin_redraw_content },

{ NULL, S, iview_spin_rotate },

{ NULL, S, iview_spin_angle },

{ NULL, S, iview_spin_rotate },

{ NULL, S, iview_spin_draw_axes },

{ NULL, S, iview_scatmat_allocate },

{ NULL, S, iview_scatmat_resize },

{ NULL, S, xsobject_null_method },

{ NULL, S, iview_scatmat_redraw_content },

{ NULL, S, iview_scatmat_click },

{ NULL, S, iview_scatmat_motion },

{ NULL, S, iview_scatmat_add_points },

{ NULL, S, iview_scatmat_add_lines },

#ifdef USESTRINGS

{ NULL, S, iview_scatmat_add_strings },

#endif /* USESTRINGS */

{ NULL, S, iview_scatmat_adjust_screen_point},

{ NULL, S, iview_scatmat_adjust_points_in_rect},

{ NULL, S, iview_scatmat_mark_points_in_rect},

{ NULL, S, iview_list_allocate },

{ NULL, S, xsobject_null_method },

{ NULL, S, iview_list_redraw_content },

{ NULL, S, iview_list_add_points },

{ NULL, S, iview_list_adjust_screen_point},

{ NULL, S, iview_list_adjust_points_in_rect},

{ NULL, S, iview_list_mark_points_in_rect},

{ NULL, S, iview_hist_isnew },

{ NULL, S, iview_hist_allocate },

{ NULL, S, iview_hist_add_points },

{ NULL, S, iview_hist_clear_points },

{ NULL, S, iview_hist_resize },

{ NULL, S, iview_hist_redraw_content },

{ NULL, S, iview_hist_adjust_screen },

{ NULL, S, iview_hist_num_bins },

{ NULL, S, iview_hist_bin_counts },

{ NULL, S, iview_hist_adjust_to_data },

{ NULL, S, iview_hist_adjust_screen_point},

{ NULL, S, iview_hist_adjust_points_in_rect},

{ NULL, S, iview_hist_mark_points_in_rect},

{ NULL, S, iview_plot2d_add_points },

{ NULL, S, iview_plot2d_add_lines },

#ifdef USESTRINGS

{ NULL, S, iview_plot2d_add_strings },

#endif /* USESTRINGS */

{ NULL, S, iview_plot2d_adjust_to_data },

#endif /* NOGRAPHICS */

/* compound.c */

{ NULL, S, xsobject_null_method },

{ NULL, S, xsobject_null_method },

{ NULL, S, xsobject_null_method },

{ NULL, S, xsobject_null_method },

/************************************************************************/

/************************************************************************/

/** **/

/** Reguler Functions **/

/** **/

/************************************************************************/

/************************************************************************/

/* dialog.c */

{ "SYSBEEP", S, xssysbeep },

#ifdef MACINTOSH

{ "ABOUT-XLISP-STAT", S, xsabout_xlisp_stat },

{ "LAUNCH-APPLICATION", S, xlaunchapp },

{ "ENCODE-SIGNATURE", S, xstrtoostype },

{ "GET-FRONT-PROCESS", S, xgetfrontprocess },

{ "SET-FRONT-PROCESS", S, xsetfrontprocess },

{ "GET-PROCESS-LIST", S, xgetprocesslist },

{ "GET-APPLE-EVENT-TARGET", S, xgettarget },

{ "GET-APPLE-EVENT-TARGET-LIST", S, xgettargetlist },

{ "BROWSE-APPLE-EVENT-TARGETS", S, xbrowsetargets },

{ "SEND-APPLE-EVENT", S, xsendappleevent },

{ "START-SESSION", S, xppcstartup },

/* edit.c */

{ "OPEN-FILE-DIALOG", S, xsopenfiledialog },

{ "SET-FILE-DIALOG", S, xssetfiledialog },

{ "SET-VOLUME", S, xssetvolume },

{ "FRONT-WINDOW", S, xsfrontwindow },

{ "HIDE-FRONT-WINDOW", S, xshidefrontwindow },

{ "SYSTEM-EDIT", S, xssystem_edit },

#endif /* MACINTOSH */

#ifdef MSDOS

#ifdef _Windows

{ "ABOUT-XLISP-STAT", S, xsabout_xlisp_stat },

{ "MSW-CUT", S, msw_cut },

{ "MSW-COPY", S, msw_copy },

{ "MSW-PASTE", S, msw_paste },

{ "MSW-CLEAR", S, msw_clear },

{ "MSW-COPY-PASTE", S, msw_copy_paste },

{ "MSW-TILE", S, msw_tile },

{ "MSW-CASCADE", S, msw_cascade },

{ "MSW-CLOSE-ALL", S, msw_closeall },

{ "MSW-ARRANGE-ICONS", S, msw_arrange_icons },

{ "MSW-EXIT", S, msw_exit },

{ "MSW-FREE-MEM", S, msw_free_mem },

{ "MSW-CURSOR-SIZE", S, msw_cursor_size },

{ "SYSTEM", SM, msw_win_exec },

{ "MSW-WIN-EXEC", SM, msw_win_exec },

{ "MSW-WIN-HELP", S, msw_win_help },

{ "OPEN-FILE-DIALOG", S, xsopenfiledialog },

{ "SET-FILE-DIALOG", S, xssetfiledialog },

{ "SYSTEM::DDE-NAME-SERVICE", S, dde_name_service },

{ "DDE-SERVICES", S, dde_services },

{ "DDE-CONNECT", S, dde_connect },

{ "DDE-CLIENT-TRANSACTION", S, dde_client_transaction },

{ "DDE-DISCONNECT", S, dde_disconnect },

{ "MSW-GET-PROFILE-STRING", S, msw_get_profile_string },

{ "MSW-WRITE-PROFILE-STRING", S, msw_write_profile_string },

{ "MSW-MAIN-FRAME-VISIBLE", S, msw_main_frame_visible },

#endif /* _Windows */

#endif /* MSDOS */

/* experimental.c */

{ "SYSTEM::GETENV", S, xsgetenv },

/* common.c */

{ "STRING-SEARCH", S, xsstringsearch },

{ "COMPLEX", S, xsrcomplex },

{ "CONJUGATE", S, xsrconjugate },

{ "REALPART", S, xsrrealpart },

{ "IMAGPART", S, xsrimagpart },

/* distributions.c */

{ "NORMAL-CDF", S, xsrnormalcdf },

{ "BETA-CDF", S, xsrbetacdf },

{ "GAMMA-CDF", S, xsrgammacdf },

{ "CHISQ-CDF", S, xsrchisqcdf },

{ "T-CDF", S, xsrtcdf },

{ "F-CDF", S, xsrfcdf },

{ "CAUCHY-CDF", S, xsrcauchycdf },

{ "LOG-GAMMA", S, xsrloggamma },

{ "BIVNORM-CDF", S, xsrbnormcdf },

{ "NORMAL-QUANT", S, xsrnormalquant },

{ "CAUCHY-QUANT", S, xsrcauchyquant },

{ "BETA-QUANT", S, xsrbetaquant },

{ "GAMMA-QUANT", S, xsrgammaquant },

{ "CHISQ-QUANT", S, xsrchisqquant },

{ "T-QUANT", S, xsrtquant },

{ "F-QUANT", S, xsrfquant },

{ "NORMAL-DENS", S, xsrnormaldens },

{ "CAUCHY-DENS", S, xsrcauchydens },

{ "BETA-DENS", S, xsrbetadens },

{ "GAMMA-DENS", S, xsrgammadens },

{ "CHISQ-DENS", S, xsrchisqdens },

{ "T-DENS", S, xsrtdens },

{ "F-DENS", S, xsrfdens },

{ "UNIFORM-RAND", S, xsruniformrand },

{ "NORMAL-RAND", S, xsrnormalrand },

{ "CAUCHY-RAND", S, xsrcauchyrand },

{ "GAMMA-RAND", S, xsrgammarand },

{ "CHISQ-RAND", S, xsrchisqrand },

{ "T-RAND", S, xsrtrand },

{ "BETA-RAND", S, xsrbetarand },

{ "F-RAND", S, xsrfrand },

/* ddistributions.c */

{ "BINOMIAL-CDF", S, xsrbinomialcdf },

{ "POISSON-CDF", S, xsrpoissoncdf },

{ "BINOMIAL-PMF", S, xsrbinomialpmf },

{ "POISSON-PMF", S, xsrpoissonpmf },

{ "BINOMIAL-QUANT", S, xsrbinomialquant },

{ "POISSON-QUANT", S, xsrpoissonquant },

{ "BINOMIAL-RAND", S, xsrbinomialrand },

{ "POISSON-RAND", S, xsrpoissonrand },

/* linalg.c */

{ "ANY-COMPLEX-ELEMENTS", S, xsanycomplex },

{ "TRANSPOSE-INTO", S, xstransposeinto },

{ "GENERIC-TO-LINALG", S, xsgen2linalg },

{ "LINALG-TO-GENERIC", S, xslinalg2gen },

{ "LINPACK-DGECO", S, xslpdgeco },

{ "LINPACK-DGEDI", S, xslpdgedi },

{ "LINPACK-DGEFA", S, xslpdgefa },

{ "LINPACK-DGESL", S, xslpdgesl },

{ "LINPACK-ZGECO", S, xslpzgeco },

{ "LINPACK-ZGEDI", S, xslpzgedi },

{ "LINPACK-ZGEFA", S, xslpzgefa },

{ "LINPACK-ZGESL", S, xslpzgesl },

{ "LINPACK-DSVDC", S, xslpdsvdc },

{ "LINPACK-ZSVDC", S, xslpzsvdc },

{ "LINPACK-DQRDC", S, xslpdqrdc },

{ "LINPACK-DQRSL", S, xslpdqrsl },

{ "LINPACK-ZQRDC", S, xslpzqrdc },

{ "LINPACK-ZQRSL", S, xslpzqrsl },

{ "EISPACK-CH", S, xseispackch },

{ "EISPACK-RS", S, xseispackrs },

{ "CHOL-DECOMP", S, xschol_decomp },

{ "MAKE-ROTATION", S, xsmake_rotation },

{ "GET-SMOOTHER-DATA", SM, xsgetsmdata },

{ "BASE-SPLINE", S, xsbasespline },

{ "BASE-KERNEL-SMOOTH", S, xsbasekernelsmooth },

{ "BASE-LOWESS", S, xsbaselowess },

{ "SURFACE-CONTOUR", S, xssurface_contour },

{ "FFT", S, xsfft },

{ "AX+Y", S, xsaxpy },

/* matrices1.c */

{ "DIAGONAL", S, xsdiagonal },

{ "ROW-LIST", S, xsrowlist },

{ "COLUMN-LIST", S, xscolumnlist },

{ "BIND-ROWS", S, xsbindrows },

{ "BIND-COLUMNS", S, xsbindcols },

{ "TRANSPOSE-LIST", S, xstransposelist },

/* matrices2.c */

{ "BASE-MAKE-SWEEP-MATRIX", S, xsbasemkswpmat },

{ "SWEEP-IN-PLACE", S, xssweepinplace },

/* basics.c */

{ "SEQUENCEP", S, xssequencep },

{ "COPY-VECTOR", S, xscopyvector },

{ "COPY-ARRAY", S, xscopyarray },

{ "SPLIT-LIST", S, xssplitlist },

{ "WHICH", S, xswhich },

{ "ISEQ", S, xsiseq },

{ "REPEAT", S, xsrepeat },

{ "SELECT", S, xsselect },

{ "SET-SELECT", S, xssetselect },

{ "PERMUTE-ARRAY", S, xspermutearray },

/* compound.c */

{ "COMPOUND-DATA-P", S, xscompoundp },

{ "COMPOUND-DATA-LENGTH", S, xscompound_length },

{ "COMPOUND-DATA-SEQ", S, xscompound_seq },

{ "MAP-ELEMENTS", S, xsmap_elements },

/* math.c */

{ "+", S, xsradd },

{ "-", S, xsrsub },

{ "*", S, xsrmul },

#ifdef BIGNUMS

{ "/", S, xsrfdiv },

#else

{ "/", S, xsrdiv },

#endif /* BIGNUMS */

{ "DIVIDE", S, xsrdiv },

{ "PMIN", S, xsrmin },

{ "PMAX", S, xsrmax },

{ "REM", S, xsrrem },

{ "MOD", S, xsrmod },

#ifdef BIGNUM

{ "^", S, xsrfexpt },

{ "**", S, xsrfexpt },

{ "EXPT", S, xsrfexpt },

#else

{ "^", S, xsrexpt },

{ "**", S, xsrexpt },

{ "EXPT", S, xsrexpt },

#endif /* BIGNUMS */

{ "IEXPT", S, xsrexpt },

{ "LOG", S, xsrlog },

#ifdef BIGNUMS

{ "DENOMINATOR", S, xsrdenominator },

{ "NUMERATOR", S, xsrnumerator },

{ "RATIONAL", S, xsrrational },

#endif /* BIGNUMS */

{ "LOGAND", S, xsrlogand },

{ "LOGIOR", S, xsrlogior },

{ "LOGXOR", S, xsrlogxor },

{ "LOGNOT", S, xsrlognot },

{ "ABS", S, xsrabs },

{ "1+", S, xsradd1 },

{ "1-", S, xsrsub1 },

{ "SIN", S, xsrsin },

{ "COS", S, xsrcos },

{ "TAN", S, xsrtan },

{ "EXP", S, xsrexp },

{ "SQRT", S, xsrsqrt },

{ "TRUNCATE", SM, xsrfix },

{ "FLOAT", S, xsrfloat },

{ "RANDOM", S, xsrrand },

{ "FLOOR", SM, xsrfloor },

{ "CEILING", SM, xsrceil },

{ "ROUND", SM, xsrround },

{ "ASIN", S, xsrasin },

{ "ACOS", S, xsracos },

{ "ATAN", S, xsratan },

{ "PHASE", S, xsrphase },

{ "MINUSP", S, xsrminusp },

{ "ZEROP", S, xsrzerop },

{ "PLUSP", S, xsrplusp },

{ "EVENP", S, xsrevenp },

{ "ODDP", S, xsroddp },

{ "<", S, xsrlss },

{ "<=", S, xsrleq },

{ "=", S, xsrequ },

{ "/=", S, xsrneq },

{ ">=", S, xsrgeq },

{ ">", S, xsrgtr },

/* objects.c */

{ "KIND-OF-P", S, xskind_of_p },

{ "SLOT-VALUE", S, xsslot_value },

{ "MAKE-OBJECT", S, xsmake_object },

{ "SEND", SM, xmsend },

{ "SEND-SUPER", SM, xmsendsuper },

{ "CALL-NEXT-METHOD", SM, xscall_next },

{ "CALL-METHOD", SM, xscall_method },

{ "DEFMETH", F, xsdefmeth },

{ "DEFPROTO", F, xsdefproto },

/* optimize.c */

#ifdef OPTIMIZE

{ "BRACKET-SEARCH", S, xsbracket_search },

{ "GOLDEN-SEARCH", S, xsgolden_search },

{ "PARABOLIC-SEARCH", S, xsparabolic_search },

#endif /* OPTIMIZE */

/* sortdata.c */

{ "SORT-DATA", S, xssortdata },

{ "ORDER", S, xsorder },

{ "RANK", S, xsrank },

{ "SORT-DATA<", S, xssortcmp },

{ "ORDER<", S, xsordercmp },

/* statistics.c */

{ "SUM", S, xssum },

{ "PROD", S, xsprod },

{ "MIN", S, xsmin },

{ "MAX", S, xsmax },

{ "COUNT-ELEMENTS", S, xscount },

{ "ELEMENT-SEQ", S, xselement_seq },

{ "IF-ELSE", S, xsifelse },

{ "MEAN", S, xsmean },

{ "SAMPLE", S, xssample },

#ifndef NOGRAPHICS

/* windows.c */

{ "SCREEN-SIZE", S, xsscreen_size },

{ "SCREEN-HAS-COLOR", S, xsscreen_has_color },

{ "SYSTEM-HAS-WINDOWS", S, xssystem_has_windows },

{ "FLUSH-GRAPHICS", S, xsflush_graphics },

/* xsiviewwindow.c */

{ "RESET-GRAPHICS-BUFFER", S, iview_window_reset_buffer },

{ "MAKE-COLOR", S, gw_make_color },

{ "FREE-COLOR", S, gw_free_color },

{ "MAKE-CURSOR", S, gw_make_cursor },

{ "FREE-CURSOR", S, gw_free_cursor },

/* xsiviewinternal.c */

{ "UNLINK-ALL-WINDOWS", S, iview_unlink_all_windows },

/* xsiview.c */

{ "GET-NICE-RANGE", S, iview_get_nice_range },

/* xsgraphics.c */

{ "HISTOGRAM", S, xshistogram },

{ "PLOT-POINTS", S, xsplot_points },

{ "PLOT-LINES", S, xsplot_lines },

{ "SPIN-PLOT", S, xsspin_plot },

{ "SCATTERPLOT-MATRIX", S, xsscatterplot_matrix },

{ "NAME-LIST", S, xsnamelist },

#endif /* NOGRAPHICS */

#ifdef UNIX

{ "GNU-PLOT-POINTS", S, gnupointplot },

{ "GNU-PLOT-LINES", S, gnulineplot },

#endif /* UNIX */

#ifdef MACINTOSH

/* macxsgraph.c */

{ "PICK-COLOR", S, xspick_color },

/* macdynload.c */

{ "OPEN-RESOURCE-FILE", S, xsopen_resfile },

{ "CLOSE-RESOURCE-FILE", S, xsclose_resfile },

{ "CALL-CFUN", S, xscall_cfun },

#endif /* MACINTOSH */

#ifdef MSDOS

#ifdef _Windows

/* mswdynld.c */

{ "LOAD-DLL", SM, xsload_dll },

{ "FREE-DLL", S, xsfree_dll },

{ "CALL-CFUN", S, xscall_cfun },

#endif /* _Windows */

#endif /* MSDOS */

#ifdef X11WINDOWS

{ "PARSE-COLOR", S, xsparse_color },

{ "BEST-CURSOR-SIZE", S, xsbest_cursor_size },

{ "BITMAP-FROM-FILE", S, xsbitmap_from_file },

{ "X11-OPTIONS", S, xsx11_options },

#endif /* X11WINDOWS */

#ifdef FOREIGNCALL

{ "DYN-LOAD", S, xsdynload },

{ "CALL-CFUN", S, xscall_cfun },

{ "CALL-FSUB", S, xscall_fsub },

{ "CALL-LFUN", S, xscall_lfun },

#endif /* FOREIGNCALL */

#ifdef UNIX

{ "SYSTEM", S, xssystem },

{ "POPEN", S, Prim_POPEN },

{ "PCLOSE", S, Prim_PCLOSE },

#endif /* UNIX */

#ifdef MSDOS

#ifndef _Windows

{ "SYSTEM", S, xsystem },

{ "GET-KEY", S, xgetkey },

#endif /* _Windows */

#ifdef NOGRAPHICS

{ "PLOT-POINTS", S, gnupointplot },

{ "PLOT-LINES", S, gnulineplot },

#endif /* NOGRAPHICS */

#endif /* MSDOS */

#ifdef BYTECODE

{ "MAKE-BYTE-CODE", S, xlmakebcode },

{ "BYTE-CODE-CLOSE", S, xlbcclose },

{ "DYNAMIC-VALUE", S, xldval },

{ "GET-LAMBDA-NAME", S, xlgetlambdaname },

{ "COERCE-TO-MACRO", S, xlcoercemacro },

{ "MAKE-CPS-NODE", S, xlmakecpsnode },

{ "CPS-NODE-INTERNAL", S, xlcpsinternal },

{ "CPS-NODE-TRANSFORM", S, xlcpstransform },

{ "CPS-LEAF-NODE-P", S, xlcpsleafnodep },

{ "CPS-LAMBDA-NODE-P", S, xlcpslambdanodep },

{ "CPS-CALL-NODE-P", S, xlcpscallnodep },

{ "CPS-ANY-REFERENCES-P", S, xlcpsanyrefs },

{ "CPS-FIND-REFERENCES", S, xlcpsfindrefs },

{ "CPS-NODE-CHILDREN", S, xlcpsnodechildren },

{ "CPS-NODE-PARENT", S, xlcpsnodeparent },

{ "CPS-NODE-SIMPLIFIED-P", S, xlcpsnodesimplified },

{ "CPS-NODE-NOTE", S, xlcpsnodenote },

{ "CPS-LEAF-NODE-VALUE", S, xlcpsleafnodevalue },

{ "CPS-LEAF-NODE-COUNT", S, xlcpsleafnodecount },

{ "CPS-LAMBDA-NODE-ARGLIST", S, xlcpslambdanodearglist },

{ "CPS-LAMBDA-NODE-LAMBDA-LIST", S, xlcpslambdanodelambdalist },

{ "CPS-LAMBDA-NODE-NAME", S, xlcpslambdanodename },

{ "CPS-SET-NODE-CHILDREN", S, xlcpssetnodechildren },

{ "CPS-SET-NODE-PARENT", S, xlcpssetnodeparent },

{ "CPS-SET-NODE-SIMPLIFIED", S, xlcpssetnodesimplified },

{ "CPS-SET-NODE-NOTE", S, xlcpssetnodenote },

{ "CPS-SET-LEAF-NODE-VALUE", S, xlcpssetleafnodevalue },

{ "CPS-SET-LEAF-NODE-COUNT", S, xlcpssetleafnodecount },

{ "CPS-SET-LAMBDA-NODE-ARGLIST", S, xlcpssetlambdanodearglist },

{ "CPS-SET-LAMBDA-NODE-LAMBDA-LIST",S, xlcpssetlambdanodelambdalist},

{ "CPS-SET-LAMBDA-NODE-NAME", S, xlcpssetlambdanodename },

{ "CPS-LAMBDA-NODE-BODY", S, xlcpslambdanodebody },

{ "CPS-CALL-NODE-FUNCTION", S, xlcpscallnodefunction },

{ "CPS-CALL-NODE-ARGS", S, xlcpscallnodeargs },

#endif /* BYTECODE */

{ "BLAS-DASUM", S, xblasdasum },

{ "BLAS-DAXPY", S, xblasdaxpy },

{ "BLAS-DCOPY", S, xblasdcopy },

{ "BLAS-DDOT", S, xblasddot },

{ "BLAS-DNRM2", S, xblasdnrm2 },

{ "BLAS-DROT", S, xblasdrot },

{ "BLAS-DROTG", SM, xblasdrotg },

{ "BLAS-DSCAL", S, xblasdscal },

{ "BLAS-DSWAP", S, xblasdswap },

{ "BLAS-IDAMAX", S, xblasidamax },

{ "BLAS-IZAMAX", S, xblasizamax },

{ "BLAS-DZASUM", S, xblasdzasum },

{ "BLAS-DZNRM2", S, xblasdznrm2 },

{ "BLAS-ZAXPY", S, xblaszaxpy },

{ "BLAS-ZCOPY", S, xblaszcopy },

{ "BLAS-ZDOTC", S, xlbaszdotc },

{ "BLAS-ZDOTU", S, xlbaszdotu },

{ "BLAS-ZDROT", S, xlbaszdrot },

{ "BLAS-ZDSCAL", S, xlbaszdscal },

{ "BLAS-ZROTG", SM, xlbaszrotg },

{ "BLAS-ZSCAL", S, xlbaszscal },

{ "BLAS-ZSWAP", S, xlbaszswap },

{ "BLAS-DGEMV", S, xlblasdgemv },

{ "BLAS-DTRMV", S, xlblasdtrmv },

{ "BLAS-DGER", S, xlblasdger },

{ "BLAS-DTRSV", S, xlblasdtrsv },

{ "BLAS-ZGEMV", S, xlblaszgemv },

{ "BLAS-ZTRMV", S, xlblasztrmv },

{ "BLAS-ZGERC", S, xlblaszgerc },

{ "BLAS-ZGERU", S, xlblaszgeru },

{ "BLAS-ZTRSV", S, xlblasztrsv },

{ "BLAS-DGEMM", S, xlblasdgemm },

{ "BLAS-DTRSM", S, xlblasdtrsm },

{ "BLAS-ZGEMM", S, xlblaszgemm },

{ "BLAS-ZTRSM", S, xlblasztrsm },

{ "UNCMIN-MAXRELSIZE", S, xsminmaxrelsize },

{ "UNCMIN-CHOLSOLVE", S, xsmincholsolve },

{ "UNCMIN-MODELHESS", S, xsminmodelhess },

{ "UNCMIN-GRADSIZE", S, xsmingradsize },

{ "UNCMIN-LINESEARCH", S, xsminlinesearch },

{ "UNCMIN-MAXRELSIZE", S, xsminmaxrelsize },

{ "UNCMIN-CHOLSOLVE", S, xsmincholsolve },

{ "UNCMIN-MODELHESS", S, xsminmodelhess },

{ "UNCMIN-GRADSIZE", S, xsmingradsize },

{ "UNCMIN-LINESEARCH", S, xsminlinesearch },

#ifdef _Windows

{ "MSW-PRINT", S, msw_print },

{ "MSW-PAGESETUP", S, msw_pagesetup },

#endif

#else

{ "SYSTEM", S, xsystem },

#if !(defined(UNIX)||defined(AMIGA)||defined(__SASC__))

{ "GET-KEY", S, xgetkey },

#endif

#ifdef GRAPHICS

{ "CLS", S, xcls },

{ "GOTO-XY", S, xgotoxy },

{ "CLEOL", S, xcleol },

{ "MODE", S, xmode },

{ "COLOR", S, xcolor },

{ "MOVE", S, xmove },

{ "DRAW", S, xdraw },

{ "MOVEREL", S, xmoverel},

{ "DRAWREL", S, xdrawrel},

#endif

#ifdef UNIX

#ifdef FILETABLE

{ "POPEN", S, Prim_POPEN},

{ "PCLOSE", S, Prim_PCLOSE},

#endif /* FILETABLE */

#endif

#endif /* XLISP_STAT */