4f4d0a9f8ccccdb98781b6f48047504e083660cd
[scilab.git] / scilab / modules / optimization / tests / nonreg_tests / bug_13092.dia.ref
1 // =============================================================================
2 // Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
3 // Copyright (C) 2013 - Scilab Enterprises - Paul Bignier
4 //
5 //  This file is distributed under the same license as the Scilab package.
6 // =============================================================================
7 //
8 // <-- ENGLISH IMPOSED -->
9 //
10 // <-- CLI SHELL MODE -->
11 //
12 // <-- Non-regression test for bug 13092 -->
13 //
14 // <-- Bugzilla URL -->
15 // http://bugzilla.scilab.org/show_bug.cgi?id=13092
16 //
17 // <-- Short Description -->
18 // Wrong error message when user function returned a complex number
19 function d = myf(x)
20     mu = 1e6
21     eVal_min = 0.4
22     A = [4*(x(1)**4 + x(2)**4), 2*x(2)**4; 2*x(2)**4, 4*x(2)**4]
23     B = [4*(x(1)**2 + x(2)**2), -3*x(2)**2; -3*x(2)**2, 4*x(2)**2]
24     eig = spec(A,B)
25     eig = gsort(eig, "g", "i")
26     eVal = eig(1)
27     d = x(1)**2 + x(2)**2 + mu * (eVal_min - eVal)**2
28 endfunction
29 xStart = [1 1];
30 refMsg = msprintf(_("%s: Wrong type for user function output argument #%d: A real matrix expected."), "optimbase_function", 1);
31 assert_checkerror("[x, fval] = fminsearch(myf, xStart);", refMsg);