/******************************************************************************/ 
/*                                                                            */ 
/* Copyright (c) 1999 Sun Microsystems, Inc. All rights reserved.             */ 
/*                                                                            */ 
/* The contents of this file are subject to the current version of the Sun    */ 
/* Community Source License, microSPARCII ("the License"). You may not use    */ 
/* this file except in compliance with the License.  You may obtain a copy    */ 
/* of the License by searching for "Sun Community Source License" on the      */ 
/* World Wide Web at http://www.sun.com. See the License for the rights,      */ 
/* obligations, and limitations governing use of the contents of this file.   */ 
/*                                                                            */ 
/* Sun Microsystems, Inc. has intellectual property rights relating to the    */ 
/* technology embodied in these files. In particular, and without limitation, */ 
/* these intellectual property rights may include one or more U.S. patents,   */ 
/* foreign patents, or pending applications.                                  */ 
/*                                                                            */ 
/* Sun, Sun Microsystems, the Sun logo, all Sun-based trademarks and logos,   */ 
/* Solaris, Java and all Java-based trademarks and logos are trademarks or    */ 
/* registered trademarks of Sun Microsystems, Inc. in the United States and   */ 
/* other countries. microSPARC is a trademark or registered trademark of      */ 
/* SPARC International, Inc. All SPARC trademarks are used under license and  */ 
/* are trademarks or registered trademarks of SPARC International, Inc. in    */ 
/* the United States and other countries. Products bearing SPARC trademarks   */ 
/* are based upon an architecture developed by Sun Microsystems, Inc.         */ 
/*                                                                            */ 
/******************************************************************************/ 
//  @(#)shiftleft.v	1.1  4/7/92
//

module ShiftLeft   (NI,
                    SLControl,
		    LIB,
                    SLResult);

input [`FracMSB:0] NI;
input [3:0] SLControl;
input [2:0] LIB;		// shifted operand for int or frac
output [`FracMSB:0] SLResult;
                
wire [`FracMSB:0] N8, N4, N2, N1;

ME_TIEOFF toff (vdd, gnd);

ME_NMUX_2B_58 g23 (SLControl[3],
                   NI,
                   {LIB[2], LIB[1], LIB[0], NI[`FracMSB-11:0],
                    gnd, gnd, gnd, gnd, gnd, gnd, gnd, gnd},
                   N8);  // False
ME_NMUX_2B_58 g24 (SLControl[2],
                   N8,
                   {N8[`FracMSB-4:0], vdd, vdd, vdd, vdd}, N4);
ME_NMUX_2B_58 g25 (SLControl[1],
                   N4,
                   {N4[`FracMSB-2:0], gnd, gnd},
                   N2);  // False
ME_NMUX_2B_58 g26 (SLControl[0],  N2, {N2[`FracMSB-1:0], vdd}, N1); // true

ME_INV_A_58   g27 (N1, SLResult); // false

endmodule