nrutil.c     ALTE VERSION
=========================


// NRUTIL.C  aus dem public domain Bereich der Numerical Recipes C (
// Variation von H. Sormann 1999

//#if defined(__STDC__) || defined(ANSI) || defined(NRANSI) /* ANSI */

//#include <iostream.h>
#include <stdio.h>
#include <stddef.h>
#include <stdlib.h>
#define NR_END 1
#define FREE_ARG char*

void nrerror(char error_text[])
/* Numerical Recipes standard error handler */
{
	fprintf(stderr,"Numerical Recipes run-time error...\n");
	fprintf(stderr,"%s\n",error_text);
	fprintf(stderr,"...now exiting to system...\n");
//	cout<<"Numerical Recipes run-time error...\n";
//	cout<<error_text;
//	cout<<"...now exiting to system...\n";
	exit(1);
}

float *vector(long nl, long nh)
/* allocate a float vector with subscript range v[nl..nh] */
.
.
.



nrutil.c     NEUE VERSION
=========================

// NRUTIL.C  aus dem public domain Bereich der Numerical Recipes C (
// Variation von H. Sormann 1999

//#if defined(__STDC__) || defined(ANSI) || defined(NRANSI) /* ANSI */

//#include <iostream.h>
#include <stdio.h>
#include <stddef.h>
#include <stdlib.h>
#define NR_END 1
#define FREE_ARG char*

// ***************************************************************
// Die folgende Aenderung des nerror-Aufrufs habe ich am 4.12.2008
// auf Anregung von Herrn Kollmitzer vorgenommen, um das Auftreten
// von Compilations-Warnungen zu verhindern:

//void nrerror(char error_text[])
void nrerror(const char error_text[])
// ***************************************************************

/* Numerical Recipes standard error handler */
{
	fprintf(stderr,"Numerical Recipes run-time error...\n");
	fprintf(stderr,"%s\n",error_text);
	fprintf(stderr,"...now exiting to system...\n");
//	cout<<"Numerical Recipes run-time error...\n";
//	cout<<error_text;
//	cout<<"...now exiting to system...\n";
	exit(1);
}

float *vector(long nl, long nh)
/* allocate a float vector with subscript range v[nl..nh] */
.
.
.