Article ID: 150133
Article Last Modified on 10/17/2003
! Compile options needed: none
do i=1,2
write(*,*) 'Testing'
open(unit=5,file='test.out')
write(5,*) 'test'
close(5)
end do
end
! Compile options needed: none
do i=1,2
write(*,*) 'Testing'
open(unit=2,file='test.out')
write(2,*) 'test'
close(2)
end do
end
Additional query words: 1.00 4.00
Keywords: kblangfortran KB150133