/* hphoto.h */ EXTERN struct t_HPhoto { /* hgamnc is hydyrogen photoionization rate */ double hgamnc[LIMELM][NHYDRO_MAX_LEVEL]; /* finduc is integral of photorate times exp(-hu/kt) * for ind rec, produced by gamma routine needs to be mult * by lte pop to become real rate */ double finduc[LIMELM][NHYDRO_MAX_LEVEL]; /* the induced recombination rate obtained by mult * finduc by lte pops*/ double rinduc[LIMELM][NHYDRO_MAX_LEVEL]; /* cind is this times hnu-hnuo0 to get cooling, * evaluated in gamma routine and saved, not mult * by lte pops */ double cind[LIMELM][NHYDRO_MAX_LEVEL]; /* cinduc is actual cooling obtained by mult cind * by lte population */ double cinduc[LIMELM][NHYDRO_MAX_LEVEL]; /* cintot is total induced cooling over model */ double cintot; /* lgHInducImp says whether or not induced recombination is important*/ int lgHInducImp; } HPhoto;