is_deeply(scale(0.5, { list => 2 }), { list => 1 }, 'scale 0.5, list');
is_deeply(scale(0.5, { list => 2, 1 => 2 }), { list => 1, 1 => 1 },
'scale 0.5, list/const');
is_deeply(scale(0.5, { list => 2 }), { list => 1 }, 'scale 0.5, list');
is_deeply(scale(0.5, { list => 2, 1 => 2 }), { list => 1, 1 => 1 },
'scale 0.5, list/const');