subroutine ShowPair
! Uses
use Pattern_mod
! Calls
call ShowClusterCoord
! Variables
integer, INTENT(in) :: iwindow
integer, INTENT(in) :: ipair
type (cluster_type), INTENT(in) :: cl
integer :: iclu
end subroutine ShowPair
integer, INTENT(in) :: iwindow
integer, INTENT(in) :: ipair
type (cluster_type), INTENT(in) :: cl
integer :: iclu