EarthClass_GPS_to_Cartesian_coord.f90 Source File


Source Code

program main
    use EarthClass
    implicit none

    ! GPS(lat, lon) to Cartesian coordinate
    print *, to_Cartesian(&
        latitude = 36.103774791666666d0,&
        longitude=140.08785504166664d0,&
        origin=JP_Cartesian_Origin(ID=9) )
    


end program main