文字列の指定された部分に文字列・整数・実数を書き込むサブルーチン パッケージ.
                                                                       
  CHNGC(CH,CA,CB)        文字列CHの中で文字列CA                        
                         と一致する部分を文字列CBでおきかえる.        
                                                                       
  CHNGI(CH,CA,II,CFMT)   文字列CHの中で文字列CA                        
                         と一致する部分を書式仕様CFMTにしたがって      
                         整数IIでおきかえる.                          
                                                                       
  CHNGR(CH,CA,RR,CFMT)   文字列CHの中で文字列CA                        
                         と一致する部分を書式仕様CFMTにしたがって      
                         実数RRでおきかえる.                          
                                                                       
あたえられた文字列の中から指定された文字列を見つけだし, その部分を別の文字列でおきかえる.
CALL CHNGC(CH,CA,CB)
    
                                     
  CH   (C*(*))   調べる文字列.      
                                     
  CA   (C*(*))   見つけ出す文字列.  
                                     
  CB   (C*(*))   おきかえる文字列.  
                                     
  
  
あたえられた文字列の中から指定された文字列を見つけだし, その部分を書式にしたがって整数/実数でおきかえる.
CALL CHNGI(CH,CA,II,CFMT)
CALL CHNGR(CH,CA,RR,CFMT)
    
                                                                        
  CH     (C*(*))   調べる文字列.                                       
                                                                        
  CA     (C*(*))   見つけ出す文字列.                                   
                                                                        
  II     (I)       おきかえる整数値.                                   
                                                                        
  RR     (R)       おきかえる実数値.                                   
                                                                        
  CFMT   (C*(*))   文字書式仕様. たとえば,'(I4)', '(E12.4)            
                   'と指定する.                                        
                                                                        
  
  
NUMAGUTI Atusi <a1n@gfdl.gov> Last Modified: Thu Aug 31 13:03:26 EDT 1995