代码搜索：implicit
找到约 5,250 项符合「implicit」的源代码
代码结果 5,250
www.eeworm.com/read/233448/4678877
f90 named_args.f90
! This caused problems because we created a symbol for P while
! trying to parse the argument list as a substring reference.
program named_args
implicit none
integer, parameter :: realdp = selecte
www.eeworm.com/read/233448/4678884
f90 module_common.f90
! We were incorrectly trying to create a variable for the common block itself,
! in addition to the variables it contains.
module FOO
implicit none
integer I
common /C/I
contains
subroutine BA
www.eeworm.com/read/233448/4681592
f90 pr20086.f90
! { dg-do run }
! PR 20086 - Missing characters in output with hollerith strings
implicit none
character*80 line
write(line,2070)
if (line.ne.' stiffness reformed for thi
www.eeworm.com/read/229812/4740731
upd01
#
# wmake regression tests
#
#
# 12-Feb-90 D.J.Gaudet Initial Implementation
#
#
# test implicit rules across multiple (non-existing) targets
#
wk = @wtouch
.extensions:
www.eeworm.com/read/229812/4746435
for calendar.for
implicit none
integer NARROW, WIDE
parameter (NARROW = 3)
parameter (WIDE = 4)
integer*2 year, month, day
*$ifdef JAPAN_VER
character WideTitle*27 /' 擔 寧
www.eeworm.com/read/190666/5173149
c static5.c
// Build don't link:
// Origin: Mark Mitchell
struct S
{
~S();
};
inline void f()
{
static S s;
atexit (0); // ERROR - implicit declaration
}
www.eeworm.com/read/169697/5412998
in pfcoll_test.f.in
program main
implicit none
include 'mpif.h'
@F77MPIOINC@
! This is the same as fcoll_test.f, but uses the PMPI versions
! of all functions in order to test the profil
www.eeworm.com/read/167728/5452802
todo
Main Todo Items
===============
We are looking for volunteers to do the following tasks.
Consult the TODO files in each directory first for specific
requirements.
* Fix error terms in implicit ODE s
www.eeworm.com/read/162614/5523157
f90 intrinsic_product.f90
! Program to test the PRODUCT intrinsic
program testproduct
implicit none
integer, dimension (3, 3) :: a
integer, dimension (3) :: b
logical, dimension (3, 3) :: m, tr
character(len=12)