33 lines
1.5 KiB
Perl
33 lines
1.5 KiB
Perl
#!/usr/bin/env perl
|
|
|
|
use strict;
|
|
use warnings;
|
|
use Test::More;
|
|
use DDG::Test::Goodie;
|
|
|
|
zci answer_type => 'golden_ratio';
|
|
zci is_cached => 1;
|
|
|
|
ddg_goodie_test(
|
|
[qw(
|
|
DDG::Goodie::GoldenRatio
|
|
)],
|
|
'golden ratio 1:?' => test_zci('Golden ratio: 1 : 1.61803398874989'),
|
|
"golden ratio 2.5:?" => test_zci("Golden ratio: 2.5 : 4.04508497187474"),
|
|
"golden ratio 450:?" => test_zci("Golden ratio: 450 : 728.115294937453"),
|
|
"golden ratio 900:?" => test_zci("Golden ratio: 900 : 1456.23058987491"),
|
|
"golden ratio 1024.56:?" => test_zci("Golden ratio: 1024.56 : 1657.77290351359"),
|
|
"golden ratio ?:900" => test_zci("Golden ratio: 556.230589874905 : 900"),
|
|
"golden ratio ?:768.5" => test_zci("Golden ratio: 474.959120354294 : 768.5"),
|
|
"golden ratio ?:1680.12345678" => test_zci("Golden ratio: 1038.37340158601 : 1680.12345678"),
|
|
"golden ratio 1 : ?" => test_zci("Golden ratio: 1 : 1.61803398874989"),
|
|
"golden ratio 1 :?" => test_zci("Golden ratio: 1 : 1.61803398874989"),
|
|
"golden ratio 1: ?" => test_zci("Golden ratio: 1 : 1.61803398874989"),
|
|
"golden ratio ? : 9" => test_zci("Golden ratio: 5.56230589874905 : 9"),
|
|
"golden ratio ? :9" => test_zci("Golden ratio: 5.56230589874905 : 9"),
|
|
"golden ratio ?: 9" => test_zci("Golden ratio: 5.56230589874905 : 9"),
|
|
'golden ratio ?:123.345' => test_zci('Golden ratio: 76.2314023423558 : 123.345'),
|
|
);
|
|
|
|
done_testing;
|