use num_traits::AsPrimitive;
pub fn eval<Real, const N: usize>(
p0: &nalgebra::SVector<Real, N>,
p1: &nalgebra::SVector<Real, N>,
p2: &nalgebra::SVector<Real, N>,
p3: &nalgebra::SVector<Real, N>,
t0: Real,
) -> nalgebra::SVector<Real, N>
where
Real: nalgebra::RealField + Copy,
{
let one = Real::one();
let three = one + one + one;
let t1 = one - t0;
p0.scale(t1 * t1 * t1)
+ p1.scale(three * t0 * t1 * t1)
+ p2.scale(three * t0 * t0 * t1)
+ p3.scale(t0 * t0 * t0)
}
pub fn arclength_from_vtx2vecn<T, const N: usize>(
vtxs: &[nalgebra::SVector<T, N>]) -> T
where
T: nalgebra::RealField + Copy
{
if vtxs.len() < 2 {
return T::zero();
}
let mut len: T = T::zero();
for ip0 in 0..vtxs.len() - 1 {
len += (vtxs[ip0] - vtxs[ip0 + 1]).norm();
}
len
}
pub fn sample_uniform_param<Real, const N: usize>(
ndiv: usize,
p0: &nalgebra::SVector<Real, N>,
p1: &nalgebra::SVector<Real, N>,
p2: &nalgebra::SVector<Real, N>,
p3: &nalgebra::SVector<Real, N>,
is_include_endpoint_start: bool,
is_include_endpoint_end: bool) -> Vec<nalgebra::SVector<Real, N>>
where Real: Copy + 'static + nalgebra::RealField,
usize: num_traits::AsPrimitive<Real>
{
let mut ret: Vec<nalgebra::SVector<Real, N>> = vec!();
if is_include_endpoint_start { ret.push(*p0); }
for idiv in 1..ndiv {
let t0: Real = idiv.as_() / ndiv.as_();
let p0 = eval(p0, p1, p2, p3, t0);
ret.push(p0);
}
if is_include_endpoint_end { ret.push(*p3); }
ret
}
pub fn sample_uniform_length<Real, const N: usize>(
p0: &nalgebra::SVector<Real, N>,
p1: &nalgebra::SVector<Real, N>,
p2: &nalgebra::SVector<Real, N>,
p3: &nalgebra::SVector<Real, N>,
target_edge_length: Real,
is_include_endpoint_start: bool,
is_include_endpoint_end: bool,
ndiv_sample: usize) -> Vec<nalgebra::SVector<Real, N>>
where Real: Copy + 'static + nalgebra::RealField + AsPrimitive<usize>,
usize: num_traits::AsPrimitive<Real>,
f64: num_traits::AsPrimitive<Real>
{
let mut ret: Vec<nalgebra::SVector<Real, N>> = vec!();
if is_include_endpoint_start { ret.push(*p0); }
let ps = sample_uniform_param(
ndiv_sample,
p0, p1, p2, p3,
true, true);
assert_eq!(ps.len(), ndiv_sample + 1);
let len = arclength_from_vtx2vecn(&ps);
let ndiv_out: usize = (len / target_edge_length).as_();
let elen: Real = len / ndiv_out.as_();
let mut len_to_go = elen;
let mut traveled_len_in_edge = Real::zero();
let mut i_div = 0;
loop {
if is_include_endpoint_start {
if ret.len() == ndiv_out { break; }
} else if ret.len() == ndiv_out - 1 { break; }
if i_div == ps.len() - 1 { break; }
let len_edge = (ps[i_div + 1] - ps[i_div]).norm();
assert!(len_edge > traveled_len_in_edge);
if len_edge - traveled_len_in_edge >= len_to_go { (traveled_len_in_edge, len_to_go) = (traveled_len_in_edge + len_to_go, elen);
{ let r0 = traveled_len_in_edge / len_edge;
assert!(r0 >= Real::zero() && r0 <= Real::one(), "{}", r0);
let t = (i_div.as_() + r0) / ndiv_sample.as_();
assert!(t < Real::one(), "t={} idiv={} ndiv_sample={} r0={}", t, i_div, ndiv_sample, r0);
assert!(t > Real::zero(), "t={}", t);
let q = eval(p0, p1, p2, p3, t);
ret.push(q);
}
} else { len_to_go -= len_edge - traveled_len_in_edge;
traveled_len_in_edge = Real::zero();
i_div += 1;
}
}
if is_include_endpoint_end { ret.push(*p3); }
ret
}
#[test]
fn test() {
let p0 = nalgebra::Vector2::<f32>::new(0.1, 0.2);
let p1 = nalgebra::Vector2::<f32>::new(0.4, 0.3);
let p2 = nalgebra::Vector2::<f32>::new(1.1, 1.3);
let p3 = nalgebra::Vector2::<f32>::new(1.3, 0.8);
let elen_trg = 0.1;
let ps = sample_uniform_length(
&p0, &p1, &p2, &p3,
elen_trg, true, true, 30);
for ip in 0..ps.len() - 1 {
let q0 = ps[ip];
let q1 = ps[ip + 1];
let elen = (q0 - q1).norm();
let dev = (elen-elen_trg).abs();
assert!(dev<0.002,"{}",dev);
}
}