Commit 3af78c01 authored by Marco Govoni's avatar Marco Govoni
Browse files

Testing new fetch_input

parent 96ab1ade
......@@ -36,7 +36,7 @@ SUBROUTINE wstat_readin()
!
! READ INPUT_WEST
!
CALL fetch_input(1,(/1/),.TRUE.)
CALL fetch_input1(1,(/1/),.TRUE.)
!
! read the input file produced by the pwscf program
! allocate memory and recalculate what is needed
......@@ -52,7 +52,7 @@ SUBROUTINE wstat_readin()
!
! READ other sections of the input file
!
CALL fetch_input(1,(/2/),.TRUE.)
CALL fetch_input1(1,(/2/),.TRUE.)
!
CALL stop_clock('wstat_readin')
!
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment