QSAS_2_4/QSAS_dist/src/Ext/qrtn/qrtn_lib.cc File Reference

#include "qrtn.h"
#include <qregexp.h>

Functions
long	QrDoRotation (QrVector *vec)
long	QrInitQRTN ()
int	QrGetFrameFromAttr (QdObject_var dobj)
void	QrSetFrameAttr (int frame_flag, QdObject_var dobj)
char *	QrErrorMessage (long err_flag)
long	QrGetModel (double yr)
long	QrUpdateModel (int MJDdate, double ut)
long	QrGetRotAngles (int MJDdate, double ut)
long	QrSunEarth (double *theta, double *phi)
double	QrSunEqator (int MJDdate)
long	QrGSM_to_GSE (double *psi, double *mu, double latitude, double longitude)
double	QrObliquity (double JulianC)
double	QrSunLong (double JulianC, double ut)
double	QrGST (double JulianC, double ut)
double	QrDegToRadMod2pi (double angle)
long	QrGetMagPole ()
long	QrEpochToMJD_UT (double epoch, int *MJDdate, double *ut)
int	QrMJD (int year, int month, int day)
long	QrGetTerms ()
long	QrBuildTran (double(*T)[3][3], int n_terms, int *list_rtns)
long	QrMultVecbyMatx (double(*XX)[3], double T[3][3])
long	QrMultMtxByMtx (double(*T)[3][3], double S[3][3])
long	QrMakeMatrix (double theta, int axis, double(*T)[3][3])
int	QrGetAxis (int i)
double	QrGetAngle (int i)
void	QrUnitMatrix (double(*T)[3][3])
void	QrNullMatrix (double(*T)[3][3])
long	QrMakeMatx (int in_frame, int out_frame, double(*T)[3][3])
int	QrIsPositionVector (QdObject_var dobj)
int	QrOriginsDiffer (int in_frame, int out_frame)
Variables
int	verbose
double	year_0
int	MaxTerm
static int	Qrtn_skip = 0
char	last_err [240] = {""}
int	n_sys
char	sys_name [MAX_N_SYS][SYS_NAME_LEN+1]
static int	sys_to_gse [MAX_N_SYS][N_ROTNS+1]
double	model_year [N_YEAR_MODELS]
double	G01 [N_YEAR_MODELS]
double	G11 [N_YEAR_MODELS]
double	H11 [N_YEAR_MODELS]
double	G01_datum
double	G11_datum
double	H11_datum
int	Lterms [N_ROTNS]
int	m_max
double	M_pole_long
double	M_pole_colat
double	rotations [12]
int	rot_axis [12] = {2,2,0,0,1,1,2,2,0,2,1,2}
static char	R_STR_NULL [] = ""
double	value_of_pi
double	deg2rad
double	rad2deg

---

Function Documentation

long QrBuildTran	(	double(*)	T[3][3],
		int	n_terms,
		int *	list_rtns
	)

double QrDegToRadMod2pi

(

double

angle

)

long QrDoRotation

(

QrVector *

vec

)

long QrEpochToMJD_UT	(	double	epoch,
		int *	MJDdate,
		double *	ut
	)

char* QrErrorMessage

(

long

err_flag

)

double QrGetAngle

(

int

i

)

int QrGetAxis

(

int

i

)

int QrGetFrameFromAttr

(

QdObject_var

dobj

)

long QrGetMagPole

(

)

long QrGetModel

(

double

yr

)

long QrGetRotAngles	(	int	MJDdate,
		double	ut
	)

long QrGetTerms

(

)

long QrGSM_to_GSE	(	double *	psi,
		double *	mu,
		double	latitude,
		double	longitude
	)

double QrGST	(	double	JulianC,
		double	ut
	)

long QrInitQRTN

(

)

int QrIsPositionVector

(

QdObject_var

dobj

)

long QrMakeMatrix	(	double	theta,
		int	axis,
		double(*)	T[3][3]
	)

long QrMakeMatx	(	int	in_frame,
		int	out_frame,
		double(*)	T[3][3]
	)

int QrMJD	(	int	year,
		int	month,
		int	day
	)

long QrMultMtxByMtx	(	double(*)	T[3][3],
		double	S[3][3]
	)

long QrMultVecbyMatx	(	double(*)	XX[3],
		double	T[3][3]
	)

void QrNullMatrix

(

double(*)

T[3][3]

)

double QrObliquity

(

double

JulianC

)

int QrOriginsDiffer	(	int	in_frame,
		int	out_frame
	)

void QrSetFrameAttr	(	int	frame_flag,
		QdObject_var	dobj
	)

long QrSunEarth	(	double *	theta,
		double *	phi
	)

double QrSunEqator

(

int

MJDdate

)

double QrSunLong	(	double	JulianC,
		double	ut
	)

void QrUnitMatrix

(

double(*)

T[3][3]

)

long QrUpdateModel	(	int	MJDdate,
		double	ut
	)

---

Variable Documentation

double deg2rad

double G01[N_YEAR_MODELS]

double G01_datum

double G11[N_YEAR_MODELS]

double G11_datum

double H11[N_YEAR_MODELS]

double H11_datum

char last_err[240] = {""}

int Lterms[N_ROTNS]

int m_max

double M_pole_colat

double M_pole_long

int MaxTerm

double model_year[N_YEAR_MODELS]

int n_sys

int Qrtn_skip = 0 [static]

char R_STR_NULL[] = "" [static]

double rad2deg

int rot_axis[12] = {2,2,0,0,1,1,2,2,0,2,1,2}

double rotations[12]

char sys_name[MAX_N_SYS][SYS_NAME_LEN+1]

int sys_to_gse[MAX_N_SYS][N_ROTNS+1] [static]

double value_of_pi

int verbose

double year_0