Question

我们可以编写简单的bash脚本，以便以多种方式简化我们的任务。例如下面的bash scritp。

#!/bin/bash

name="Vijay"

echo "My name is $name."
echo "$name does no like to play football"

exit $?

可以在Fortran中实现相同的功能吗？我尝试了代码：

program simple
implicit none

character(len=1024),parameter :: name="Vijay"

write (name,"(A5)")  
print*, "My name is trim(name)" 
print*, "trim(name) does no like to play football"
end

但是，我收到错误消息：

Error: UNIT specification at (1) must be an INTEGER expression or a CHARACTER variable

感谢您解决此问题的任何帮助。

提前致谢

Answer 1

这是一个非常基本的问题。我建议阅读一篇关于Fortran的文章，例如http://en.wikipedia.org/wiki/Fortran_95_language_features，并查看代码示例。

一个暗示：

write (name,"(A5)")

- ＆GT;

write (*, '(A)' )  name

Answer 2

除了M. S. B.的答复之外，该行：

print*, "My name is trim(name)"

将打印出My name is trim(name)，因为Fortran不像bash那样对字符串进行变量替换。你想要的是：

print*, "My name is "//trim(name)

//运算符用于Fortran中的字符串连接。

在fortran中编写像脚本一样的bash

2 个答案: