xscrsho.c

来自「Numerical Recipes Software 提供的算法子程序集」· C语言 代码 · 共 19 行

/* Driver for routine scrsho */

#include <stdio.h>
#define NRANSI
#include "nr.h"

static float fx(float x)
{
	return bessj0(x);
}

int main(void)
{
	scrsho(fx);
	return 0;
}
#undef NRANSI
/* (C) Copr. 1986-92 Numerical Recipes Software . */