fortran subroutineについて
fortran subroutineについて
c
c
c kk.f
c
c
integer a,b
a=0
do 10 b=1,9,2
a=a+1
print * ,a
10 continue
write(*,*) ,'No.1'
call sub(a,b)
stop
end
c
subroutine sub(a,b)
write(*,*) ,'No.2'
return
end
簡単に上記のようにつくってg77でコンパイルしたのですが、call文とsubroutine文の部分で警告が出ました。
実行ファイルは問題なく動作をするのですが、このままでもいいのでしょうか?ちなみに、警告文を読んでも僕には理解できませんでした。
以下、警告文です。
kk.f: In subroutine `sub':
kk.f:13: warning:
call sub(a,b)
1
kk.f:17: (continued):
subroutine sub(a,b)
2
Argument #1 (named `a') of `sub' is one type at (2) but is some other type at (1) [info -f g77 M GLOBALS]
kk.f:13: warning:
call sub(a,b)
1
kk.f:17: (continued):
subroutine sub(a,b)
2
Argument #2 (named `b') of `sub' is one type at (2) but is some other type at (1) [info -f g77 M GLOBALS]
お礼
ありがとうございました。 そのとおりにやったらできました。