From 587fdfaf76eb89704fe69ac495a5171a265f49d6 Mon Sep 17 00:00:00 2001 From: Ryan Schmidt Date: Tue, 8 Feb 2022 19:13:59 -0600 Subject: [PATCH] tester.f90: Fix typo in message --- tester.f90 | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/tester.f90 b/tester.f90 index adf2ca7..ad8fb8d 100644 --- a/tester.f90 +++ b/tester.f90 @@ -14,7 +14,7 @@ write(*,*) 'If the return value interface is fixed, none of these values will' write(*,*) 'be zero, nor will they be nonsensically large or small. On the' write(*,*) 'other hand, if the translation is incorrect, it is more likely' -write(*,*) 'that this program will carsh.' +write(*,*) 'that this program will crash.' write(*,*) ' ' write(*,*) sdot(6,a(1,:),1,a(2,:),1), sdsdot(6,2.0,a(1,:),1,a(2,:),1), &