From fd9abfc8340913451f90544f3135f6760595ea7d Mon Sep 17 00:00:00 2001 From: marsdeno <41438629+marsdeno@users.noreply.github.com> Date: Thu, 9 Jan 2025 14:25:30 +0000 Subject: [PATCH 1/2] Remove unneccessary comment --- fortran/rules/S1.rst | 2 -- 1 file changed, 2 deletions(-) diff --git a/fortran/rules/S1.rst b/fortran/rules/S1.rst index a70268f..0898433 100644 --- a/fortran/rules/S1.rst +++ b/fortran/rules/S1.rst @@ -6,5 +6,3 @@ Two-word control flow constructs should be written as single words. ``ENDIF`` rather than ``END IF`` ``ENDDO`` rather than ``END DO`` ``ENDWHERE`` rather than ``END WHERE`` - -(this one makes me cry a little) From 6dfdf8b8b51d825c4e4d389c2e78c342b6628696 Mon Sep 17 00:00:00 2001 From: marsdeno <41438629+marsdeno@users.noreply.github.com> Date: Thu, 9 Jan 2025 14:31:06 +0000 Subject: [PATCH 2/2] Correct S2 example Example prior to commit was not actually properly illustrating the issue. --- fortran/rules/S2.rst | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/fortran/rules/S2.rst b/fortran/rules/S2.rst index 2edba31..c32bd2a 100644 --- a/fortran/rules/S2.rst +++ b/fortran/rules/S2.rst @@ -8,7 +8,7 @@ To be avoided : .. code-block:: fortran :caption: declaration order - SUBROUTINE WRONG_ORDER( ARG3, ARG2, ARG1) + SUBROUTINE WRONG_ORDER( ARG1, ARG2, ARG3) INTEGER(KIND=JPIM), INTENT(IN) :: ARG3 INTEGER(KIND=JPIM), INTENT(IN) :: ARG2