! $Id$ ! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! ! ! $Log$ ! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!…
intent 源代码
汇集 intent 相关的电路原理图、PCB工程文件、单片机/FPGA源代码、数据手册与应用设计方案。
INTEGER :: nn(0:9), j CHARACTER(LEN=80):: cn CHARACTER(LEN=30):: fmt nn = (/ 1, 5, 12, 22, 28, 35, 48, 28, 10, 3 /) fmt='(1X, …
PROGRAM main INTERFACE REAL FUNCTION trace(sqr) REAL,INTENT(IN) :: sqr(:,:) ! 迟型数组 END FUNCTION END INTERFACE …
INTEGER :: n=0 CHARACTER(LEN=1) :: a,b,c a='A';b='B';c ='C' DO WHILE(n0) THEN CALL hanoi(i-1,x,z,y) PRINT '("第",I2,"个盘子:从",A1…
INTEGER :: nn(0:9), j CHARACTER(LEN=80):: cn CHARACTER(LEN=30):: fmt nn = (/ 1, 5, 12, 22, 28, 35, 48, 28, 10, 3 /) fmt='(1X, …
PROGRAM main INTERFACE REAL FUNCTION trace(sqr) REAL,INTENT(IN) :: sqr(:,:) ! 迟型数组 END FUNCTION END INTERFACE …
INTEGER :: n=0 CHARACTER(LEN=1) :: a,b,c a='A';b='B';c ='C' DO WHILE(n0) THEN CALL hanoi(i-1,x,z,y) PRINT '("第",I2,"个盘子:从",A1…
MODULE lamn_func ! From the book "Computation of Special Functions" ! by Shanjie Zhang and Jianming Jin ! Copyright 1…
MODULE rswfp_func ! From the book "Computation of Special Functions" ! by Shanjie Zhang and Jianming Jin ! Copyright …
MODULE csphjy_func ! From the book "Computation of Special Functions" ! by Shanjie Zhang and Jianming Jin ! Copyright…