fsi_abz_fibs_ds_vecsv_pref_nbc.m

%% For + Inf + Borr + Save, Test Preference *No Default* (Save + Borr Distribution)
% *back to <https://fanwangecon.github.io Fan>'s
% <https://fanwangecon.github.io/CodeDynaAsset/ Dynamic Assets Repository>
% Table of Content.*

%% Common Parameters

% Preference Arrays
ar_fl_beta = [0.94, 0.96, 0.98];
ar_fl_crra = [1, 1.5, 2.0];

% Accuracy
ar_it_a_n = [750];
ar_it_z_n = [15];

% Accuracy
ar_it_a_n_hg = [750, 1250, 2250];
ar_it_z_n_hg = [15, 19, 27];

% Borrowing/Savings Parameters
bl_default = false;
bl_bridge = true;
bl_rollover = true;
fl_b_bd = -20;
fl_c_min = 0.01; % cmin so low default exists but never chosen
fl_r_fsv = 0.02;
fl_r_inf = 0.065;
fl_r_fbr = 0.045;

% which group to simulate
ar_it_test_grp = [5];
it_simu_vec_len = 4;

%% Set Overriding Parameter Map
param_map = containers.Map('KeyType','char', 'ValueType','any');

% Key Borrowing Controls
param_map('bl_default') = bl_default;
param_map('bl_bridge') = bl_bridge;
param_map('bl_rollover') = bl_rollover;

% Key borrowing float controls
param_map('fl_b_bd') = fl_b_bd;
param_map('fl_c_min') = fl_c_min;

% Interest Rate Simulate Controls
param_map('fl_r_fsv') = fl_r_fsv;
param_map('fl_r_inf') = fl_r_inf;
param_map('fl_r_inf_bridge') = fl_r_inf;
param_map('fl_r_fbr') = fl_r_fbr;

%% Set Support Map

support_map = containers.Map('KeyType','char', 'ValueType','any');
% no overriding changes needed

%% Append to Parameter Arrays
param_test_array_map = containers.Map('KeyType','char', 'ValueType','any');
param_test_array_map('ar_fl_crra') = ar_fl_crra;

%% Simulate Model with Discount Low

param_map('fl_beta') = ar_fl_beta(1);
fsi_abz_fibs_ds_vecsv_testmain(param_map, support_map, ar_it_test_grp)

%% Simulate Model with Discount Medium

param_map('fl_beta') = ar_fl_beta(2);
fsi_abz_fibs_ds_vecsv_testmain(param_map, support_map, ar_it_test_grp)

%% Simulate Model with Discount High

param_map('fl_beta') = ar_fl_beta(3);
fsi_abz_fibs_ds_vecsv_testmain(param_map, support_map, ar_it_test_grp)