Fortran Coder

查看: 4309|回复: 5
打印 上一主题 下一主题

[求助] 字符串连接不了?大佬们帮忙看看是啥问题

[复制链接]

31

帖子

10

主题

0

精华

熟手

F 币
334 元
贡献
128 点
楼主
发表于 2021-12-24 09:28:00 | 显示全部楼层
fcode 发表于 2021-12-14 08:36
看看,字符串的故事:
http://string.w.fcode.cn/
如果你嫌每次都trim很麻烦,那么递延长度字符串,可能对 ...

雪球你推荐的文章太好了,但里面有一句话可能有歧义:
“此时我们就需要 AdjustL 函数,我们可以这样写: trim(AdjustL(s4)) , 或者 AdjustL(trim(s4)) 这两者的顺序无所谓,结果都是一样的。”
两者的结果好像并不一样:
[Fortran] 纯文本查看 复制代码
character(len=12):: domain

open(123,file='output.txt')

domain = '  fcode.cn' ! 10 characters with 2 spaces ahead
write(123, *) 'adjustl(trim(domain)):',adjustl(trim(domain))
write(123, *) 'trim(adjustl(domain)):',trim(adjustl(domain))

print*,'length of adjustl(trim(domain)) is' ,len(adjustl(trim(domain)))
print*,'length of trim(adjustl(domain)) is',len(trim(adjustl(domain)))
end


您需要登录后才可以回帖 登录 | 极速注册

本版积分规则

捐赠本站|Archiver|关于我们 About Us|小黑屋|Fcode ( 京ICP备18005632-2号 )

GMT+8, 2024-5-17 22:42

Powered by Tencent X3.4

© 2013-2024 Tencent

快速回复 返回顶部 返回列表