!
! Copyright (C) 2001-2017 Quantum ESPRESSO group
! This file is distributed under the terms of the
! GNU General Public License. See the file `License'
! in the root directory of the present distribution,
! or http://www.gnu.org/copyleft/gpl.txt .
!
!----------------------------------------------------------------------------
SUBROUTINE fcp_dyn_printavg(iter)
  !----------------------------------------------------------------------------
  !
  ! ... print physical properties after the dynamics of FCP
  ! ...
  ! ... Variables:
  ! ...   iter:  total number of iteration
  !
  USE kinds, ONLY : DP
  !
  IMPLICIT NONE
  !
  INTEGER, INTENT(IN) :: iter
  !
  !
  ! >>> print properties, here
  !
  !
END SUBROUTINE fcp_dyn_printavg
