diff --git a/src/templates_front/templator_front.org b/src/templates_front/templator_front.org index 78085c4..ffdf6d1 100644 --- a/src/templates_front/templator_front.org +++ b/src/templates_front/templator_front.org @@ -1683,7 +1683,7 @@ interface use, intrinsic :: iso_c_binding integer(8), intent(in), value :: trex_file character, intent(in) :: dset(*) - integer(4), intent(in) :: max_str_len + integer(4), intent(in), value :: max_str_len end function trexio_write_$group_dset$ end interface #+end_src @@ -1694,7 +1694,7 @@ interface use, intrinsic :: iso_c_binding integer(8), intent(in), value :: trex_file character, intent(out) :: dset(*) - integer(4), intent(in) :: max_str_len + integer(4), intent(in), value :: max_str_len end function trexio_read_$group_dset$ end interface #+end_src @@ -1841,7 +1841,7 @@ interface use, intrinsic :: iso_c_binding integer(8), intent(in), value :: trex_file character, intent(in) :: str(*) - integer(4), intent(in) :: max_str_len + integer(4), intent(in), value :: max_str_len end function trexio_write_$group_str$ end interface #+end_src @@ -1852,7 +1852,7 @@ interface use, intrinsic :: iso_c_binding integer(8), intent(in), value :: trex_file character, intent(out) :: str(*) - integer(4), intent(in) :: max_str_len + integer(4), intent(in), value :: max_str_len end function trexio_read_$group_str$ end interface #+end_src