Skip to content

Commit 29d9acd

Browse files
authored
Update ch05-00-function.md
1 parent 4aa163e commit 29d9acd

File tree

1 file changed

+2
-1
lines changed

1 file changed

+2
-1
lines changed

src/ch05-00-function.md

Lines changed: 2 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -11,7 +11,7 @@ module my_func_mod
1111
implicit none
1212
contains
1313
function vector_norm(vec) result(norm)
14-
real, intent(in) :: vec(:)
14+
real, intent(in) :: vec(:) !这里vec(:)表示我们传入的是一个数组
1515
real :: norm
1616
1717
norm = sqrt(sum(vec**2))
@@ -29,6 +29,7 @@ end program main
2929
```
3030

3131
其中`result`表示函数的返回值是什么,同时我们还需要在函数体中定义返回的类型和属性。
32+
- Fortran中有许多针对数组的内置函数,熟练使用他们,可以减少代码的冗余,提高效率,此处`sum`表示对数组进行求和,`sqrt`表示对元素进行开方
3233

3334
如果返回值**没有属性,只有类型**,则可以将其写在函数的开头。
3435

0 commit comments

Comments
 (0)