Monetary Policy shock in BGG model

Hi,
I got the code for the BGG model and I have simulated it. However, the results for the monetary policy shock seems off since and increase in the policy rate caused output (y) to increase. Can anyone help? I have attached the file. Thanks.

In the model block of the provided code you have the following:
rn = rhorn(-1) + sigpi(-1) - e_rn.

A 1 standard deviation interest rate shock would thus cause the interest rate to fall which would lead to an increase in output. Note the sign of the exogenous error term in the policy equation. Hope this helps.

Thank you adraine.
Carol