Files
ioccc/1990/theorem
Cody Boone Ferguson 1d86daf19a Change LIBS to LDFLAGS in Makefiles
This is to make it more standard which further allows one to run make on
some other source code, say because they want to try and fix an entry
but forget to update the Makefile. Or if they're the author they can not
worry about it in some cases. But since LDFLAGS is the standard way it
seems better to have the LIBS variable in the Makefile be LDFLAGS.

Maybe there is a reason to not have this and I'm happy to close this in
that case but it does seem better this way so I'm doing this commit.
2023-07-10 03:33:53 -07:00
..
2023-05-13 11:45:33 +10:00
2023-07-10 03:33:53 -07:00
2023-04-10 05:34:33 -07:00
2023-07-06 21:49:38 -07:00

Best of Show

Adrian Mariano
University of Washington
2729 72nd Ave SE
Mercer Island, WA 98040
US

To build:

make all

To run:

./theorem expression x1 x2 h y1

where:

expression - function f(x,y)  (see below)
x1 - start of interval
x2 - end of interval
h - step size
y1 - initial value  (y(x1) == y1)

Try:

./theorem y 0 1 0.1 1

INABIAF - it's not a bug it's a feature! :-)

If the two args passed to fibonacci and theorem_bkp equals 0 it will print 0 over and over again in an infinite loop. In this case it should not be fixed (another condition where this occurred was fixed as it affected usability of the program).

BTW: why can't the fix:

if (a[1]==NULL||a[2]==NULL||a[3]==NULL||a[4]==NULL||a[5]==NULL) return 1;

be changed to just test the value of A when a is argv and A is argc?

Judges' remarks:

The program's source implements four functions, all from the same source file!

When you compile theorem.c as is and run with 5 args, it numerically solves the equation y'=f(x,y), with a step size of h (see above usage), over the interval x=[x1,x2], with the initial condition of y(x1)=y1.

The 'expression' f(x,y) is any function of x and y with the operators:

+	-	*	/	^

The symbol ^ is the power operator. Note that it only supports integer powers. Also note that all expressions are evaluated strictly left to right. (i.e., parenthesis aren't supported).

Try running the program with the following args:

./theorem y 0 1 0.1 1
./theorem 1/x 1 2 0.1 0
./theorem 'x^2/y+x' 0 1 0.1 6

But wait, there is more! You also get, free of charge, a reversing filter! Try:

./theorem -r 0 0 0 0 < theorem.c > sorter.c

Still not impressed? The author throws in for free, a sort program! Try:

make sorter
ls | ./sorter

This program is safe for home use as well. The author has included a safety feature in case you misplace the original program source:

./sorter -r 0 0 0 0 < sorter.c > theorem_bkp.c

And finally, as a special offer to users of this entry, the author provides a Fibonacci sequence generator! Try:

./sorter 0 0 0 0 < theorem.c > fibonacci.c
make fibonacci
./fibonacci 1 1
./fibonacci 2 1

Program available on 9 track and cartridge cassette. Neither Ginsu knife nor Swiss army knife included! :-)

When this program was first shown at the 1990 Summer Usenix conference, it received a standing ovation; a first for a contest entry.

Author's remarks:

Differential equations are solved via the Runge-Kutta method, which guarantees local error proportional to h^5, and total error across a finite interval is at most a constant times h^4.

Sorting is accomplished with a standard shell sort.

Note that the sorting and reversing is limited to files with fewer than 500 lines, each less than 99 characters long.

This file is Copyright (c) 2023 by Landon Curt Noll. All Rights Reserved. You are free to share and adapt this file under the terms of this license:

Creative Commons Attribution-ShareAlike 4.0 International (CC BY-SA 4.0)

For more information, see: https://creativecommons.org/licenses/by-sa/4.0/