e04rsf is a part of the NAG optimization modelling suite and defines a new, or edits an existing, quadratic objective function or constraint of the problem.

2 Specification

Fortran Interface

Subroutine e04rsf (

handle, s, nnzr, idxr, r, nnzq, irowq, icolq, q, idqc, ifail)

Integer, Intent (In)	::	nnzr, idxr(nnzr), nnzq, irowq(nnzq), icolq(nnzq)
Integer, Intent (Inout)	::	idqc, ifail
Real (Kind=nag_wp), Intent (In)	::	s, r(nnzr), q(nnzq)
Type (c_ptr), Intent (In)	::	handle

C Header Interface

#include <nag.h>

void	e04rsf_ (void *handle, const double s, const Integer nnzr, const Integer idxr[], const double r[], const Integer nnzq, const Integer irowq[], const Integer icolq[], const double q[], Integer idqc, Integer ifail)

The routine may be called by the names e04rsf or nagf_opt_handle_set_qconstr.

3 Description

After the handle has been initialized (e.g., e04raf has been called), e04rsf may be used to edit a model by adding or replacing a quadratic objective function or constraint of the form

\frac{1}{2} x^{T} Q x + r^{T} x

(1)

and

\frac{1}{2} x^{T} Q x + r^{T} x + s \leq 0,

(2)

respectively. If a factor

F

Q

such that

Q = F^{T} F

is available, e04rtf should be called instead.

The matrix

Q

is a sparse symmetric

n \times n

matrix. Typically e04rsf would be used together with Second-order Cone Programming (SOCP) solver e04ptf if

Q

is positive semidefinite which implies the problem is convex. Otherwise, if the problem is nonconvex, a general nonlinear optimization solver (such as e04stf) may be used. It is also acceptable if

Q

is a zero matrix, in which case the corresponding objective function or constraint becomes linear. Note that it is possible to temporarily disable and enable individual constraints in the model by e04tcf and e04tbf, respectively. See Section 3.1 in the E04 Chapter Introduction for more details about the NAG optimization modelling suite.

4 References

None.

5 Arguments

1: $handle$ – Type (c_ptr) Input

On entry: the handle to the problem. It needs to be initialized (e.g., by e04raf) and must not be changed between calls to the NAG optimization modelling suite.

2: $s$ – Real (Kind=nag_wp) Input

On entry: the constant term in quadratic constraint.

idqc = - 1

, s will not be referenced.

3: $nnzr$ – Integer Input

On entry: the number of nonzero elements in the sparse vector

r

nnzr = 0

r

is considered to be zero and the arrays idxr and r will not be referenced.

Constraint:

nnzr \geq 0

4: $idxr (nnzr)$ – Integer array Input

5: $r (nnzr)$ – Real (Kind=nag_wp) array Input

On entry: the nonzero elements of the sparse vector

r

idxr (i)

must contain the index of

r (i)

in the vector, for

i = 1, 2, \dots, nnzr

. No particular order is expected, but elements should not repeat. Note that

n

is the current number of variables in the problem.

Constraint:

1 \leq idxr (i) \leq n

, for

i = 1, 2, \dots, nnzr

6: $nnzq$ – Integer Input

On entry: the number of nonzero elements in the upper triangle of the matrix

Q

nnzq = 0

, the matrix

Q

is considered to be zero, the objective function or constraint is linear and irowq, icolq and q will not be referenced.

Constraint:

nnzq \geq 0

7: $irowq (nnzq)$ – Integer array Input

8: $icolq (nnzq)$ – Integer array Input

9: $q (nnzq)$ – Real (Kind=nag_wp) array Input

On entry: arrays irowq, icolq and q store the nonzeros of the upper triangle of the matrix

Q

in coordinate storage (CS) format (see Section 2.1.1 in the F11 Chapter Introduction). irowq specifies one-based row indices, icolq specifies one-based column indices and q specifies the values of the nonzero elements in such a way that

Q_{i j} = q (l)

where

i = irowq (l)

j = icolq (l)

, for

l = 1, 2, \dots, nnzq

. No particular order is expected, but elements should not repeat.

Constraint:

1 \leq irowq (l) \leq icolq (l) \leq n

, for

l = 1, 2, \dots, nnzq

10: $idqc$ – Integer Input/Output

On entry:

$idqc = 0$: A new quadratic constraint is created.
$idqc > 0$: Specifies the index of an existing constraint to be replaced. i.e., replaces the idqcth constraint.
$idqc = - 1$: A new quadratic objective is created and will replace any previously defined objective function.

Constraint:

idqc \geq - 1

On exit: if

idqc = 0

on entry, then idqc is overwritten with the index of the new quadratic constraint. By definition, this is the number of quadratic constraints already defined plus one. Otherwise, idqc stays unchanged.

11: $ifail$ – Integer Input/Output

On entry: ifail must be set to

0

- 1

1

to set behaviour on detection of an error; these values have no effect when no error is detected.

A value of

0

causes the printing of an error message and program execution will be halted; otherwise program execution continues. A value of

- 1

means that an error message is printed while a value of

1

means that it is not.

If halting is not appropriate, the value

- 1

1

is recommended. If message printing is undesirable, then the value

1

is recommended. Otherwise, the value

- 1

is recommended. When the value $- 1$ or $1$ is used it is essential to test the value of ifail on exit.

On exit:

ifail = 0

unless the routine detects an error or a warning has been flagged (see Section 6).

6 Error Indicators and Warnings

If on entry

ifail = 0

- 1

, explanatory error messages are output on the current error message unit (as defined by x04aaf).

Errors or warnings detected by the routine:

$ifail = 1$: The supplied handle does not define a valid handle to the data structure for the NAG optimization modelling suite. It has not been properly initialized or it has been corrupted.

$ifail = 2$: The problem cannot be modified right now, the solver is running.

$ifail = 4$: On entry, $idqc = ⟨ value ⟩$ .
The given idqc does not match with any quadratic constraint already defined.

$ifail = 5$: On entry, $idqc = ⟨ value ⟩$ .
Constraint: $idqc \geq - 1$ .

$ifail = 6$: nnzr and nnzq cannot be zero at the same time.

On entry, $nnzq = ⟨ value ⟩$ .
Constraint: $nnzq \geq 0$ .

On entry, $nnzr = ⟨ value ⟩$ .
Constraint: $nnzr \geq 0$ .

$ifail = 7$: On entry, $i = ⟨ value ⟩$ , $idxr (i) = ⟨ value ⟩$ and $n = ⟨ value ⟩$ .
Constraint: $1 \leq idxr (i) \leq n$ .

On entry, more than one element of idxr has index $⟨ value ⟩$ .
Constraint: each element of idxr must have a unique index.

$ifail = 8$: On entry, $i = ⟨ value ⟩$ , $icolq (i) = ⟨ value ⟩$ and $n = ⟨ value ⟩$ .
Constraint: $1 \leq icolq (i) \leq n$ .

On entry, $i = ⟨ value ⟩$ , $irowq (i) = ⟨ value ⟩$ and $icolq (i) = ⟨ value ⟩$ .
Constraint: $irowq (i) \leq icolq (i)$ (elements within the upper triangle).

On entry, $i = ⟨ value ⟩$ , $irowq (i) = ⟨ value ⟩$ and $n = ⟨ value ⟩$ .
Constraint: $1 \leq irowq (i) \leq n$ .

On entry, more than one element of q has row index $⟨ value ⟩$ and column index $⟨ value ⟩$ .
Constraint: each element of q must have a unique row and column index.

$ifail = - 99$: An unexpected error has been triggered by this routine. Please contact NAG.
See Section 7 in the Introduction to the NAG Library FL Interface for further information.

$ifail = - 399$: Your licence key may have expired or may not have been installed correctly.
See Section 8 in the Introduction to the NAG Library FL Interface for further information.

$ifail = - 999$: Dynamic memory allocation failed.
See Section 9 in the Introduction to the NAG Library FL Interface for further information.

7 Accuracy

Not applicable.

8 Parallelism and Performance

e04rsf is not threaded in any implementation.

9 Further Comments

None.

10 Example

This example demonstrates how to define and solve a convex quadratically constrained quadratic programming problem via SOCP. See also e04rtf where the quadratic term is defined by its factor.

This example solves a quadratically constrained quadratic programming problem

\begin{array}{l} \underset{x \in ℝ^{3}}{minimize} & \frac{1}{2} x^{T} Q_{0} x + r_{0}^{T} x \\ subject to & \frac{1}{2} x^{T} Q_{1} x + r_{1}^{T} x + s_{1} \leq 0, \end{array}

where

\begin{matrix} Q_{0} = (\begin{matrix} 0.493 & 0.382 & 0.270 \\ 0.382 & 0.475 & 0.448 \\ 0.270 & 0.448 & 0.515 \end{matrix}) & Q_{1} = (\begin{matrix} 0.737 & 0.453 & 1.002 \\ 0.453 & 0.316 & 0.635 \\ 1.002 & 0.635 & 1.590 \end{matrix}), \\ r_{0} = (\begin{matrix} 0.847 \\ 0.08 \\ 0.505 \end{matrix}) & r_{1} = (\begin{matrix} 0.065 \\ 0.428 \\ 0.097 \end{matrix}) \end{matrix}

and

s_{1} = 1.276

The optimal solution (to five significant figures) is

x^{*} = {(1.1742, - 4.2569, 0.98144)}^{T},

and the objective function value is

2.5714

e04rs: FL CL CPP AD

NAG FL Interfacee04rsf (handle_​set_​qconstr)

▸▿ Contents

1 Purpose

2 Specification

3 Description

4 References

5 Arguments

6 Error Indicators and Warnings

7 Accuracy

8 Parallelism and Performance

9 Further Comments

10 Example

10.1 Program Text

10.2 Program Data

10.3 Program Results

NAG FL Interface
e04rsf (handle_set_qconstr)