loqo.c

来自「优化算法loqo的算法源代码。Purpose: solves quadratic」· C语言 代码 · 共 74 行

/*********************************************************************/
/***    Copyright (c) Princeton University, 1997                   ***/
/***    All Rights Reserved                                        ***/
/*********************************************************************/

#include <string.h>
#include <math.h>
#include <stdlib.h>

#ifdef QuadPrec
#include "Quad/Quad.h"
#define double Quad
#else
#define high(x) (x)
#endif

#ifdef __cplusplus
extern "C" {
#endif

#include "loqo.h"
#include "myalloc.h"

main(
	int	argc, 
	char	*argv[]
)
{
	int 	status;
	char	fname[80];	/* solution file name */
	LOQO	*lp;

	lp = openlp();
	if (lp == NULL) {
		my_exit(11,"cannot open another LP problem");
	}

	argc--; argv++;

	readlp(argc,argv,lp);

	if (lp->verbose>1) {
	    printf("%s\n%s\n%s\n%s\n%s\n%s\n",
		"\t+-------------------------------------------------+",
		"\t|                                                 |",
		"\t|            LOQO: Version 6.04                   |",
		"\t|       (C) Princeton University, 2002            |",
		"\t|                                                 |",
		"\t+-------------------------------------------------+");
	    fflush(stdout);
	}

	// prep(lp);  
	status = solvelp( lp );
	// unprep(lp);  

	inv_clo();

	strcpy(fname, lp->name);
	strcat(fname, ".out");
	writesol(lp,fname);

	closelp(lp);

	if (lp->verbose>1) {
	    printf("total time in seconds = %lf \n", high(cputimer()) );
	}
	return(0);
}

#ifdef __cplusplus
}
#endif