代码搜索：sparse
找到约 3,324 项符合「sparse」的源代码
代码结果 3,324
www.eeworm.com/read/387489/8672320
txt sparse.txt
procedure SPARSE(B:array of real; N:integer;var X:array of real; RSQ:real);
label 1;
const
NMAX = 500; EPS = 0.000001;
var
G,H,XI,XJ:array[0..500] of real;
J,ITER,IRST:integer;
www.eeworm.com/read/431223/8699086
h sparse.h
/* sparse.h 030990 */
#include "constant.h"
typedef struct IntegerVector {
INDEX N;
INDEX *p;
} IntegerVector;
typedef struct SparseMatrixElement {
INDEX Row;
INDEX Col;
ELEMENTVALUETYPE
www.eeworm.com/read/431223/8699113
c sparse.c
/* sparse.c 030590 */
#include
//#ifndef WINDOWS
//#include
//#else
#include "pfwstdio.h"
//#endif
#include
#include
#include "constant.h"
#include "param.h"
www.eeworm.com/read/387009/8712150
h sparse.h
struct NRsparseCol
{
Int nrows;
Int nvals;
VecInt row_ind;
VecDoub val;
NRsparseCol(Int m,Int nnvals) : nrows(m), nvals(nnvals),
row_ind(nnvals,0),val(nnvals,0.0) {}
NRsparseCol() :
www.eeworm.com/read/430015/8773039
h sparse.h
#ifndef SPARSE_H
#define SPARSE_H
/*====================================================================
Copyright 1996, 1997, 2004 Ian Kaplan, Bear Products International,
www.bearcave.com.
A
www.eeworm.com/read/284944/8881714
zip sparse.zip
www.eeworm.com/read/382436/9029437
txt sparse.txt
procedure SPARSE(B:array of real; N:integer;var X:array of real; RSQ:real);
label 1;
const
NMAX = 500; EPS = 0.000001;
var
G,H,XI,XJ:array[0..500] of real;
J,ITER,IRST:integer;
www.eeworm.com/read/372592/9500938
txt sparse.txt
Sub SPARSE(B(), N, X(), RSQ)
NMAX = 500
EPS = 0.000001
Dim G(500), H(500), XI(500), XJ(500)
EPS2 = N * EPS ^ 2
IRST = 0
1 IRST = IRST + 1
Call ASUB(X(), XI())
RP
www.eeworm.com/read/162188/10327593
dec sparse.dec
/*
** sparse.dec - global declarations for sparse functions
**
** (C) Copyright 1996 by Aptech Systems, Inc.
** All Rights Reserved.
**
** This Software Product is PROPRIETARY SOURCE CODE OF AP