mirror of https://gitlab.com/QEF/q-e.git
fix: adding missing deallocation of bectype
in write_p_avg.f90 (G.J. Ferreira)
This commit is contained in:
parent
1d77f7d808
commit
1cc0455e34
|
@ -142,7 +142,7 @@ SUBROUTINE write_p_avg(filp, spin_component, firstk, lastk)
|
|||
IF (ionode) THEN
|
||||
CLOSE(iunout)
|
||||
ENDIF
|
||||
|
||||
call deallocate_bec_type(becp)
|
||||
DEALLOCATE(matp)
|
||||
!
|
||||
RETURN
|
||||
|
|
Loading…
Reference in New Issue