[Trilinos-Users] Windows port and pamgen

[Kevin Long]

Bill,

You can find public domain Fortran source for all three functions at 
http://www.netlib.org/specfun/.

Kevin



On Thursday 30 July 2009 08:52:27 am Bill Hoffman wrote:
> Hi,
>
> I am Bill Hoffman from Kitware, I am working on the Windows port of
> Trilinos.  The windows system is missing a few functions from math.h
> that are used in pamgen Registrar.C.  The functions are tgamma,  erf,
> and erfc.
>
> For now I have just returned 0 instead of calling the functions, which
> is bad:
>
>
> /**************************************************************************
>***/ double Gamma::execute(Value** args)
> /**************************************************************************
>***/ {
> #if _MSC_VER
>    return 0;
> #else
>    return tgamma(args[0]->getValue());
> #endif
> }
>
>
> #ifdef _MSC_VER
>    return 0;
> #else
>    return erf(args[0]->getValue());
> #endif
>
>
> #ifdef _MSC_VER
>    return 0;
> #else
>    return erfc(args[0]->getValue());
> #endif
>
>
> erf and erfc are in libf2c, but tgamma is not.   Does anyone have
> implementations of these functions that can be used for the windows
> build of Trilinos?
>
> Thanks.
>
> -Bill



-- 
------------------------------------------------------
Kevin Long
Associate Professor
Department of Mathematics and Statistics
Texas Tech University
Lubbock, TX 

"The end of fear is the beginning of wisdom" 
    -- Bertrand Russell
------------------------------------------------------