oe.tcl

来自「卫星仿真软件 卫星仿真软件 卫星仿真软件」· TCL 代码 · 共 30 行

#
######################################################
#
#  SaVi by Robert Thurman ([e-mail]) and
#          Patrick Worfolk ([e-mail]).
#
#  Copyright (c) 1997 by The Geometry Center.
#  This file is part of SaVi.  SaVi is free software;
#  you can redistribute it and/or modify it only under
#  the terms given in the file COPYRIGHT which you should
#  have received along with this file.  SaVi may be
#  obtained from:
#  http://savi.sourceforge.net/
#  http://www.geom.uiuc.edu/locate/SaVi
#
######################################################
#
# oe.tcl
#
# Procedures for computing with orbital elements
#
# $Id: oe.tcl,v 1.4 2004/01/07 18:10:12 lloydwood Exp $

proc oe_to_period {a mu} {
    global PI

    set period [expr 2*$PI*pow($a,1.5)/sqrt($mu)]

}