SUBROUTINE fill0(u,n) INTEGER n DOUBLE PRECISION u(n,n) INTEGER i,j do 12 j=1,n do 11 i=1,n …
High+Precision 源代码
汇集 High+Precision 相关的电路原理图、PCB工程文件、单片机/FPGA源代码、数据手册与应用设计方案。
subroutine fidaxpy(a, x, y, n, iters) integer i double precision x(n), y(n), a double precision b b = - a…
#ifndef __calcbits_h #define __calcbits_h Mm calcbits(Mm bounds, Mm precision); #endif // __calcbits_h
common/blah/i,j,k double precision d equivalence (d,i),(x,i) write(*,*) loc(i), loc(d), loc(x), loc(z) end
subroutine fidaxpy(a, x, y, n, iters) integer i double precision x(n), y(n), a double precision b b = - a…
;;;====================================================== ;;; Monitoring Program ;;; ;;; This program was introduced in S…
;;;====================================================== ;;; Monitoring Program ;;; ;;; This program was introduced in S…
/********************************************************************** 公司名: 广州强智数码科技有限公司 文件名: FM100.c 设计者: 王健强 开始日…
library ieee; use ieee.std_logic_1164.all; entity tone is port( index : in integer range 0 to 15; code : …
// ---------------------------------------------------------------------------- // Copyright 2006-2007, Martin D. Flynn // All rig…