module geometry_lib contains !----------------Node to freedom number conversion ------…
intent 源代码
汇集 intent 相关的电路原理图、PCB工程文件、单片机/FPGA源代码、数据手册与应用设计方案。
module new_library contains subroutine formblock_k(bigk,km,g,g_min) ! forms complete n*n ma…
Subroutine iqsort( a, n, nl, nu ) ! Integer sort ! -------------------------------------------------------------------- ! --- Sor…
Subroutine dqsort( a, n, nl, nu ) ! 8-byte Real sort. ! -------------------------------------------------------------------- …
Subroutine ranint( low, hi, n, ranint_array ) ! --------------------------------------------------------------------- ! --- Routin…
Subroutine iqsort( a, n, nl, nu ) ! Integer sort ! -------------------------------------------------------------------- Imp…
Program mod2d ! ********************************************************************** ! *** This program is part of the EuroBen B…
SUBROUTINE ERINFO(LINFO, SRNAME, INFO, ISTAT) ! ! -- LAPACK90 interface driver routine (version 1.0) -- ! UNI-C, Denmark; Uni…
Subroutine check( N, A, W, ok ) ! ********************************************************************** ! *** This program belong…
Subroutine iqsort( a, n, nl, nu ) ! Integer sort ! -------------------------------------------------------------------- ! --- Sor…