代码搜索:complex
找到约 10,000 项符合「complex」的源代码
代码结果 10,000
www.eeworm.com/read/136812/5858372
c c_exp.c
#ifndef lint
static char sccsid[] = "@(#)c_exp.c 1.1 92/07/30 SMI"; /* from UCB 1.1" */
#endif
/*
*/
#include "complex.h"
c_exp(r, z)
complex *r, *z;
{
register double expx;
double exp(), cos(), s
www.eeworm.com/read/136812/5858374
c z_abs.c
#ifndef lint
static char sccsid[] = "@(#)z_abs.c 1.1 92/07/30 SMI"; /* from UCB 1.1" */
#endif
/*
*/
#include "complex.h"
double z_abs(z)
dcomplex *z;
{
double hypot();
return( hypot( z->dreal, z
www.eeworm.com/read/136812/5858379
c z_sin.c
#ifndef lint
static char sccsid[] = "@(#)z_sin.c 1.1 92/07/30 SMI"; /* from UCB 1.1" */
#endif
/*
*/
#include "complex.h"
z_sin(r, z)
dcomplex *r, *z;
{
double sin(), cos(), sinh(), cosh();
r->dr
www.eeworm.com/read/136812/5858409
c c_cos.c
#ifndef lint
static char sccsid[] = "@(#)c_cos.c 1.1 92/07/30 SMI"; /* from UCB 1.1" */
#endif
/*
*/
#include "complex.h"
c_cos(r, z)
complex *r, *z;
{
double sin(), cos(), sinh(), cosh();
r->rea
www.eeworm.com/read/136812/5858414
c r_cnjg.c
#ifndef lint
static char sccsid[] = "@(#)r_cnjg.c 1.1 92/07/30 SMI"; /* from UCB 1.1" */
#endif
/*
*/
#include "complex.h"
r_cnjg(r, z)
complex *r, *z;
{
r->real = z->real;
r->imag = - z->imag;
}
www.eeworm.com/read/136812/5858420
c d_cnjg.c
#ifndef lint
static char sccsid[] = "@(#)d_cnjg.c 1.1 92/07/30 SMI"; /* from UCB 1.1" */
#endif
/*
*/
#include "complex.h"
d_cnjg(r, z)
dcomplex *r, *z;
{
r->dreal = z->dreal;
r->dimag = - z->dima
www.eeworm.com/read/136812/5858421
c d_imag.c
#ifndef lint
static char sccsid[] = "@(#)d_imag.c 1.1 92/07/30 SMI"; /* from UCB 1.1" */
#endif
/*
*/
#include "complex.h"
double d_imag(z)
dcomplex *z;
{
return(z->dimag);
}
www.eeworm.com/read/136812/5858431
c z_cos.c
#ifndef lint
static char sccsid[] = "@(#)z_cos.c 1.1 92/07/30 SMI"; /* from UCB 1.1" */
#endif
/*
*/
#include "complex.h"
z_cos(r, z)
dcomplex *r, *z;
{
double sin(), cos(), sinh(), cosh();
r->dr
www.eeworm.com/read/136812/5858435
c c_compare.c
#ifndef lint
static char sccsid[] = "@(#)c_compare.c 1.1 92/07/30 SMI";
#endif
/*
* Copyright (c) 1987 by Sun Microsystems, Inc.
*/
/* complex*8 comparison */
#include "complex.h"
int
_Fc_e
www.eeworm.com/read/136812/5858441
c r_imag.c
#ifndef lint
static char sccsid[] = "@(#)r_imag.c 1.1 92/07/30 SMI";
#endif
/*
* Copyright (c) 1987 by Sun Microsystems, Inc.
*/
#include "complex.h"
FLOATFUNCTIONTYPE
r_imag(z)
complex *z;
{
RE