LCPQ/DEHam
2
0
Fork 0
mirror of https://github.com/LCPQ/DEHam synced 2024-07-30 17:14:19 +02:00
Code Issues Releases Wiki Activity

Fix for heis.

Browse Source
This commit is contained in:
v1j4y 2022-04-22 15:17:20 +02:00
parent ef3a4bd50f
commit ca4a0c97ef
1 changed files with 4 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
src/providdet.irp.f
View File

@ -36,6 +36,10 @@ BEGIN_PROVIDER[integer(C_SIZE_T),det,(nt2,2)]
endif endif
deth(count,2)=i-1 deth(count,2)=i-1
enddo enddo
else
count+=1
deth(count,1)=0
deth(count,2)=1
endif endif
!C if det=0 then exit !C if det=0 then exit