Fortran入门——函数调用
合集下载
- 1、下载文档前请自行甄别文档内容的完整性,平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益,请联系客服反馈,我们会尽快为您处理(人工客服工作时间:9:00-18:30)。
Fortran⼊门——函数调⽤
当我的第⼀个Fortran程序 "Hello World" 诞⽣后,我的下⼀个⽬标便是写⼀个包含函数调⽤的程序,⾄于那些什么代码格式,数据类型,语法等等全部⾛马观花浏览⼀遍,既然需要速成,那么细节⽅⾯只能略过,将来有需要可以再补。
在VS中新建⼀个 Fortran-Console Application项⽬,选择默认的EmptyProject模板。
然后添加⼀个Source⽂件。
在新添加的Source⽂件中输⼊如下代码
1 integer function Add(x,y)
2implicit none
3 integer ::x,y
4 Add=x+y
5 end function
如上代码所⽰便是⼀个⾮常简单的Fortran函数,写成C#代码的话如下
1int Add(int x,int y)
2 {
3return x+y;
4 }
可以看到在Fortran中代码块没有C#的⼤括号表⽰法。
interger function end 等关键字皆为⼩写。
在旧版本中,貌似必须⼤写。
在Fortran函数中,参数的数据类型在函数体中定义,如"integer ::x,y",函数的返回值则需要赋给函数的名称"Add=x+y",这点着实不太习惯。
函数有了,接下来该是调⽤了,再敲点代码吧
1 program main
2 integer:: x,y
3 integer Add
4 read *, x,y
5 print *,Add(x,y)
6 read *,x
7 end
在主程序中,需要声明Add函数的类型"integer Add",否则调⽤会失败。
可以看到,⼀个简单的函数调⽤程序,相⽐C#等语⾔,在语法格式上还是有不少区别的。