ascend4/solver/conoptdll.h

/*
 *  Definitions Required to use the CONOPT.DLL under Windows
 *  Version: $Revision: 1.1 $
 *  Version control file: $RCSfile: conoptdll.h,v $
 *  Date last modified: $Date: 1998/02/26 15:57:57 $
 *  Last modified by: $Author: mthomas $
 *  
 *  This file is part of the SLV solver.
 *  
 *  The SLV solver is free software; you can redistribute
 *  it and/or modify it under the terms of the GNU General Public License as
 *  published by the Free Software Foundation; either version 2 of the
 *  License, or (at your option) any later version.
 *  
 *  The SLV solver is distributed in hope that it will be
 *  useful, but WITHOUT ANY WARRANTY; without even the implied warranty of
 *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
 *  General Public License for more details.
 *  
 *  You should have received a copy of the GNU General Public License
 *  along with the program; if not, write to the Free Software Foundation,
 *  Inc., 675 Mass Ave, Cambridge, MA 02139 USA.  Check the file named
 *  COPYING.  COPYING is found in ../compiler.
 *
 */

#ifndef _CONOPTDLL_H
#define _CONOPTDLL_H

/* a public header file to be distributed */

#ifndef _ASCCONFIG_H /* only define these if we haven't seen ascConfig.h */
typedef int int32;
typedef double real64;
#endif /* _ASCCONFIG_H */


/* defines and typedefs for user supplied functions */
enum conopt_func_names {
  COIPSZ_ENUM,
  COIRMS_ENUM,
  COIRMU_ENUM,
  COIRC_ENUM,
  COIRR_ENUM,
  COIRNZ_ENUM,
  COIRNU_ENUM,
  COIFDE_ENUM,
  COIFBL_ENUM,
  COISTA_ENUM,
  COIRS_ENUM,
  COIUSZ_ENUM, /* NOT IMPLEMENTED */
  COIUC_ENUM, /* NOT IMPLEMENTED */
  COIUR_ENUM, /* NOT IMPLEMENTED */
  COIUNZ_ENUM, /* NOT IMPLEMENTED */
  COIUNU_ENUM, /* NOT IMPLEMENTED */
  COILF_ENUM,
  COIEC_ENUM,
  COIER_ENUM,
  COIENZ_ENUM,
  COIMSG_ENUM,
  COIPRG_ENUM,
  COIORD_ENUM,
  COIORC_ENUM,
  COIBAN_ENUM,
  COISCR_ENUM,
  COICF_ENUM, /* NOT IMPLEMENTED */
  COIOPT_ENUM
};


#define COIPSZ_VARS (nintgr,ipsz,nreal,rpsz,usrmem)
#define COIPSZ_ARGS (int32 *nintgr,int32 *ipsz,int32 *nreal, \
                     real64 *rpsz,real64 *usrmem)
typedef void COIPSZ_FUNC COIPSZ_ARGS;

#define COIRMS_VARS (lower, curr, upper, vsta, type, rhs, \
                     fv, esta, colsta, rowno, value, nlflag, \
                     n, m, n1, nz, usrmem )
#define COIRMS_ARGS (real64 *lower,real64 *curr,real64 *upper,int32 *vsta, \
               int32 *type,real64 *rhs,real64 *fv,int32 *esta, \
               int32 *colsta,int32 *rowno,real64 *value,int32 *nlflag, \
               int32 *n,int32 *m,int32 *n1,int32 *nz,real64 *usrmem)
typedef void COIRMS_FUNC COIRMS_ARGS;

#define COIRMU_VARS (lower, curr, upper, vsta, type, rhs, \
                     fv, esta, rowno, colno, value, nlflag, \
                     n, m, nz, usrmem )
#define COIRMU_ARGS (real64 *lower,real64 *curr,real64 *upper,int32 *vsta, \
               int32 *type,real64 *rhs,real64 *fv,int32 *esta, \
               int32 *rowno,int32 *colno,real64 *value,int32 *nlflag, \
               int32 *n,int32 *m,int32 *nz,real64 *usrmem)
typedef void COIRMU_FUNC COIRMU_ARGS;

#define COIRC_VARS (lower, curr, upper, vsta, n, usrmem )
#define COIRC_ARGS (real64 *lower,real64 *curr,real64 *upper,int32 *vsta, \
               int32 *n,real64 *usrmem)
typedef void COIRC_FUNC COIRC_ARGS;

#define COIRR_VARS (type, rhs, fv, esta, m, usrmem )
#define COIRR_ARGS (int32 *type,real64 *rhs,real64 *fv,int32 *esta, \
               int32 *m,real64 *usrmem)
typedef void COIRR_FUNC COIRR_ARGS;

#define COIRNZ_VARS (colsta, rowno, value, nlflag, n1, nz, usrmem )
#define COIRNZ_ARGS (int32 *colsta,int32 *rowno,real64 *value, \
               int32 *nlflag,int32 *n1,int32 *nz,real64 *usrmem)
typedef void COIRNZ_FUNC COIRNZ_ARGS;

#define COIRNU_VARS (rowno, colno, value, nlflag, nz, usrmem )
#define COIRNU_ARGS (int32 *rowno,int32 *colno,real64 *value, \
               int32 *nlflag,int32 *nz,real64 *usrmem)
typedef void COIRNU_FUNC COIRNU_ARGS;

#define COIFDE_VARS (x, g, jac, rowno, \
        jcnm, mode, errcnt, \
        newpt, n, nj, usrmem)
#define COIFDE_ARGS (real64 *x, real64 *g, real64 *jac, int32 *rowno, \
        int32 *jcnm, int32 *mode, int32 *errcnt, \
        int32 *newpt, int32 *n, int32 *nj, real64 *usrmem)
typedef void COIFDE_FUNC COIFDE_ARGS;

#define COIFBL_VARS (x, g, otn, nto, from, to, jac, stcl, \
        rnum, cnum, nl, strw, llen, indx, mode, errcnt, n, \
        m, n1, m1, nz, usrmem)
#define COIFBL_ARGS (real64 *x, real64 *g, int32 *otn, int32 *nto, \
      int32 *from, int32 *to, real64 *jac, int32 *stcl, int32 *rnum, \
        int32 *cnum, int32 *nl, int32 *strw, int32 *llen, int32 indx, \
        int32 *mode, int32 *errcnt, int32 *n, int32 *m, int32 *n1, \
      int32 *m1, int32 *nz, real64 *usrmem)
typedef void COIFBL_FUNC COIFBL_ARGS;

#define COISTA_VARS (modsta, solsta,iter,objval, usrmem)
#define COISTA_ARGS (int32 *modsta, int32 *solsta, int32 *iter, \
      real64 *objval, real64 *usrmem)
typedef void COISTA_FUNC COISTA_ARGS;

#define COIRS_VARS (xval, xmar, xbas, xsta, \
      yval, ymar, ybas, ysta, n, m, usrmem)
#define COIRS_ARGS (real64 *xval, real64 *xmar, int32 *xbas, \
      int32 *xsta, real64 *yval, real64 *ymar, int32 *ybas, \
      int32 *ysta, int32 *n, int32 *m, real64 *usrmem)
typedef void COIRS_FUNC COIRS_ARGS;

/* TODO: put chapter 6,7 and 8 functions here! */

#define COILF_VARS (flen, fn, usrmem)
#define COILF_ARGS (int32 *flen, char *fn,real64 *usrmem)
typedef void COILF_FUNC COILF_ARGS;

#define COIEC_VARS (colno, msglen, msg, usrmem)
#define COIEC_ARGS (int32 *colno, int32 *msglen, char msg[80],real64 *usrmem)
typedef void COIEC_FUNC COIEC_ARGS;

#define COIER_VARS (rowno, msglen, msg, usrmem)
#define COIER_ARGS (int32 *rowno, int32 *msglen, char msg[80],real64 *usrmem)
typedef void COIER_FUNC COIER_ARGS;

#define COIENZ_VARS (colno, rowno, posno, msglen, msg, usrmem)
#define COIENZ_ARGS (int32 *colno, int32 *rowno, int32 *posno, \
      int32 *msglen, char msg[80],real64 *usrmem)
typedef void COIENZ_FUNC COIENZ_ARGS;

#define COIMSG_VARS (nmsg, smsg, llen, msgv, usrmem)
#define COIMSG_ARGS (int32 *nmsg, int32 *smsg, int32 *llen, \
      char msgv[80*15],real64 *usrmem)
typedef void COIMSG_FUNC COIMSG_ARGS;

#define COIPRG_VARS (nintgr, intrep, nreal, rl, x, usrmem, finish)
#define COIPRG_ARGS (int32 *nintgr, int32 *intrep, int32 *nreal, \
      real64 *rl, real64 *x, real64 *usrmem, int32 *finish)
typedef void COIPRG_FUNC COIPRG_ARGS;

#define COIORD_VARS (colno, rowno, value, resid, usrmem)
#define COIORD_ARGS (int32 *colno, int32 *rowno, real64 *value, \
      real64 *resid,real64 *usrmem)
typedef void COIORD_FUNC COIORD_ARGS;

#define COIORC_VARS (colno, rowno, value, resid, usrmem)
#define COIORC_ARGS (int32 *colno, int32 *rowno, real64 *value, \
      real64 *resid,real64 *usrmem)
typedef void COIORC_FUNC COIORC_ARGS;

#define COIBAN_VARS (msg, vers)
#define COIBAN_ARGS (char *msg, char *vers)
typedef void COIBAN_FUNC COIBAN_ARGS;

#define COISCR_VARS (msg, len)
#define COISCR_ARGS (char msg[80], int32 *len)
typedef void COISCR_FUNC COISCR_ARGS;

#define COIOPT_VARS (name, rval, ival, lval, usrmem)
#define COIOPT_ARGS (char *name, real64 *rval, int32 *ival, \
      int32 *lval, real64 *usrmem)
typedef void COIOPT_FUNC COIOPT_ARGS;


/* defines and typedefs for conopt supplied functions */
/* registration functions */
#define REGISTER_CONOPT_FUNCTION_ARGS (enum conopt_func_names name, \
                             void *func)
typedef REGISTER_CONOPT_FUNCTION_FUNC REGISTER_CONOPT_FUNCTION_ARGS;
#define UNREGISTER_CONOPT_FUNCTION_ARGS (enum conopt_func_names name, \
                             void *func)
typedef UNREGISTER_CONOPT_FUNCTION_FUNC UNREGISTER_CONOPT_FUNCTION_ARGS;
/* chapter 2 functions */
#define COICSU_ARGS (int32 *keep,real64 *usrmem)
#define COICRS_ARGS (int32 *keep,real64 *usrmem)
#define COIRM_ARGS ()
#define COICSM_ARGS (int32 *kept,real64 *usrmem,int32 *lwork, \
                    real64 *work,int32 *maxusd,int32 *curusd)
typedef void COICSM_FUNC COICSM_ARGS;
#define COICRM_ARGS (int32 *kept,real64 *usrmem,int32 *lwork, \
                    real64 *work,int32 *maxusd,int32 *curusd)
typedef void COICRM_FUNC COICRM_ARGS;
#define COIMEM_ARGS (int32 *nintgr,int32 *ipsz,int32 *minmem,int32 *estmem)
typedef void COIMEM_FUNC COIMEM_ARGS;
#define COIXIT_ARGS ()

#endif /* _CONOPTDLL_H */
1	/*
2	* Definitions Required to use the CONOPT.DLL under Windows
3	* Version: $Revision: 1.1 $
4	* Version control file: $RCSfile: conoptdll.h,v $
5	* Date last modified: $Date: 1998/02/26 15:57:57 $
6	* Last modified by: $Author: mthomas $
7	*
8	* This file is part of the SLV solver.
9	*
10	* The SLV solver is free software; you can redistribute
11	* it and/or modify it under the terms of the GNU General Public License as
12	* published by the Free Software Foundation; either version 2 of the
13	* License, or (at your option) any later version.
14	*
15	* The SLV solver is distributed in hope that it will be
16	* useful, but WITHOUT ANY WARRANTY; without even the implied warranty of
17	* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
18	* General Public License for more details.
19	*
20	* You should have received a copy of the GNU General Public License
21	* along with the program; if not, write to the Free Software Foundation,
22	* Inc., 675 Mass Ave, Cambridge, MA 02139 USA. Check the file named
23	* COPYING. COPYING is found in ../compiler.
24	*
25	*/
26
27	#ifndef _CONOPTDLL_H
28	#define _CONOPTDLL_H
29
30	/* a public header file to be distributed */
31
32	#ifndef _ASCCONFIG_H /* only define these if we haven't seen ascConfig.h */
33	typedef int int32;
34	typedef double real64;
35	#endif /* _ASCCONFIG_H */
36
37
38	/* defines and typedefs for user supplied functions */
39	enum conopt_func_names {
40	COIPSZ_ENUM,
41	COIRMS_ENUM,
42	COIRMU_ENUM,
43	COIRC_ENUM,
44	COIRR_ENUM,
45	COIRNZ_ENUM,
46	COIRNU_ENUM,
47	COIFDE_ENUM,
48	COIFBL_ENUM,
49	COISTA_ENUM,
50	COIRS_ENUM,
51	COIUSZ_ENUM, /* NOT IMPLEMENTED */
52	COIUC_ENUM, /* NOT IMPLEMENTED */
53	COIUR_ENUM, /* NOT IMPLEMENTED */
54	COIUNZ_ENUM, /* NOT IMPLEMENTED */
55	COIUNU_ENUM, /* NOT IMPLEMENTED */
56	COILF_ENUM,
57	COIEC_ENUM,
58	COIER_ENUM,
59	COIENZ_ENUM,
60	COIMSG_ENUM,
61	COIPRG_ENUM,
62	COIORD_ENUM,
63	COIORC_ENUM,
64	COIBAN_ENUM,
65	COISCR_ENUM,
66	COICF_ENUM, /* NOT IMPLEMENTED */
67	COIOPT_ENUM
68	};
69
70
71	#define COIPSZ_VARS (nintgr,ipsz,nreal,rpsz,usrmem)
72	#define COIPSZ_ARGS (int32 nintgr,int32 ipsz,int32 *nreal, \
73	real64 rpsz,real64 usrmem)
74	typedef void COIPSZ_FUNC COIPSZ_ARGS;
75
76	#define COIRMS_VARS (lower, curr, upper, vsta, type, rhs, \
77	fv, esta, colsta, rowno, value, nlflag, \
78	n, m, n1, nz, usrmem )
79	#define COIRMS_ARGS (real64 lower,real64 curr,real64 upper,int32 vsta, \
80	int32 type,real64 rhs,real64 fv,int32 esta, \
81	int32 colsta,int32 rowno,real64 value,int32 nlflag, \
82	int32 n,int32 m,int32 n1,int32 nz,real64 *usrmem)
83	typedef void COIRMS_FUNC COIRMS_ARGS;
84
85	#define COIRMU_VARS (lower, curr, upper, vsta, type, rhs, \
86	fv, esta, rowno, colno, value, nlflag, \
87	n, m, nz, usrmem )
88	#define COIRMU_ARGS (real64 lower,real64 curr,real64 upper,int32 vsta, \
89	int32 type,real64 rhs,real64 fv,int32 esta, \
90	int32 rowno,int32 colno,real64 value,int32 nlflag, \
91	int32 n,int32 m,int32 nz,real64 usrmem)
92	typedef void COIRMU_FUNC COIRMU_ARGS;
93
94	#define COIRC_VARS (lower, curr, upper, vsta, n, usrmem )
95	#define COIRC_ARGS (real64 lower,real64 curr,real64 upper,int32 vsta, \
96	int32 n,real64 usrmem)
97	typedef void COIRC_FUNC COIRC_ARGS;
98
99	#define COIRR_VARS (type, rhs, fv, esta, m, usrmem )
100	#define COIRR_ARGS (int32 type,real64 rhs,real64 fv,int32 esta, \
101	int32 m,real64 usrmem)
102	typedef void COIRR_FUNC COIRR_ARGS;
103
104	#define COIRNZ_VARS (colsta, rowno, value, nlflag, n1, nz, usrmem )
105	#define COIRNZ_ARGS (int32 colsta,int32 rowno,real64 *value, \
106	int32 nlflag,int32 n1,int32 nz,real64 usrmem)
107	typedef void COIRNZ_FUNC COIRNZ_ARGS;
108
109	#define COIRNU_VARS (rowno, colno, value, nlflag, nz, usrmem )
110	#define COIRNU_ARGS (int32 rowno,int32 colno,real64 *value, \
111	int32 nlflag,int32 nz,real64 *usrmem)
112	typedef void COIRNU_FUNC COIRNU_ARGS;
113
114	#define COIFDE_VARS (x, g, jac, rowno, \
115	jcnm, mode, errcnt, \
116	newpt, n, nj, usrmem)
117	#define COIFDE_ARGS (real64 x, real64 g, real64 jac, int32 rowno, \
118	int32 jcnm, int32 mode, int32 *errcnt, \
119	int32 newpt, int32 n, int32 nj, real64 usrmem)
120	typedef void COIFDE_FUNC COIFDE_ARGS;
121
122	#define COIFBL_VARS (x, g, otn, nto, from, to, jac, stcl, \
123	rnum, cnum, nl, strw, llen, indx, mode, errcnt, n, \
124	m, n1, m1, nz, usrmem)
125	#define COIFBL_ARGS (real64 x, real64 g, int32 otn, int32 nto, \
126	int32 from, int32 to, real64 jac, int32 stcl, int32 *rnum, \
127	int32 cnum, int32 nl, int32 strw, int32 llen, int32 indx, \
128	int32 mode, int32 errcnt, int32 n, int32 m, int32 *n1, \
129	int32 m1, int32 nz, real64 *usrmem)
130	typedef void COIFBL_FUNC COIFBL_ARGS;
131
132	#define COISTA_VARS (modsta, solsta,iter,objval, usrmem)
133	#define COISTA_ARGS (int32 modsta, int32 solsta, int32 *iter, \
134	real64 objval, real64 usrmem)
135	typedef void COISTA_FUNC COISTA_ARGS;
136
137	#define COIRS_VARS (xval, xmar, xbas, xsta, \
138	yval, ymar, ybas, ysta, n, m, usrmem)
139	#define COIRS_ARGS (real64 xval, real64 xmar, int32 *xbas, \
140	int32 xsta, real64 yval, real64 ymar, int32 ybas, \
141	int32 ysta, int32 n, int32 m, real64 usrmem)
142	typedef void COIRS_FUNC COIRS_ARGS;
143
144	/* TODO: put chapter 6,7 and 8 functions here! */
145
146	#define COILF_VARS (flen, fn, usrmem)
147	#define COILF_ARGS (int32 flen, char fn,real64 *usrmem)
148	typedef void COILF_FUNC COILF_ARGS;
149
150	#define COIEC_VARS (colno, msglen, msg, usrmem)
151	#define COIEC_ARGS (int32 colno, int32 msglen, char msg[80],real64 *usrmem)
152	typedef void COIEC_FUNC COIEC_ARGS;
153
154	#define COIER_VARS (rowno, msglen, msg, usrmem)
155	#define COIER_ARGS (int32 rowno, int32 msglen, char msg[80],real64 *usrmem)
156	typedef void COIER_FUNC COIER_ARGS;
157
158	#define COIENZ_VARS (colno, rowno, posno, msglen, msg, usrmem)
159	#define COIENZ_ARGS (int32 colno, int32 rowno, int32 *posno, \
160	int32 msglen, char msg[80],real64 usrmem)
161	typedef void COIENZ_FUNC COIENZ_ARGS;
162
163	#define COIMSG_VARS (nmsg, smsg, llen, msgv, usrmem)
164	#define COIMSG_ARGS (int32 nmsg, int32 smsg, int32 *llen, \
165	char msgv[8015],real64 usrmem)
166	typedef void COIMSG_FUNC COIMSG_ARGS;
167
168	#define COIPRG_VARS (nintgr, intrep, nreal, rl, x, usrmem, finish)
169	#define COIPRG_ARGS (int32 nintgr, int32 intrep, int32 *nreal, \
170	real64 rl, real64 x, real64 usrmem, int32 finish)
171	typedef void COIPRG_FUNC COIPRG_ARGS;
172
173	#define COIORD_VARS (colno, rowno, value, resid, usrmem)
174	#define COIORD_ARGS (int32 colno, int32 rowno, real64 *value, \
175	real64 resid,real64 usrmem)
176	typedef void COIORD_FUNC COIORD_ARGS;
177
178	#define COIORC_VARS (colno, rowno, value, resid, usrmem)
179	#define COIORC_ARGS (int32 colno, int32 rowno, real64 *value, \
180	real64 resid,real64 usrmem)
181	typedef void COIORC_FUNC COIORC_ARGS;
182
183	#define COIBAN_VARS (msg, vers)
184	#define COIBAN_ARGS (char msg, char vers)
185	typedef void COIBAN_FUNC COIBAN_ARGS;
186
187	#define COISCR_VARS (msg, len)
188	#define COISCR_ARGS (char msg[80], int32 *len)
189	typedef void COISCR_FUNC COISCR_ARGS;
190
191	#define COIOPT_VARS (name, rval, ival, lval, usrmem)
192	#define COIOPT_ARGS (char name, real64 rval, int32 *ival, \
193	int32 lval, real64 usrmem)
194	typedef void COIOPT_FUNC COIOPT_ARGS;
195
196
197	/* defines and typedefs for conopt supplied functions */
198	/* registration functions */
199	#define REGISTER_CONOPT_FUNCTION_ARGS (enum conopt_func_names name, \
200	void *func)
201	typedef REGISTER_CONOPT_FUNCTION_FUNC REGISTER_CONOPT_FUNCTION_ARGS;
202	#define UNREGISTER_CONOPT_FUNCTION_ARGS (enum conopt_func_names name, \
203	void *func)
204	typedef UNREGISTER_CONOPT_FUNCTION_FUNC UNREGISTER_CONOPT_FUNCTION_ARGS;
205	/* chapter 2 functions */
206	#define COICSU_ARGS (int32 keep,real64 usrmem)
207	#define COICRS_ARGS (int32 keep,real64 usrmem)
208	#define COIRM_ARGS ()
209	#define COICSM_ARGS (int32 kept,real64 usrmem,int32 *lwork, \
210	real64 work,int32 maxusd,int32 *curusd)
211	typedef void COICSM_FUNC COICSM_ARGS;
212	#define COICRM_ARGS (int32 kept,real64 usrmem,int32 *lwork, \
213	real64 work,int32 maxusd,int32 *curusd)
214	typedef void COICRM_FUNC COICRM_ARGS;
215	#define COIMEM_ARGS (int32 nintgr,int32 ipsz,int32 minmem,int32 estmem)
216	typedef void COIMEM_FUNC COIMEM_ARGS;
217	#define COIXIT_ARGS ()
218
219	#endif /* _CONOPTDLL_H */