From dea09fb6ba569614be173e157d18519de313608c Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?=C3=89tienne=20Mollier?= Date: Sun, 3 Jul 2022 09:43:47 +0200 Subject: fix spelling caught by lintian Forwarded: saad *at* cs *dot* umn *dot* edu Last-Update: 2021-02-02 Last-Update: 2021-02-02 Gbp-Pq: Name spelling.patch --- INOUT/inout.f | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/INOUT/inout.f b/INOUT/inout.f index 820c548..da65ca6 100644 --- a/INOUT/inout.f +++ b/INOUT/inout.f @@ -1386,7 +1386,7 @@ c c if can't write the data to the I/O unit specified, should be able to c write everything to standard output (unit 6) c - 1000 write(0, *) 'Error, Can''t write data to sepcified unit',iounit + 1000 write(0, *) 'Error, Can''t write data to specified unit',iounit write(0, *) 'Write the matrix into standard output instead!' ierr = 1 write(6,*) n -- cgit v1.2.3