void grobner::display_monomial(std::ostream & out, monomial const & m) const { if (!m.m_coeff.is_one() || m.m_vars.empty()) { out << m.m_coeff; if (!m.m_vars.empty()) out << "*"; } if (!m.m_vars.empty()) { ptr_vector<expr>::const_iterator it = m.m_vars.begin(); ptr_vector<expr>::const_iterator end = m.m_vars.end(); unsigned power = 1; expr * prev = *it; it++; for (; it != end; ++it) { expr * curr = *it; if (curr == prev) { power++; } else { display_var(out, prev); if (power > 1) out << "^" << power; power = 1; prev = curr; out << "*"; } } display_var(out, prev); if (power > 1) out << "^" << power; } }
static void doubleclick_action (windata_t *vwin) { switch (vwin->role) { case MAINWIN: if (dataset != NULL && dataset->n > 0) { display_var(); } break; case TEXTBOOK_DATA: browser_open_data(NULL, vwin); break; case PS_FILES: browser_open_ps(NULL, vwin); break; case FUNC_FILES: browser_call_func(NULL, vwin); break; case NATIVE_DB: open_db_index(NULL, vwin); break; case REMOTE_DB: open_remote_db_index(NULL, vwin); break; case NATIVE_SERIES: case RATS_SERIES: case PCGIVE_SERIES: case REMOTE_SERIES: display_db_series(vwin); break; default: break; } }
static gint var_popup_click (GtkWidget *w, gpointer p) { gchar *item = (gchar *) p; int v = mdata_active_var(); if (!strcmp(item, _("Display values"))) { display_var(); } else if (!strcmp(item, _("Summary statistics"))) { do_menu_op(VAR_SUMMARY, NULL, OPT_NONE); } else if (!strcmp(item, _("Time series plot"))) { do_graph_var(v); } else if (!strcmp(item, _("Panel plot..."))) { do_graph_var(v); } else if (!strcmp(item, _("Frequency distribution"))) { do_freq_dist(); } else if (!strcmp(item, _("Boxplot"))) { menu_boxplot_callback(v); } else if (!strcmp(item, _("Gini coefficient"))) { do_gini(); } else if (!strcmp(item, _("Correlogram"))) { do_corrgm(); } else if (!strcmp(item, _("Periodogram"))) { do_pergm(NULL); } else if (!strcmp(item, _("ARIMA model"))) { selector_set_varnum(v); modelspec_dialog(ARMA); } else if (!strcmp(item, _("Dickey-Fuller test"))) { unit_root_test(ADF); } else if (!strcmp(item, _("KPSS test"))) { unit_root_test(KPSS); } else if (!strcmp(item, _("Edit attributes"))) { varinfo_dialog(v); } else if (!strcmp(item, _("Edit values"))) { show_spreadsheet(SHEET_EDIT_VARLIST); } else if (!strcmp(item, _("Copy to clipboard"))) { csv_selected_to_clipboard(); } else if (!strcmp(item, _("Delete"))) { delete_single_var(v); } else if (!strcmp(item, _("Add log"))) { add_logs_etc(LOGS, v); } else if (!strcmp(item, _("Add difference"))) { add_logs_etc(DIFF, v); } else if (!strcmp(item, _("Define new variable..."))) { genr_callback(); } gtk_widget_destroy(mdata->popup); return FALSE; }
void grobner::display_vars(std::ostream & out, unsigned num_vars, expr * const * vars) const { for (unsigned i = 0; i < num_vars; i++) { display_var(out, vars[i]); out << " "; } }