## Assignment and Examination

SIC variables can be assigned new values, and examined using the following routines.

              Argument Data Type      Assignment    Examination Subroutine
              REAL(kind=8)            SIC_LET_DBLE   SIC_GET_DBLE
              REAL(KIND=4)            SIC_LET_REAL   SIC_GET_REAL
              INTEGER(KIND=4)         SIC_LET_INTE   SIC_GET_INTE
              LOGICAL(KIND=4)         SIC_LET_LOGI   SIC_GET_LOGI
              CHARACTER(LEN=*)        SIC_LET_CHAR   SIC_GET_CHAR

    The calling syntax is the following
              CALL SIC_LET_Name (NAME,VARIABLE,ERROR)
              CALL SIC_GET_Name (NAME,VALUE,ERROR)
    except for SIC_GET_CHAR
              CALL SIC_GET_CHAR (NAME,STRING,LENGTH,ERROR)

These a-priori useless routines can be used to modify variables defined in completely independent parts of a program such as the codes supporting two different SIC languages. For example the GRAPHIC language interacts with GREG1 and GREG2 through SIC variables.

For assignment routines, the data type of the VARIABLE argument and of the SIC variable must match exactly. For retrieving routines, the data type to specify is the type of the VALUE argument; implicit conversion from the type of the SIC variable is done if possible, an error is returned otherwise.

Only SCALAR variables can be assigned or examined in this way. For ARRAY variables, you should use the subroutine SIC_DESCRIPTOR.

              CALL SIC_DESCRIPTOR (VARIABLE,DESC,FOUND)

      - VARIABLE (input) is the variable name (general syntax A[i,j]
        allowed)
      - DESC (output) is the descriptor of the variable, an instance of
        the derived type 'SIC_DESCRIPTOR_T' provided by the module
        'GKERNEL_TYPES', containing:
          DESC%TYPE     Variable type:
              * DESC%TYPE > 0 : Character string of length DESC%TYPE
              * DESC%TYPE < 0 may have the value
                      FMT_R4 for REAL(KIND=4) variable
                      FMT_R8 for REAL(KIND=8) variable
                      FMT_I4 for INTEGER(KIND=4) variable
                      FMT_I8 for INTEGER(KIND=8) variable
                      FMT_L  for LOGICAL(KIND=4) variable
                      FMT_BY for INTEGER(KIND=1) variable
                      FMT_C4 for COMPLEX(KIND=4) variable
          DESC%NDIM     Number of dimensions
          DESC%DIMS(7)  Dimensions
          DESC%ADDR     Variable address
          DESC%SIZE     Size of allocation (4-bytes words)
          DESC%STATUS   Origin of variable
                   0       program defined
                   < 0     user defined
                   > 0     image
          DESC%READONLY True if the variable is read-only for the user.
       - FOUND (output) is a logical indicating whether the specified
         variable exists or not.

The parameters FMT_R4, FMT_R8, FMT_I4, FMT_I8, FMT_L, FMT_BY and FMT_C4 are defined in the module gbl_format.

Three other routines may be required for variable handling:

            CALL SIC_MATERIALIZE(VARIABLE,DESC,FOUND)

is like SIC_DESCRIPTOR, but allow implicit transposition and sub-arrays in the variable name. An intermediate variable will be created to handle such cases.

SIC_INCARNATE is used to create an “incarnation” of a variable under a specified type (REAL, DOUBLE, INTEGER).

            CALL SIC_INCARNATE(FORM,DESC,INCA,ERROR)
    where
        - FORM is the format of the desired incarnation (FMT_R4, FMT_I4
          or FMT_R8)
        - DESC is the descriptor of the variable
        - INCA is the descriptor of the incarnation
        - ERROR is a logical error flag

DESC and INCA are instances of the derived type SIC_DESCRIPTOR_T. DESC should have been obtained by a previous call to SIC_DESCRIPTOR.

Once used, the materialization or incarnation may be deleted using routine SIC_VOLATILE

        CALL SIC_VOLATILE(INCA)
    where
        - INCA is the descriptor of the incarnation/materialization.