mathematica to matlab convert

Good evening sir,

anyone please convert this mathematica code to matlab.

mathematica code

Clear[c]

ClearAll[f]

f[c_, x_] := m + Subscript[b, 0]*x + Subscript[a, 0]*x^2 ;

Subscript[a, 0] = v β μ ω;

Subscript[b, 0] = β (μ ω - ϵ v A (μ + δ));

m = μ (μ + δ) (μ + γ) (μ + ϵ) (1 - c);

ω = γ (μ + ϵ + δ) + (μ + γ) (μ + ϵ);

v = 0.000056;

A = 10;

μ = 0.000365;

β = 0.000001473197393;

ϵ = 0.3;

γ = 0.04;

δ = 0.2;

ContourPlot[{ConditionalExpression[

f[c, x], (D[f[c, t], t] /. t -> x) <= 0] == 0,

ConditionalExpression[f[c, x], (D[f[c, t], t] /. t -> x) > 0] ==

0}, {c, 0, 1.5

}, {x, 0, 50000},

ContourStyle -> {Directive[Blue, Thick], Directive[Red, Thick]},

PlotLegends -> {Style[("D[f[c, x], x] ≤ 0"), 18, "Panel"],

Style[("D[f[c, x], x] > 0"), 18, "Panel"]}]

which is from