NAG AD Library
x10bj_AD_f (callback_​write_​type_AD)

Note: this routine is made available for users of the NAG AD Library who are not using dco/c++.
Settings help

AD Name Style:


AD Specification Language:

1 Purpose

x10bj_AD_f writes an object of the type ADTYPE into a callback data object created by x10ba_AD_f.

2 Specification

Fortran Interface
Subroutine x10bj_AD_f ( cb_handle, xa, ifail)
Integer, Intent (Inout) :: ifail
Type (c_ptr), Intent (Inout) :: cb_handle
ADTYPE, Intent (In) :: xa
The Fortran interface provides five routines with names reflecting the type used for active real arguments. The actual subroutine and type names are formed by replacing AD and ADTYPE in the above as follows:
when ADTYPE is Real(kind=nag_wp) then AD is p0w
when ADTYPE is Type(nagad_a1w_w_rtype) then AD is a1w
when ADTYPE is Type(nagad_t1w_w_rtype) then AD is t1w
when ADTYPE is Type(nagad_a1t1w_w_rtype) then AD is a1t1w
when ADTYPE is Type(nagad_t2w_w_rtype) then AD is t2w
C++ Header Interface
#include <nagad.h>
extern "C" {
void  x10bj_AD_f_ (void *&cb_handle, const ADTYPE &xa, Integer &ifail)
}
The header declares five functions with names reflecting the type used for active real arguments. The actual function and type names are formed by replacing AD and ADTYPE in the above as follows:
when ADTYPE is double then AD is p0w
when ADTYPE is nagad_a1w_w_rtype then AD is a1w
when ADTYPE is nagad_t1w_w_rtype then AD is t1w
when ADTYPE is nagad_a1t1w_w_rtype then AD is a1t1w
when ADTYPE is nagad_t2w_w_rtype then AD is t2w

3 Description

For routines where it is necessary to perform callback operations via one or more companion callbacks, data must be passed between the procedure argument and any such companion callback via a callback data object as created by x10ba_AD_f. x10bj_AD_f can be used to insert an object of the type ADTYPE into the callback data object. In this way an object of the type ADTYPE can be communicated between a procedure argument and its companion callbacks.
Note that data must be written to and read from the callback data object in strict order without omission.

4 References

None.

5 Arguments

1: cb_handle Pointer to AD Data Input/Output
On entry: will contain a handle to the callback data object.
On exit: will contain a handle to the updated callback data object.
2: xa ADTYPE Input
On entry: an object of the type ADTYPE, xa, to be inserted into the callback data object.
3: ifail Integer Input/Output
On entry: ifail must be set to 0, −1 or 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 or 1 is recommended. If message printing is undesirable, then the value 1 is recommended. Otherwise, the value 0 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 or −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
On entry, cb_handle does not define a valid handle to a NAG AD callback data object. It has not been initialized or has been corrupted.
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

x10bj_AD_f is not threaded in any implementation.

9 Further Comments

None.

10 Example

See examples for computational routines in the NAG AD Library, for example, Section 10 in c05ay_a1w_f.