#include<stdio.h> #include<stdlib.h> #include<error.h> #include<errno.h> #include"nrutil.h" #define MAXBIT 30 #define MAXDIM 6 #define DEBUG 1 void sobseq(int *, float []); int main(int argc, char *argv[]) { int n,i; float x[100]; for(i=0;i<100;i++) x[i]=0; n=-1; sobseq(&n,x); // for(i=0;i<100;i++) // printf("%f",x[i]); n=4; sobseq(&n,x); for(i=0;i<100;i++) printf("%f\n",x[i]); n=5; sobseq(&n,x); for(i=0;i<100;i++) printf("%f\n",x[i]); return 0; } void sobseq(int *n,float x[]) { int j,k,l; unsigned long i,im,ipp; static float fac; static unsigned long in,ix[MAXDIM+1],*iu[MAXBIT+1]; static unsigned long mdeg[MAXDIM+1]={0,1,2,3,3,4,4}; static unsigned long ip[MAXDIM+1]={0,0,1,1,2,1,4}; stat...