gh23598Warn.f90
| 205 B | Satir:
0
| f90
Geri
module test_bug implicit none private public :: intproduct contains integer function intproduct(a, b) result(res) integer, intent(in) :: a, b res = a*b end function end module
Kaydet
Ctrl+S ile kaydet