## Symbol Manipulation Routines

Three routines are available to define, translate and delete symbols within a program using SIC without using the SYMBOL command.

SUBROUTINE SIC_SETSYMBOL(SYMBOL,TRANSLATION,ERROR)

Defines a symbol of name SYMBOL (Character*(*), maximum 12 characters), translation TRANSLATION (Character*(*), maximum 132 characters). An error flag (ERROR logical) is returned if the symbol could not be defined. Any previous definition is overridden.

SUBROUTINE SIC_GETSYMBOL(SYMBOL,TRANSLATION,ERROR)

Obtains the current translation of a given symbol. If TRANSLATION is too short, the translation is truncated without warning or error. ERROR is returned if the symbol is undefined only.

SUBROUTINE SIC_DELSYMBOL(SYMBOL,ERROR)

Deletes a symbol definition. ERROR is returned if the symbol was not defined.