Changeset 371 for trunk/SRC/Interpolation/ll_narcs_distances.pro

Timestamp:

08/07/08 11:32:02 (16 years ago)

Author:

pinsard

Message:

improvements of headers (alignments of IDL prompt in examples)

File:

• trunk/SRC/Interpolation/ll_narcs_distances.pro (modified) (1 diff)

trunk/SRC/Interpolation/ll_narcs_distances.pro

@@ -40 +40 @@
 ;
 ; @examples
-; IDL> Lon_lat0 = [1.0, 2.0]; Initial point specified in radians
-; IDL> Arc_Dist = 2.0; Arc distance in radians
-; IDL> Az = 1.0; Azimuth in radians
-; IDL> Result = LL_ARC_DISTANCE(Lon_lat0, Arc_Dist, Az)
-; IDL> PRINT, Result
+;
+;   IDL> Lon_lat0 = [1.0, 2.0]; Initial point specified in radians
+;   IDL> Arc_Dist = 2.0; Arc distance in radians
+;   IDL> Az = 1.0; Azimuth in radians
+;   IDL> Result = LL_ARC_DISTANCE(Lon_lat0, Arc_Dist, Az)
+;   IDL> PRINT, Result
 ;       2.91415    -0.622234
 ;
-; IDL> lon0 = [-10, 20, 100]
-; IDL> lat0 = [0, -10, 45]
-; IDL> lon1 = [10, 60, 280]
-; IDL> lat1 = [0, 10, 45]
-; IDL> dist = map_npoints(lon0, lat0, lon1, lat1, azimuth = azi, /two_by_two)
-; IDL> earthradius = 6378206.4d0
-; IDL> res = ll_narcs_distances(lon0, lat0, dist/earthradius, azi, /degrees)
-; IDL> print, reform(res[0, *])
+;   IDL> lon0 = [-10, 20, 100]
+;   IDL> lat0 = [0, -10, 45]
+;   IDL> lon1 = [10, 60, 280]
+;   IDL> lat1 = [0, 10, 45]
+;   IDL> dist = map_npoints(lon0, lat0, lon1, lat1, azimuth = azi, /two_by_two)
+;   IDL> earthradius = 6378206.4d0
+;   IDL> res = ll_narcs_distances(lon0, lat0, dist/earthradius, azi, /degrees)
+;   IDL> print, reform(res[0, *])
 ;       10.000000       60.000000       280.00000
-; IDL> print, reform(res[1, *])
+;   IDL> print, reform(res[1, *])
 ;           1.1999280e-15       10.000000       45.000000
 ;