112855Sgabeblack@google.com/***************************************************************************** 212855Sgabeblack@google.com 312855Sgabeblack@google.com Licensed to Accellera Systems Initiative Inc. (Accellera) under one or 412855Sgabeblack@google.com more contributor license agreements. See the NOTICE file distributed 512855Sgabeblack@google.com with this work for additional information regarding copyright ownership. 612855Sgabeblack@google.com Accellera licenses this file to you under the Apache License, Version 2.0 712855Sgabeblack@google.com (the "License"); you may not use this file except in compliance with the 812855Sgabeblack@google.com License. You may obtain a copy of the License at 912855Sgabeblack@google.com 1012855Sgabeblack@google.com http://www.apache.org/licenses/LICENSE-2.0 1112855Sgabeblack@google.com 1212855Sgabeblack@google.com Unless required by applicable law or agreed to in writing, software 1312855Sgabeblack@google.com distributed under the License is distributed on an "AS IS" BASIS, 1412855Sgabeblack@google.com WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or 1512855Sgabeblack@google.com implied. See the License for the specific language governing 1612855Sgabeblack@google.com permissions and limitations under the License. 1712855Sgabeblack@google.com 1812855Sgabeblack@google.com *****************************************************************************/ 1912855Sgabeblack@google.com 2012855Sgabeblack@google.com/***************************************************************************** 2112855Sgabeblack@google.com 2212855Sgabeblack@google.com arith09.cpp -- 2312855Sgabeblack@google.com 2412855Sgabeblack@google.com Original Author: Martin Janssen, Synopsys, Inc., 2002-02-15 2512855Sgabeblack@google.com 2612855Sgabeblack@google.com *****************************************************************************/ 2712855Sgabeblack@google.com 2812855Sgabeblack@google.com/***************************************************************************** 2912855Sgabeblack@google.com 3012855Sgabeblack@google.com MODIFICATION LOG - modifiers, enter your name, affiliation, date and 3112855Sgabeblack@google.com changes you are making here. 3212855Sgabeblack@google.com 3312855Sgabeblack@google.com Name, Affiliation, Date: 3412855Sgabeblack@google.com Description of Modification: 3512855Sgabeblack@google.com 3612855Sgabeblack@google.com *****************************************************************************/ 3712855Sgabeblack@google.com 3812855Sgabeblack@google.com#include <stdlib.h> 3912855Sgabeblack@google.com#include "systemc.h" 4012855Sgabeblack@google.com#include "isaac.h" 4112855Sgabeblack@google.com 4212855Sgabeblack@google.comQTIsaac<8> rng; // Platform independent random number generator. 4312855Sgabeblack@google.com 4412855Sgabeblack@google.comint 4512855Sgabeblack@google.comsc_main( int argc, char* argv[] ) 4612855Sgabeblack@google.com{ 4712855Sgabeblack@google.com unsigned int vali[5] = { 0, 1, (unsigned)-1, 7, (unsigned)-8 }; 4812855Sgabeblack@google.com unsigned int valj[5] = { 0, 1, (unsigned)-1, 7, (unsigned)-8 }; 4912855Sgabeblack@google.com 5012855Sgabeblack@google.com for (int i = 3; i < 32; ++i) { 5112855Sgabeblack@google.com for (int j = 3; j < 32; ++j) { 5212855Sgabeblack@google.com cout << "i = " << i << ", j = " << j << endl; 5312855Sgabeblack@google.com 5412855Sgabeblack@google.com sc_unsigned x(i); 5512855Sgabeblack@google.com sc_unsigned y(j); 5612855Sgabeblack@google.com sc_unsigned z(64), q(64); 5712855Sgabeblack@google.com 5812855Sgabeblack@google.com vali[3] = (1 << (i - 1)) - 1; 5912855Sgabeblack@google.com vali[4] = - (1 << (i - 1)); 6012855Sgabeblack@google.com 6112855Sgabeblack@google.com valj[3] = (1 << (j - 1)) - 1; 6212855Sgabeblack@google.com valj[4] = - (1 << (j - 1)); 6312855Sgabeblack@google.com 6412855Sgabeblack@google.com for (int ii = 0; ii < 100; ++ii) { 6512855Sgabeblack@google.com for (int jj = 0; jj < 100; ++jj) { 6612855Sgabeblack@google.com unsigned qi = (ii < 5) ? vali[ii] : 6712855Sgabeblack@google.com (rng.rand() & ((1 << i) - 1)); 6812855Sgabeblack@google.com unsigned qj = (jj < 5) ? valj[jj] : 6912855Sgabeblack@google.com (rng.rand() & ((1 << j) - 1)); 7012855Sgabeblack@google.com 7112855Sgabeblack@google.com if (qi & (1 << (i - 1))) { 7212855Sgabeblack@google.com qi = (qi << (32 - i)) >> (32 - i); 7312855Sgabeblack@google.com } 7412855Sgabeblack@google.com if (qj & (1 << (j - 1))) { 7512855Sgabeblack@google.com qj = (qj << (32 - j)) >> (32 - j); 7612855Sgabeblack@google.com } 7712855Sgabeblack@google.com 7812855Sgabeblack@google.com x = qi; 7912855Sgabeblack@google.com y = qj; 8012855Sgabeblack@google.com z = x * y; 8112855Sgabeblack@google.com sc_assert( (sc_unsigned)( z.range(31,0) ) == 8212855Sgabeblack@google.com (qi * qj) ); 8312855Sgabeblack@google.com if ( i < 17 ) 8412855Sgabeblack@google.com { 8512855Sgabeblack@google.com if ( j < 17 ) // (i < 17) 8612855Sgabeblack@google.com { 8712855Sgabeblack@google.com q = (x.range(i-1,0) * y.range(j-1,0)); 8812855Sgabeblack@google.com } 8912855Sgabeblack@google.com else // (j >= 17) (i < 17) 9012855Sgabeblack@google.com { 9112855Sgabeblack@google.com q = (x.range(i-1,0) * y.range(15,0)) + 9212855Sgabeblack@google.com ( x.range(i-1,0) * y.range(j-1,16) ) * 65536; 9312855Sgabeblack@google.com } 9412855Sgabeblack@google.com } 9512855Sgabeblack@google.com else 9612855Sgabeblack@google.com { 9712855Sgabeblack@google.com if ( j < 17 ) // (i >= 17) 9812855Sgabeblack@google.com { 9912855Sgabeblack@google.com q = (x.range(15,0) * y.range(j-1,0)) + 10012855Sgabeblack@google.com (x.range(i-1,16) * y.range(j-1,0)) * 65536; 10112855Sgabeblack@google.com } 10212855Sgabeblack@google.com else // (j >= 17) (i >= 17) 10312855Sgabeblack@google.com { 10412855Sgabeblack@google.com q = (x.range(15,0) * y.range(15,0)) + 10512855Sgabeblack@google.com (x.range(i-1,16) * y.range(15,0) + 10612855Sgabeblack@google.com x.range(15,0) * y.range(j-1,16)) * 65536 + 10712855Sgabeblack@google.com ((x.range(i-1,16) * y.range(j-1,16) * 65536) 10812855Sgabeblack@google.com * 65536); 10912855Sgabeblack@google.com } 11012855Sgabeblack@google.com } 11112855Sgabeblack@google.com sc_assert(z == q); 11212855Sgabeblack@google.com 11312855Sgabeblack@google.com if (y != 0) { 11412855Sgabeblack@google.com z /= y; 11512855Sgabeblack@google.com sc_assert(z == x); 11612855Sgabeblack@google.com } 11712855Sgabeblack@google.com } 11812855Sgabeblack@google.com } 11912855Sgabeblack@google.com } 12012855Sgabeblack@google.com } 12112855Sgabeblack@google.com return 0; 12212855Sgabeblack@google.com} 123