Procedure

     PRTDEC ( Decode a character string )

     ENTRY PRTDEC ( STRING, NUMBER )

Abstract

     Decode a character string encoded by PRTENC.

Required_Reading

     None.

Keywords

     CHARACTER

Declarations

    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 PRTENC.
              This contains an integer in base 128 notation,
              where 128 is a function of the size of the
              available character set. See PRTENC 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

     PRTDEC is the inverse of PRTENC. In the example below,

           CALL PRTENC (      I, STRING )
           CALL PRTDEC ( STRING,      J )

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

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

     This routine is identical to DECHAR, except that this routine
     does not use the machine-dependent encoding base returned by
     the SPICELIB routine CHBASE. Instead, the base 128 is used.
     This base is expected to work on all systems supporting ASCII
     encoding of characters.

Examples

     See: CARDC, SIZEC.

Restrictions

     None.

Literature_References

     None.

Author_and_Institution

     N.J. Bachman       (JPL)
     J. Diaz del Rio    (ODC Space)
     W.L. Taber         (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.0, 19-DEC-1995 (NJB) (WLT)