diff options
Diffstat (limited to 'SRC/sisnan.f')
-rw-r--r-- | SRC/sisnan.f | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/SRC/sisnan.f b/SRC/sisnan.f index 05f59743..a01f7798 100644 --- a/SRC/sisnan.f +++ b/SRC/sisnan.f @@ -21,7 +21,7 @@ * LOGICAL FUNCTION SISNAN( SIN ) * * .. Scalar Arguments .. -* REAL SIN +* REAL, INTENT(IN) :: SIN * .. * * @@ -65,7 +65,7 @@ * December 2016 * * .. Scalar Arguments .. - REAL SIN + REAL, INTENT(IN) :: SIN * .. * * ===================================================================== |