Rotated hyper-ellipsoid function
Script: rotellipsoid.qscript
'script language = VBscript
function Main()
sumi = 0
for i = 1 to qs_NVARS
sumj = 0
for j = 1 to i
sumj = sumj +
qs_VAR(j)
next
sumi = sumi + sumj * sumj
next
' Save results
qs_RESULT(1) = sumi
end function
QstatLab model (see OptimizationModels.qsl in Examples):
Type =script
nvars = 2
scriptfile = rotellipsoid.qscript
lvar1 = -65.536
uvar1 = 65.536
var1 = 0
lvar2 = -65.536
uvar2 = 65.536
var2 = 0
Minimum
Minimum value is 0 for Var(i) = 0
Plots: