Changeset 114 for trunk/SRC/ToBeReviewed/STRING/lenstr.pro
- Timestamp:
- 06/19/06 16:14:56 (18 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/SRC/ToBeReviewed/STRING/lenstr.pro
r97 r114 27 27 28 28 function lenstr,str 29 ; 30 compile_opt idl2, strictarrsubs 31 ; 29 32 dsave=!d.name 30 33 … … 54 57 w=fltarr(nn) 55 58 for i=0,nn-1 do begin 56 xyouts,0,0,/device,str (i),width=ww57 w (i)=ww59 xyouts,0,0,/device,str[i],width=ww 60 w[i]=ww 58 61 endfor 59 62 end
Note: See TracChangeset
for help on using the changeset viewer.