/// <summary>
/// Modify the pv and cash taking the date of default into account.
/// </summary>
protected void GetDefaultValue(double baseDate, double valueDate, Vector defaultDate, IInflationRate inflationRate, IPriceIndexVolatility indexVolatility, IInterestRate repo, Vector pv, Vector cash)
{
IInflationCashflowListDeal deal = (IInflationCashflowListDeal)Deal;
double settlementDate = deal.Settlement_Date;
double t = CalcUtils.DaysToYears(valueDate - baseDate);
double buySellSign = deal.Buy_Sell == BuySell.Buy ? 1.0 : -1.0;
if (repo == null)
{
repo = fDiscountRate;
}
using (var cache = Vector.CacheLike(pv))
{
Vector principal = cache.Get();
GetCurrentExposure(principal, t, valueDate, inflationRate);
// Approximation: recover only principal, neglecting accrued interest.
Vector recovery = cache.Get(buySellSign * principal * fRecoveryRate.Get(t));
if (valueDate <= settlementDate)
{
// Set the pv to (recovery - |settlementAmount|) * df when defaultDate <= valueDate <= settlementDate.
// Set cash to (recovery - |settlementAmount|) when defaultDate <= valueDate = settlementDate (cash is always zero before settlementDate).
// Note that GetSettlementAmount(...) will return a negative value for a long bond position, indicating an outgoing cashflow.
double tSettle = CalcUtils.DaysToYears(settlementDate - baseDate);
Vector settlementAmount = cache.Get();
GetSettlementAmount(settlementAmount, valueDate, baseDate, inflationRate, indexVolatility);
settlementAmount.MultiplyBy(buySellSign);
Vector hasDefaulted = cache.Get(defaultDate <= valueDate);
pv.AssignConditional(hasDefaulted, repo.Get(t, tSettle) * (recovery + settlementAmount), pv);
if (cash != null && valueDate == settlementDate)
{
cash.AssignConditional(hasDefaulted, pv, cash);
}
}
else
{
// after settlement date
recovery.MultiplyBy(defaultDate >= valueDate); // set to zero if already defaulted
Vector notDefaulted = cache.Get(defaultDate > valueDate);
pv.AssignConditional(notDefaulted, pv, recovery);
if (cash != null)
{
cash.AssignConditional(notDefaulted, cash, recovery);
}
}
}
}
/// <summary>
/// Modify the pv and cash taking the date of default into account.
/// </summary>
public override void GetDefaultValue(double baseDate, double valueDate, Vector defaultDate, RecoveryRate recoveryRate, Vector pv, Vector cash)
{
var deal = (CFFloatingInterestListDeal)Deal;
double principal = GetPrincipal(fCashflows, valueDate);
double settlementDate = deal.Settlement_Date;
double t = CalcUtils.DaysToYears(valueDate - baseDate);
using (var cache = Vector.CacheLike(pv))
{
// Approximation: recover only principal, neglecting accrued interest
Vector recovery = cache.Get(fBuySellSign * principal * recoveryRate.Get(t));
if (valueDate <= settlementDate)
{
// Set the pv to (recovery - settlementAmount) * df when defaultDate <= valueDate <= settlementDate.
// Set cash to (recovery - settlementAmount) when defaultDate <= valueDate = settlementDate (cash is always zero before settlementDate).
double tSettle = CalcUtils.DaysToYears(settlementDate - baseDate);
Vector settlementAmount = cache.GetClear();
if (deal.Settlement_Amount_Is_Clean == YesNo.Yes)
{
fCashflows.CalculateAccrual(settlementAmount, baseDate, settlementDate, false, deal.AccrualHolidayCalendar(), fForecastRate);
}
settlementAmount.Add(deal.Settlement_Amount);
Vector hasDefaulted = cache.Get(defaultDate <= valueDate);
pv.AssignConditional(hasDefaulted, fRepoRate.Get(t, tSettle) * (recovery - fBuySellSign * settlementAmount), pv);
if (cash != null && valueDate == settlementDate)
{
cash.AssignConditional(hasDefaulted, pv, cash);
}
}
else
{
// after settlement date
recovery.MultiplyBy(defaultDate >= valueDate); // set to zero if already defaulted
Vector notDefaulted = cache.Get(defaultDate > valueDate);
pv.AssignConditional(notDefaulted, pv, recovery);
if (cash != null)
{
cash.AssignConditional(notDefaulted, cash, recovery);
}
}
}
}
/// <summary>
/// Modify the pv and cash taking the date of default into account.
/// </summary>
public override void GetDefaultValue(double baseDate, double valueDate, Vector defaultDate, RecoveryRate recoveryRate, Vector pv, Vector cash)
{
CFFixedInterestListDeal deal = (CFFixedInterestListDeal)fDeal;
double principal = GetPrincipal(deal.Cashflows, valueDate);
double settlementDate = deal.Settlement_Date;
double t = CalcUtils.DaysToYears(valueDate - baseDate);
using (var cache = Vector.CacheLike(pv))
{
// Approximation: recover only principal, neglecting accrued interest
Vector recovery = cache.Get(fBuySellSign * principal * recoveryRate.Get(t));
if (valueDate <= settlementDate)
{
// Set the pv to (recovery - settlementAmount) * df when defaultDate <= valueDate <= settlementDate.
// Set cash to (recovery - settlementAmount) when defaultDate <= valueDate = settlementDate (cash is always zero before settlementDate).
double tSettle = CalcUtils.DaysToYears(settlementDate - baseDate);
double settlementAmount = fBuySellSign * fSettlementAmount;
Vector hasDefaulted = cache.Get(defaultDate <= valueDate);
pv.AssignConditional(hasDefaulted, fRepoRate.Get(t, tSettle) * (recovery - settlementAmount), pv);
if (cash != null && valueDate == settlementDate)
{
cash.AssignConditional(hasDefaulted, pv, cash);
}
}
else
{
// after settlement date
recovery.MultiplyBy(defaultDate >= valueDate); // set to zero if already defaulted
Vector notDefaulted = cache.Get(defaultDate > valueDate);
pv.AssignConditional(notDefaulted, pv, recovery);
if (cash != null)
{
cash.AssignConditional(notDefaulted, cash, recovery);
}
}
}
}
