Fix obviously incorrect comment

This commit is contained in:
sgeard 2023-06-14 19:46:06 +01:00
parent 0c4de80faa
commit 4b880d7718

View file

@ -36,7 +36,7 @@ program hp15c
type(rpn_t) :: mem(0:9) = rpn_t() type(rpn_t) :: mem(0:9) = rpn_t()
! Create a stack of size 4 ! Create a stack of size 5
type(stack_t(5)) :: stack type(stack_t(5)) :: stack
call stack%set_legend(['x:','y:','z:','s:','t:']) call stack%set_legend(['x:','y:','z:','s:','t:'])