URL
https://opencores.org/ocsvn/ft816float/ft816float/trunk
Subversion Repositories ft816float
[/] [ft816float/] [trunk/] [rtl/] [verilog/] [fp_decomp.v] - Rev 77
Go to most recent revision | Compare with Previous | Blame | View Log
`timescale 1ns / 1ps // ============================================================================ // __ // \\__/ o\ (C) 2006-2016 Robert Finch, Waterloo // \ __ / All rights reserved. // \/_// robfinch<remove>@finitron.ca // || // // fp_decomp.v // - decompose floating point value // - parameterized width // // // This source file is free software: you can redistribute it and/or modify // it under the terms of the GNU Lesser General Public License as published // by the Free Software Foundation, either version 3 of the License, or // (at your option) any later version. // // This source file is distributed in the hope that it will be useful, // but WITHOUT ANY WARRANTY; without even the implied warranty of // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the // GNU General Public License for more details. // // You should have received a copy of the GNU General Public License // along with this program. If not, see <http://www.gnu.org/licenses/>. // // ============================================================================ module fp_decomp(i, sgn, exp, man, fract, xz, mz, vz, inf, xinf, qnan, snan, nan); parameter WID=32; `include "fpSize.sv" input [MSB:0] i; output sgn; output [EMSB:0] exp; output [FMSB:0] man; output [FMSB+1:0] fract; // mantissa with hidden bit recovered output xz; // denormalized - exponent is zero output mz; // mantissa is zero output vz; // value is zero (both exponent and mantissa are zero) output inf; // all ones exponent, zero mantissa output xinf; // all ones exponent output qnan; // nan output snan; // signalling nan output nan; // Decompose input assign sgn = i[MSB]; assign exp = i[MSB-1:FMSB+1]; assign man = i[FMSB:0]; assign xz = !(|exp); // denormalized - exponent is zero assign mz = !(|man); // mantissa is zero assign vz = xz & mz; // value is zero (both exponent and mantissa are zero) assign inf = &exp & mz; // all ones exponent, zero mantissa assign xinf = &exp; assign qnan = &exp & man[FMSB]; assign snan = &exp & !man[FMSB] & !mz; assign nan = &exp & !mz; assign fract = {!xz,i[FMSB:0]}; endmodule
Go to most recent revision | Compare with Previous | Blame | View Log