Skip to content

Predefined_TrialWaveFunction causes runtime error

Running the ALF from the master branch in projector couses the following runtime error:

At line 102 of file Predefined_Hop_mod.F90
Fortran runtime error: Attempt to DEALLOCATE unallocated 'this'

Error termination. Backtrace:
#0  0x7f600313b8b0 in ???
#1  0x7f600313c395 in ???
#2  0x7f600313c73a in ???
#3  0x56482e9f2ed8 in __predefined_hoppings_MOD_predefined_hoppings_clear
        at /home/jschwab/Programs/ALF/Prog/Predefined_Hop_mod.F90:102
#4  0x56482e9f550b in __predefined_trial_MOD_predefined_trialwavefunction
        at /home/jschwab/Programs/ALF/Prog/Predefined_Trial_mod.F90:391
#5  0x56482ea36056 in __hamiltonian_main.ham_hubbard_smod_MOD_ham_trial
        at Hamiltonians/Hamiltonian_Hubbard_smod.F90:413
#6  0x56482ea38184 in __hamiltonian_main.ham_hubbard_smod_MOD_ham_set
        at Hamiltonians/Hamiltonian_Hubbard_smod.F90:256
#7  0x56482ea16946 in MAIN__
        at /home/jschwab/Programs/ALF/Prog/main.F90:346
#8  0x56482e9965de in main
        at /home/jschwab/Programs/ALF/Prog/main.F90:115

Where the offending line in Predefined_Hop_mod.F90:102 reads:

deallocate (this(1)%L_Fam, this(1)%List_Fam, this(1)%Multiplicity, this(1)%Prop_Fam )

Changing this to

deallocate (this(1)%L_Fam, this(1)%List_Fam, this(1)%Prop_Fam )
if( associated(this(1)%Multiplicity) ) deallocate(this(1)%Multiplicity)

fixes the error. So Multiplicity isn't set in Predefined_TrialWaveFunction.

@Francesco.ParisenToldin could you have a look at this? It's probably connected to your recent additions.