代码搜索：parameter
找到约 10,000 项符合「parameter」的源代码
代码结果 10,000
www.eeworm.com/read/344877/11854466
f average.f
! ----------------------------------------------------------------------
! for CLM daily/monthly/annual average mean
! ----------------------------------------------------------------------
IMPL
www.eeworm.com/read/258562/11854485
f90 ex0904.f90
program ex0904
implicit none
integer, parameter :: fileid = 10
logical alive
character(len=20) :: filename;
write(*,*) "filename:"
read(*,"(A20)") filename
inquire(file=fil
www.eeworm.com/read/258562/11854551
f90 ex0912.f90
program ex0912
implicit none
integer, parameter :: fileid = 10
character(len=20) :: filename = "list.bin"
integer player
real :: hit(9) = (/ 3.2, 2.8, 3.3, 3.2, 2.9, 2.7, 2.2, 2.3, 1.
www.eeworm.com/read/258562/11854796
for ex0515.for
PROGRAM ex0515
IMPLICIT NONE
INTEGER I
INTEGER N
PARAMETER(N=10)
DATA I /0/
10 WRITE(*, '(1X,A3,I2)' ) 'I=',I
I=I+1
IF ( I .LT. N ) GO
www.eeworm.com/read/344877/11854951
f90 phycon_module.f90
MODULE phycon_module
!=======================================================================
! Physical and model constants
!
! Source file: phycon_module.f90
! Original version: Yongjiu Dai,
www.eeworm.com/read/258562/11855017
f90 ex0429.f90
program ex0429
implicit none
real pi
parameter(pi=3.14159)
write(*,"(F4.2)") sin(pi/6)
end
www.eeworm.com/read/344853/11856790
c eco_energy1.c
#include
#include
#include
#define uchar unsigned char
#define uint unsigned int
sbit dq = P3^7; //18B20单总线位变量
sbit P3_3 = P3^3; //数码管个十百位的位选