mirror of
https://gitlab.com/scemama/qp_plugins_scemama.git
synced 2024-09-01 08:43:46 +02:00
Compare commits
2 Commits
ae30d07000
...
44ef244fc0
Author | SHA1 | Date | |
---|---|---|---|
44ef244fc0 | |||
a11bbf629d |
@ -71,8 +71,9 @@ subroutine run
|
|||||||
! Pseudo-potentials
|
! Pseudo-potentials
|
||||||
! -----------------
|
! -----------------
|
||||||
|
|
||||||
print *, 'ECP'
|
if (do_pseudo) then
|
||||||
|
|
||||||
|
print *, 'ECP'
|
||||||
integer :: num
|
integer :: num
|
||||||
|
|
||||||
num = 0
|
num = 0
|
||||||
@ -164,6 +165,7 @@ subroutine run
|
|||||||
rc = trexio_write_ecp_power(f, power)
|
rc = trexio_write_ecp_power(f, power)
|
||||||
call check_success(rc)
|
call check_success(rc)
|
||||||
|
|
||||||
|
endif
|
||||||
|
|
||||||
|
|
||||||
! Basis
|
! Basis
|
||||||
|
Loading…
Reference in New Issue
Block a user