PDA

View Full Version : SUBROUTINE ZSYSTM



Nelly
11-18-2010, 02:27 PM
Hi There,

I'm desperately looking for a subroutine named ZSYSTM in FORTRAN. It should be in IMSL library but I couldn't find it in new versions, so it may be in older versions.
This subroutine is used to find a parameter by root search of a given equation.
It should be called like as follows:


CALL ZSYSTM(VGUES1,EPS,4,1,VROOT,ITMAX,WA,GPAR,IERT)

in which
VGUES1 is a function
VROOT and GPAR are real arrays
WA and EPS are real numbers
ITMAX and IERT are integer numbers

I appreciate to send me if anyone has it, or let me know the equivalent version in new IMSL libraries.

Thanks a lot
Mojtaba

ed
11-20-2010, 03:53 PM
I haven't been able to find references to ZSYSTM either. Would ZUNI (http://www.vni.com/products/imsl/documentation/fort07/help/math/math.htm?turl=docs/zuni.htm) or another function in Chapter 7 (http://www.vni.com/products/imsl/documentation/fort07/help/math/math.htm?turl=docs/routines6.htm) accomplish the same thing?

mecej4
11-21-2010, 05:21 PM
I believe that ZSYSTM was a routine for solving a set of nonlinear equations. Therefore, one of the NEQ.. routines in IMSL would be a suitable substitute.

ed
11-22-2010, 08:22 AM
One of our developers who recalls the ZSYSTM function suggests that either NEQNF (http://www.vni.com/products/imsl/documentation/fort07/help/math/math.htm?turl=docs/neqnf.htm) or BCONF (http://www.vni.com/products/imsl/documentation/fort07/help/math/math.htm?turl=docs/bconf.htm) would be likely replacements.

Nelly
12-10-2010, 11:06 AM
Hi,

Thanks both of you, ed and mecej4. You were very helpful. I tried the routines you suggested. Finally, I found that routine NEQNF(...) is equivalent for ZSYSTM(...) and resolves issue in my code.