Keywords: gildas-prog

Next: Symbol Manipulation Routines Up: SIC Callable Routines Previous: Command Line Interpretor Subroutines Contents Index

## All Purpose General Subroutines

    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.

- `PROMPT` Character*(*), Unchanged by `SIC_WPR`
- `LINE` Character*(*), Returned line.

`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.

- `PROMPT` Character*(*), Unchanged by `SIC_WPRN`
- `LINE` Character*(*), Returned line.
- `N` Integer, Number of characters in `LINE`

Next: Symbol Manipulation Routines Up: SIC Callable Routines Previous: Command Line Interpretor Subroutines Contents Index