Defines | Functions | Variables
nr.c File Reference
#include "eus.h"
#include "nr.h"
#include <math.h>
Include dependency graph for nr.c:

Go to the source code of this file.

Defines

#define FMAX(a, b)   (maxarg1=(a),maxarg2=(b),(maxarg1) > (maxarg2) ? (maxarg1) : (maxarg2))
#define FREE_ARG   char*
#define IMIN(a, b)   (iminarg1=(a),iminarg2=(b),(iminarg1) < (iminarg2) ? (iminarg1) : (iminarg2))
#define NR_END   1
#define SIGN(a, b)   ((b) >= 0.0 ? fabs(a) : -fabs(a))
#define SQR(a)   ((sqrarg=(a)) == 0.0 ? 0.0 : sqrarg*sqrarg)

Functions

void free_nr_matrix (eusfloat_t **m, int nrl, int nrh, int ncl, int nch)
void free_nr_vector (eusfloat_t *v, int nl, int nh)
void lubksb (eusfloat_t **a, int n, int *indx, eusfloat_t b[])
int ludcmp (eusfloat_t **a, int n, int *indx, eusfloat_t *d)
eusfloat_t ** nr_matrix (int nrl, int nrh, int ncl, int nch)
eusfloat_tnr_vector (int nl, int nh)
void nrerror (char error_text[])
eusfloat_t pythag (eusfloat_t a, eusfloat_t b)
void svbksb (eusfloat_t **u, eusfloat_t w[], eusfloat_t **v, int m, int n, eusfloat_t b[], eusfloat_t x[])
int svdcmp (eusfloat_t **a, int m, int n, eusfloat_t w[], eusfloat_t **v)
int svdsolve (eusfloat_t **a, int m, int n, eusfloat_t *b, eusfloat_t *x)
int tqli (eusfloat_t d[], eusfloat_t e[], int n, eusfloat_t **z)
void tred2 (eusfloat_t **a, int n, eusfloat_t d[], eusfloat_t e[])

Variables

static int iminarg1
static int iminarg2
static eusfloat_t maxarg1
static eusfloat_t maxarg2
static eusfloat_t sqrarg

Define Documentation

#define FMAX (   a,
 
)    (maxarg1=(a),maxarg2=(b),(maxarg1) > (maxarg2) ? (maxarg1) : (maxarg2))

Definition at line 33 of file nr.c.

#define FREE_ARG   char*

Definition at line 41 of file nr.c.

#define IMIN (   a,
 
)    (iminarg1=(a),iminarg2=(b),(iminarg1) < (iminarg2) ? (iminarg1) : (iminarg2))

Definition at line 36 of file nr.c.

#define NR_END   1

Definition at line 40 of file nr.c.

#define SIGN (   a,
 
)    ((b) >= 0.0 ? fabs(a) : -fabs(a))

Definition at line 38 of file nr.c.

#define SQR (   a)    ((sqrarg=(a)) == 0.0 ? 0.0 : sqrarg*sqrarg)

Definition at line 30 of file nr.c.


Function Documentation

void free_nr_matrix ( eusfloat_t **  m,
int  nrl,
int  nrh,
int  ncl,
int  nch 
)

Definition at line 83 of file nr.c.

void free_nr_vector ( eusfloat_t v,
int  nl,
int  nh 
)

Definition at line 78 of file nr.c.

void lubksb ( eusfloat_t **  a,
int  n,
int *  indx,
eusfloat_t  b[] 
)

Definition at line 89 of file nr.c.

int ludcmp ( eusfloat_t **  a,
int  n,
int *  indx,
eusfloat_t d 
)

Definition at line 109 of file nr.c.

eusfloat_t** nr_matrix ( int  nrl,
int  nrh,
int  ncl,
int  nch 
)

Definition at line 58 of file nr.c.

eusfloat_t* nr_vector ( int  nl,
int  nh 
)

Definition at line 50 of file nr.c.

void nrerror ( char  error_text[])

Definition at line 43 of file nr.c.

Definition at line 504 of file nr.c.

void svbksb ( eusfloat_t **  u,
eusfloat_t  w[],
eusfloat_t **  v,
int  m,
int  n,
eusfloat_t  b[],
eusfloat_t  x[] 
)

Definition at line 181 of file nr.c.

int svdcmp ( eusfloat_t **  a,
int  m,
int  n,
eusfloat_t  w[],
eusfloat_t **  v 
)

Definition at line 203 of file nr.c.

int svdsolve ( eusfloat_t **  a,
int  m,
int  n,
eusfloat_t b,
eusfloat_t x 
)

Definition at line 160 of file nr.c.

int tqli ( eusfloat_t  d[],
eusfloat_t  e[],
int  n,
eusfloat_t **  z 
)

Definition at line 450 of file nr.c.

void tred2 ( eusfloat_t **  a,
int  n,
eusfloat_t  d[],
eusfloat_t  e[] 
)

Definition at line 382 of file nr.c.


Variable Documentation

int iminarg1 [static]

Definition at line 35 of file nr.c.

int iminarg2 [static]

Definition at line 35 of file nr.c.

eusfloat_t maxarg1 [static]

Definition at line 32 of file nr.c.

eusfloat_t maxarg2 [static]

Definition at line 32 of file nr.c.

eusfloat_t sqrarg [static]

$Id$

Copyright (c) 1987- JSK, The University of Tokyo. All Rights Reserved.

This software is a collection of EusLisp code for robot applications, which has been developed by the JSK Laboratory for the IRT project. For more information on EusLisp and its application to the robotics, please refer to the following papers.

Toshihiro Matsui Multithread object-oriented language euslisp for parallel and asynchronous programming in robotics Workshop on Concurrent Object-based Systems, IEEE 6th Symposium on Parallel and Distributed Processing, 1994

Permission to use this software for educational, research and non-profit purposes, without fee, and without a written agreement is hereby granted to all researchers working on the IRT project at the University of Tokyo, provided that the above copyright notice remains intact.

Definition at line 29 of file nr.c.



jskeus
Author(s): JSK Alumnis
autogenerated on Thu Jun 6 2019 21:31:35