Author: A. Nussbaumer
Date: 6 März 2013

t

a

v

s

r

Erde = (1.76, 2.66)
Satellit = (3.74, 3.32)
A = (3.18, 3.86)
v0 = Vector(Satellit, A)
A2 = 0
r = Vector(Satellit, Erde)
dt = 0.30000000000000004 (slider from -5 to 5, step 0.1)
GM = 1
a: (GM / r^(2) * UnitVector[r])
A3: A2 + dt
B2: (GM / ((r * r)) * UnitVector[r])
C2: (B2 * dt) + v0
D2: Satellit + (C2 * dt)
E2 = Vector(D2, Erde)
B3: (GM / ((E2 * E2)) * UnitVector[E2])
C3: C2 + (B3 * dt)
D3: D2 + (C3 * dt)
E3 = Vector(D3, Erde)
A4: A3 + dt
B4: (GM / ((E3 * E3)) * UnitVector[E3])
C4: C3 + (B4 * dt)
D4: D3 + (C4 * dt)
E4 = Vector(D4, Erde)
A5: A4 + dt
B5: (GM / ((E4 * E4)) * UnitVector[E4])
C5: C4 + (B5 * dt)
D5: D4 + (C5 * dt)
E5 = Vector(D5, Erde)
A6: A5 + dt
B6: (GM / ((E5 * E5)) * UnitVector[E5])
C6: C5 + (B6 * dt)
D6: D5 + (C6 * dt)
E6 = Vector(D6, Erde)
A7: A6 + dt
B7: (GM / ((E6 * E6)) * UnitVector[E6])
C7: C6 + (B7 * dt)
D7: D6 + (C7 * dt)
E7 = Vector(D7, Erde)
A8: A7 + dt
B8: (GM / ((E7 * E7)) * UnitVector[E7])
C8: C7 + (B8 * dt)
D8: D7 + (C8 * dt)
E8 = Vector(D8, Erde)
A9: A8 + dt
B9: (GM / ((E8 * E8)) * UnitVector[E8])
C9: C8 + (B9 * dt)
D9: D8 + (C9 * dt)
E9 = Vector(D9, Erde)
A10: A9 + dt
B10: (GM / ((E9 * E9)) * UnitVector[E9])
C10: C9 + (B10 * dt)
D10: D9 + (C10 * dt)
E10 = Vector(D10, Erde)
A11: A10 + dt
B11: (GM / ((E10 * E10)) * UnitVector[E10])
C11: C10 + (B11 * dt)
D11: D10 + (C11 * dt)
E11 = Vector(D11, Erde)
A12: A11 + dt
B12: (GM / ((E11 * E11)) * UnitVector[E11])
C12: C11 + (B12 * dt)
D12: D11 + (C12 * dt)
E12 = Vector(D12, Erde)
A13: A12 + dt
B13: (GM / ((E12 * E12)) * UnitVector[E12])
C13: C12 + (B13 * dt)
D13: D12 + (C13 * dt)
E13 = Vector(D13, Erde)
A14: A13 + dt
B14: (GM / ((E13 * E13)) * UnitVector[E13])
C14: C13 + (B14 * dt)
D14: D13 + (C14 * dt)
E14 = Vector(D14, Erde)
A15: A14 + dt
B15: (GM / ((E14 * E14)) * UnitVector[E14])
C15: C14 + (B15 * dt)
D15: D14 + (C15 * dt)
E15 = Vector(D15, Erde)
A16: A15 + dt
B16: (GM / ((E15 * E15)) * UnitVector[E15])
C16: C15 + (B16 * dt)
D16: D15 + (C16 * dt)
E16 = Vector(D16, Erde)
A17: A16 + dt
B17: (GM / ((E16 * E16)) * UnitVector[E16])
C17: C16 + (B17 * dt)
D17: D16 + (C17 * dt)
E17 = Vector(D17, Erde)
A18: A17 + dt
B18: (GM / ((E17 * E17)) * UnitVector[E17])
C18: C17 + (B18 * dt)
D18: D17 + (C18 * dt)
E18 = Vector(D18, Erde)
A19: A18 + dt
B19: (GM / ((E18 * E18)) * UnitVector[E18])
C19: C18 + (B19 * dt)
D19: D18 + (C19 * dt)
E19 = Vector(D19, Erde)
A20: A19 + dt
B20: (GM / ((E19 * E19)) * UnitVector[E19])
C20: C19 + (B20 * dt)
D20: D19 + (C20 * dt)
E20 = Vector(D20, Erde)
A21: A20 + dt
B21: (GM / ((E20 * E20)) * UnitVector[E20])
C21: C20 + (B21 * dt)
D21: D20 + (C21 * dt)
E21 = Vector(D21, Erde)
A22: A21 + dt
B22: (GM / ((E21 * E21)) * UnitVector[E21])
C22: C21 + (B22 * dt)
D22: D21 + (C22 * dt)
E22 = Vector(D22, Erde)
A23: A22 + dt
B23: (GM / ((E22 * E22)) * UnitVector[E22])
C23: C22 + (B23 * dt)
D23: D22 + (C23 * dt)
E23 = Vector(D23, Erde)
A24: A23 + dt
B24: (GM / ((E23 * E23)) * UnitVector[E23])
C24: C23 + (B24 * dt)
D24: D23 + (C24 * dt)
E24 = Vector(D24, Erde)
A25: A24 + dt
B25: (GM / ((E24 * E24)) * UnitVector[E24])
C25: C24 + (B25 * dt)
D25: D24 + (C25 * dt)
E25 = Vector(D25, Erde)
A26: A25 + dt
B26: (GM / ((E25 * E25)) * UnitVector[E25])
C26: C25 + (B26 * dt)
D26: D25 + (C26 * dt)
E26 = Vector(D26, Erde)
A27: A26 + dt
B27: (GM / ((E26 * E26)) * UnitVector[E26])
C27: C26 + (B27 * dt)
D27: D26 + (C27 * dt)
E27 = Vector(D27, Erde)
A28: A27 + dt
B28: (GM / ((E27 * E27)) * UnitVector[E27])
C28: C27 + (B28 * dt)
D28: D27 + (C28 * dt)
E28 = Vector(D28, Erde)
A29: A28 + dt
B29: (GM / ((E28 * E28)) * UnitVector[E28])
C29: C28 + (B29 * dt)
D29: D28 + (C29 * dt)
E29 = Vector(D29, Erde)
A30: A29 + dt
B30: (GM / ((E29 * E29)) * UnitVector[E29])
C30: C29 + (B30 * dt)
D30: D29 + (C30 * dt)
E30 = Vector(D30, Erde)
A31: A30 + dt
B31: (GM / ((E30 * E30)) * UnitVector[E30])
C31: C30 + (B31 * dt)
D31: D30 + (C31 * dt)
E31 = Vector(D31, Erde)
A32: A31 + dt
B32: (GM / ((E31 * E31)) * UnitVector[E31])
C32: C31 + (B32 * dt)
D32: D31 + (C32 * dt)
E32 = Vector(D32, Erde)
A33: A32 + dt
B33: (GM / ((E32 * E32)) * UnitVector[E32])
C33: C32 + (B33 * dt)
D33: D32 + (C33 * dt)
E33 = Vector(D33, Erde)
A34: A33 + dt
B34: (GM / ((E33 * E33)) * UnitVector[E33])
C34: C33 + (B34 * dt)
D34: D33 + (C34 * dt)
E34 = Vector(D34, Erde)
A35: A34 + dt
B35: (GM / ((E34 * E34)) * UnitVector[E34])
C35: C34 + (B35 * dt)
D35: D34 + (C35 * dt)
E35 = Vector(D35, Erde)
A36: A35 + dt
B36: (GM / ((E35 * E35)) * UnitVector[E35])
C36: C35 + (B36 * dt)
D36: D35 + (C36 * dt)
E36 = Vector(D36, Erde)
A37: A36 + dt
B37: (GM / ((E36 * E36)) * UnitVector[E36])
C37: C36 + (B37 * dt)
D37: D36 + (C37 * dt)
E37 = Vector(D37, Erde)
A38: A37 + dt
B38: (GM / ((E37 * E37)) * UnitVector[E37])
C38: C37 + (B38 * dt)
D38: D37 + (C38 * dt)
E38 = Vector(D38, Erde)
A39: A38 + dt
B39: (GM / ((E38 * E38)) * UnitVector[E38])
C39: C38 + (B39 * dt)
D39: D38 + (C39 * dt)
E39 = Vector(D39, Erde)
A40: A39 + dt
B40: (GM / ((E39 * E39)) * UnitVector[E39])
C40: C39 + (B40 * dt)
D40: D39 + (C40 * dt)
E40 = Vector(D40, Erde)
A41: A40 + dt
B41: (GM / ((E40 * E40)) * UnitVector[E40])
C41: C40 + (B41 * dt)
D41: D40 + (C41 * dt)
E41 = Vector(D41, Erde)
A42: A41 + dt
B42: (GM / ((E41 * E41)) * UnitVector[E41])
C42: C41 + (B42 * dt)
D42: D41 + (C42 * dt)
E42 = Vector(D42, Erde)
A43: A42 + dt
B43: (GM / ((E42 * E42)) * UnitVector[E42])
C43: C42 + (B43 * dt)
D43: D42 + (C43 * dt)
E43 = Vector(D43, Erde)
A44: A43 + dt
B44: (GM / ((E43 * E43)) * UnitVector[E43])
C44: C43 + (B44 * dt)
D44: D43 + (C44 * dt)
E44 = Vector(D44, Erde)
A45: A44 + dt
B45: (GM / ((E44 * E44)) * UnitVector[E44])
C45: C44 + (B45 * dt)
D45: D44 + (C45 * dt)
E45 = Vector(D45, Erde)
A46: A45 + dt
B46: (GM / ((E45 * E45)) * UnitVector[E45])
C46: C45 + (B46 * dt)
D46: D45 + (C46 * dt)
E46 = Vector(D46, Erde)
A47: A46 + dt
B47: (GM / ((E46 * E46)) * UnitVector[E46])
C47: C46 + (B47 * dt)
D47: D46 + (C47 * dt)
E47 = Vector(D47, Erde)
A48: A47 + dt
B48: (GM / ((E47 * E47)) * UnitVector[E47])
C48: C47 + (B48 * dt)
D48: D47 + (C48 * dt)
E48 = Vector(D48, Erde)
A49: A48 + dt
B49: (GM / ((E48 * E48)) * UnitVector[E48])
C49: C48 + (B49 * dt)
D49: D48 + (C49 * dt)
E49 = Vector(D49, Erde)
A50: A49 + dt
B50: (GM / ((E49 * E49)) * UnitVector[E49])
C50: C49 + (B50 * dt)
D50: D49 + (C50 * dt)
E50 = Vector(D50, Erde)
A51: A50 + dt
B51: (GM / ((E50 * E50)) * UnitVector[E50])
C51: C50 + (B51 * dt)
D51: D50 + (C51 * dt)
E51 = Vector(D51, Erde)
A52: A51 + dt
B52: (GM / ((E51 * E51)) * UnitVector[E51])
C52: C51 + (B52 * dt)
D52: D51 + (C52 * dt)
E52 = Vector(D52, Erde)
A53: A52 + dt
B53: (GM / ((E52 * E52)) * UnitVector[E52])
C53: C52 + (B53 * dt)
D53: D52 + (C53 * dt)
E53 = Vector(D53, Erde)
A54: A53 + dt
B54: (GM / ((E53 * E53)) * UnitVector[E53])
C54: C53 + (B54 * dt)
D54: D53 + (C54 * dt)
E54 = Vector(D54, Erde)
A55: A54 + dt
B55: (GM / ((E54 * E54)) * UnitVector[E54])
C55: C54 + (B55 * dt)
D55: D54 + (C55 * dt)
E55 = Vector(D55, Erde)
A56: A55 + dt
B56: (GM / ((E55 * E55)) * UnitVector[E55])
C56: C55 + (B56 * dt)
D56: D55 + (C56 * dt)
E56 = Vector(D56, Erde)
A57: A56 + dt
B57: (GM / ((E56 * E56)) * UnitVector[E56])
C57: C56 + (B57 * dt)
D57: D56 + (C57 * dt)
E57 = Vector(D57, Erde)
A58: A57 + dt
B58: (GM / ((E57 * E57)) * UnitVector[E57])
C58: C57 + (B58 * dt)
D58: D57 + (C58 * dt)
E58 = Vector(D58, Erde)
A59: A58 + dt
B59: (GM / ((E58 * E58)) * UnitVector[E58])
C59: C58 + (B59 * dt)
D59: D58 + (C59 * dt)
E59 = Vector(D59, Erde)
A60: A59 + dt
B60: (GM / ((E59 * E59)) * UnitVector[E59])
C60: C59 + (B60 * dt)
D60: D59 + (C60 * dt)
E60 = Vector(D60, Erde)
A61: A60 + dt
B61: (GM / ((E60 * E60)) * UnitVector[E60])
C61: C60 + (B61 * dt)
D61: D60 + (C61 * dt)
E61 = Vector(D61, Erde)
A62: A61 + dt
B62: (GM / ((E61 * E61)) * UnitVector[E61])
C62: C61 + (B62 * dt)
D62: D61 + (C62 * dt)
E62 = Vector(D62, Erde)
A63: A62 + dt
B63: (GM / ((E62 * E62)) * UnitVector[E62])
C63: C62 + (B63 * dt)
D63: D62 + (C63 * dt)
E63 = Vector(D63, Erde)
A64: A63 + dt
B64: (GM / ((E63 * E63)) * UnitVector[E63])
C64: C63 + (B64 * dt)
D64: D63 + (C64 * dt)
E64 = Vector(D64, Erde)
A65: A64 + dt
B65: (GM / ((E64 * E64)) * UnitVector[E64])
C65: C64 + (B65 * dt)
D65: D64 + (C65 * dt)
E65 = Vector(D65, Erde)
A66: A65 + dt
B66: (GM / ((E65 * E65)) * UnitVector[E65])
C66: C65 + (B66 * dt)
D66: D65 + (C66 * dt)
E66 = Vector(D66, Erde)
A67: A66 + dt
B67: (GM / ((E66 * E66)) * UnitVector[E66])
C67: C66 + (B67 * dt)
D67: D66 + (C67 * dt)
E67 = Vector(D67, Erde)
A68: A67 + dt
B68: (GM / ((E67 * E67)) * UnitVector[E67])
C68: C67 + (B68 * dt)
D68: D67 + (C68 * dt)
E68 = Vector(D68, Erde)
A69: A68 + dt
B69: (GM / ((E68 * E68)) * UnitVector[E68])
C69: C68 + (B69 * dt)
D69: D68 + (C69 * dt)
E69 = Vector(D69, Erde)
A70: A69 + dt
B70: (GM / ((E69 * E69)) * UnitVector[E69])
C70: C69 + (B70 * dt)
D70: D69 + (C70 * dt)
E70 = Vector(D70, Erde)
A71: A70 + dt
B71: (GM / ((E70 * E70)) * UnitVector[E70])
C71: C70 + (B71 * dt)
D71: D70 + (C71 * dt)
E71 = Vector(D71, Erde)
A72: A71 + dt
B72: (GM / ((E71 * E71)) * UnitVector[E71])
C72: C71 + (B72 * dt)
D72: D71 + (C72 * dt)
E72 = Vector(D72, Erde)
A73: A72 + dt
B73: (GM / ((E72 * E72)) * UnitVector[E72])
C73: C72 + (B73 * dt)
D73: D72 + (C73 * dt)
E73 = Vector(D73, Erde)
A74: A73 + dt
B74: (GM / ((E73 * E73)) * UnitVector[E73])
C74: C73 + (B74 * dt)
D74: D73 + (C74 * dt)
E74 = Vector(D74, Erde)
A75: A74 + dt
B75: (GM / ((E74 * E74)) * UnitVector[E74])
C75: C74 + (B75 * dt)
D75: D74 + (C75 * dt)
E75 = Vector(D75, Erde)
A76: A75 + dt
B76: (GM / ((E75 * E75)) * UnitVector[E75])
C76: C75 + (B76 * dt)
D76: D75 + (C76 * dt)
E76 = Vector(D76, Erde)
A77: A76 + dt
B77: (GM / ((E76 * E76)) * UnitVector[E76])
C77: C76 + (B77 * dt)
D77: D76 + (C77 * dt)
E77 = Vector(D77, Erde)
A78: A77 + dt
B78: (GM / ((E77 * E77)) * UnitVector[E77])
C78: C77 + (B78 * dt)
D78: D77 + (C78 * dt)
E78 = Vector(D78, Erde)
A79: A78 + dt
B79: (GM / ((E78 * E78)) * UnitVector[E78])
C79: C78 + (B79 * dt)
D79: D78 + (C79 * dt)
E79 = Vector(D79, Erde)
A80: A79 + dt
B80: (GM / ((E79 * E79)) * UnitVector[E79])
C80: C79 + (B80 * dt)
D80: D79 + (C80 * dt)
E80 = Vector(D80, Erde)
A81: A80 + dt
B81: (GM / ((E80 * E80)) * UnitVector[E80])
C81: C80 + (B81 * dt)
D81: D80 + (C81 * dt)
E81 = Vector(D81, Erde)
A82: A81 + dt
B82: (GM / ((E81 * E81)) * UnitVector[E81])
C82: C81 + (B82 * dt)
D82: D81 + (C82 * dt)
E82 = Vector(D82, Erde)
A83: A82 + dt
B83: (GM / ((E82 * E82)) * UnitVector[E82])
C83: C82 + (B83 * dt)
D83: D82 + (C83 * dt)
E83 = Vector(D83, Erde)
A84: A83 + dt
B84: (GM / ((E83 * E83)) * UnitVector[E83])
C84: C83 + (B84 * dt)
D84: D83 + (C84 * dt)
E84 = Vector(D84, Erde)
A85: A84 + dt
B85: (GM / ((E84 * E84)) * UnitVector[E84])
C85: C84 + (B85 * dt)
D85: D84 + (C85 * dt)
E85 = Vector(D85, Erde)
A86: A85 + dt
B86: (GM / ((E85 * E85)) * UnitVector[E85])
C86: C85 + (B86 * dt)
D86: D85 + (C86 * dt)
E86 = Vector(D86, Erde)
A87: A86 + dt
B87: (GM / ((E86 * E86)) * UnitVector[E86])
C87: C86 + (B87 * dt)
D87: D86 + (C87 * dt)
E87 = Vector(D87, Erde)
A88: A87 + dt
B88: (GM / ((E87 * E87)) * UnitVector[E87])
C88: C87 + (B88 * dt)
D88: D87 + (C88 * dt)
E88 = Vector(D88, Erde)
A89: A88 + dt
B89: (GM / ((E88 * E88)) * UnitVector[E88])
C89: C88 + (B89 * dt)
D89: D88 + (C89 * dt)
E89 = Vector(D89, Erde)
A90: A89 + dt
B90: (GM / ((E89 * E89)) * UnitVector[E89])
C90: C89 + (B90 * dt)
D90: D89 + (C90 * dt)
E90 = Vector(D90, Erde)
A91: A90 + dt
B91: (GM / ((E90 * E90)) * UnitVector[E90])
C91: C90 + (B91 * dt)
D91: D90 + (C91 * dt)
E91 = Vector(D91, Erde)
A92: A91 + dt
B92: (GM / ((E91 * E91)) * UnitVector[E91])
C92: C91 + (B92 * dt)
D92: D91 + (C92 * dt)
E92 = Vector(D92, Erde)
A93: A92 + dt
B93: (GM / ((E92 * E92)) * UnitVector[E92])
C93: C92 + (B93 * dt)
D93: D92 + (C93 * dt)
E93 = Vector(D93, Erde)
A94: A93 + dt
B94: (GM / ((E93 * E93)) * UnitVector[E93])
C94: C93 + (B94 * dt)
D94: D93 + (C94 * dt)
E94 = Vector(D94, Erde)
A95: A94 + dt
B95: (GM / ((E94 * E94)) * UnitVector[E94])
C95: C94 + (B95 * dt)
D95: D94 + (C95 * dt)
E95 = Vector(D95, Erde)
A96: A95 + dt
B96: (GM / ((E95 * E95)) * UnitVector[E95])
C96: C95 + (B96 * dt)
D96: D95 + (C96 * dt)
E96 = Vector(D96, Erde)
A97: A96 + dt
B97: (GM / ((E96 * E96)) * UnitVector[E96])
C97: C96 + (B97 * dt)
D97: D96 + (C97 * dt)
E97 = Vector(D97, Erde)
A98: A97 + dt
B98: (GM / ((E97 * E97)) * UnitVector[E97])
C98: C97 + (B98 * dt)
D98: D97 + (C98 * dt)
E98 = Vector(D98, Erde)
A99: A98 + dt
B99: (GM / ((E98 * E98)) * UnitVector[E98])
C99: C98 + (B99 * dt)
D99: D98 + (C99 * dt)
E99 = Vector(D99, Erde)
F42 = 0
F43: F42 + dt
F44: F43 + dt
F45: F44 + dt
F46: F45 + dt
F47: F46 + dt
F48: F47 + dt
F49: F48 + dt
F50: F49 + dt
F51: F50 + dt
F52: F51 + dt
F53: F52 + dt
F54: F53 + dt
F55: F54 + dt
F56: F55 + dt
F57: F56 + dt
F58: F57 + dt
F59: F58 + dt
F60: F59 + dt
F61: F60 + dt
F62: F61 + dt
F63: F62 + dt
F64: F63 + dt
F65: F64 + dt
F66: F65 + dt
F67: F66 + dt
F68: F67 + dt
F69: F68 + dt
F70: F69 + dt
F71: F70 + dt
F72: F71 + dt
F73: F72 + dt
F74: F73 + dt
F75: F74 + dt
F76: F75 + dt
F77: F76 + dt
F78: F77 + dt
F79: F78 + dt
F80: F79 + dt
F81: F80 + dt
F82: F81 + dt
F83: F82 + dt
F84: F83 + dt
F85: F84 + dt
F86: F85 + dt
F87: F86 + dt
F88: F87 + dt
F89: F88 + dt
F90: F89 + dt
F91: F90 + dt
F92: F91 + dt
F93: F92 + dt
F94: F93 + dt
F95: F94 + dt
F96: F95 + dt
F97: F96 + dt
F98: F97 + dt
F99: F98 + dt
A100: A99 + dt
B100: (GM / ((E99 * E99)) * UnitVector[E99])
C100: C99 + (B100 * dt)
D100: D99 + (C100 * dt)
E100 = Vector(D100, Erde)
F100: F99 + dt