scfx_pow10.cpp revision 12027
112027Sjungma@eit.uni-kl.de/***************************************************************************** 212027Sjungma@eit.uni-kl.de 312027Sjungma@eit.uni-kl.de Licensed to Accellera Systems Initiative Inc. (Accellera) under one or 412027Sjungma@eit.uni-kl.de more contributor license agreements. See the NOTICE file distributed 512027Sjungma@eit.uni-kl.de with this work for additional information regarding copyright ownership. 612027Sjungma@eit.uni-kl.de Accellera licenses this file to you under the Apache License, Version 2.0 712027Sjungma@eit.uni-kl.de (the "License"); you may not use this file except in compliance with the 812027Sjungma@eit.uni-kl.de License. You may obtain a copy of the License at 912027Sjungma@eit.uni-kl.de 1012027Sjungma@eit.uni-kl.de http://www.apache.org/licenses/LICENSE-2.0 1112027Sjungma@eit.uni-kl.de 1212027Sjungma@eit.uni-kl.de Unless required by applicable law or agreed to in writing, software 1312027Sjungma@eit.uni-kl.de distributed under the License is distributed on an "AS IS" BASIS, 1412027Sjungma@eit.uni-kl.de WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or 1512027Sjungma@eit.uni-kl.de implied. See the License for the specific language governing 1612027Sjungma@eit.uni-kl.de permissions and limitations under the License. 1712027Sjungma@eit.uni-kl.de 1812027Sjungma@eit.uni-kl.de *****************************************************************************/ 1912027Sjungma@eit.uni-kl.de 2012027Sjungma@eit.uni-kl.de/***************************************************************************** 2112027Sjungma@eit.uni-kl.de 2212027Sjungma@eit.uni-kl.de scfx_pow10.cpp - 2312027Sjungma@eit.uni-kl.de 2412027Sjungma@eit.uni-kl.de Original Author: Robert Graulich, Synopsys, Inc. 2512027Sjungma@eit.uni-kl.de Martin Janssen, Synopsys, Inc. 2612027Sjungma@eit.uni-kl.de 2712027Sjungma@eit.uni-kl.de *****************************************************************************/ 2812027Sjungma@eit.uni-kl.de 2912027Sjungma@eit.uni-kl.de/***************************************************************************** 3012027Sjungma@eit.uni-kl.de 3112027Sjungma@eit.uni-kl.de MODIFICATION LOG - modifiers, enter your name, affiliation, date and 3212027Sjungma@eit.uni-kl.de changes you are making here. 3312027Sjungma@eit.uni-kl.de 3412027Sjungma@eit.uni-kl.de Name, Affiliation, Date: 3512027Sjungma@eit.uni-kl.de Description of Modification: 3612027Sjungma@eit.uni-kl.de 3712027Sjungma@eit.uni-kl.de *****************************************************************************/ 3812027Sjungma@eit.uni-kl.de 3912027Sjungma@eit.uni-kl.de 4012027Sjungma@eit.uni-kl.de// $Log: scfx_pow10.cpp,v $ 4112027Sjungma@eit.uni-kl.de// Revision 1.1.1.1 2006/12/15 20:20:04 acg 4212027Sjungma@eit.uni-kl.de// SystemC 2.3 4312027Sjungma@eit.uni-kl.de// 4412027Sjungma@eit.uni-kl.de// Revision 1.3 2006/01/13 18:53:58 acg 4512027Sjungma@eit.uni-kl.de// Andy Goodrich: added $Log command so that CVS comments are reproduced in 4612027Sjungma@eit.uni-kl.de// the source. 4712027Sjungma@eit.uni-kl.de// 4812027Sjungma@eit.uni-kl.de 4912027Sjungma@eit.uni-kl.de#include "sysc/datatypes/fx/scfx_pow10.h" 5012027Sjungma@eit.uni-kl.de 5112027Sjungma@eit.uni-kl.de 5212027Sjungma@eit.uni-kl.denamespace sc_dt 5312027Sjungma@eit.uni-kl.de{ 5412027Sjungma@eit.uni-kl.de 5512027Sjungma@eit.uni-kl.de// ---------------------------------------------------------------------------- 5612027Sjungma@eit.uni-kl.de// CLASS : scfx_pow10 5712027Sjungma@eit.uni-kl.de// 5812027Sjungma@eit.uni-kl.de// Class to compute (and cache) powers of 10 in arbitrary precision. 5912027Sjungma@eit.uni-kl.de// ---------------------------------------------------------------------------- 6012027Sjungma@eit.uni-kl.de 6112027Sjungma@eit.uni-kl.descfx_pow10::scfx_pow10() 6212027Sjungma@eit.uni-kl.de{ 6312027Sjungma@eit.uni-kl.de m_pos[0] = scfx_rep( 10.0 ); 6412027Sjungma@eit.uni-kl.de m_neg[0] = scfx_rep( 0.1 ); 6512027Sjungma@eit.uni-kl.de 6612027Sjungma@eit.uni-kl.de for( int i = 1; i < SCFX_POW10_TABLE_SIZE; i ++ ) 6712027Sjungma@eit.uni-kl.de { 6812027Sjungma@eit.uni-kl.de m_pos[i].set_nan(); 6912027Sjungma@eit.uni-kl.de m_neg[i].set_nan(); 7012027Sjungma@eit.uni-kl.de } 7112027Sjungma@eit.uni-kl.de} 7212027Sjungma@eit.uni-kl.de 7312027Sjungma@eit.uni-kl.descfx_pow10::~scfx_pow10() 7412027Sjungma@eit.uni-kl.de{} 7512027Sjungma@eit.uni-kl.de 7612027Sjungma@eit.uni-kl.de 7712027Sjungma@eit.uni-kl.deconst scfx_rep 7812027Sjungma@eit.uni-kl.descfx_pow10::operator() ( int i ) 7912027Sjungma@eit.uni-kl.de{ 8012027Sjungma@eit.uni-kl.de if( i == 0 ) { 8112027Sjungma@eit.uni-kl.de return scfx_rep( 1.0 ); 8212027Sjungma@eit.uni-kl.de } 8312027Sjungma@eit.uni-kl.de 8412027Sjungma@eit.uni-kl.de if( i > 0 ) 8512027Sjungma@eit.uni-kl.de { 8612027Sjungma@eit.uni-kl.de int bit = scfx_find_msb( i ); 8712027Sjungma@eit.uni-kl.de scfx_rep result = *pos( bit ); 8812027Sjungma@eit.uni-kl.de if( bit ) 8912027Sjungma@eit.uni-kl.de { 9012027Sjungma@eit.uni-kl.de while( -- bit >= 0 ) 9112027Sjungma@eit.uni-kl.de { 9212027Sjungma@eit.uni-kl.de if( ( 1 << bit ) & i ) 9312027Sjungma@eit.uni-kl.de { 9412027Sjungma@eit.uni-kl.de scfx_rep* tmp = mult_scfx_rep( result, *pos( bit ) ); 9512027Sjungma@eit.uni-kl.de result = *tmp; 9612027Sjungma@eit.uni-kl.de delete tmp; 9712027Sjungma@eit.uni-kl.de } 9812027Sjungma@eit.uni-kl.de } 9912027Sjungma@eit.uni-kl.de } 10012027Sjungma@eit.uni-kl.de return result; 10112027Sjungma@eit.uni-kl.de } 10212027Sjungma@eit.uni-kl.de else 10312027Sjungma@eit.uni-kl.de { 10412027Sjungma@eit.uni-kl.de i = -i; 10512027Sjungma@eit.uni-kl.de int bit = scfx_find_msb( i ); 10612027Sjungma@eit.uni-kl.de scfx_rep result = *neg( bit ); 10712027Sjungma@eit.uni-kl.de if( bit ) 10812027Sjungma@eit.uni-kl.de { 10912027Sjungma@eit.uni-kl.de while( -- bit >= 0 ) 11012027Sjungma@eit.uni-kl.de { 11112027Sjungma@eit.uni-kl.de if( ( 1 << bit ) & i ) 11212027Sjungma@eit.uni-kl.de { 11312027Sjungma@eit.uni-kl.de scfx_rep* tmp = mult_scfx_rep( result, *neg( bit ) ); 11412027Sjungma@eit.uni-kl.de result = *tmp; 11512027Sjungma@eit.uni-kl.de delete tmp; 11612027Sjungma@eit.uni-kl.de } 11712027Sjungma@eit.uni-kl.de } 11812027Sjungma@eit.uni-kl.de } 11912027Sjungma@eit.uni-kl.de return result; 12012027Sjungma@eit.uni-kl.de } 12112027Sjungma@eit.uni-kl.de} 12212027Sjungma@eit.uni-kl.de 12312027Sjungma@eit.uni-kl.de 12412027Sjungma@eit.uni-kl.descfx_rep* 12512027Sjungma@eit.uni-kl.descfx_pow10::pos( int i ) 12612027Sjungma@eit.uni-kl.de{ 12712027Sjungma@eit.uni-kl.de if( ! m_pos[i].is_normal() ) 12812027Sjungma@eit.uni-kl.de { 12912027Sjungma@eit.uni-kl.de multiply( m_pos[i], *pos( i - 1 ), *pos( i - 1 ) ); 13012027Sjungma@eit.uni-kl.de } 13112027Sjungma@eit.uni-kl.de return &m_pos[i]; 13212027Sjungma@eit.uni-kl.de} 13312027Sjungma@eit.uni-kl.de 13412027Sjungma@eit.uni-kl.descfx_rep* 13512027Sjungma@eit.uni-kl.descfx_pow10::neg( int i ) 13612027Sjungma@eit.uni-kl.de{ 13712027Sjungma@eit.uni-kl.de if( ! m_neg[i].is_normal() ) 13812027Sjungma@eit.uni-kl.de { 13912027Sjungma@eit.uni-kl.de multiply( m_neg[i], *neg( i - 1 ), *neg( i - 1 ) ); 14012027Sjungma@eit.uni-kl.de } 14112027Sjungma@eit.uni-kl.de return &m_neg[i]; 14212027Sjungma@eit.uni-kl.de} 14312027Sjungma@eit.uni-kl.de 14412027Sjungma@eit.uni-kl.de} // namespace sc_dt 14512027Sjungma@eit.uni-kl.de 14612027Sjungma@eit.uni-kl.de 14712027Sjungma@eit.uni-kl.de// Taf! 148