Recent

Author Topic: Vincenty's geodesy formulae  (Read 3883 times)

VTwin

  • Hero Member
  • *****
  • Posts: 1215
  • Former Turbo Pascal 3 user
Re: Vincenty's geodesy formulae
« Reply #15 on: September 16, 2019, 01:58:31 am »
Minor fix to better deal with commas.
« Last Edit: September 16, 2019, 02:02:14 am by VTwin »
“Talk is cheap. Show me the code.” -Linus Torvalds

Free Pascal Compiler 3.2.2
macOS 12.1: Lazarus 2.2.6 (64 bit Cocoa M1)
Ubuntu 18.04.3: Lazarus 2.2.6 (64 bit on VBox)
Windows 7 Pro SP1: Lazarus 2.2.6 (64 bit on VBox)

VTwin

  • Hero Member
  • *****
  • Posts: 1215
  • Former Turbo Pascal 3 user
Re: Vincenty's geodesy formulae
« Reply #16 on: September 16, 2019, 03:46:13 am »
Thanks, yes that is simpler.

Code: Pascal  [Select][+][-]
  1.  
  2. const
  3.   cLegals : set of char = ['+', '-', '.', ',', '0'..'9'];
  4.  
  5. function IsLegal(c: string): boolean;
  6. begin
  7.   result := (Length(c) = 1) and (c[1] in cLegals);
  8. end;
  9.  

I tried something similar and it did not compile.
“Talk is cheap. Show me the code.” -Linus Torvalds

Free Pascal Compiler 3.2.2
macOS 12.1: Lazarus 2.2.6 (64 bit Cocoa M1)
Ubuntu 18.04.3: Lazarus 2.2.6 (64 bit on VBox)
Windows 7 Pro SP1: Lazarus 2.2.6 (64 bit on VBox)

serbod

  • Full Member
  • ***
  • Posts: 142
Re: Vincenty's geodesy formulae
« Reply #17 on: September 16, 2019, 08:47:32 am »

Thaddy

  • Hero Member
  • *****
  • Posts: 14157
  • Probably until I exterminate Putin.
Re: Vincenty's geodesy formulae
« Reply #18 on: September 16, 2019, 09:16:19 am »
It is useful, but can use some clear optimizations. (just speed, and factoring out the lcl dependencies)
« Last Edit: September 16, 2019, 09:18:41 am by Thaddy »
Specialize a type, not a var.

VTwin

  • Hero Member
  • *****
  • Posts: 1215
  • Former Turbo Pascal 3 user
Re: Vincenty's geodesy formulae
« Reply #19 on: September 16, 2019, 05:55:43 pm »
https://github.com/serbod/osmap/blob/master/osmapgeometry.pas

I hope, it can be useful.

Very nice, thanks! It may have some useful functions for me. It looks like the Vincenty code is from the same source as mine, identical variable names, etc.
« Last Edit: September 16, 2019, 06:14:01 pm by VTwin »
“Talk is cheap. Show me the code.” -Linus Torvalds

Free Pascal Compiler 3.2.2
macOS 12.1: Lazarus 2.2.6 (64 bit Cocoa M1)
Ubuntu 18.04.3: Lazarus 2.2.6 (64 bit on VBox)
Windows 7 Pro SP1: Lazarus 2.2.6 (64 bit on VBox)

Alexandr R

  • New Member
  • *
  • Posts: 24
Re: Vincenty's geodesy formulae
« Reply #20 on: May 26, 2020, 11:55:54 am »
Hi.
Look at here. True text in Russian. If you need a program (module, unit) for translating the symbolic representation of angular values into radians (or vice versa) I can provide it to you. (I'm a surveyor by profession).
Sorry, but with English I feel bad

http://www.geogr.msu.ru/cafedra/karta/docs/GOK/gok_lecture_4.pdf

 

TinyPortal © 2005-2018