代码搜索:implicit
找到约 5,250 项符合「implicit」的源代码
代码结果 5,250
www.eeworm.com/read/399279/7875663
f90 e_321_02.f90
implicit none
integer :: i,n
real :: y=0, term
read *, n
do i=1,n
term=1./(i*(i+1))
y=y+term
if(abs(term)
www.eeworm.com/read/298842/7931600
f90 new_libr.f90
module new_library
contains
subroutine formblock_k(bigk,km,g,g_min)
! forms complete n*n matrix or submatrix
implicit none
real,intent(in)::km(:,:); integer,
www.eeworm.com/read/196479/8089262
txt snmpv2-smi.txt
SNMPv2-SMI DEFINITIONS ::= BEGIN
-- the path to the root
org OBJECT IDENTIFIER ::= { iso 3 } -- "iso" = 1
dod OBJECT IDENTIFIER ::= { org 6 }
internet OBJECT IDEN
www.eeworm.com/read/332108/12778255
f90 problemfuns.f90
Module SpecFuns
use shootdefs
implicit none
contains
Subroutine InitPar(mode, z, lambda)
implicit none
integer, intent(in) :: mode
real(kind=8), intent(in) :: z(n), lambda
!
www.eeworm.com/read/244284/12875395
inc creal8.inc
implicit real*8 (a,b,d-h, o-z)
implicit complex*16 (c)
www.eeworm.com/read/244284/12875426
inc creal8.inc
implicit double precision (a,b,d-h, o-z)
implicit double complex (c)
www.eeworm.com/read/244284/12875560
inc creal8.inc
implicit double precision (a,b,d-h, o-z)
implicit double complex (c)
www.eeworm.com/read/140545/13076784
cpp unroll.cpp
//: C05:Unroll.cpp
// Unrolls an implicit loop via inlining
#include
using namespace std;
template
inline int power(int m) {
return power(m) * m;
}
template
inli
www.eeworm.com/read/140161/13102320
p spawner.p
/* Protogen Version 1.07 Wednesday November 01, 1995 17:42:53 */
/* Spawner.c */
FILE *CreateFile(void);
void CloseFile(FILE *fh);
void DeleteFiles(void);
int
www.eeworm.com/read/325052/13228931
f90 dgm(charactvar).f90
!! discontinuous galerkin method, in one-dimensional case
module mainvar
implicit none
integer,parameter :: m=3, NN=400 !! m for number of basis function,
real,parameter :: ga