- Timestamp:
- 09/25/07 12:51:30 (17 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/SRC/Interpolation/compute_fromreg_imoms3_weigaddr.pro
r282 r296 88 88 IF total((step-step[0]) GE 1.e-6) NE 0 THEN noregx = 1 89 89 ; we extend the longitude range of alon (-> easy interpolation even 90 ; near minalon etmaxalon)90 ; near minalon and maxalon) 91 91 toadd = 10*jpia/360+1 92 92 alon = [alon[jpia-toadd:jpia-1]-360., alon[*], alon[0:toadd-1]+360.] … … 110 110 jpja = jpja - 1L 111 111 ENDIF 112 ; olon between minalon etminalon+360112 ; olon between minalon and minalon+360 113 113 out = where(olon LT minalon) 114 114 WHILE out[0] NE -1 DO BEGIN
Note: See TracChangeset
for help on using the changeset viewer.