diff --git a/org/qmckl_mo.org b/org/qmckl_mo.org
index b970152..dd9eca4 100644
--- a/org/qmckl_mo.org
+++ b/org/qmckl_mo.org
@@ -539,7 +539,7 @@ interface
     import
     implicit none
     integer (c_int64_t) , intent(in), value :: context
-    integer (c_int32_t) , intent(in)        :: keep(size_max)
+    integer (c_int32_t) , intent(in)        :: keep(*)
     integer (c_int64_t) , intent(in), value :: size_max
   end function qmckl_mo_basis_select_mo
 end interface