diff --git a/SRC/ieeeck.f b/SRC/ieeeck.f
index 74065c3b4e..f9f6332ecf 100644
--- a/SRC/ieeeck.f
+++ b/SRC/ieeeck.f
@@ -41,7 +41,7 @@
 *> \param[in] ISPEC
 *> \verbatim
 *>          ISPEC is INTEGER
-*>          Specifies whether to test just for inifinity arithmetic
+*>          Specifies whether to test just for infinity arithmetic
 *>          or whether to test for infinity and NaN arithmetic.
 *>          = 0: Verify infinity arithmetic only.
 *>          = 1: Verify infinity and NaN arithmetic.