(As a GNU extension, kind is the largest kind of the actual arguments.) Example: program test_mod print *, mod(17,3) print *, mod(17.5,5.5) print *, ...
確定! 回上一頁