Home
last modified time | relevance | path

Searched refs:zeta_store (Results 1 – 8 of 8) sorted by relevance

/dports/science/quantum-espresso/q-e-qe-6.7.0/TDDFPT/tools/
H A Dtddfpt_calculate_spectrum.f90806 IF (allocated(zeta_store)) DEALLOCATE(zeta_store)
1015 READ(158,*) zeta_store (ip,:,i)
1081 READ(158,*) zeta_store (1,1,i)
1082 zeta_store (2,2,i)=zeta_store (1,1,i)
1083 zeta_store (3,3,i)=zeta_store (1,1,i)
1084 zeta_store (1,2,i)=(0.0d0,0.0d0)
1085 zeta_store (1,3,i)=(0.0d0,0.0d0)
1086 zeta_store (2,1,i)=(0.0d0,0.0d0)
1087 zeta_store (2,3,i)=(0.0d0,0.0d0)
1088 zeta_store (3,1,i)=(0.0d0,0.0d0)
[all …]
/dports/science/quantum-espresso/q-e-qe-6.7.0/TDDFPT/src/
H A Dstop_lr.f9017 & gamma_store, zeta_store, norm0, code1,code2, &
110 WRITE(158,*) zeta_store (ip,j,i)
121 WRITE(158,*) zeta_store (ip,j,itermax)
H A Dlr_restart.f9024 bgz_suffix, beta_store, gamma_store, zeta_store, norm0, &
127 READ(158,*,end=301,err=303) zeta_store (pol_index,:,i)
132 READ(158,*,end=301,err=303) zeta_store (pol_index,:,iter_restart)
142 CALL mp_bcast (zeta_store(pol_index,:,:), ionode_id, world_comm)
H A Dlr_write_restart.f9020 USE lr_variables, ONLY : beta_store, gamma_store, zeta_store, norm0, &
119 WRITE(158,*) zeta_store (pol_index,j,i)
130 WRITE(158,*) zeta_store (pol_index,j,LR_iteration)
H A Dlr_lanczos.f9049 alpha_store, beta_store, gamma_store, zeta_store, &
236 zeta_store (pol_index,ip,LR_iteration) = zeta(ip)
253 zeta_store (pol_index,ip,LR_iteration) = zeta(ip)
H A Dlr_dealloc.f9095 IF (allocated(zeta_store)) DEALLOCATE(zeta_store)
H A Dlr_alloc_init.f90218 ALLOCATE(zeta_store(n_ipol,n_ipol,itermax))
222 zeta_store(:,:,:) = (0.0d0,0.0d0)
H A Dlr_variables.f90129 COMPLEX(kind=dp), ALLOCATABLE :: zeta_store(:,:,:) ! polarization of external field, variable