代码搜索：implicit
找到约 5,250 项符合「implicit」的源代码
代码结果 5,250
www.eeworm.com/read/208614/15242233
f90 stack.f90
module STACK_UTILITY
implicit none
private
integer, parameter :: TOP=50
integer, save :: current = 0
integer, save :: stack(TOP)
public push, pop
contains
! 把数据放入堆栈中
subrout
www.eeworm.com/read/208614/15242236
f90 knight.f90
module STACK_UTILITY
implicit none
private
integer, parameter :: TOP=50
integer, save :: current = 0
integer, save :: stack(TOP)
public push, pop
contains
! 把数据放入堆栈中
subrout
www.eeworm.com/read/208614/15242336
f90 csint.f90
program main
use IMSL
implicit none
integer, parameter :: NDATA = 25, N = 30
real XDATA(NDATA), FDATA(NDATA)
real BREAK(NDATA), CSCOEF(4,NDATA), X
real, parameter :: xmin = -5.0, xma
www.eeworm.com/read/208614/15242358
f90 csiez.f90
program main
use IMSL
implicit none
integer, parameter :: NDATA = 10, N = 20
real XDATA(NDATA), FDATA(NDATA)
real XVEC(N), VALUE(N)
real, parameter :: xmin = -5.0, xmax = 5.0
real
www.eeworm.com/read/208614/15242396
f90 ex0922.f90
program ex0922
use typedef
implicit none
integer, parameter :: recl_unit = 4
integer, parameter :: buffer_size = 256*256
character :: cbuffer(buffer_size)
integer :: ibuffer(buffer
www.eeworm.com/read/208614/15242406
f90 ex0908.f90
module typedef
type player
character(len=80) :: name
real weight, height
real score
end type
end module
program ex0908
use typedef
implicit none
character(len=20) :: fi
www.eeworm.com/read/208614/15242411
f90 ex0911.f90
program ex0911
implicit none
integer, parameter :: fileid = 10
character(len=20) :: filename = "ex0911dat.txt"
integer player
real hit
integer error
open(unit=fileid, file
www.eeworm.com/read/478549/1350931
mak unzip.mak
.AUTODEPEND
# *Translator Definitions*
CC = bcc +UNZIP.CFG
TASM = TASM
TLINK = tlink
# *Implicit Rules*
.c.obj:
$(CC) -c {$< }
.cpp.obj:
$(CC) -c {$< }
# *List Macros*
EXE_dependencies =
www.eeworm.com/read/478549/1350932
mak zipinfo.mak
.AUTODEPEND
# *Translator Definitions*
CC = bcc +ZIPINFO.CFG
TASM = TASM
TLINK = tlink
# *Implicit Rules*
.c.obj:
$(CC) -c {$< }
.cpp.obj:
$(CC) -c {$< }
# *List Macros*
EXE_dependencies
www.eeworm.com/read/470720/1448273
c typedef2.c
// Build don't link:
// Testcase from Alexander Zvyagin
// Check implicit conversion from string constants into typedefs
typedef char CHAR;
void f2(CHAR *s="");