OMFget_real8_val
Synopsis
INTEGER FUNCTION OMFget_real8_val(object_id,
. dval)
#include <avs/omf.inc>
INTEGER object_id(OIDSIZ)
DOUBLE PRECISION dvalDescription
For a complete description of this function, see OMget_real_val .Arguments
object_iddvalReturned value
The status code (see OMget_real_val).Examples
#include <avs/omf.inc>
INTEGER parent_object(OIDSIZ), fval_id(OIDSIZ)
DOUBLE PRECISION value
...
IF (OMFfind_subobj(parent_object,
. OMstr_to_name('fval'),
. OM_OBJ_RD,
. fval_id) .NE. 1)
. PRINT*,'Error searching for fval'
C
IF (OMFget_int_val(fval_id,value) .NE. 1)
. PRINT*,'Error getting value of object fval'See Also