VAR model: How to get bootstrapped 95% prediction interval?

Question

95% prediction interval for the VAR model can be obtained this way (vars library):

library(vars)
data(Canada)

series_mod = wind