From 304fa305e85190c934e78eae75c7b092fcfd54c1 Mon Sep 17 00:00:00 2001 From: Martin Kroeker Date: Sun, 19 Jan 2025 22:55:52 +0100 Subject: [PATCH] Fix line reflow on addition of _64 symbol suffixes --- SRC/DEPRECATED/cgelsx.f | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/SRC/DEPRECATED/cgelsx.f b/SRC/DEPRECATED/cgelsx.f index b55fe1565..7281a0668 100644 --- a/SRC/DEPRECATED/cgelsx.f +++ b/SRC/DEPRECATED/cgelsx.f @@ -364,8 +364,8 @@ SUBROUTINE CGELSX( M, N, NRHS, A, LDA, B, LDB, JPVT, RCOND, * * B(1:M,1:NRHS) := Q**H * B(1:M,1:NRHS) * - CALL CUNM2R( 'Left', 'Conjugate transpose', M, NRHS, MN, A, LDA, - $ WORK( 1 ), B, LDB, WORK( 2*MN+1 ), INFO ) + CALL CUNM2R( 'Left', 'Conjugate transpose', M, NRHS, MN, A, + $ LDA, WORK( 1 ), B, LDB, WORK( 2*MN+1 ), INFO ) * * workspace NRHS *