## -----------------------------------------------------------------------------
library(riskweightedassets)
sme_supporting_factor(5000000)
infrastructure_supporting_factor()
apply_credit_supporting_factors(1000000, 0.80595, 0.75)
irb_risk_weighted_assets(1000000, 0.08, 0.80595, 0.75)