[compuin]

Código Delphi [-]
procedure CargarPlanetas(At_JDE:extended; var v: TvPlanetas);
begin
  LBR_For_Sun(At_JDE,     v[1].L, v[1].B, v[1].R);
  LBR_For_Mercury(At_JDE, v[2].L, v[2].B, v[2].R);

...

  LBR_For_Neptune(At_JDE, v[9].L, v[9].B, v[9].R);
end;

Código Delphi [-]
[Error]  Unit1.pas(164): Undeclared identifier: 'TvPlanetas'