chap10/sample1.f90

サンプルコードのダウンロード

1program sample
2  use a
3  implicit none
4
5  call a_sub()
6
7  stop
8endprogram sample