if (!pData)
{
Scierror(999, _("%s: Cannot allocate more memory.\n"), "lu");
+ pDbl->killMe();
return types::Function::Error;
}
}
{
out.push_back(types::Double::Empty());
}
+ pDbl->killMe();
return types::Function::OK;
}
pDblE->set(0, 1);
out.push_back(pDblE);
}
+ pDbl->killMe();
return types::Function::OK;
}
if (iRet != 0)
{
Scierror(999, _("%s: LAPACK error n°%d.\n"), "lu", iRet);
+ pDbl->killMe();
FREE((doublecomplex*)pdL);
FREE((doublecomplex*)pdU);
delete pDblL;
vFreeDoubleComplexFromPointer((doublecomplex*)pData);
}
+ pDbl->killMe();
out.push_back(pDblL);
out.push_back(pDblU);
if (_iRetCount == 3)