input radians

add Test.vb, return obj for Solve()