From 933efb26f6b87a67a8ce74198874555eb0be79de Mon Sep 17 00:00:00 2001
From: Thomas Applencourt <TApplencourt@users.noreply.github.com>
Date: Wed, 25 Jan 2017 19:58:10 -0600
Subject: [PATCH] Update sort.irp.f

---
 src/Utils/sort.irp.f | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/Utils/sort.irp.f b/src/Utils/sort.irp.f
index b0decc33..4f16dd08 100644
--- a/src/Utils/sort.irp.f
+++ b/src/Utils/sort.irp.f
@@ -156,7 +156,7 @@ BEGIN_TEMPLATE
     iorder(i) = i0
   enddo
   
- end subroutine heap_$Xsort$big
+ end subroutine heap_$Xsort_big
 
  subroutine $Xsort(x,iorder,isize)
   implicit none