Nbody6
|
Go to the source code of this file.
Functions/Subroutines | |
subroutine | bsetid (kw, mass, mc, menv, r, rc, renv, lum, ospin, k2, q, sep, ecc, oorb, delet1, dspin, eqspin, djt) |
subroutine bsetid | ( | integer | kw, |
real*8 | mass, | ||
real*8 | mc, | ||
real*8 | menv, | ||
real*8 | r, | ||
real*8 | rc, | ||
real*8 | renv, | ||
real*8 | lum, | ||
real*8 | ospin, | ||
real*8 | k2, | ||
real*8 | q, | ||
real*8 | sep, | ||
real*8 | ecc, | ||
real*8 | oorb, | ||
real*8 | delet1, | ||
real*8 | dspin, | ||
real*8 | eqspin, | ||
real*8 | djt | ||
) |