/* he3tau.h */ #define NHE3TAU 4 #define IPT10830 1 #define IPT3889 2 #define IPT5876 3 #define IPT7065 4 /*EXTERN struct t_he3tauCom {*/ /* float he3tau[NHE3TAU][NTA];*/ /* t206[NTA];*/ /* } he3tauCom;*/ /* the 2.06 line is a singlet but is here to be parallel with triplets * that are transferred as a single structure */ EXTERN EmLine he3tau[NHE3TAU] , t206; /* *number of he triplet lines with optical depths * real t10830(nta),t3889(nta),t5876(nta),t7065(nta) * old equiv (he3tau(1,1),t10830(1)), (he3tau(1,2),t3889(1)), * 1 (he3tau(1,3),t5876(1)), (he3tau(1,4),t7065(1)) */