in the desc_known list, include an entry “nu11” and “au12” for neutrino and antineutrino (no reason for the numbers - arbitrary name)
increase ndesc by 2 (152–>154) to account for additional entries
introduce new case in idesc switch statement (we called it case 153 and 154). set iec to 11 and 12 (matching the names above). Farther down, iwk1(n) is set to iec, where n is the number of the reaction.
common.f90
iweak>0 means include all (including weak) interactions. iweak<0 means ONLY weak interactions
define formula for cross section for both neutrinos and antineutrinos in the switch statement if(iweak>0)
rpf1 is set to inverse partition-function stuff if inverse rate, 1 if forward rate (determined by whether a “v” is in the reaction rate database entry
csect1 = cross section = nflux*rpf1*exp(matmul(t09,rc1)+h1) (t09,rc1,and h1 are read in from reaction database. all but h1 should be zero)
the_neutrino_winds-group.1402350727.txt.gz · Last modified: 2014/06/09 17:52 by richers