Home
last modified time | relevance | path

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

/dports/science/berkeleygw/BGW-2.0.0/Common/
H A Depswrite_hdf5.f9099 call hdf5_write_int(file_id, 'eps_header/params/matrix_flavor', pol%matrix_flavor, error)
150 (/pol%matrix_flavor,nmtx_max,nmtx_max,pol%nfreq,pol%nmatrix,nq/), error)
152 (/pol%matrix_flavor,nmtx_max,nq/), error)
160 (/pol%matrix_flavor,nmtx_max,nmtx_max,1,pol%nmatrix,nq/), error)
164 (/pol%matrix_flavor,nmtx_max,pol%neig_sub_input,1,pol%nmatrix,nq/), error)
171 (/pol%matrix_flavor,pol%neig_sub_input,pol%neig_sub_input,pol%nfreq,pol%nmatrix,nq/), error)
220 all(nmtx_old==nmtx) .and. matrix_flavor_old==pol%matrix_flavor .and. &
288 write(0,*) 'matrix_flavor:', matrix_flavor_old, pol%matrix_flavor
339 (/pol%matrix_flavor,pol%neig_sub,pol%neig_sub,pol%nfreq,pol%nmatrix,1/), error)
341 (/pol%matrix_flavor,pol%nmtx,pol%neig_sub,1,pol%nmatrix,1/), error)
H A Depsread_hdf5.f9065 call hdf5_read_int(file_id, 'eps_header/params/matrix_flavor', pol%matrix_flavor, error)
178 integer :: error, matrix_flavor local
183 call hdf5_read_int(file_id, 'eps_header/params/matrix_flavor', matrix_flavor, error)
184 if (matrix_flavor/=size(epsdiag,1)) then
185 write(0,*) 'ERROR: Got size(epsdiag,1)=',size(epsdiag,1),', but matrix_flavor=',matrix_flavor
190 (/matrix_flavor,nmtx,1/), (/0,0,iq-1/), epsdiag, error)
H A Dinput_utils.f90587 pol%matrix_flavor = flavor
588 if (pol%freq_dep/=0) pol%matrix_flavor = 2
H A Dtypedefs.f90427 integer :: matrix_flavor !< 2 (=CMPLX), unless we have freq_dep==0 and SCALARSIZE==1. component
/dports/science/berkeleygw/BGW-2.0.0/Epsilon/
H A Depsmat.h5.spec44 Dataset: matrix_flavor
225 Dims(1): matrix_flavor
237 Dims(1): matrix_flavor
245 Dims(1): matrix_flavor
257 Dims(1): matrix_flavor
270 Dims(1): matrix_flavor
H A Depsmat_old2hdf5.f90236 SAFE_ALLOCATE(epsdiag,(pol%matrix_flavor,nmtx0_of_q(iq),1))
252 call write_matrix_diagonal_hdf(epsdiag, nmtx0_of_q(iq), iq, pol%matrix_flavor, trim(outfile))
H A Depsmat_hdf5_upgrade.f90235 call hdf5_write_int(file_id, 'eps_header/params/matrix_flavor', pol%matrix_flavor, error)
/dports/science/berkeleygw/BGW-2.0.0/BSE/
H A Depsdiag.f90414 SAFE_ALLOCATE(epsdiagt,(pol%matrix_flavor,nmtx))
645 SAFE_ALLOCATE(epsdiagt,(pol%matrix_flavor,nmtx))