-
Notifications
You must be signed in to change notification settings - Fork 4
/
Mosaic_WaterResources_exe.gms
19 lines (10 loc) · 1.09 KB
/
Mosaic_WaterResources_exe.gms
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
*Water resources
WR(t,c) = min(WR_par_cntry(c,"Alpha_water")*Y_pc("2010",c)* (1- Tau_water)**(t.val-2000)*(Y_pc(t,c)/Y_pc("2010",c))**Beta_water*(Pop(t,c)/Pop("2010", c)**N_water*(MAT(t)/1.0)**gamma_water)
, Y_pc(t,c)/10 );
*Tropical Storms
TD(t,c) = WR_par_cntry(c,"Alpha_tropstorm") * Y_net(t,c) * ((Y_pc(t,c)/Y_pc("2010",c))**epsilon_trop_storm) * [(1+ delta_trop_storm * temp_change_from_preind_national(t,c))**gamma_trop_storm -1] ;
TM(t,c) = WR_par_cntry(c,"Beta_trop_storm")* P_dens(t,c) * ((Y_pc(t,c)/Y_pc("2010",c))**eta_trop_storm) * [(1+ delta_trop_storm * temp_change_from_preind_national(t,c))**gamma_trop_storm -1] ;
*Etrop Storms
ETD(t,c) = WR_par_cntry(c,"alpha_etrop_storm") * Y_net(t,c) * ((Y_pc(t,c)/Y_pc("2010",c))**epsilon_etrop_storm) * WR_par_cntry(c,"delta_etrop_storm") * [(CO2_ppm(t)/CO2_pre)**gamma_etrop_storm -1] ;
ETM(t,c) = WR_par_cntry(c,"beta_etrop_storm") * P_dens(t,c) * ((Y_pc(t,c)/Y_pc("2010",c))** psi_etrop_storm) * WR_par_cntry(c,"delta_etrop_storm") * [(CO2_ppm(t)/CO2_pre)**gamma_etrop_storm -1] ;
* both percent of GDP, dollar amount of GDP;