shift_recent_tokens Subroutine

public subroutine shift_recent_tokens(token, token_len, t1, t1_len, t2, t2_len, t3, t3_len)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*),	intent(in)			::	token
integer,	intent(in)			::	token_len
character(len=*),	intent(inout)			::	t1
integer,	intent(inout)			::	t1_len
character(len=*),	intent(inout)			::	t2
integer,	intent(inout)			::	t2_len
character(len=*),	intent(inout)			::	t3
integer,	intent(inout)			::	t3_len