/******************************************************************************/ 
/*                                                                            */ 
/* 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.         */ 
/*                                                                            */ 
/******************************************************************************/ 
//  @(#)exp_ctl.v	1.1  4/7/92
//
//  Top-level interconnect module for the exponent datapath control modules.
//
//  This interconnect module was produced by Synopsys grouping and then edited
//  by hand to remove hierarchy from signal names and make
//  things more readable.


module exp_ctl ( Phi, DBnotSN, FracAregMSB1, LoadOprs, notAbortWB, PreventSwap,
		 ShiftBy8, ShiftForAl, SNnotDB, notExpShiftResult, Rom_28_27,
		 Rom_38_33,
		 CarryIn, Constantb, Constantc, Constantd, Constante,
		 Constantf, Constantg, Constanth, ExpAregLoadEn, ExpAregLC0,
		 ExpAregLC1, ExpBregLC0, ExpBregLC1, ExpBregLoadEn,
		 notSignAFromB, notSignBFromA, notWaitForShifter, SROneMore,
		 SRToSticky, SRControl );

input	Phi, DBnotSN, FracAregMSB1, LoadOprs, notAbortWB, PreventSwap,
	ShiftBy8, ShiftForAl, SNnotDB ;
input [12:0] notExpShiftResult ;
input [28:27] Rom_28_27 ;
input [38:33] Rom_38_33 ;

output	CarryIn, Constantb, Constantc, Constantd, Constante, Constantf,
	Constantg, Constanth, ExpAregLoadEn, ExpAregLC0, ExpAregLC1,
	ExpBregLC0, ExpBregLC1, ExpBregLoadEn, notSignAFromB, notSignBFromA,
	notWaitForShifter, SROneMore, SRToSticky ;
output [3:0] SRControl ;


    ExpAdderLSB alsb ( .CinFromRound(Rom_28_27[28] ), .Sub(Rom_28_27[27] ), 
	.FracAregMSB1(FracAregMSB1), .CarryIn(CarryIn) );

    ExpConstantCtl ecs ( .SNnotDB(SNnotDB), .DBnotSN(DBnotSN), .RomExpConCtl(
	Rom_38_33[34:33] ), .Constantb(Constantb), .Constantc(Constantc),
	.Constantd(Constantd), .Constante(Constante), .Constantf(Constantf),
	.Constantg(Constantg), .Constanth(Constanth) );

    ExpRegLoadCtl alc ( .RomExpBregLC( Rom_38_33[36:35] ), .LoadOprs(LoadOprs),
	.notAbortWB(notAbortWB), .PreventSwap(PreventSwap),
	.notSignBFromA(notSignAFromB), .ExpBregLC0(ExpAregLC0),
	.ExpBregLC1(ExpAregLC1), .ExpBregLoadEn(ExpAregLoadEn) );

    ExpRegLoadCtl blc ( .RomExpBregLC(Rom_38_33[38:37]), .LoadOprs(LoadOprs),
	.notAbortWB(notAbortWB), .PreventSwap(PreventSwap), .notSignBFromA(
	notSignBFromA), .ExpBregLC0(ExpBregLC0), .ExpBregLC1(ExpBregLC1),
	.ExpBregLoadEn(ExpBregLoadEn) );

    ExpShifter sr ( .Phi(Phi), .notExpResult(notExpShiftResult), .Rom_ShBy8(
	ShiftBy8), .Rom_ShiftForAl(ShiftForAl), .SRControl(SRControl),
	.SROneMore(SROneMore), .SRToSticky(SRToSticky), .notWaitForShifter(
	notWaitForShifter) );

endmodule