Fortran中的字符串处理函数

      字符串可以出现在read和write语句中，即可以先将信息读入字符串中，
对字符串处理后再读取相关的数据；相反要做一些特定格式的输出时，
write语句的格式输出可能心有余而力不足，就可以先将数据write到字符串上，
对字符串处理后再将字符串输出。注意fortran对字符串的处理和c不一样，
      c是以数据0补足字符串的，所以len算出来的就是字符串实际的长度；
而fortran是以空格补足字符串的，所以要用len_trim计算字符串实际的长度。

     以下是一些fortran处理字符串的函数，利用它们编程会快而简洁一些。
len        字符串的长度
trim       去掉字符串右边的空格
len_trim   不算字符串右边的空格的字符串的长度
lnblnk     字符串最后一个非空格的字符的位置
index/scan 寻找指定字符的在字符串出现的位置
verify     第一个非指定字符在字符串出现的位置
adjustl    移动字符串左对齐，去掉打头的空格
adjustr    移动字符串右对齐，去掉尾部的空格
lge/lle    字符串大小对比
repeat     计算字符在字符串中重复出现的次数

http://ty217051.blog.163.com/blog/static/1297903201001851158774/