Go to the bottom.

!
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
!
! SDDL Name:	QGLINEAR.SDDL
!
! Purpose:      This SDDL file defines the qglinear relation.
!
! Modification History:
!
!   Date       PR      Who                       Reason
! --------   -------   ---   -------------------------------------------------
! 09/14/95   29568     SXT   Original implementation
! 05/08/98   36870     MRB   Add C output
! 10/01/01   44572     sss   Added index
!
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
!

LANGUAGE  C, FORTRAN, SQL

RECORD  QGLINE_TYPE

!------------------------------------------------------------------------------
!
!   RECORD INFORMATION
!
!------------------------------------------------------------------------------


    DESCRIPTION      "This is a PDB loaded relation. It is used by the
         pseudo-instruction #LINEAR to perform a conversion of the input
         value by interpolation from a piecewise linear function defined 
         by the specified table." 


!------------------------------------------------------------------------------
!
!   FIELD INFORMATION
!
!------------------------------------------------------------------------------



    FIELD  table_name
        TYPE            C*8
        DESCRIPTION     "This field holds the interpolation table name."
    END_FIELD



    FIELD  index_id
        TYPE            I*4
        DESCRIPTION     "This field is either used as a version number for one 
                        dimensional tables or as a second, discrete dimension 
                        into a two dimensional table.  Note: discrete 
                        dimesion is not interpolated."
    END_FIELD



    FIELD  table_i
        TYPE            R8
        DESCRIPTION     "This field holds the input value for interpolation."
    END_FIELD



    FIELD  table_o
        TYPE            R8
        DESCRIPTION     "This field holds the ouput value for interpolation 
                        when a user supplied input value exactly matches an 
                        input value in the relation."
    END_FIELD


    FIELD  table_p
        TYPE            R8
        DESCRIPTION     "This field holds the value to be used in interpolation
                        with table Q using the formula:   
                             output_real_val = p(m)+(q(m)-p(m))* 
                             (user_input_real_val-i(m))/(i(m+1)-i(m)) 
                        where the user input value lies between i(m) and
                        i(m+1)."
    END_FIELD


    FIELD  table_q
        TYPE            R8
        DESCRIPTION     "This field holds the value to be used in interpolation
                        with table P using the formula:   
                             output_real_val=p(m)+(q(m)-p(m))* 
                             (user_input_real_val-i(m))/(i(m+1)-i(m)) 
                        where the user input value lies between i(m) and 
                        i(m+1)."
    END_FIELD

END_RECORD


!------------------------------------------------------------------------------
!
!   RELATION DECLARATION
!
!------------------------------------------------------------------------------

RELATION  qglinear

    TYPE             QGLINE_TYPE

    DESCRIPTION      "QGLINEAR Relation"

    SUBSYSTEM_USING  "SCS"

    INDEX  qglinear_1
        TYPE         clustered
        FIELDS       table_name
    END_INDEX

END_RELATION

!------------------------------------------------------------------------------
!
!   INSTANCE DECLARATION
!
!------------------------------------------------------------------------------


INSTANCE  qglinear

    GLOBAL

    TYPE        QGLINE_TYPE

END_INSTANCE

Go to the top.