Available subroutines: SIC_LOWER SIC_PARSEF SIC_UPPER SIC_WPR SIC_WPRN Available functions (Obsolescent) SIC_GETVM FREE_VM LENC
These routines are of more general use than SIC itself.
SUBROUTINE SIC_LOWER(LINE) - SIC_UPPER(LINE)
Converts the string LINE to lower or upper case letters respectively.
SUBROUTINE SIC_PARSEF (NAME,FILE,DEF,EXT)
Parses the file name FILE for a default directory DEF and extension type EXT. These item are added to FILE if needed, and NAME returns the short NAME of the file, that is, the name without extension or directory. All arguments are Character*(*). This is the standard way to obtain a file name in the GILDAS environment: this routine takes care of logical names (in the SIC meaning).
SUBROUTINE SIC_WPR(PROMPT,LINE)
Reads the string LINE with the prompt PROMPT. It tries to obtain a non-blank string, prompting again if it reads a blank string. If it receives a <^Z> code, it returns the string "EXIT". The prompt is automatically disabled if the session is not interactive.
SUBROUTINE SIC_WPRN(PROMPT,LINE,N)
Reads the string LINE with the prompt PROMPT. Returns N the number of characters read. Returns N=0 if it reads a blank line, or receives a <^Z> code. The prompt is automatically disabled if the session is not interactive.