diff --git a/src/qmckl_error.org b/src/qmckl_error.org
index 35d9ee6..595814f 100644
--- a/src/qmckl_error.org
+++ b/src/qmckl_error.org
@@ -184,7 +184,7 @@ void qmckl_string_of_error(qmckl_exit_code error, char string[<<MAX_STRING_LENGT
      type (c_ptr) function qmckl_string_of_error (error, string) bind(C)
        use, intrinsic :: iso_c_binding
        integer (c_int32_t), intent(in), value        :: error
-       character*(<<MAX_STRING_LENTH()>>), intent(out) :: string
+       character*(<<MAX_STRING_LENGTH()>>), intent(out) :: string
      end function qmckl_string_of_error
   end interface
   #+end_src