Table C-5 lists the Compaq Fortran 77 character intrinsic functions.
| Function | No. of Arguments | Generic Name | Specific Name | Type of Argument | Type of Result |
|---|---|---|---|---|---|
| Character [1] | 1 | - | - | INTEGER*1[2,3] | CHARACTER |
| - | INTEGER*2 | CHARACTER | |||
| CHAR | INTEGER*4 | CHARACTER | |||
| - | INTEGER*8[3] | CHARACTER | |||
| ASCII Value [4] | 1 | - | ICHAR | CHARACTER | INTEGER*2 |
| - | CHARACTER | INTEGER*4 | |||
| - | CHARACTER | INTEGER*8[3] | |||
| Index [5] | 2 | - | INDEX | CHARACTER | INTEGER*4 |
| - | CHARACTER | INTEGER*8[3] | |||
| Length [6] | 1 | - | LEN | CHARACTER | INTEGER*4 |
| - | CHARACTER | INTEGER*8[3] | |||
| Character relationals [7] | 2 | - | LGE | CHARACTER | LOGICAL*4 |
| 2 | - | LGT | CHARACTER | LOGICAL*4 | |
| 2 | - | LLE | CHARACTER | LOGICAL*4 | |
| 2 | - | LLT | CHARACTER | LOGICAL*4 | |
|
[1] CHAR returns a character that has the numeric value specified by the argument. [2] INTEGER*1 is the same as BYTE (and LOGICAL*1 on VAX systems). [3] Alpha only [4] ICHAR returns the numeric value of the argument; the argument must be a character expression that has a length of 1. [5] INDEX returns the position of the substring c2 in character expression c1. [6] LEN returns the length of a character expression. [7] LGE, LGT, LLE, and LLT return the ASCII collating sequence of the arguments. | |||||