move E_threshold definition, remove accounting of government bonds from commercial bank

Author: AldoGl

src/agent_actions/bank_accounting.jl

@@ -19,7 +19,7 @@ function bank_accounting!(bank::AbstractBank, model::AbstractModel)
     cap_firms = model.capital_firms
 
     # update profits from government loans
-    bank.profitsB += model.gov.bond_interest_rate * model.gov.bonds
+    # bank.profitsB += model.gov.bond_interest_rate * model.gov.bonds
 
     #pay dividends
     div_B = 0.3

src/agent_actions/government.jl

@@ -21,10 +21,7 @@ function gov_accounting!(gov::AbstractGovernment, model::AbstractModel)
 
     gov.GB -= gov.bond_interest_rate * gov.bonds # - model.EXP # public expenditure to corporate sector is zero now
     gov.stock_bonds = model.gov.stock_bonds - gov.GB
-    model.bank.loans += min(0, gov.GB) # add new loans
     gov.bonds = max(0, model.gov.stock_bonds)
-
-
     gov.deficitGDP = -gov.GB / model.agg.Y_nominal_tot
 
 end

src/model_init/init.jl

@@ -27,7 +27,6 @@ function initialise_model(W, F, N; params = ABCredit.PARAMS_ORIGINAL)
     params[:init_price_k] = 3.0
     params[:init_K] = 10.0
     params[:maastricht] = false
-    params[:E_threshold_scale] = 0.0
 
     workers = ABCredit.initialise_workers(params)
 

src/params/standard_params.jl

@@ -45,7 +45,8 @@ const PARAMS_ORIGINAL = Dict(
     #hard coded parameters
     :wb => 1.0,                #initial wage rate
     :tax_rate_d => 0.00,      #taxes on dividends (set to zero)
-    :r_f => 0.01,           #general refinancing rate
+    :r_f => 0.01,            #general refinancing rate
+    :E_threshold_scale => 0.0 
 )
 
 par[to_be] = estimated
@@ -88,6 +89,7 @@ const PARAMS_GRAZZINI = Dict(
     :wb => 1.0,                #initial wage rate
     :tax_rate_d => 0.00,      #taxes on dividends (set to zero)
     :r_f => 0.01,           #general refinancing rate
+    :E_threshold_scale => 0.0 
 )