Skip to content
GitLab
Explore
Sign in
Primary navigation
Search or go to…
Project
C
computergrafik-03
Manage
Activity
Members
Labels
Plan
Issues
Issue boards
Milestones
Wiki
Code
Merge requests
Repository
Branches
Commits
Tags
Repository graph
Compare revisions
Snippets
Deploy
Releases
Package registry
Container registry
Model registry
Operate
Terraform modules
Monitor
Incidents
Analyze
Value stream analytics
Contributor analytics
Repository analytics
Model experiments
Help
Help
Support
GitLab documentation
Compare GitLab plans
GitLab community forum
Contribute to GitLab
Provide feedback
Keyboard shortcuts
?
Snippets
Groups
Projects
Show more breadcrumbs
Temple
computergrafik-03
Commits
a77daa69
Unverified
Commit
a77daa69
authored
Jun 29, 2022
by
Jamie Temple
Browse files
Options
Downloads
Patches
Plain Diff
2d weird
parent
f0d27078
No related branches found
No related tags found
No related merge requests found
Changes
1
Show whitespace changes
Inline
Side-by-side
Showing
1 changed file
tests/Integrators.test.ts
+181
-94
181 additions, 94 deletions
tests/Integrators.test.ts
with
181 additions
and
94 deletions
tests/Integrators.test.ts
+
181
−
94
View file @
a77daa69
...
...
@@ -30,6 +30,34 @@ function write_table(result: Array<number>, exact: Array<number>, error: Array<n
fs
.
writeFileSync
(
`data_
${
title
}
.txt`
,
table_string
);
}
function
write_table_2d
(
result
:
Array
<
Array
<
number
>>
,
exact
:
Array
<
Array
<
number
>>
,
error
:
Array
<
Array
<
number
>>
,
h_list
:
Array
<
number
>
,
title
:
string
,
decimal_places
:
number
,
error_list
?:
Array
<
number
>
):
void
{
let
format_number
=
(
number
:
number
,
decimal_places
:
number
):
string
=>
Number
(
number
).
toFixed
(
decimal_places
);
let
table
=
[[
"
h
"
,
"
exact
"
,
"
result
"
,
"
error
"
,
"
error_estimated
"
]];
for
(
let
i
=
0
;
i
<
result
.
length
;
i
++
)
{
table
.
push
([
format_number
(
h_list
[
i
],
decimal_places
),
exact
[
i
].
map
(
e
=>
format_number
(
e
,
decimal_places
)).
join
(
"
,
"
),
result
[
i
].
map
(
e
=>
format_number
(
e
,
decimal_places
)).
join
(
"
,
"
),
error
[
i
].
map
(
e
=>
format_number
(
e
,
decimal_places
)).
join
(
"
,
"
),
(
error_list
?
format_number
(
error_list
[
i
],
decimal_places
)
:
"
n/a
"
)
]);
}
let
table_string
=
""
;
for
(
let
i
=
0
;
i
<
table
.
length
;
i
++
)
{
for
(
let
j
=
0
;
j
<
table
[
i
].
length
;
j
++
)
{
table_string
+=
table
[
i
][
j
];
if
(
j
<
table
[
i
].
length
-
1
)
table_string
+=
"
|
"
;
}
table_string
+=
"
\n
"
;
}
fs
.
writeFileSync
(
`data_
${
title
}
.txt`
,
table_string
);
}
function
calculate_error
(
result
:
Array
<
number
>
,
exact
:
Array
<
number
>
):
Array
<
number
>
{
let
error
:
Array
<
number
>
=
[];
for
(
let
i
=
0
;
i
<
result
.
length
;
i
++
)
{
...
...
@@ -38,131 +66,190 @@ function calculate_error(result: Array<number>, exact: Array<number>): Array<num
return
error
;
}
interface
Result
{
exact
:
Array
<
number
>
;
estimate
:
Array
<
number
>
;
error
:
Array
<
number
>
;
function
calculate_error_2d
(
result
:
Array
<
Array
<
number
>>
,
exact
:
Array
<
Array
<
number
>>
):
Array
<
Array
<
number
>>
{
let
error
:
Array
<
Array
<
number
>>
=
[];
for
(
let
i
=
0
;
i
<
result
.
length
;
i
++
)
{
error
.
push
([]);
for
(
let
j
=
0
;
j
<
result
[
i
].
length
;
j
++
)
{
error
[
i
].
push
(
Math
.
abs
(
result
[
i
][
j
]
-
exact
[
i
][
j
]));
}
// exact solution
function
g
(
x
:
number
):
number
{
return
2
*
math
.
exp
(
-
0.5
*
x
);
};
// differential equation
function
f
(
x
:
Array
<
number
>
):
Array
<
number
>
{
return
[
-
0.5
*
x
[
0
]];
}
return
error
;
}
// INTERVAL CHECK
const
x_max
=
2
const
error_max
=
0.
0
1
;
const
error_max
=
0.1
;
const
error_acc
=
0.8
;
// 80% of error_estimates are less then max_error
// FIXED STEP SIZE
function
fixed_step_size
(
integrator
:
(
x
:
Array
<
number
>
,
h
:
number
,
f
:
(
x
:
Array
<
number
>
)
=>
Array
<
number
>
)
=>
Array
<
number
>
,
h
:
number
,
f
:
(
x
:
Array
<
number
>
)
=>
Array
<
number
>
,
name
:
string
):
void
{
// ------------------------------------------------------------------------------------------------
function
eval_1d_integrator
(
integrator
:
(
x
:
Array
<
number
>
,
h
:
number
,
f
:
(
x
:
Array
<
number
>
)
=>
Array
<
number
>
)
=>
Array
<
number
>
,
h
:
number
,
f
:
(
x
:
Array
<
number
>
)
=>
Array
<
number
>
,
g
:
(
x
:
number
)
=>
Array
<
number
>
,
name
:
string
,
adaptive
:
boolean
=
false
):
void
{
let
h_list
:
Array
<
number
>
=
[];
let
error_list
:
Array
<
number
>
=
[];
let
result
:
Result
=
{
exact
:
[],
estimate
:
[],
error
:
[]
};
let
exact
:
Array
<
number
>
=
[];
let
estimate
:
Array
<
number
>
=
[];
let
error
:
Array
<
number
>
=
[];
h_list
.
push
(
0
);
let
h_accum
=
h
;
result
.
estimate
.
push
(
g
(
h_list
[
0
]));
estimate
.
push
(
g
(
h_list
[
0
])
[
0
]
);
while
(
h_accum
<
x_max
)
{
let
tmp
=
integrator
([
result
.
estimate
[
result
.
estimate
.
length
-
1
]],
h
,
f
);
result
.
estimate
.
push
(
tmp
[
0
]);
h_list
.
push
(
h_accum
);
if
(
adaptive
)
{
h
=
Integrator
.
Adaptive_step_size
(
integrator
,
[
estimate
[
estimate
.
length
-
1
]],
h
,
f
,
error_max
,
(
adaptive
)
?
error_list
:
undefined
);
}
estimate
.
push
(
integrator
([
estimate
[
estimate
.
length
-
1
]],
h
,
f
)[
0
]);
h_accum
+=
h
;
h_list
.
push
(
h_accum
);
}
for
(
let
i
=
0
;
i
<
h_list
.
length
;
i
++
)
{
result
.
exact
.
push
(
g
(
h_list
[
i
]));
exact
.
push
(
g
(
h_list
[
i
])
[
0
]
);
}
result
.
error
=
calculate_error
(
result
.
estimate
,
result
.
exact
);
error
=
calculate_error
(
estimate
,
exact
);
write_table
(
result
.
estimate
,
result
.
exact
,
result
.
error
,
h_list
,
name
,
10
);
write_table
(
estimate
,
exact
,
error
,
h_list
,
name
,
10
,
error_list
);
result
.
error
.
forEach
(
e
=>
{
if
(
adaptive
)
{
let
error_correct_estimate
=
0
;
error_list
.
forEach
(
e
=>
{
if
(
e
<
error_max
)
error_correct_estimate
++
;
});
expect
(
error_correct_estimate
/
error_list
.
length
).
toBeGreaterThan
(
error_acc
);
}
else
{
error
.
forEach
(
e
=>
{
expect
(
e
).
toBeLessThan
(
1
);
});
}
}
describe
(
"
One-dimensional integration
"
,
()
=>
{
// exact solution
function
g
(
x
:
number
):
Array
<
number
>
{
return
[
2
*
math
.
exp
(
-
0.5
*
x
)];
};
// differential equation
function
f
(
x
:
Array
<
number
>
):
Array
<
number
>
{
return
[
-
0.5
*
x
[
0
]];
}
function
adaptive_step_size
(
integrator
:
(
x
:
Array
<
number
>
,
h
:
number
,
f
:
(
x
:
Array
<
number
>
)
=>
Array
<
number
>
)
=>
Array
<
number
>
,
h
:
number
,
f
:
(
x
:
Array
<
number
>
)
=>
Array
<
number
>
,
name
:
string
):
void
{
describe
(
"
Euler
"
,
()
=>
{
it
(
"
Fixed step size
"
,
()
=>
{
eval_1d_integrator
(
Integrator
.
Euler
,
0.1
,
f
,
g
,
"
Euler-Fixed
"
);
});
it
(
"
Adaptive step size
"
,
()
=>
{
eval_1d_integrator
(
Integrator
.
Euler
,
0.1
,
f
,
g
,
"
Euler-Adaptive
"
,
true
);
});
})
describe
(
"
Midpoint
"
,
()
=>
{
it
(
"
Fixed step size
"
,
()
=>
{
eval_1d_integrator
(
Integrator
.
Midpoint
,
0.1
,
f
,
g
,
"
Midpoint-Fixed
"
);
});
it
(
"
Adaptive step size
"
,
()
=>
{
eval_1d_integrator
(
Integrator
.
Midpoint
,
0.1
,
f
,
g
,
"
Midpoint-Adaptive
"
,
true
);
});
});
describe
(
"
Runge-Kutta
"
,
()
=>
{
it
(
"
Fixed step size
"
,
()
=>
{
eval_1d_integrator
(
Integrator
.
Runge_Kutta
,
0.1
,
f
,
g
,
"
Runge-Kutta-Fixed
"
);
});
it
(
"
Adaptive step size
"
,
()
=>
{
eval_1d_integrator
(
Integrator
.
Runge_Kutta
,
0.1
,
f
,
g
,
"
Runge-Kutta-Adaptive
"
,
true
);
});
})
});
// ------------------------------------------------------------------------------------------------
function
eval_2d_integrator
(
integrator
:
(
x
:
Array
<
number
>
,
h
:
number
,
f
:
(
x
:
Array
<
number
>
)
=>
Array
<
number
>
)
=>
Array
<
number
>
,
h
:
number
,
f
:
(
x
:
Array
<
number
>
)
=>
Array
<
number
>
,
g
:
(
x
:
number
)
=>
Array
<
number
>
,
name
:
string
,
adaptive
:
boolean
=
false
):
void
{
let
h_list
:
Array
<
number
>
=
[];
let
error_list
:
Array
<
number
>
=
[];
let
result
:
Result
=
{
exact
:
[],
estimate
:
[],
error
:
[]
};
let
error
:
Array
<
Array
<
number
>>
=
[];
let
exact
:
Array
<
Array
<
number
>>
=
[];
let
estimate
:
Array
<
Array
<
number
>>
=
[];
h_list
.
push
(
0
);
let
h_accum
=
h
;
result
.
estimate
.
push
(
g
(
h_list
[
0
]));
estimate
.
push
(
g
(
h_list
[
0
]));
while
(
h_accum
<
x_max
)
{
h
=
Integrator
.
Adaptive_step_size
(
integrator
,
[
result
.
estimate
[
result
.
estimate
.
length
-
1
]],
h
,
f
,
error_max
,
error_list
);
result
.
estimate
.
push
(
integrator
([
result
.
estimate
[
result
.
estimate
.
length
-
1
]],
h
,
f
)[
0
]);
if
(
adaptive
)
{
h
=
Integrator
.
Adaptive_step_size
(
integrator
,
estimate
[
estimate
.
length
-
1
],
h
,
f
,
error_max
,
(
adaptive
)
?
error_list
:
undefined
);
}
estimate
.
push
(
integrator
(
estimate
[
estimate
.
length
-
1
],
h
,
f
));
h_accum
+=
h
;
h_list
.
push
(
h_accum
);
}
for
(
let
i
=
0
;
i
<
h_list
.
length
;
i
++
)
{
result
.
exact
.
push
(
g
(
h_list
[
i
]));
exact
.
push
(
g
(
h_list
[
i
]));
}
result
.
error
=
calculate_error
(
result
.
estimate
,
result
.
exact
);
write_table
(
result
.
estimate
,
result
.
exact
,
result
.
error
,
h_list
,
name
,
10
,
error_list
);
error
=
calculate_error_2d
(
estimate
,
exact
);
let
error_correct_estimate
=
0
;
error_list
.
forEach
(
e
=>
{
if
(
e
<
error_max
)
error_correct_estimate
++
;
});
write_table_2d
(
estimate
,
exact
,
error
,
h_list
,
name
,
5
,
error_list
);
expect
(
error_correct_estimate
/
error_list
.
length
).
toBeGreaterThan
(
error_acc
);
}
describe
(
"
Mulit-dimensional integration
"
,
()
=>
{
const
a
=
[
0
,
9.81
];
const
p0
=
[
0
,
0
];
const
v0
=
[
1
,
1
];
// ------------------------------------------------------------------------------------------------
// exact solution
function
g
(
t
:
number
):
Array
<
number
>
{
return
[
a
[
0
]
/
2
*
t
*
t
+
v0
[
0
]
*
t
+
p0
[
0
],
a
[
1
]
/
2
*
t
*
t
+
v0
[
1
]
*
t
+
p0
[
1
],
a
[
0
]
*
t
+
v0
[
0
],
a
[
1
]
*
t
+
v0
[
1
]];
}
describe
(
"
Euler
"
,
()
=>
{
// differential equation
function
f
(
x
:
Array
<
number
>
):
Array
<
number
>
{
return
[
x
[
2
],
x
[
3
],
a
[
0
],
a
[
1
]];
}
describe
(
"
Euler
"
,
()
=>
{
it
(
"
Fixed step size
"
,
()
=>
{
fixed_step_size
(
Integrator
.
Euler
,
0.1
,
f
,
"
Euler-Fixed
"
);
eval_2d_integrator
(
Integrator
.
Euler
,
0.1
,
f
,
g
,
"
2D-
Euler-Fixed
"
);
});
it
(
"
Adaptive step size
"
,
()
=>
{
adaptive_step_size
(
Integrator
.
Euler
,
0.1
,
f
,
"
Euler-Adaptive
"
);
eval_2d_integrator
(
Integrator
.
Euler
,
0.1
,
f
,
g
,
"
2D-
Euler-Adaptive
"
,
true
);
});
})
describe
(
"
Midpoint
"
,
()
=>
{
it
(
"
Fixed step size
"
,
()
=>
{
fixed_step_size
(
Integrator
.
Midpoint
,
0.1
,
f
,
"
Midpoint-Fixed
"
);
eval_2d_integrator
(
Integrator
.
Midpoint
,
0.1
,
f
,
g
,
"
2D-
Midpoint-Fixed
"
);
});
it
(
"
Adaptive step size
"
,
()
=>
{
adaptive_step_size
(
Integrator
.
Midpoint
,
0.1
,
f
,
"
Midpoint-Adaptive
"
);
eval_2d_integrator
(
Integrator
.
Midpoint
,
0.1
,
f
,
g
,
"
2D-
Midpoint-Adaptive
"
,
true
);
});
});
describe
(
"
Runge-Kutta
"
,
()
=>
{
it
(
"
Fixed step size
"
,
()
=>
{
fixed_step_size
(
Integrator
.
Runge_Kutta
,
0.1
,
f
,
"
Runge-Kutta-Fixed
"
);
eval_2d_integrator
(
Integrator
.
Runge_Kutta
,
0.1
,
f
,
g
,
"
2D-
Runge-Kutta-Fixed
"
);
});
it
(
"
Adaptive step size
"
,
()
=>
{
adaptive_step_size
(
Integrator
.
Runge_Kutta
,
0.1
,
f
,
"
Runge-Kutta-Adaptive
"
);
eval_2d_integrator
(
Integrator
.
Runge_Kutta
,
0.1
,
f
,
g
,
"
2D-Runge-Kutta-Adaptive
"
,
true
);
});
});
});
})
\ No newline at end of file
This diff is collapsed.
Click to expand it.
Preview
0%
Loading
Try again
or
attach a new file
.
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Save comment
Cancel
Please
sign in
to comment