Procedure

     DECHAR ( Decode a character string )

     ENTRY DECHAR ( STRING, NUMBER )

Abstract

     Decode a character string encoded by ENCHAR.

Required_Reading

     None.

Keywords

     CHARACTER

Declarations

    IMPLICIT NONE

    CHARACTER*(*)      STRING
    INTEGER            NUMBER

Brief_I/O

     VARIABLE  I/O  DESCRIPTION
     --------  ---  --------------------------------------------------
     STRING     I   Encoded character string.
     NUMBER     O   Decoded number.

Detailed_Input

     STRING   is a character string previously encoded by ENCHAR.
              This contains an integer in base CHBASE notation,
              where CHBASE is a function of the size of the
              available character set. See ENCHAR for details
              about the format of STRING.

Detailed_Output

     NUMBER   is the integer encoded in the input string.

Parameters

     None.

Exceptions

     1)  If the length of the input string is less than MINLEN,
         the error SPICE(INSUFFLEN) is signaled.

Files

     None.

Particulars

     DECHAR is the inverse of ENCHAR. In the example below,

           CALL ENCHAR (      I, STRING )
           CALL DECHAR ( STRING,      J )

           IF ( I .EQ. J ) THEN
            .
            .
           END IF

     the logical test (I .EQ. J) is always true.

Examples

     See: CARDC, SIZEC.

Restrictions

     None.

Literature_References

     None.

Author_and_Institution

     J. Diaz del Rio    (ODC Space)
     B.V. Semenov       (JPL)
     W.L. Taber         (JPL)
     I.M. Underwood     (JPL)

Version

    SPICELIB Version 1.1.0, 12-AUG-2021 (JDR)

        Added IMPLICIT NONE statement.

        Edited the header to comply with NAIF standard.

    SPICELIB Version 1.0.2, 31-JAN-2008 (BVS)

        Changed header section title '$C Revision' to '$C Revisions'.

    SPICELIB Version 1.0.1, 10-MAR-1992 (WLT)

        Comment section for permuted index source lines was added
        following the header.

    SPICELIB Version 1.0.0, 31-JAN-1990 (WLT) (IMU)