代码搜索：implicit
找到约 5,250 项符合「implicit」的源代码
代码结果 5,250
www.eeworm.com/read/208614/15242529
f90 ex0831.f90
program ex0831
implicit none
integer :: n
write(*,*) 'N='
read(*,*) n
write(*, "(I2,'! = ',I8)" ) n, fact(n)
stop
contains
recursive integer function fact(n) result(ans)
www.eeworm.com/read/208614/15242550
f90 ex0828.f90
program ex0828
implicit none
integer :: n
integer, external :: fact
write(*,*) 'N='
read(*,*) n
write(*, "(I2,'! = ',I8)" ) n, fact(n)
stop
end
recursive integer function fac
www.eeworm.com/read/208614/15242575
f90 ex0827.f90
program ex0827
implicit none
interface
real function func(x,a,b,c) ! 定义子程式func的接口
implicit none
real x
real, optional :: a,b,c
end function
end interface
write(*,
www.eeworm.com/read/208614/15242577
f90 textgraphlib.f90
module TextGraphLib
implicit none
integer, save :: ScreenWidth ! 定义可以画图的画面宽度
integer, save :: ScreenHeight ! 定义可以画图的画面高度
character, save :: background = ' ' ! 定义预设用来清除画面
www.eeworm.com/read/171344/5396390
mk qnxnto.mk
#############################################################################
#
# SciTech Multi-platform Graphics Library
#
# =====================================================================
www.eeworm.com/read/171344/5396394
mk va32.mk
#############################################################################
#
# SciTech Multi-platform Graphics Library
#
# ===================================
www.eeworm.com/read/171344/5396395
mk va365.mk
#############################################################################
#
# SciTech Multi-platform Graphics Library
#
# ===================================
www.eeworm.com/read/171344/5396398
mk sc32.mk
#############################################################################
#
# SciTech Multi-platform Graphics Library
#
# =====================================================================
www.eeworm.com/read/171344/5396399
mk cl386.mk
#############################################################################
#
# SciTech Multi-platform Graphics Library
#
# =====================================================================
www.eeworm.com/read/171344/5396403
mk wc16.mk
#############################################################################
#
# SciTech Multi-platform Graphics Library
#
# =====================================================================