File tree Expand file tree Collapse file tree 1 file changed +5
-5
lines changed Expand file tree Collapse file tree 1 file changed +5
-5
lines changed Original file line number Diff line number Diff line change @@ -45,7 +45,7 @@ program main
45
45
end do
46
46
!调用子程序
47
47
call print_matrix(a)
48
- b=0.0
48
+ b=1.5
49
49
call axpy(2.0,a,b)
50
50
write(*,*)"--------------------"
51
51
call print_matrix(b)
@@ -58,10 +58,10 @@ $ fpm run
58
58
4.00000000 5.00000000 6.00000000 7.00000000
59
59
5.00000000 6.00000000 7.00000000 8.00000000
60
60
--------------------
61
- 4.00000000 6.00000000 8.00000000 10.0000000
62
- 6.00000000 8.00000000 10.0000000 12.0000000
63
- 8.00000000 10.0000000 12.0000000 14.0000000
64
- 10.0000000 12.0000000 14.0000000 16.0000000
61
+ 5.50000000 7.50000000 9.50000000 11.5000000
62
+ 7.50000000 9.50000000 11.5000000 13.5000000
63
+ 9.50000000 11.5000000 13.5000000 15.5000000
64
+ 11.5000000 13.5000000 15.5000000 17.5000000
65
65
```
66
66
67
67
You can’t perform that action at this time.
0 commit comments