From 395d05a552aa57bb1d68d0039556775f26e68af3 Mon Sep 17 00:00:00 2001 From: Salvatore Filippone Date: Thu, 10 Jan 2008 14:55:07 +0000 Subject: [PATCH] *** empty log message *** --- base/internals/psi_ldsc_pre_halo.f90 | 10 ++-------- 1 file changed, 2 insertions(+), 8 deletions(-) diff --git a/base/internals/psi_ldsc_pre_halo.f90 b/base/internals/psi_ldsc_pre_halo.f90 index f6b83129..d241ae3c 100644 --- a/base/internals/psi_ldsc_pre_halo.f90 +++ b/base/internals/psi_ldsc_pre_halo.f90 @@ -32,14 +32,8 @@ ! File: psi_ldsc_pre_halo.f90 ! ! Subroutine: psi_ldsc_pre_halo -! Build initial versions of data exchange lists. -! When the descriptor is for a large index space, we cannot build -! the data exchange lists "on-the-fly", but we also want to keep using the -! same format conversion routines we use in the small index space case, -! hence this adapter routine. -! Since it also convers the AVL tree data structure into the hashed list -! of ordered lists, it may be called to do just that; perhaps we should -! cut away that functionality and put it somewhere else... +! Build initial versions of data exchange lists for the +! large index space case. ! ! ! Arguments: