bergervoet2.f90
[
plain text
]
function testi() result(res) integer :: res res = 0 end function testi