Context Navigation

lsrcradspec.cc@ 3842

Visit:

Last change on this file since 3842 was 801, checked in by ansari, 25 years ago

Fichiers au format unix

dominique

File size: 388 bytes

Rev	Line
[801]	1	// Dominique YVON, CEA/DAPNIA/SPP 02/2000
	2
	3	#include "lsrcradspec.h"
	4	#include "abslightsource.h"
	5
	6	LSrcRadSpec::LSrcRadSpec(AbsLightSource* pLSrc, double theta, double phi,
	7	double FreqMin, double FreqMax) :RadSpectra(FreqMin,FreqMax)
	8	{ pLightSrc=pLSrc;
	9	Theta=theta;
	10	Phi=phi;
	11	}
	12
	13	double LSrcRadSpec::flux(double freq) const {
	14	return (pLightSrc->powSpecDens(Theta,Phi,freq));
	15	}
	16

Note: See TracBrowser for help on using the repository browser.