【Fortran】字符运算（赋值、切片、连接、逻辑运算及部分函数）

最新推荐文章于 2025-02-08 08:31:05 发布

罗小罗95

最新推荐文章于 2025-02-08 08:31:05 发布

阅读量1.1w

点赞数 3

CC 4.0 BY-SA版权

分类专栏： fortran 文章标签： Fortran 字符切片

本文链接：https://blog.youkuaiyun.com/weixin_43780543/article/details/89847668

本文介绍了Fortran中字符变量的赋值与操作，包括字符长度的影响，如何进行子串提取（切片），字符串连接，以及逻辑运算。在Fortran中，字符操作遵循特定的规则，例如，子串提取使用操作，字符串连接用，逻辑运算则包括等于、不等于等关系操作。此外，还讨论了在不同字符集下比较字符串的注意事项，并列举了一些内置的字符函数及其应用实例。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

【Fortran】字符赋值和操作

1) 赋值

CHARACTER(len=<len>)::var1[,var2,var3,...]

在对字符变量进行声明时，常常需要给定字符长度len，若不指定，len的默认值为1。

例子，如声明字符变量my_work，相应值为homework，若len小于8，则不会将homework显示完全，必须要≥8，多余的位置在字符串末后用空格填充。

PROGRAM my_test
IMPLICIT NONE
CHARACTER(len=8)::my_work   ! 结果为：My work is homework!Oh!
CHARACTER(len=4)::my_work   ! 结果为：My work is home!Oh!
CHARACTER(len=12)::my_work   ! 结果为：My work is  homework    !Oh!

my_work = 'homework'
WRITE(*,*) 'My work is  ',my_work,'!Oh!'

STOP 
END PROGRAM my_test