Restituisce la distanza in m tra 2 oggetti geo_coord.
La distanza è calcolata approssimativamente ed è valida per piccoli angoli.
- Parametri
-
[in] | this | primo punto |
[in] | that | secondo punto |
- Restituisce
- distanza in metri
Definizione alla linea 686 del file geo_coord_class.F90.
687 shpobj = shpcreatesimpleobject(this%vtype, this%vsize, &
688 REAL(this%ll(1:this%vsize,1),kind=fp_d), &
689 REAL(this%ll(1:this%vsize,2),kind=fp_d))
690 IF (.NOT.shpisnull(shpobj))
THEN 692 i=shpwriteobject(shphandle, lnshp, shpobj)
693 CALL shpdestroyobject(shpobj)