Re: [问题] 效率

楼主: janhon (海牛)   2013-11-16 20:11:47
: 我再贴一次完整的CODE
: do iz=0,ngrid(3)-1 ; do iy=0,ngrid(2)-1 ; do ix=0,ngrid(1)-1
: xyz(1) = dble(ix)/dble(ngrid(1))
: xyz(2) = dble(iy)/dble(ngrid(2))
: xyz(3) = dble(iz)/dble(ngrid(3))
: atmp = pi2 * (wkiG1*xyz(1) + wkiG2*xyz(2) + wkiG3*xyz(3))
^^(?)这到底是函数还是变量?
: csumout(ix,iy,iz) = sum(coeff(1:nplane)*cdexp(atmp(1:nplane)))/dsqrt(Vol)
(:) ^^
楼主: janhon (海牛)   2012-01-16 20:17:00
open(1) 又close(1) 又open(1) 数字还是用100以上不要重复.
作者: Cypresslin (啊哈哈~~)   2012-01-17 15:54:00
#1IWGajWZ 有你要的答案
楼主: janhon (海牛)   2012-01-26 12:17:00
有看到 但是atmp=没指定位置,干嘛全阵列都指定成同数值

Links booklink

Contact Us: admin [ a t ] ucptt.com