comments unified: 'End of' comment: letters case unified

chrwarm · Apr 6, 2021 · d6bcfc9 · d6bcfc9
1 parent e9ff507
commit d6bcfc9
Show file tree

Hide file tree

Showing 12 changed files with 12 additions and 12 deletions.
diff --git a/SRC/chb2st_kernels.f b/SRC/chb2st_kernels.f
@@ -371,6 +371,6 @@ SUBROUTINE  CHB2ST_KERNELS( UPLO, WANTZ, TTYPE,
 *
       RETURN
 *
-*     END OF CHB2ST_KERNELS
+*     End of CHB2ST_KERNELS
 *
       END
diff --git a/SRC/dlaed5.f b/SRC/dlaed5.f
@@ -181,6 +181,6 @@ SUBROUTINE DLAED5( I, D, Z, DELTA, RHO, DLAM )
       END IF
       RETURN
 *
-*     End OF DLAED5
+*     End of DLAED5
 *
       END
diff --git a/SRC/dlarrc.f b/SRC/dlarrc.f
@@ -243,6 +243,6 @@ SUBROUTINE DLARRC( JOBT, N, VL, VU, D, E, PIVMIN,
 
       RETURN
 *
-*     end of DLARRC
+*     End of DLARRC
 *
       END
diff --git a/SRC/dlarre.f b/SRC/dlarre.f
@@ -896,6 +896,6 @@ SUBROUTINE DLARRE( RANGE, N, VL, VU, IL, IU, D, E, E2,
 
       RETURN
 *
-*     end of DLARRE
+*     End of DLARRE
 *
       END
diff --git a/SRC/dlarrr.f b/SRC/dlarrr.f
@@ -203,6 +203,6 @@ SUBROUTINE DLARRR( N, D, E, INFO )
 *
       RETURN
 *
-*     END OF DLARRR
+*     End of DLARRR
 *
       END
diff --git a/SRC/dsb2st_kernels.f b/SRC/dsb2st_kernels.f
@@ -371,6 +371,6 @@ SUBROUTINE  DSB2ST_KERNELS( UPLO, WANTZ, TTYPE,
 *
       RETURN
 *
-*     END OF DSB2ST_KERNELS
+*     End of DSB2ST_KERNELS
 *
       END
diff --git a/SRC/slaed5.f b/SRC/slaed5.f
@@ -181,6 +181,6 @@ SUBROUTINE SLAED5( I, D, Z, DELTA, RHO, DLAM )
       END IF
       RETURN
 *
-*     End OF SLAED5
+*     End of SLAED5
 *
       END
diff --git a/SRC/slarrc.f b/SRC/slarrc.f
@@ -243,6 +243,6 @@ SUBROUTINE SLARRC( JOBT, N, VL, VU, D, E, PIVMIN,
 
       RETURN
 *
-*     end of SLARRC
+*     End of SLARRC
 *
       END
diff --git a/SRC/slarre.f b/SRC/slarre.f
@@ -900,6 +900,6 @@ SUBROUTINE SLARRE( RANGE, N, VL, VU, IL, IU, D, E, E2,
 
       RETURN
 *
-*     end of SLARRE
+*     End of SLARRE
 *
       END
diff --git a/SRC/slarrr.f b/SRC/slarrr.f
@@ -203,6 +203,6 @@ SUBROUTINE SLARRR( N, D, E, INFO )
 *
       RETURN
 *
-*     END OF SLARRR
+*     End of SLARRR
 *
       END
diff --git a/SRC/ssb2st_kernels.f b/SRC/ssb2st_kernels.f
@@ -372,6 +372,6 @@ SUBROUTINE  SSB2ST_KERNELS( UPLO, WANTZ, TTYPE,
 *
       RETURN
 *
-*     END OF SSB2ST_KERNELS
+*     End of SSB2ST_KERNELS
 *
       END
diff --git a/SRC/zhb2st_kernels.f b/SRC/zhb2st_kernels.f
@@ -371,6 +371,6 @@ SUBROUTINE  ZHB2ST_KERNELS( UPLO, WANTZ, TTYPE,
 *
       RETURN
 *
-*     END OF ZHB2ST_KERNELS
+*     End of ZHB2ST_KERNELS
 *
       END
-Original file line number
+Diff line change
@@ Expand Up / @@ -371,6 +371,6 @@ SUBROUTINE CHB2ST_KERNELS( UPLO, WANTZ, TTYPE, @@
     *
           RETURN
     *
-    *     END OF CHB2ST_KERNELS
+    *     End of CHB2ST_KERNELS
     *
           END