Character Intrinsic Functions

C.2.4 Character Intrinsic Functions

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] INTEGER1 is the same as BYTE (and LOGICAL1 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 c₂ in character expression c₁. [6] LEN returns the length of a character expression. [7] LGE, LGT, LLE, and LLT return the ASCII collating sequence of the arguments.