代码搜索：implicit
找到约 5,250 项符合「implicit」的源代码
代码结果 5,250
www.eeworm.com/read/216545/15003750
err 24a0lib.err
"src\24a0lib.c", line 177: Warning: C2873W: implicit return in non-void function
"src\24a0lib.c", line 199: Warning: C2873W: implicit return in non-void function
src\24a0lib.c: 2 warnings, 0 errors,
www.eeworm.com/read/216545/15003767
err pwr_c.err
"src\pwr_c.c", line 214: Warning: C2870W: variable 'k' declared but not used
"src\pwr_c.c", line 214: Warning: C2870W: variable 'j' declared but not used
"src\pwr_c.c", line 214: Warning: C2870W: va
www.eeworm.com/read/208614/15242229
f90 selsort.f90
! 选择排序法范例
! By Perng 1997/8/29
program SELECTION_SORT_DEMO
implicit none
integer, parameter :: N=10
integer :: A(N)=(/6,2,8,4,0,9,3,5,1,7/) ! 排序的数据
write(*,"('Source=>',10I3)") A
ca
www.eeworm.com/read/208614/15242230
f90 bsort.f90
! 冒泡排序法范例
! By Perng 1997/8/29
program BUBBLE_SORT_DEMO
implicit none
integer, parameter :: N=10
integer :: A(N)=(/6,2,8,4,0,9,3,5,1,7/) ! 待排序的数据
write(*,"('Source=>',10I3)") A
call B
www.eeworm.com/read/208614/15242278
f90 sgldraw2.f90
module sgl_util
use sgl
implicit none
contains
subroutine Display()
call sglClearBuffer() ! 清除画面
call sglColor3f(1.0,0,0) ! 使用红色
call sglRectV(0.2, 0.2, 0.8, 0.8) ! 以(0.2,0.2)和(0.8,
www.eeworm.com/read/168845/5435342
cpp optional_test_fail2.cpp
// Copyright (C) 2003, Fernando Luis Cacciola Carballal.
//
// Use, modification, and distribution is subject to the Boost Software
// License, Version 1.0. (See accompanying file LICENSE_1_0.txt o
www.eeworm.com/read/162614/5519829
c instan1.c
// { dg-do link }
// { dg-options "-fno-implicit-templates" }
// Origin: Mark Mitchell
template
struct U {
static int j;
};
template
struct S {
stati
www.eeworm.com/read/162614/5520303
c typename4.c
// { dg-do assemble }
// { dg-options "-Wno-deprecated" }
template
struct A
{
typedef T A_Type;
};
template
struct B : public A
{
};
template
struct C : public
www.eeworm.com/read/162614/5523248
f90 hollerith.f90
! PR 14038- 'H' in hollerith causes mangling of string
program hollerith
IMPLICIT NONE
CHARACTER*4 LINE
100 FORMAT (4H12H4)
WRITE(LINE,100)
IF (LINE .NE. '12H4') call abort ()
end
www.eeworm.com/read/162614/5523360
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