Searched refs:cube_save (Results 1 – 5 of 5) sorted by relevance
/dports/science/quantum-espresso/q-e-qe-6.7.0/TDDFPT/src/ |
H A D | lr_set_boxes_density.f90 | 20 USE lr_variables, ONLY : cube_save 36 ALLOCATE( cube_save(dfftp%nnr,3) ) 37 cube_save = 0 52 cube_save(ir,1) = i 53 cube_save(ir,2) = j 54 cube_save(ir,3) = k
|
H A D | lr_dealloc.f90 | 107 IF (allocated(cube_save)) DEALLOCATE(cube_save)
|
H A D | lr_charg_resp.f90 | 865 USE lr_variables, ONLY : LR_polarization, LR_iteration, cube_save 882 IF ( .not. allocated(cube_save) ) CALL lr_set_boxes_density() 893 i=cube_save(ir,1)+1 894 j=cube_save(ir,2)+1 895 k=cube_save(ir,3)+1 951 USE lr_variables, ONLY : LR_polarization, LR_iteration, cube_save 1201 USE lr_variables, ONLY : LR_polarization, LR_iteration, cube_save 1403 USE lr_variables, ONLY : LR_polarization, LR_iteration, cube_save 1657 USE lr_variables, ONLY : LR_polarization, LR_iteration, cube_save
|
H A D | lr_calc_dens.f90 | 36 & cube_save, LR_iteration,& 228 i=cube_save(ir,1)+1 229 j=cube_save(ir,2)+1 230 k=cube_save(ir,3)+1
|
H A D | lr_variables.f90 | 94 INTEGER, ALLOCATABLE :: cube_save(:,:) !used in response charge density mode 1 variable
|