MODULE interface_gbmv ! .. Use Statements .. USE blas_keywords, ONLY : blas_trans, blas_trans_type, blas_conj_trans, & blas_conj_trans_type USE zgbmv_01, ONLY : zgbmv_201 USE zgbmv_02, ONLY : zgbmv_202 USE zgbmv_03, ONLY : zgbmv_203 USE zgbmv_04, ONLY : zgbmv_204 USE zgbmv_05, ONLY : zgbmv_205 USE zgbmv_06, ONLY : zgbmv_206 USE zgbmv_07, ONLY : zgbmv_207 USE zgbmv_08, ONLY : zgbmv_208 USE zgbmv_09, ONLY : zgbmv_209 USE zgbmv_10, ONLY : zgbmv_210 USE zgbmv_11, ONLY : zgbmv_211 USE zgbmv_12, ONLY : zgbmv_212 USE dgbmv_01, ONLY : dgbmv_201 USE dgbmv_02, ONLY : dgbmv_202 USE dgbmv_03, ONLY : dgbmv_203 USE dgbmv_04, ONLY : dgbmv_204 USE dgbmv_05, ONLY : dgbmv_205 USE dgbmv_06, ONLY : dgbmv_206 USE dgbmv_07, ONLY : dgbmv_207 USE dgbmv_08, ONLY : dgbmv_208 USE dgbmv_09, ONLY : dgbmv_209 USE dgbmv_10, ONLY : dgbmv_210 USE dgbmv_11, ONLY : dgbmv_211 USE dgbmv_12, ONLY : dgbmv_212 PRIVATE ! .. Public Statements .. PUBLIC :: blas_trans, blas_trans_type, blas_conj_trans, blas_conj_trans_type PUBLIC :: gbmv ! .. Generic Interface Blocks .. INTERFACE gbmv ! Replaces ZGBMV 12 procedures ! Replaces DGBMV 12 procedures MODULE PROCEDURE zgbmv_201 MODULE PROCEDURE zgbmv_202 MODULE PROCEDURE zgbmv_203 MODULE PROCEDURE zgbmv_204 MODULE PROCEDURE zgbmv_205 MODULE PROCEDURE zgbmv_206 MODULE PROCEDURE zgbmv_207 MODULE PROCEDURE zgbmv_208 MODULE PROCEDURE zgbmv_209 MODULE PROCEDURE zgbmv_210 MODULE PROCEDURE zgbmv_211 MODULE PROCEDURE zgbmv_212 MODULE PROCEDURE dgbmv_201 MODULE PROCEDURE dgbmv_202 MODULE PROCEDURE dgbmv_203 MODULE PROCEDURE dgbmv_204 MODULE PROCEDURE dgbmv_205 MODULE PROCEDURE dgbmv_206 MODULE PROCEDURE dgbmv_207 MODULE PROCEDURE dgbmv_208 MODULE PROCEDURE dgbmv_209 MODULE PROCEDURE dgbmv_210 MODULE PROCEDURE dgbmv_211 MODULE PROCEDURE dgbmv_212 END INTERFACE END MODULE interface_gbmv