代码搜索：implicit
找到约 5,250 项符合「implicit」的源代码
代码结果 5,250
www.eeworm.com/read/376037/9335729
f90 setcolor.f90
!
! 对话窗的示范之二
! By Perng 1997/09/26
program main
use DFLIB
implicit none
integer :: i,ix,iy
call ClearScreen($GCLEARSCREEN)
do while(.true.)
i = waitonmouseevent(MOUSE$LBUTTONDOWN,
www.eeworm.com/read/376037/9335792
f90 gdemo1.f90
program gdemo1
use TextGraphLib
implicit none
call SetScreen( 10, 10 ) ! 设定分辨率为10x10
call DrawLine( 1, 1, 10, 10 ) ! 在(1,1)到(10,10)这两点间画一条线
call UpdateScreen() ! 显示绘图
www.eeworm.com/read/376037/9335816
f90 ex0809.f90
program ex0809
implicit none
integer, parameter :: players = 5
real :: angle(players) = (/ 30.0, 45.0, 35.0, 50.0, 40.0 /)
real :: speed(players) = (/ 25.0, 20.0, 21.0, 27.0, 22.0 /)
real
www.eeworm.com/read/376037/9335819
f90 ex0836.f90
module constant
implicit none
real, parameter :: PI = 3.14159
real, parameter :: G = 9.81
end module
module typedef
implicit none
type player
real :: angle
real :: speed
www.eeworm.com/read/376037/9335832
f90 ex0806.f90
program ex0806
implicit none
integer, parameter :: players = 5
real :: angle(players) = (/ 30.0, 45.0, 35.0, 50.0, 40.0 /)
real :: speed(players) = (/ 25.0, 20.0, 21.0, 27.0, 22.0 /)
real
www.eeworm.com/read/376037/9335834
f90 ex0802.f90
program ex0802
implicit none
call sub1()
call sub2()
stop
end program ex0802
subroutine sub1()
implicit none
write(*,*) "This is sub1"
call sub2()
return
end subroutine sub1
www.eeworm.com/read/376037/9335841
f90 ex0824.f90
program ex0824
implicit none
integer, parameter :: players = 5
real :: angle(players) = (/ 30.0, 45.0, 35.0, 50.0, 40.0 /)
real :: speed(players) = (/ 25.0, 20.0, 21.0, 27.0, 22.0 /)
real
www.eeworm.com/read/360543/10088613
f90 ex1104.f90
module MA
implicit none
interface show ! 虚拟的函数名称show
module procedure show_int ! 等待选择的函数show_int
module procedure show_character ! 等待选择的函数show_character
end interface
con
www.eeworm.com/read/271035/11011387
dat tu4.dat
0
implicit-explicit dynamic analysis of a rod
1 0 0 0 0 0 2 1 3 22 3 0 0 0 2
1 1 1 1 1 1 0.0 0.0 0.0 0.0
www.eeworm.com/read/468277/6995891
cce adc-adc7705.cce
Warning[000] F:\experiment\ADC\ADC-AD7705-ok\ADC-ADC7705.c 311 : implicit conversion of float to integer
Warning[000] F:\experiment\ADC\ADC-AD7705-ok\ADC-ADC7705.c 312 : implicit conversion of float