9 lines
177 B
Fortran
9 lines
177 B
Fortran
subroutine ai_synchronize (level)
|
|
|
|
implicit none
|
|
integer, intent (in) :: level
|
|
write (*, '(a)', advance='no') "Heyo Fortran! "
|
|
print *, level
|
|
|
|
end subroutine ai_synchronize
|