代码搜索：implicit

找到约 5,250 项符合「implicit」的源代码

代码结果 5,250
热门代码： main.c GPIO I2C SPI UART timer interrupt ADC PWM LED
www.eeworm.com/read/409260/11338556

f90 sglbad.f90

module sgl_util use sgl implicit none contains subroutine display() integer, parameter :: size = 200 real, parameter :: rinc = 0.002 real, save :: radian = 0.0 integer :: x,y x
·
www.eeworm.com/read/409260/11338562

f90 sglfont1.f90

module SGL_UTIL use SGL implicit none contains subroutine display() call sglClearBuffer() call sglColor3i(255,255,255) call sglTextOut( 100, 100, "HELLO" ) call sglUpdateBuffer()
·
www.eeworm.com/read/409260/11338582

f90 sglfont2.f90

module SGL_UTIL use SGL implicit none contains subroutine display() call sglClearColor3i(255,255,255) call sglClearBuffer() call sglColor3i(0,0,0) call sglTextOut(50,50,"大家好")
·
www.eeworm.com/read/409260/11338584

f90 sgltimer.f90

module sgl_util use sgl implicit none contains subroutine display() integer, parameter :: size = 200 real, parameter :: rinc = 0.002 real, save :: radian = 0.0 integer :: x,y x
·
www.eeworm.com/read/409260/11338589

f90 sglidle.f90

module sgl_util use sgl implicit none contains subroutine display() integer, parameter :: size = 200 real, parameter :: rinc = 0.002 real, save :: radian = 0.0 integer :: x,y x
·
www.eeworm.com/read/409260/11338621

f90 sglimg1.f90

module sgl_util use sgl implicit none integer(1), save :: buffer(3*512*512) integer(4), save :: buffer4(3*512*512/4) equivalence(buffer,buffer4) contains subroutine display() i
·
www.eeworm.com/read/409260/11338632

f90 ex0607.f90

program ex0607 implicit none real, parameter :: weight=45.0 real, parameter :: error=0.0001 real :: guess = 0.0 do while( .true. ) write(*,*) "weight:" read(*,*) guess i
·
www.eeworm.com/read/409260/11338638

f90 ex0613.f90

program ex0613 implicit none integer i integer strlen integer, parameter :: key = 2 character(len=20) :: string write(*,*) "Encoded string:" read(*,*) string strlen = len_trim(
·
www.eeworm.com/read/409260/11338646

f90 ex0612.f90

program ex0612 implicit none integer i integer strlen integer, parameter :: key = 2 character(len=20) :: string write(*,*) "String:" read(*,*) string strlen = len_trim(string)
·
www.eeworm.com/read/409260/11338705

f90 ex1103.f90

module MA implicit none real a,b contains subroutine getx() write(*,"('x=',F5.2)") -b/a return end subroutine end module module MB use MA implicit none real c contain
·