procedure outin(s)
    suspend s[1]
	suspend outin(reverse(s[2:0]))
end