File Exchange

image thumbnail

Merton Structural Credit Model (Matrixwise Solver)

version 1.5 (2.9 KB) by

Matrixwise Calculation Firm Asset Value, Volatility, Debt Value, Spread, Default Prob, Exp-Recovery



View License

Calculates the Value of Firm Assets, Volatility of Firm Assets,
  Debt-Value, Credit-Spread, Default Probability and Recovery Rate as per
  Merton's Structural Credit Model. The value and volatility of firm assets
  are found by Bivariate Newton Root-Finding Method of the Merton
  Simultaneous Equations. The Newton Method is carried out matrixwise
  (i.e. fully vectorised) in a 3d Jacobian so that bivariate ranges of
  (E_t,sig_E,K,T) values may simultaneously calculated. (See Examples)
   Function requires mtimesx.m available on the Matlab File Exchange at
    A_t: Value of Firm's Assets [A_t = Call(K,sig_A,A_t,t,T,r)]
    sig_A: Volatility of Firm's Assets
    D_t: Value of Firm Debt [D_t = pv(K) - Put(K,sig_A,A_t,t,T,r)]
    s: Credit Spread
    p: Default Probability
    R: Expected Recovery
    d: Black-Scholes Parameter Anonymous Function
    E_t: Value of Equity
    sig_E: Equity Volatility
    K: Debt Barrier
    t: Estimation Time (Years)
    T: Maturity Time (Years)
    r: Risk-free-Rate
  Example 1
    T = 5;
    t = 0;
    K = 500;
    sig_E = 0.5;
    r = 0.05;
    E_t = 1200;
    [A_t,sig_A,D_t,s,p,R,d1] = calcMertonModel(E_t,sig_E,K,t,T,r);
  Example 2: Variates (sig_E,E_t)
    t = 0; r = 0.05;
    sig_E = (0.05:0.05:0.8)'; E_t = (100:100:2000)';
    [sig_E,E_t] = meshgrid(sig_E,E_t);
    K = repmat(600,size(sig_E)); T = repmat(5,size(sig_E));
    [A_t,sig_A,D_t,s,p,R,d1] = calcMertonModel(E_t,sig_E,K,t,T,r);
  Example 3: Variates (K,T)
    t = 0; r = 0.05;
    K = (100:100:4000)'; T = (0.1:0.1:10)';
    [K,T] = meshgrid(K,T);
    sig_E = repmat(0.4,size(K)); E_t = repmat(1300,size(K));
    [A_t,sig_A,D_t,s,p,R,d1] = calcMertonModel(E_t,sig_E,K,t,T,r);

Comments and Ratings (16)

Trang Ngo

Hi Mark, first of all I would like to thank you very much for the code as I have been searching for it so long. I just want to ask that when I paste example 1 in my command window, it appears like that: Undefined function or variable 'calcMertonModel'.
I have downloaded both the calcMertonModel.m as well as mtimesx.m already :( Please help me on this issue. I really appreciate it.

Hong Xu

I guess we could add the distance to default in addtion to the default probability.

DTD = -norminv(p, 0, 1)

Hong Xu

Thanks a lot Mark.

Mark Whirdy

Hi Hong

You can replace mtimesx with one of the other methods here.


Hong Xu

hi, thanks for the post. This is great.

Is there a way to go around the error due to not having SDK or C/C++ compiler?

Thanks a lot.



Nick (view profile)

It works fine. The thing was that ''size'' was used by another function. I re-formulated to refer to matrix dimension. Thank you very much again.

Mark Whirdy

Hi Panagiotis,

Thanks for your comments.

I re-downloaded mtimesx and calcMertonModel and recompiled, but am not getting this issue. Its quite odd since line 61 is (as you say) just the pedestrian "size(E_t)" function call. Difficult for me to troubleshoot from here but if you could try

1. Create the variables from the first example. i.e. T = 5;
    t = 0;
    K = 500;
    sig_E = 0.5;
    r = 0.05;
    E_t = 1200;
and then run "size(E_t);" at the command-line. Does it work?

2. Pls put a breakpoint at 61, call "calcMertonModel(E_t,sig_E,K,t,T,r);", hover over E_t variable at 61 at tell me what value it has. Assuming that it is "E_t", then step through 61, Does it work?

3. is there any possibility you have another function called "size" in folder on your pathdef (or in current directory) which is being preferentially called above the normal function?


Nick (view profile)

First of all, you did an excellent work. Welldone.

I downloaded SDK 7.1, I set up the compiler and then I ran mtimesx_build (... mex mtimesx.c build completed ... you may now use mtimesx).

If I understand right, the next step is to run calcMertonModel.m as it is, without making any adjustments to the script. However, when I run it using the data from example 1 I get this:
Error using calcMertonModel (line 61)
Not enough input arguments.
Line 61 is the command [n,m] = size(E_t), which I guess creates a matrix of dimension equal to the market value of equity. Any help on how to proceed?

Mark Whirdy

There is a bug with Microsoft's SDK 7.1 which Matlab have provided a troubleshoot for at

Hope this helps

Mark Whirdy

Hi Joacim - possible incompatability between the compiler you installed and the version of matlab?


Joacim (view profile)

Im trying to follow the instructions in a previous comment, setting up mtimesx, but it wont work. It seems like Matlab can't find any compliers even though I installed them, any suggestions on what to do?


Hannes (view profile)

user-friendly and fast calculating implementation of the Merton model.
fast adaptable and convenient for sensitivty analysis


Jung (view profile)

Mark Whirdy

To get mtimesx working, type

mex -setup

Select a compiler, [1] is the C compiler shipped with Matlab and will do

Then run


 which will create a .mex32 file in your path. This is Matlabs "interface" to the C code

Henok Tewolde

I really don't know why I am getting this error

Error using mtimesx_build (line 169)
A C/C++ compiler has not been selected with mex -setup


Jaeho (view profile)

This model is excellent! Very flexible and user-friendly. It's been very useful for calculating credit spreads of bonds with different asset values, and volatilities.



Removed fsolve dependency (Optim Toolbox) for efficiency increase (even in scalar inputs case)

Full Code re-factorization to facilitate matrixwise calculation of bivariate ranges of {E_t,sig_E,K,T} values using 3d Newton Jacobian solution.


Added the Black-Scholes Parameter Anonymous Function Handle as an Output to allow for further analysis (sensitivity, greeks etc)

d = @(z,A_t,sig_A,T,t,K,r)((1/(sig_A*sqrt(T-t)))*(log(A_t/K) + (r + (z)*0.5*sig_A^2)*(T-t)));

z = +1/-1


Minor code refactoring, code returns the Black-Scholes Parameter to allow for further sensitivity analysis & calculation of greeks

d = @(z,A_t,sig_A,T,t,K,r)
z=+1/-1 for Call/Put


Added Expected-Recovery calclulation

[A_t,sig_A,D_t,s,p,R] = calcMertonModel(E_t,sig_E,K,t,T,r);

MATLAB Release
MATLAB 7.12 (R2011a)

Download apps, toolboxes, and other File Exchange content using Add-On Explorer in MATLAB.

» Watch video