Skip to content

Commit

Permalink
Remove 'module'
Browse files Browse the repository at this point in the history
  • Loading branch information
minhqdao committed Jul 30, 2024
1 parent 3a90b66 commit 961d80e
Showing 1 changed file with 1 addition and 1 deletion.
2 changes: 1 addition & 1 deletion src/stdlib_array.fypp
Original file line number Diff line number Diff line change
Expand Up @@ -45,7 +45,7 @@ contains
#:for k1, t1 in KINDS_TYPES
#:for rank in RANKS
!> Allocate an instance of the array within the wrapper.
module subroutine allocate_array_${t1[0]}$${k1}$_${rank}$(wrapper, array, stat, msg)
subroutine allocate_array_${t1[0]}$${k1}$_${rank}$(wrapper, array, stat, msg)
class(t_array_wrapper), intent(out) :: wrapper
${t1}$, intent(in) :: array${ranksuffix(rank)}$
integer, intent(out) :: stat
Expand Down

0 comments on commit 961d80e

Please sign in to comment.