From 764cf2d2930674fe10eeeb1d7166d611cb4ca469 Mon Sep 17 00:00:00 2001 From: Salvatore Filippone Date: Sat, 23 Feb 2013 15:02:07 +0000 Subject: [PATCH] psbals3: cosmetic changes to sort_mod --- base/modules/psb_sort_mod.f90 | 12 ++++++------ 1 file changed, 6 insertions(+), 6 deletions(-) diff --git a/base/modules/psb_sort_mod.f90 b/base/modules/psb_sort_mod.f90 index 789c4da8..2d994cf1 100644 --- a/base/modules/psb_sort_mod.f90 +++ b/base/modules/psb_sort_mod.f90 @@ -66,23 +66,23 @@ module psb_sort_mod end type psb_int_idx_heap type psb_sreal_idx_heap integer(psb_ipk_) :: last, dir - real(psb_spk_), allocatable :: keys(:) - integer(psb_ipk_), allocatable :: idxs(:) + real(psb_spk_), allocatable :: keys(:) + integer(psb_ipk_), allocatable :: idxs(:) end type psb_sreal_idx_heap type psb_dreal_idx_heap integer(psb_ipk_) :: last, dir - real(psb_dpk_), allocatable :: keys(:) - integer(psb_ipk_), allocatable :: idxs(:) + real(psb_dpk_), allocatable :: keys(:) + integer(psb_ipk_), allocatable :: idxs(:) end type psb_dreal_idx_heap type psb_scomplex_idx_heap integer(psb_ipk_) :: last, dir complex(psb_spk_), allocatable :: keys(:) - integer(psb_ipk_), allocatable :: idxs(:) + integer(psb_ipk_), allocatable :: idxs(:) end type psb_scomplex_idx_heap type psb_dcomplex_idx_heap integer(psb_ipk_) :: last, dir complex(psb_dpk_), allocatable :: keys(:) - integer(psb_ipk_), allocatable :: idxs(:) + integer(psb_ipk_), allocatable :: idxs(:) end type psb_dcomplex_idx_heap