**
** \legal
** Copyright (c) 2002-2005 Robert B. Quattlebaum Jr., Adrian Bentley
+** Copyright (c) 2008 Chris Moore
**
** This package is free software; you can redistribute it and/or
** modify it under the terms of the GNU General Public License as
switch(value.get_type())
{
case ValueBase::TYPE_REAL:
- set_link("exp",ValueNode_Const::create(Real(1)));
+ set_link("exp",ValueNode_Const::create(Real(0)));
set_link("scale",ValueNode_Const::create(value.get(Real())));
break;
default: