Testsuite / External functions: also test coefficients of 2nd order policy function

parent acdca03e
......@@ -52,6 +52,18 @@ end
if max(max(abs(L.oo_.dr.ghx - oo_.dr.ghx))) > 1e-12
error('Failure in external function')
end
if max(max(abs(L.oo_.dr.ghxu - oo_.dr.ghxu))) > 1e-12
error('Failure in external function')
end
if max(max(abs(L.oo_.dr.ghxx - oo_.dr.ghxx))) > 1e-12
error('Failure in external function')
end
if max(max(abs(L.oo_.dr.ghuu - oo_.dr.ghuu))) > 1e-12
error('Failure in external function')
end
if max(max(abs(L.oo_.dr.ghs2 - oo_.dr.ghs2))) > 1e-12
error('Failure in external function')
end
if max(max(abs(L.oo_.var - oo_.var))) > 1e-12
error('Failure in external function')
end
......@@ -52,6 +52,18 @@ end
if max(max(abs(L.oo_.dr.ghx - oo_.dr.ghx))) > 1e-12
error('Failure in external function')
end
if max(max(abs(L.oo_.dr.ghxu - oo_.dr.ghxu))) > 1e-12
error('Failure in external function')
end
if max(max(abs(L.oo_.dr.ghxx - oo_.dr.ghxx))) > 1e-12
error('Failure in external function')
end
if max(max(abs(L.oo_.dr.ghuu - oo_.dr.ghuu))) > 1e-12
error('Failure in external function')
end
if max(max(abs(L.oo_.dr.ghs2 - oo_.dr.ghs2))) > 1e-12
error('Failure in external function')
end
if max(max(abs(L.oo_.var - oo_.var))) > 1e-12
error('Failure in external function')
end
......@@ -54,6 +54,18 @@ end
if max(max(abs(L.oo_.dr.ghx - oo_.dr.ghx))) > 1e-12
error('Failure in external function')
end
if max(max(abs(L.oo_.dr.ghxu - oo_.dr.ghxu))) > 1e-12
error('Failure in external function')
end
if max(max(abs(L.oo_.dr.ghxx - oo_.dr.ghxx))) > 1e-12
error('Failure in external function')
end
if max(max(abs(L.oo_.dr.ghuu - oo_.dr.ghuu))) > 1e-12
error('Failure in external function')
end
if max(max(abs(L.oo_.dr.ghs2 - oo_.dr.ghs2))) > 1e-12
error('Failure in external function')
end
if max(max(abs(L.oo_.var - oo_.var))) > 1e-12
error('Failure in external function')
end
......@@ -54,6 +54,18 @@ end
if max(max(abs(L.oo_.dr.ghx - oo_.dr.ghx))) > 1e-12
error('Failure in external function')
end
if max(max(abs(L.oo_.dr.ghxu - oo_.dr.ghxu))) > 1e-12
error('Failure in external function')
end
if max(max(abs(L.oo_.dr.ghxx - oo_.dr.ghxx))) > 1e-12
error('Failure in external function')
end
if max(max(abs(L.oo_.dr.ghuu - oo_.dr.ghuu))) > 1e-12
error('Failure in external function')
end
if max(max(abs(L.oo_.dr.ghs2 - oo_.dr.ghs2))) > 1e-12
error('Failure in external function')
end
if max(max(abs(L.oo_.var - oo_.var))) > 1e-12
error('Failure in external function')
end
......@@ -52,6 +52,18 @@ end
if max(max(abs(L.oo_.dr.ghx - oo_.dr.ghx))) > 1e-12
error('Failure in external function')
end
if max(max(abs(L.oo_.dr.ghxu - oo_.dr.ghxu))) > 1e-4
error('Failure in external function')
end
if max(max(abs(L.oo_.dr.ghxx - oo_.dr.ghxx))) > 1e-3
error('Failure in external function')
end
if max(max(abs(L.oo_.dr.ghuu - oo_.dr.ghuu))) > 1e-5
error('Failure in external function')
end
if max(max(abs(L.oo_.dr.ghs2 - oo_.dr.ghs2))) > 1e-9
error('Failure in external function')
end
if max(max(abs(L.oo_.var - oo_.var))) > 1e-12
error('Failure in external function')
end
......@@ -52,6 +52,18 @@ end
if max(max(abs(L.oo_.dr.ghx - oo_.dr.ghx))) > 1e-12
error('Failure in external function')
end
if max(max(abs(L.oo_.dr.ghxu - oo_.dr.ghxu))) > 1e-4
error('Failure in external function')
end
if max(max(abs(L.oo_.dr.ghxx - oo_.dr.ghxx))) > 1e-3
error('Failure in external function')
end
if max(max(abs(L.oo_.dr.ghuu - oo_.dr.ghuu))) > 1e-5
error('Failure in external function')
end
if max(max(abs(L.oo_.dr.ghs2 - oo_.dr.ghs2))) > 1e-9
error('Failure in external function')
end
if max(max(abs(L.oo_.var - oo_.var))) > 1e-12
error('Failure in external function')
end
......@@ -52,6 +52,18 @@ end
if max(max(abs(L.oo_.dr.ghx - oo_.dr.ghx))) > 1e-9
error('Failure in external function')
end
if max(max(abs(L.oo_.dr.ghxu - oo_.dr.ghxu))) > 1e-4
error('Failure in external function')
end
if max(max(abs(L.oo_.dr.ghxx - oo_.dr.ghxx))) > 1e-3
error('Failure in external function')
end
if max(max(abs(L.oo_.dr.ghuu - oo_.dr.ghuu))) > 1e-5
error('Failure in external function')
end
if max(max(abs(L.oo_.dr.ghs2 - oo_.dr.ghs2))) > 1e-9
error('Failure in external function')
end
if max(max(abs(L.oo_.var - oo_.var))) > 1e-12
error('Failure in external function')
end
......@@ -52,6 +52,18 @@ end
if max(max(abs(L.oo_.dr.ghx - oo_.dr.ghx))) > 1e-9
error('Failure in external function')
end
if max(max(abs(L.oo_.dr.ghxu - oo_.dr.ghxu))) > 1e-4
error('Failure in external function')
end
if max(max(abs(L.oo_.dr.ghxx - oo_.dr.ghxx))) > 1e-3
error('Failure in external function')
end
if max(max(abs(L.oo_.dr.ghuu - oo_.dr.ghuu))) > 1e-5
error('Failure in external function')
end
if max(max(abs(L.oo_.dr.ghs2 - oo_.dr.ghs2))) > 1e-9
error('Failure in external function')
end
if max(max(abs(L.oo_.var - oo_.var))) > 1e-12
error('Failure in external function')
end
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment