public function testTypesMoney()
{
$bean = R::dispense('bean');
$bean->money = '$123.45';
R::store($bean);
$cols = R::getColumns('bean');
asrt($cols['money'], 'money');
$bean = R::load('bean', $bean->id);
asrt($bean->money, '$123.45');
$bean->note = 'taint';
R::store($bean);
$bean = R::load('bean', $bean->id);
asrt($bean->money, '$123.45');
$bean->money = '$123,455.01';
R::store($bean);
$bean = $bean->fresh();
asrt($bean->money, '$123,455.01');
}