public interface tbsv
      TBSV solves one of the systems of equations
Ax = b,   or   ATx = b,   or   A*Hx = b,
where b and x are n element vectors and A is an n by n unit, or
non-unit, upper or lower triangular band matrix, with ( k + 1 )
diagonals.
No test for singularity or near-singularity is included in this
routine. Such tests must be performed before calling this routine.
        Subroutines
            
    
    
        
  Arguments
      
    
      
        | Type | Intent | Optional | Attributes |  | Name |  | 
    
        
            | character(len=1), | intent(in) |  |  | :: | uplo |  | 
        
            | character(len=1), | intent(in) |  |  | :: | trans |  | 
        
            | character(len=1), | intent(in) |  |  | :: | diag |  | 
        
            | integer(kind=ilp), | intent(in) |  |  | :: | n |  | 
        
            | integer(kind=ilp), | intent(in) |  |  | :: | k |  | 
        
            | complex(kind=sp), | intent(in) |  |  | :: | a(lda,*) |  | 
        
            | integer(kind=ilp), | intent(in) |  |  | :: | lda |  | 
        
            | complex(kind=sp), | intent(inout) |  |  | :: | x(*) |  | 
        
            | integer(kind=ilp), | intent(in) |  |  | :: | incx |  | 
    
  
     
   
            
    
    
        
  Arguments
      
    
      
        | Type | Intent | Optional | Attributes |  | Name |  | 
    
        
            | character(len=1), | intent(in) |  |  | :: | uplo |  | 
        
            | character(len=1), | intent(in) |  |  | :: | trans |  | 
        
            | character(len=1), | intent(in) |  |  | :: | diag |  | 
        
            | integer(kind=ilp), | intent(in) |  |  | :: | n |  | 
        
            | integer(kind=ilp), | intent(in) |  |  | :: | k |  | 
        
            | real(kind=dp), | intent(in) |  |  | :: | a(lda,*) |  | 
        
            | integer(kind=ilp), | intent(in) |  |  | :: | lda |  | 
        
            | real(kind=dp), | intent(inout) |  |  | :: | x(*) |  | 
        
            | integer(kind=ilp), | intent(in) |  |  | :: | incx |  | 
    
  
     
   
            
    
    
        
  Arguments
      
    
      
        | Type | Intent | Optional | Attributes |  | Name |  | 
    
        
            | character(len=1), | intent(in) |  |  | :: | uplo |  | 
        
            | character(len=1), | intent(in) |  |  | :: | trans |  | 
        
            | character(len=1), | intent(in) |  |  | :: | diag |  | 
        
            | integer(kind=ilp), | intent(in) |  |  | :: | n |  | 
        
            | integer(kind=ilp), | intent(in) |  |  | :: | k |  | 
        
            | real(kind=sp), | intent(in) |  |  | :: | a(lda,*) |  | 
        
            | integer(kind=ilp), | intent(in) |  |  | :: | lda |  | 
        
            | real(kind=sp), | intent(inout) |  |  | :: | x(*) |  | 
        
            | integer(kind=ilp), | intent(in) |  |  | :: | incx |  | 
    
  
     
   
            
    
    
        
  Arguments
      
    
      
        | Type | Intent | Optional | Attributes |  | Name |  | 
    
        
            | character(len=1), | intent(in) |  |  | :: | uplo |  | 
        
            | character(len=1), | intent(in) |  |  | :: | trans |  | 
        
            | character(len=1), | intent(in) |  |  | :: | diag |  | 
        
            | integer(kind=ilp), | intent(in) |  |  | :: | n |  | 
        
            | integer(kind=ilp), | intent(in) |  |  | :: | k |  | 
        
            | complex(kind=dp), | intent(in) |  |  | :: | a(lda,*) |  | 
        
            | integer(kind=ilp), | intent(in) |  |  | :: | lda |  | 
        
            | complex(kind=dp), | intent(inout) |  |  | :: | x(*) |  | 
        
            | integer(kind=ilp), | intent(in) |  |  | :: | incx |  | 
    
  
     
   
        Module Procedures