diff options
| -rw-r--r-- | SRC/disnan.f | 2 | ||||
| -rw-r--r-- | SRC/dlaisnan.f | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/SRC/disnan.f b/SRC/disnan.f index da89158f..6d26254b 100644 --- a/SRC/disnan.f +++ b/SRC/disnan.f @@ -65,7 +65,7 @@ * December 2016 * * .. Scalar Arguments .. - DOUBLE PRECISION DIN + DOUBLE PRECISION, INTENT(IN) :: DIN * .. * * ===================================================================== diff --git a/SRC/dlaisnan.f b/SRC/dlaisnan.f index 4b5ebb4f..3886dc51 100644 --- a/SRC/dlaisnan.f +++ b/SRC/dlaisnan.f @@ -21,7 +21,7 @@ * LOGICAL FUNCTION DLAISNAN( DIN1, DIN2 ) * * .. Scalar Arguments .. -* DOUBLE PRECISION DIN1, DIN2 +* DOUBLE PRECISION, INTENT(IN) :: DIN1, DIN2 * .. * * |