program yes
implicit none
......
logical,allocatable:: trans_all(:,:)
......
open(11,file='read_mode_total.txt')
......
read(11,*)total
allocate(trans_all(1:total,12))
......
call contrast_test(trans_all,test_result)
......
end program ride
subroutine contrast_test(trans_all,test_result)
implicit none
......
end
請問我該怎樣寫
在副程式中
也能開啟trans_all
test_result也是個定址陣列
我想在副程式中以某變數來開啟
又該如何寫?
我試過很多種
主副都寫上定址陣列
卻無法成功
請高手指點
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 218.175.219.69