mirror of
https://github.com/LCPQ/quantum_package
synced 2025-04-26 02:05:07 +02:00
Update sort.irp.f
This commit is contained in:
parent
803b48cc64
commit
933efb26f6
@ -156,7 +156,7 @@ BEGIN_TEMPLATE
|
|||||||
iorder(i) = i0
|
iorder(i) = i0
|
||||||
enddo
|
enddo
|
||||||
|
|
||||||
end subroutine heap_$Xsort$big
|
end subroutine heap_$Xsort_big
|
||||||
|
|
||||||
subroutine $Xsort(x,iorder,isize)
|
subroutine $Xsort(x,iorder,isize)
|
||||||
implicit none
|
implicit none
|
||||||
|
Loading…
x
Reference in New Issue
Block a user