private static void InitLingo()
{
//create lingo environement
pLingoEnv = Lingo.LScreateEnvLng();
if (pLingoEnv == 0)
{
Console.WriteLine("Unable to create Lingo environment.\n");
return;
}
//create and open lingo log
int nError = Lingo.LSopenLogFileLng(pLingoEnv, "Lingo.log");
CheckError(nError);
dSatus = -1.0;
nPointersNow = -1;
// Let Lingo know we have a callback function
var cbd = new CallbackData();
var cb = new Lingo.typCallback(LngCallback.MyCallback);
nError = Lingo.LSsetCallbackSolverLng(pLingoEnv, cb, cbd);
CheckError(nError);
//// Pointer to the solution dSatus code
//nError = Lingo.LSsetPointerLng(pLingoEnv, ref dSatus, ref nPointersNow);
//CheckError(nError);
//// Point to dObjective, where Lingo will return the objective value
//nError = Lingo.LSsetPointerLng(pLingoEnv, ref dObjective, ref nPointersNow);
//CheckError(nError);
//add license
Lingo.LScreateEnvLicenseLng("lndlng12.lic", ref nError);
}
private static void InitLingo()
{
//create lingo environement
pLingoEnv = Lingo.LScreateEnvLng();
if (pLingoEnv == 0)
{
Console.WriteLine("Unable to create Lingo environment.\n");
return;
}
//create and open lingo log
int nError = Lingo.LSopenLogFileLng(pLingoEnv, "Lingo.log");
CheckError(nError);
dSatus = -1.0;
nPointersNow = -1;
// Let Lingo know we have a callback function
var cbd = new CallbackData();
var cb = new Lingo.typCallback(LngCallback.MyCallback);
nError = Lingo.LSsetCallbackSolverLng(pLingoEnv, cb, cbd);
CheckError(nError);
//// Pointer to the solution dSatus code
//nError = Lingo.LSsetPointerLng(pLingoEnv, ref dSatus, ref nPointersNow);
//CheckError(nError);
//// Point to dObjective, where Lingo will return the objective value
//nError = Lingo.LSsetPointerLng(pLingoEnv, ref dObjective, ref nPointersNow);
//CheckError(nError);
//add license
Lingo.LScreateEnvLicenseLng("lndlng12.lic", ref nError);
}
public static extern int LSsetCallbackSolverLng(int pLingoEnv,
Lingo.typCallback pSolverCallbackFunction,
[MarshalAs(UnmanagedType.AsAny)] object pMyData);
