diff --git a/src/frontend/com_qpnoise.c b/src/frontend/com_qpnoise.c index abf7fcb5e..ae1f2ab04 100644 --- a/src/frontend/com_qpnoise.c +++ b/src/frontend/com_qpnoise.c @@ -21,6 +21,11 @@ runs it. #include "com_qpnoise.h" +extern int qp_steptype(const char* w); +extern int qp_sweep_maxpts(int stepType, int np, double fstart, double fstop); +extern void qp_emit_plot(const char* plotname, const char* title, double* freqs, int npts, + char** vnames, int nvec, double* data); + static double qpnnum(const char *w) { char *s = (char *) w; @@ -70,10 +75,6 @@ com_qpnoise(wordlist *wl) return; } { /* sweep form: qpnoise -> onoise/inoise plot */ - extern int qp_steptype(const char *w); - extern int qp_sweep_maxpts(int stepType, int np, double fstart, double fstop); - extern void qp_emit_plot(const char *plotname, const char *title, double *freqs, int npts, - char **vnames, int nvec, double *data); int st = qp_steptype(wl->wl_next->wl_word); if (st >= 0) { double fstart, fstop, *freqs, *data; int np, npts, maxpts; diff --git a/src/frontend/com_qpxf.c b/src/frontend/com_qpxf.c index ffcac2d5d..eee0d9719 100644 --- a/src/frontend/com_qpxf.c +++ b/src/frontend/com_qpxf.c @@ -20,6 +20,11 @@ output node and runs it. #include "com_qpxf.h" +extern int qp_steptype(const char* w); +extern int qp_sweep_maxpts(int stepType, int np, double fstart, double fstop); +extern void qp_emit_plot(const char* plotname, const char* title, double* freqs, int npts, + char** vnames, int nvec, double* data); + static double qpxfnum(const char *w) { char *s = (char *) w; @@ -60,10 +65,6 @@ com_qpxf(wordlist *wl) outNode = qpxf_node(ckt, wl->wl_word); if (outNode <= 0) { fprintf(cp_err, "Error: qpxf: unknown output node '%s'.\n", wl->wl_word); return; } { /* sweep form: qpxf -> xf/xf_conv plot */ - extern int qp_steptype(const char *w); - extern int qp_sweep_maxpts(int stepType, int np, double fstart, double fstop); - extern void qp_emit_plot(const char *plotname, const char *title, double *freqs, int npts, - char **vnames, int nvec, double *data); int st = qp_steptype(wl->wl_next->wl_word); if (st >= 0) { double fstart, fstop, *freqs, *data; int np, npts, maxpts;