Changeset 1812 for trunk/source/grains_qheat.cpp
- Timestamp:
- 02/23/08 20:18:25 (9 months ago)
- Files:
-
- 1 modified
-
trunk/source/grains_qheat.cpp (modified) (1 diff)
Legend:
- Unmodified
- Added
- Removed
-
trunk/source/grains_qheat.cpp
r1771 r1812 954 954 double ratio = ( gv.lgWD01 ) ? 1. : gptr->yhat[i]/gptr->yhat_primary[i]; 955 955 /* ehat is average energy of ejected electron at infinity */ 956 double ehat = gptr->e yhat[i]/gptr->yhat[i];956 double ehat = gptr->ehat[i]; 957 957 double cool1, sign = 1.; 958 958 realnum xx;
