From: Cezary Czaplewski <czarek@chem.univ.gda.pl>
Date: Fri, 29 Sep 2017 17:34:14 +0000 (+0200)
Subject: isnan_pgi
X-Git-Url: http://mmka.chem.univ.gda.pl/gitweb/?a=commitdiff_plain;h=8ca426305833f2712374aab6dda6496203e8fde0;p=unres.git

isnan_pgi
---

diff --git a/source/lib/isnan_pgi.f b/source/lib/isnan_pgi.f
new file mode 100644
index 0000000..19e6816
--- /dev/null
+++ b/source/lib/isnan_pgi.f
@@ -0,0 +1,7 @@
+        logical function isnan(a)
+        logical isnand
+        double precision a
+        isnan=isnand(a)
+        return
+        end
+        
\ No newline at end of file