Fix one more compiler warning.

This commit is contained in:
Steven Franke 2021-01-07 10:18:38 -06:00
parent b9d33bc998
commit 353edc4718

View File

@ -12,6 +12,6 @@ subroutine pctile(x,npts,npct,xpct)
if(j.gt.npts) j=npts
xpct=tmp(j)
900 continue
continue
return
end subroutine pctile