代码搜索：SIMP
找到约 1,031 项符合「SIMP」的源代码
代码结果 1,031
www.eeworm.com/read/171367/9759753
c simp.c
/*
(c) Copyright 2001 Julien Etelain. All rights reserved.
*/
/* Revision History (as of 04/04/2002):
*
* 04/04/2002: Updated with new icon (orudge)
*/
#include
#include
www.eeworm.com/read/171367/9759755
dat simp.dat
www.eeworm.com/read/171367/9759974
ico simp.ico
www.eeworm.com/read/171367/9760029
ln simp.ln
[definition]
link="s2a-bin/simp.s2a"
icon16="/system/bmp/simp.ico,16"
icon32="/system/bmp/simp.ico,32"
title="SIMP"
www.eeworm.com/read/170603/9797027
c simp.c
#include "c.h"
#include
static char rcsid[] = "$Id: simp.c,v 1.1 2002/08/28 23:12:45 drh Exp $";
#define foldcnst(TYPE,VAR,OP) \
if (l->op == CNST+TYPE && r->op == CNST+TYPE) \
return c
www.eeworm.com/read/414769/11102327
for simp3.for
SUBROUTINE simp3(a,mp,np,i1,k1,ip,kp)
INTEGER i1,ip,k1,kp,mp,np
REAL a(mp,np)
INTEGER ii,kk
REAL piv
piv=1./a(ip+1,kp+1)
do 12 ii=1,i1+1
if(ii-
www.eeworm.com/read/414769/11102387
for simp2.for
SUBROUTINE simp2(a,m,n,mp,np,l2,nl2,ip,kp,q1)
INTEGER ip,kp,m,mp,n,nl2,np,l2(mp)
REAL q1,a(mp,np),EPS
PARAMETER (EPS=1.e-6)
INTEGER i,ii,k
REAL q,q0,qp
www.eeworm.com/read/414769/11102443
for simp1.for
SUBROUTINE simp1(a,mp,np,mm,ll,nll,iabf,kp,bmax)
INTEGER iabf,kp,mm,mp,nll,np,ll(np)
REAL bmax,a(mp,np)
INTEGER k
REAL test
kp=ll(1)
bmax=a(mm+1,kp+1)
www.eeworm.com/read/334564/12586249
cnf simp(1).cnf
www.eeworm.com/read/334564/12586330