rad.h

Go to the documentation of this file.

/* © 1998 JRM Technologies, Inc.*/
/***********************************
Copyright JRM Enterprises, Inc. 1998
All rights reserved.

This code is the intellectual property of JRM Enterprises, Inc.
It may not be used or released as source or compiled binary form
without the prior written consent of JRM Enterprises, Inc.
***********************************/


#include <stdio.h>
#include <math.h>
#include <string.h>
#include <stdlib.h>
#include "JRMlibraryDLLstub.h"
#include "JRMlibrary.h"

//------------Grabbed #defines and put them in JRMDefines.h---------------------//


#ifdef __cplusplus
extern "C"
{
#endif


    JRMLIBRARY_API double Planck(double ax, double temp);
    JRMLIBRARY_API double PlanckDeriv(double ax, double temp);
    JRMLIBRARY_API double rademit_approx(double ax, double bx, double t, long n, double *itd);
    JRMLIBRARY_API double rademit(double ax, double bx, double dx, double t, double *itd);
    JRMLIBRARY_API double rad2temp(double ax,double bx,double dx,double tinit,double rademit,double err);
    JRMLIBRARY_API double luminous_exitance(double ax, double bx, double dx, double t);
    JRMLIBRARY_API double star_irradiance_from_magnitude(double mag);
    JRMLIBRARY_API double rad2temp2(double ax,double bx,double dx,double rad);
    JRMLIBRARY_API double WienWavelength(double degK);
    JRMLIBRARY_API double StefanIrradiance(double degK);
    JRMLIBRARY_API double StefanDegK(double Irradiance);
    JRMLIBRARY_API double TemperatureFromEmissivityAndIntegral(long npoints, double *lambda_um, double *emissivity, double integralWM2);
   JRMLIBRARY_API double rad2tempwResponse(double *lambda_um, double *response, long nlambda, double tinit, double rademit, double err);
   JRMLIBRARY_API double rad2temp2wResponse(double *lambda_um, double *response, long nlambda, double rad);
    jrmComplex RootMeForPlanckTemp(jrmComplex* F, int N, jrmComplex X);
    jrmComplex PlanckIntegralDifference(jrmComplex* F, int N, jrmComplex X);
   jrmComplex PlanckIntegralDifferencewResponse(jrmComplex* F, int N, jrmComplex X);




#ifdef __cplusplus
}
#endif