Source position: srastroplanetary.pas line 51
type TplRectangularCord = packed record
X: Double;
Y: Double;
Z: Double;
end;