Added basic2bodies.f90, things may word