pgi-accelerator

0熱度

2回答

錯誤PGI加速器Fortran代碼

這是我的代碼 program load_flow !!!!!!!region starts !$acc region p1=0;p=0 do i=2,n do j=1,n p1=(V(i)*V(j)*Yabs(i,j)*cos(angle(i,j)-d(i)+d(j))) p=p1+p end do P0(i-1)=p p

cuda fortran openacc pgi-accelerator 2012-03-17

---