代码搜索:float
找到约 10,000 项符合「float」的源代码
代码结果 10,000
www.eeworm.com/read/278154/10564320
c sncndn.c
#include
#define CA 0.0003
void sncndn(float uu, float emmc, float *sn, float *cn, float *dn)
{
float a,b,c,d,emc,u;
float em[14],en[14];
int i,ii,l,bo;
emc=emmc;
u=uu;
if
www.eeworm.com/read/278154/10564329
c predic.c
#define NRANSI
#include "nrutil.h"
void predic(float data[], int ndata, float d[], int m, float future[],
int nfut)
{
int k,j;
float sum,discrp,*reg;
reg=vector(1,m);
for (j=1;j
www.eeworm.com/read/278154/10564366
c simp3.c
void simp3(float **a, int i1, int k1, int ip, int kp)
{
int kk,ii;
float piv;
piv=1.0/a[ip+1][kp+1];
for (ii=1;ii
www.eeworm.com/read/278154/10564375
c flmoon.c
#include
#define RAD (3.14159265/180.0)
void flmoon(int n, int nph, long *jd, float *frac)
{
void nrerror(char error_text[]);
int i;
float am,as,c,t,t2,xtra;
c=n+nph/4.0;
t=c
www.eeworm.com/read/278154/10564428
c daub4.c
#define NRANSI
#include "nrutil.h"
#define C0 0.4829629131445341
#define C1 0.8365163037378079
#define C2 0.2241438680420134
#define C3 -0.1294095225512604
void daub4(float a[], unsigned long
www.eeworm.com/read/278154/10564450
c pwt.c
#define NRANSI
#include "nrutil.h"
typedef struct {
int ncof,ioff,joff;
float *cc,*cr;
} wavefilt;
extern wavefilt wfilt;
void pwt(float a[], unsigned long n, int isign)
{
float ai,a
www.eeworm.com/read/278154/10564460
c svdfit.c
#define NRANSI
#include "nrutil.h"
#define TOL 1.0e-5
void svdfit(float x[], float y[], float sig[], int ndata, float a[], int ma,
float **u, float **v, float w[], float *chisq,
void (*funcs)
www.eeworm.com/read/278154/10564479
c fit.c
#include
#define NRANSI
#include "nrutil.h"
void fit(float x[], float y[], int ndata, float sig[], int mwt, float *a,
float *b, float *siga, float *sigb, float *chi2, float *q)
{
fl
www.eeworm.com/read/278154/10564502
c cholsl.c
void cholsl(float **a, int n, float p[], float b[], float x[])
{
int i,k;
float sum;
for (i=1;i=1;k--) sum -= a[i][k]*x[k];
x[i]=sum/p[i];
}
for (i=
www.eeworm.com/read/278154/10564523
c wt1.c
void wt1(float a[], unsigned long n, int isign,
void (*wtstep)(float [], unsigned long, int))
{
unsigned long nn;
if (n < 4) return;
if (isign >= 0) {
for (nn=n;nn>=4;nn>>=1) (*wtstep)(a