D:/demona/2.0/manual/doc/2-31set/printY.f90

Go to the documentation of this file.

subroutine printY(a,b)

use global



implicit none



integer :: i,a,b




do i=a,b

        print*,setY(i)%y

end do









end subroutine printY

---