Changeset 2034 for branches/c08_branch/source/atmdat_HS_caseb.cpp
- Timestamp:
- 05/10/08 09:03:02 (2 months ago)
- Files:
-
- branches/c08_branch/source/atmdat_HS_caseb.cpp (modified) (2 diffs)
Legend:
- Unmodified
- Added
- Removed
- Modified
- Copied
- Moved
branches/c08_branch/source/atmdat_HS_caseb.cpp
r1767 r2034 20 20 /* general utility to interpolate line emissivities from the Storey & Hummer tables 21 21 of case B emissivities. 22 iHi , iLo, two long integers arethe principal quantum22 iHi<25, iLo, the principal quantum 23 23 numbers, and are upper and lower levels in any order. 24 nelem element number on phys cial scale, 1 or 2 have data24 nelem element number on physicial scale, 1 or 2 have data 25 25 TempIn = temperature, and must lie within the range of the table, which depends on 26 26 the ion charge, and is 500 - 30,000K for hydrogen. … … 177 177 yy2 = log10( atmdat.ElecTemp[iCase][nelem][ipTempHi] ); 178 178 179 /*now generate the pointer to the array, expression from storey code -1 for c*/179 /*now generate the index to the array, expression from Storey code -1 for c*/ 180 180 ip = (int)((((atmdat.ncut[iCase][nelem]-ipUp)*(atmdat.ncut[iCase][nelem]+ipUp-1))/2)+ipLo - 1); 181 181
