Modifications of DFO and ZEROIN source codes
--------------------------------------------
Sergej V. Aksenov (http://aksenov.freeshell.org/)
Last revised : 18 June 2002
Both DFO and ZEROIN (written originally in Fortran) were first F2C'ed.
DFO
---
03/05/02
Make a search in these files for string Aksenov to find insertions/ changes
dfo.c
-----
* Defined sruct dfopar that holds parameters passed from the main sdoptim routine.
* Defined integer flag for internal error in function computation to allow exit from dfo.
* Commented out reading control parameters from a file; these are instead read from sruct dfopar.
* Inserted checking for output value of a function computation routine, and exit if it is negative.
dfosolv.c
---------
* Defined integer flag for internal error in function computation to allow exit from dfo.
* Inserted checking for output value of ptinit subroutine, and exit if it is 99.
* Inserted checking for output value of a function computation routine, and exit if it is negative.
* Inserted checking for output value of impmode subroutine, and exit if it is 99.
impmod.c
--------
* Defined integer flag for internal error in function computation to allow exit from dfo.
* Inserted checking for output value of a function computation routine, and exit if it is negative.
ptinit.c
--------
* Defined integer flag for internal error in function computation to allow exit from dfo.
* Inserted checking for output value of a function computation routine, and exit if it is negative.
mintr_cfsqp.c
-------------
* Commented out include cfsqpusr.h because it conflicts with the same include needed in optim.tm
ZEROIN
------
02/27/02
zeroin.c
--------
* Added new argument -- integer flag.
* Changed declaration of function to prototype style (F2C generated traditionsl, didn't work with Project Builder ???)
* Add argument in function definition - line 8;
* Add type description of flag - insert after line 11;
* Set flag initially to zero - after line 64;
* Add argument flag to function fun() - line 65 and 66;
* Check for nonzero flag - after line 65 and 66;
* Add argument flag to function fun() - line 166;
* Check for nonzero flag - after line 166