Documentation fix

chrwarm · May 7, 2023 · 59f4d58 · 59f4d58
1 parent c6c2689
commit 59f4d58
Show file tree

Hide file tree

Showing 2 changed files with 318 additions and 318 deletions.
diff --git a/SRC/cgedmd.f90 b/SRC/cgedmd.f90
@@ -304,7 +304,7 @@ SUBROUTINE CGEDMD( JOBS, JOBZ, JOBR, JOBF,  WHTSVD,   &
 !     If on entry LZWORK = -1, then a workspace query is
 !     assumed and the procedure only computes the minimal
 !     and the optimal workspace lengths and returns them in
-!     LZWORK(1) and LZORK(2), respectively.
+!     LZWORK(1) and LZWORK(2), respectively.
 !.....
 !     RWORK (workspace/output) REAL(KIND=WP) LRWORK-by-1 array
 !     On exit, RWORK(1:N) contains the singular values of