From 353edc4718b6191fcdf9e1a26d899412e6c5132f Mon Sep 17 00:00:00 2001 From: Steven Franke Date: Thu, 7 Jan 2021 10:18:38 -0600 Subject: [PATCH] Fix one more compiler warning. --- lib/pctile.f90 | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lib/pctile.f90 b/lib/pctile.f90 index c0a6cdb72..f30b27ff0 100644 --- a/lib/pctile.f90 +++ b/lib/pctile.f90 @@ -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