From mboxrd@z Thu Jan  1 00:00:00 1970
X-Spam-Checker-Version: SpamAssassin 3.4.4 (2020-01-24) on polar.synack.me
X-Spam-Level: 
X-Spam-Status: No, score=-1.9 required=5.0 tests=BAYES_00,FREEMAIL_FROM
	autolearn=ham autolearn_force=no version=3.4.4
X-Google-Thread: 103376,6d7a86bff9319841
X-Google-Attributes: gid103376,domainid0,public,usenet
X-Google-Language: ENGLISH,ASCII-7-bit
Path: 
 g2news1.google.com!postnews.google.com!j39g2000yqn.googlegroups.com!not-for-mail
From: gautier_niouzes@hotmail.com
Newsgroups: comp.lang.ada
Subject: Re: Where I find Bessel function for Ada ?
Date: Wed, 26 Nov 2008 03:05:23 -0800 (PST)
Organization: http://groups.google.com
Message-ID: 
 <ccf0cc26-f19d-4457-941e-de15ed0a38dd@j39g2000yqn.googlegroups.com>
References: 
 <a8cfd61d-2b5e-4df9-a7a4-8a83f3709f04@s20g2000yqh.googlegroups.com>
NNTP-Posting-Host: 206.122.158.4
Mime-Version: 1.0
Content-Type: text/plain; charset=ISO-8859-1
Content-Transfer-Encoding: 7bit
X-Trace: posting.google.com 1227697523 12973 127.0.0.1 (26 Nov 2008 11:05:23
 GMT)
X-Complaints-To: groups-abuse@google.com
NNTP-Posting-Date: Wed, 26 Nov 2008 11:05:23 +0000 (UTC)
Complaints-To: groups-abuse@google.com
Injection-Info: j39g2000yqn.googlegroups.com; posting-host=206.122.158.4;
	posting-account=gRqrnQkAAAAC_02ynnhqGk1VRQlve6ZG
User-Agent: G2/1.0
X-HTTP-UserAgent: Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; SV1;
 .NET
	CLR 2.0.50727; .NET CLR 1.1.4322; InfoPath.1; .NET CLR 3.0.04506.648; .NET
	CLR 3.5.21022),gzip(gfe),gzip(gfe)
Xref: g2news1.google.com comp.lang.ada:2805
Date: 2008-11-26T03:05:23-08:00
List-Id: <comp.lang.ada>

> Dear All,
>
> I want to use the modified Bessel function of order 0 in my Ada
> program.
>
> Where I find it ?
>
> reinert

It is in the Numerical Recipes in Pascal, chapter 6.4, pp 191.
All you need to pick the right Pascal source, like bessj0.pas
and put it through th P2Ada translator: http://p2ada.sf.net/
The NR sources are freely available on the Internet.
HTH
Gautier