|
|
1.1 root 1: double d, df(), xf(); int i, j, k, l;
2: f()
3: {
4: d = (i ? i*df(j) : 0.0) + (k ? k*xf(l) : 0.0);
5: d = 1/d;
6: }
7:
8:
9: xx(a, b) register double a; register float b;
10: { register double c; register float d;
11: register double e; register float f;
12: a=b; a=c; a=d; a=e; a=f;
13: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.