Changeset 231 for trunk/SRC/Obsolete/strrepl.pro
- Timestamp:
- 03/19/07 18:15:51 (17 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/SRC/Obsolete/strrepl.pro
r192 r231 1 ;-------------------------------------------------------------2 1 ;+ 3 2 ; 4 ; @file_comments 3 ; @file_comments 5 4 ; replace one (or more) character(s)/string(s) in a string 6 ; --- OBSOLETE --- you should better use strsed.pro5 ; --- OBSOLETE --- you should better use <pro>strsed</pro> 7 6 ; 8 7 ; @categories … … 21 20 ; another string 22 21 ; 23 ; @restrictions 22 ; @restrictions 24 23 ; Known shortcoming: if index is an array, it must contain all 25 24 ; valid elements (only the first entry is checked). … … 49 48 ; @history 50 49 ; mgs, 02 Jun 1998: VERSION 1.00 51 ; sebastien Masson (smlod\@ipsl.jussieu.fr)52 ;53 ; @version54 ; $Id$55 ;56 ;-57 50 ; Copyright (C) 1998, Martin Schultz, Harvard University 58 51 ; This software is provided as is without any warranty … … 64 57 ; Bugs and comments should be directed to mgs@io.harvard.edu 65 58 ; with subject "IDL routine strrepl" 66 ;------------------------------------------------------------- 67 68 59 ; 60 ; sebastien Masson (smlod\@ipsl.jussieu.fr) 61 ; 62 ; @version 63 ; $Id$ 64 ; 65 ;- 66 ; 69 67 function strrepl,str,arg2,rchar 70 68 ; 71 69 compile_opt idl2, strictarrsubs, obsolete 72 70 ; 73 71 74 72 if (n_elements(str) eq 0) then return,'' 75 73 76 74 ; convert strign and replace character to byte 77 75 BStr = byte(str) … … 110 108 ; return result as string 111 109 return,string(BStr) 112 110 113 111 end
Note: See TracChangeset
for help on using the changeset viewer.