Diapositiva di PowerPoint
CALCOLO DELLA DENSITA` ELETTRONICA
DO I=1,N,2
CALL INV_FFT(NRS)
DO J=1,NRS
RHO(J)=RHO(J)+PSI(J,I)**2
END DO
END DO
CALL FWD_FFT(NRS)
CALL INV_FFT(NR)
CALL RHOV(RHOS,RHOE)
Diapositiva precedente
Diapositiva successiva
Torna alla prima diaposiva
Visualizza versione grafica