fortran 常用字符函数

6.3 常用字符函数

6.3.1 字符与数值转换函数

•这是一系列函数的总称，涉及到4个基本函数：ICHAR，CHAR，IACHR和ACHAR函数。
•Fortran 90/95中允许把字符型的值转换成数值型的值（已知字符得到字符在某种字符集中的序号数值），也可把数值型的值转换成字符型的值（已知字符在某种字符集中的序号数值进而得到该位置上的字符）。
•函数ICHAR的作用是根据字符得到字符在计算机字符集中的位置，函数的原型为：
•C = ICHAR(字符数据)

 

6.3.2 字符串长度函数

•字符串长度函数用于求出参数字符实体的字段长度，函数的原型为：
•C = LEN(string)
•其中，string必须是字符型，可以是字符标量也可以是字符数组。函数返回一个正整数，为该字符实体的字段长度（包括尾随空格、中间空格在内）。比如LEN(‘ABC 123 ’)的值是9（6个字符加3个空格）。
•如果想要得到不计尾部空格的字符串长度，则可以使用LEN_TRIM函数。函数的原型如下：
•C = LEN_TRIM(string)

 

6.3.3 子字符串位置索引函数

•子字符串位置索引函数的作用是找出指定子字符串在目标字符串内的起始位置，函数的原型如下：
•C = INDEX(string, substring[,back])
•其中，string表示要在其中进行索引的目标字符串；substring表示子字符串；back为逻辑型变量，当back的值为.TRUE.时表示从目标字符串的后面开始搜索，当back的值为.FALSE.或省略不写时，表示从目标字符串的前面开始搜索。函数值返回一个正整数，指明子字符串在目标字符串中是从第几个字符开始的。目标字符串和子字符串可以是任何形式的字符实体。如果目标字符串中不含有子字符串中的内容，则函数的返回值为0。例如INDEX(‘VitaminC’,‘i’)的值为2；INDEX(‘VitaminC’,‘i’,BACK=.TRUE.)的值为6；INDEX(‘VitaminC’,‘b’)的值为0。