雑多な関数・サブルーチンを集めたパッケージ.
                                                               
  DCLVNM(CV)   「電脳ライブラリ」のバージョン名を返す.        
                                                               
  CDBLK(CHR)   連続した2個以上の空白を1個の空白で置き換える.  
                                                               
                                                     
  CNS(INS)   調べる値が正なら'N',                    
             負なら'S'を返す.                       
                                                     
「電脳ライブラリ」のバージョン名を返す.
CALL DCLVNM(CV)
    
                                                   
  CV   (C*(*))   バージョン名を返す文字型の引数.  
                                                   
  
  
連続した2個以上の空白を1個の空白で置き換える.
CALL CDBLK(CHR)
    
                                                                        
  CHR   (C*(*))   操作をほどこす文字列.                                
                  入力パラメータでもあり出力パラメータでもある.        
                                                                        
  
  
調べる値が正なら'N', 負なら'S'を返す (1文字の)文字型関数.
CNS(INS)
    
                                                                    
  INS   (I)     調べる整数値.                                      
                                                                    
  CNS   (C*1)   INSが正なら'N',                                     
                負なら'S'を返す長さ1の文字型関数.                  
                                                                    
  
  
NUMAGUTI Atusi <a1n@gfdl.gov> Last Modified: Thu Aug 31 13:04:05 EDT 1995