mirror of
https://gitlab.com/scemama/qmcchem.git
synced 2024-12-21 20:03:31 +01:00
Bugs in SRMC corrected
This commit is contained in:
parent
59d0186209
commit
fa84ab6fa2
@ -47,18 +47,6 @@ BEGIN_PROVIDER [ double precision, wf_extension ]
|
||||
SOFT_TOUCH wf_extension_min wf_extension_max
|
||||
END_PROVIDER
|
||||
|
||||
BEGIN_PROVIDER [ double precision, srmc_pop_weight ]
|
||||
implicit none
|
||||
BEGIN_DOC
|
||||
! Weight of the SRMC population
|
||||
END_DOC
|
||||
srmc_pop_weight = pop_weight_mult
|
||||
srmc_pop_weight_min = min(srmc_pop_weight,srmc_pop_weight_min)
|
||||
srmc_pop_weight_max = max(srmc_pop_weight,srmc_pop_weight_max)
|
||||
SOFT_TOUCH srmc_pop_weight_min srmc_pop_weight_max
|
||||
|
||||
END_PROVIDER
|
||||
|
||||
|
||||
BEGIN_PROVIDER [ double precision, drift_mod, (size_drift_mod) ]
|
||||
implicit none
|
||||
|
@ -188,7 +188,7 @@ END_SHELL
|
||||
|
||||
elec_coord(elec_num+1,1) += p*time_step
|
||||
elec_coord(elec_num+1,2) = E_loc
|
||||
elec_coord(elec_num+1,3) = srmc_weight(i_walk) * pop_weight_mult
|
||||
elec_coord(elec_num+1,3) = srmc_weight(i_walk) * srmc_pop_weight_mult
|
||||
do l=1,3
|
||||
do i=1,elec_num+1
|
||||
|
||||
@ -359,7 +359,7 @@ BEGIN_PROVIDER [ double precision, srmc_pop_weight_mult ]
|
||||
BEGIN_DOC
|
||||
! Population weight of SRMC
|
||||
END_DOC
|
||||
pop_weight_mult = pop_weight(srmc_projection)
|
||||
srmc_pop_weight_mult = srmc_pop_weight(srmc_projection)
|
||||
END_PROVIDER
|
||||
|
||||
BEGIN_PROVIDER [ integer, srmc_projection ]
|
||||
|
Loading…
Reference in New Issue
Block a user