410 PURE module subroutine trmv_ASS_CLDA_ONOA_CGMB_ONOB_CK5(matA, classA, operationA, matB)
411#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
412 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_ASS_CLDA_ONOA_CGMB_ONOB_CK5
415 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
416 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
417 type(lowerDiag_type) ,
intent(in) :: classA
418 type(nothing_type) ,
intent(in) :: operationA
423 PURE module subroutine trmv_ASS_CLDA_ONOA_CGMB_ONOB_CK4(matA, classA, operationA, matB)
424#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
425 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_ASS_CLDA_ONOA_CGMB_ONOB_CK4
428 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
429 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
430 type(lowerDiag_type) ,
intent(in) :: classA
431 type(nothing_type) ,
intent(in) :: operationA
436 PURE module subroutine trmv_ASS_CLDA_ONOA_CGMB_ONOB_CK3(matA, classA, operationA, matB)
437#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
438 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_ASS_CLDA_ONOA_CGMB_ONOB_CK3
441 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
442 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
443 type(lowerDiag_type) ,
intent(in) :: classA
444 type(nothing_type) ,
intent(in) :: operationA
449 PURE module subroutine trmv_ASS_CLDA_ONOA_CGMB_ONOB_CK2(matA, classA, operationA, matB)
450#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
451 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_ASS_CLDA_ONOA_CGMB_ONOB_CK2
454 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
455 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
456 type(lowerDiag_type) ,
intent(in) :: classA
457 type(nothing_type) ,
intent(in) :: operationA
462 PURE module subroutine trmv_ASS_CLDA_ONOA_CGMB_ONOB_CK1(matA, classA, operationA, matB)
463#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
464 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_ASS_CLDA_ONOA_CGMB_ONOB_CK1
467 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
468 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
469 type(lowerDiag_type) ,
intent(in) :: classA
470 type(nothing_type) ,
intent(in) :: operationA
477 PURE module subroutine trmv_ASS_CLDA_ONOA_CGMB_ONOB_RK5(matA, classA, operationA, matB)
478#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
479 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_ASS_CLDA_ONOA_CGMB_ONOB_RK5
482 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
483 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
484 type(lowerDiag_type) ,
intent(in) :: classA
485 type(nothing_type) ,
intent(in) :: operationA
490 PURE module subroutine trmv_ASS_CLDA_ONOA_CGMB_ONOB_RK4(matA, classA, operationA, matB)
491#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
492 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_ASS_CLDA_ONOA_CGMB_ONOB_RK4
495 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
496 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
497 type(lowerDiag_type) ,
intent(in) :: classA
498 type(nothing_type) ,
intent(in) :: operationA
503 PURE module subroutine trmv_ASS_CLDA_ONOA_CGMB_ONOB_RK3(matA, classA, operationA, matB)
504#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
505 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_ASS_CLDA_ONOA_CGMB_ONOB_RK3
508 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
509 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
510 type(lowerDiag_type) ,
intent(in) :: classA
511 type(nothing_type) ,
intent(in) :: operationA
516 PURE module subroutine trmv_ASS_CLDA_ONOA_CGMB_ONOB_RK2(matA, classA, operationA, matB)
517#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
518 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_ASS_CLDA_ONOA_CGMB_ONOB_RK2
521 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
522 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
523 type(lowerDiag_type) ,
intent(in) :: classA
524 type(nothing_type) ,
intent(in) :: operationA
529 PURE module subroutine trmv_ASS_CLDA_ONOA_CGMB_ONOB_RK1(matA, classA, operationA, matB)
530#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
531 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_ASS_CLDA_ONOA_CGMB_ONOB_RK1
534 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
535 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
536 type(lowerDiag_type) ,
intent(in) :: classA
537 type(nothing_type) ,
intent(in) :: operationA
550 PURE module subroutine trmv_ASS_CLDA_OTSA_CGMB_ONOB_CK5(matA, classA, operationA, matB)
551#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
552 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_ASS_CLDA_OTSA_CGMB_ONOB_CK5
555 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
556 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
557 type(lowerDiag_type) ,
intent(in) :: classA
558 type(transSymm_type) ,
intent(in) :: operationA
563 PURE module subroutine trmv_ASS_CLDA_OTSA_CGMB_ONOB_CK4(matA, classA, operationA, matB)
564#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
565 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_ASS_CLDA_OTSA_CGMB_ONOB_CK4
568 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
569 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
570 type(lowerDiag_type) ,
intent(in) :: classA
571 type(transSymm_type) ,
intent(in) :: operationA
576 PURE module subroutine trmv_ASS_CLDA_OTSA_CGMB_ONOB_CK3(matA, classA, operationA, matB)
577#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
578 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_ASS_CLDA_OTSA_CGMB_ONOB_CK3
581 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
582 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
583 type(lowerDiag_type) ,
intent(in) :: classA
584 type(transSymm_type) ,
intent(in) :: operationA
589 PURE module subroutine trmv_ASS_CLDA_OTSA_CGMB_ONOB_CK2(matA, classA, operationA, matB)
590#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
591 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_ASS_CLDA_OTSA_CGMB_ONOB_CK2
594 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
595 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
596 type(lowerDiag_type) ,
intent(in) :: classA
597 type(transSymm_type) ,
intent(in) :: operationA
602 PURE module subroutine trmv_ASS_CLDA_OTSA_CGMB_ONOB_CK1(matA, classA, operationA, matB)
603#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
604 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_ASS_CLDA_OTSA_CGMB_ONOB_CK1
607 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
608 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
609 type(lowerDiag_type) ,
intent(in) :: classA
610 type(transSymm_type) ,
intent(in) :: operationA
617 PURE module subroutine trmv_ASS_CLDA_OTSA_CGMB_ONOB_RK5(matA, classA, operationA, matB)
618#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
619 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_ASS_CLDA_OTSA_CGMB_ONOB_RK5
622 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
623 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
624 type(lowerDiag_type) ,
intent(in) :: classA
625 type(transSymm_type) ,
intent(in) :: operationA
630 PURE module subroutine trmv_ASS_CLDA_OTSA_CGMB_ONOB_RK4(matA, classA, operationA, matB)
631#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
632 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_ASS_CLDA_OTSA_CGMB_ONOB_RK4
635 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
636 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
637 type(lowerDiag_type) ,
intent(in) :: classA
638 type(transSymm_type) ,
intent(in) :: operationA
643 PURE module subroutine trmv_ASS_CLDA_OTSA_CGMB_ONOB_RK3(matA, classA, operationA, matB)
644#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
645 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_ASS_CLDA_OTSA_CGMB_ONOB_RK3
648 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
649 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
650 type(lowerDiag_type) ,
intent(in) :: classA
651 type(transSymm_type) ,
intent(in) :: operationA
656 PURE module subroutine trmv_ASS_CLDA_OTSA_CGMB_ONOB_RK2(matA, classA, operationA, matB)
657#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
658 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_ASS_CLDA_OTSA_CGMB_ONOB_RK2
661 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
662 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
663 type(lowerDiag_type) ,
intent(in) :: classA
664 type(transSymm_type) ,
intent(in) :: operationA
669 PURE module subroutine trmv_ASS_CLDA_OTSA_CGMB_ONOB_RK1(matA, classA, operationA, matB)
670#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
671 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_ASS_CLDA_OTSA_CGMB_ONOB_RK1
674 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
675 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
676 type(lowerDiag_type) ,
intent(in) :: classA
677 type(transSymm_type) ,
intent(in) :: operationA
690 PURE module subroutine trmv_ASS_CLDA_OTHA_CGMB_ONOB_CK5(matA, classA, operationA, matB)
691#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
692 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_ASS_CLDA_OTHA_CGMB_ONOB_CK5
695 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
696 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
697 type(lowerDiag_type) ,
intent(in) :: classA
698 type(transHerm_type) ,
intent(in) :: operationA
703 PURE module subroutine trmv_ASS_CLDA_OTHA_CGMB_ONOB_CK4(matA, classA, operationA, matB)
704#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
705 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_ASS_CLDA_OTHA_CGMB_ONOB_CK4
708 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
709 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
710 type(lowerDiag_type) ,
intent(in) :: classA
711 type(transHerm_type) ,
intent(in) :: operationA
716 PURE module subroutine trmv_ASS_CLDA_OTHA_CGMB_ONOB_CK3(matA, classA, operationA, matB)
717#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
718 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_ASS_CLDA_OTHA_CGMB_ONOB_CK3
721 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
722 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
723 type(lowerDiag_type) ,
intent(in) :: classA
724 type(transHerm_type) ,
intent(in) :: operationA
729 PURE module subroutine trmv_ASS_CLDA_OTHA_CGMB_ONOB_CK2(matA, classA, operationA, matB)
730#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
731 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_ASS_CLDA_OTHA_CGMB_ONOB_CK2
734 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
735 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
736 type(lowerDiag_type) ,
intent(in) :: classA
737 type(transHerm_type) ,
intent(in) :: operationA
742 PURE module subroutine trmv_ASS_CLDA_OTHA_CGMB_ONOB_CK1(matA, classA, operationA, matB)
743#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
744 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_ASS_CLDA_OTHA_CGMB_ONOB_CK1
747 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
748 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
749 type(lowerDiag_type) ,
intent(in) :: classA
750 type(transHerm_type) ,
intent(in) :: operationA
757 PURE module subroutine trmv_ASS_CLDA_OTHA_CGMB_ONOB_RK5(matA, classA, operationA, matB)
758#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
759 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_ASS_CLDA_OTHA_CGMB_ONOB_RK5
762 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
763 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
764 type(lowerDiag_type) ,
intent(in) :: classA
765 type(transHerm_type) ,
intent(in) :: operationA
770 PURE module subroutine trmv_ASS_CLDA_OTHA_CGMB_ONOB_RK4(matA, classA, operationA, matB)
771#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
772 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_ASS_CLDA_OTHA_CGMB_ONOB_RK4
775 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
776 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
777 type(lowerDiag_type) ,
intent(in) :: classA
778 type(transHerm_type) ,
intent(in) :: operationA
783 PURE module subroutine trmv_ASS_CLDA_OTHA_CGMB_ONOB_RK3(matA, classA, operationA, matB)
784#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
785 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_ASS_CLDA_OTHA_CGMB_ONOB_RK3
788 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
789 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
790 type(lowerDiag_type) ,
intent(in) :: classA
791 type(transHerm_type) ,
intent(in) :: operationA
796 PURE module subroutine trmv_ASS_CLDA_OTHA_CGMB_ONOB_RK2(matA, classA, operationA, matB)
797#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
798 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_ASS_CLDA_OTHA_CGMB_ONOB_RK2
801 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
802 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
803 type(lowerDiag_type) ,
intent(in) :: classA
804 type(transHerm_type) ,
intent(in) :: operationA
809 PURE module subroutine trmv_ASS_CLDA_OTHA_CGMB_ONOB_RK1(matA, classA, operationA, matB)
810#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
811 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_ASS_CLDA_OTHA_CGMB_ONOB_RK1
814 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
815 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
816 type(lowerDiag_type) ,
intent(in) :: classA
817 type(transHerm_type) ,
intent(in) :: operationA
834 PURE module subroutine trmv_ASS_CUDA_ONOA_CGMB_ONOB_CK5(matA, classA, operationA, matB)
835#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
836 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_ASS_CUDA_ONOA_CGMB_ONOB_CK5
839 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
840 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
841 type(upperDiag_type) ,
intent(in) :: classA
842 type(nothing_type) ,
intent(in) :: operationA
847 PURE module subroutine trmv_ASS_CUDA_ONOA_CGMB_ONOB_CK4(matA, classA, operationA, matB)
848#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
849 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_ASS_CUDA_ONOA_CGMB_ONOB_CK4
852 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
853 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
854 type(upperDiag_type) ,
intent(in) :: classA
855 type(nothing_type) ,
intent(in) :: operationA
860 PURE module subroutine trmv_ASS_CUDA_ONOA_CGMB_ONOB_CK3(matA, classA, operationA, matB)
861#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
862 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_ASS_CUDA_ONOA_CGMB_ONOB_CK3
865 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
866 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
867 type(upperDiag_type) ,
intent(in) :: classA
868 type(nothing_type) ,
intent(in) :: operationA
873 PURE module subroutine trmv_ASS_CUDA_ONOA_CGMB_ONOB_CK2(matA, classA, operationA, matB)
874#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
875 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_ASS_CUDA_ONOA_CGMB_ONOB_CK2
878 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
879 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
880 type(upperDiag_type) ,
intent(in) :: classA
881 type(nothing_type) ,
intent(in) :: operationA
886 PURE module subroutine trmv_ASS_CUDA_ONOA_CGMB_ONOB_CK1(matA, classA, operationA, matB)
887#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
888 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_ASS_CUDA_ONOA_CGMB_ONOB_CK1
891 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
892 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
893 type(upperDiag_type) ,
intent(in) :: classA
894 type(nothing_type) ,
intent(in) :: operationA
901 PURE module subroutine trmv_ASS_CUDA_ONOA_CGMB_ONOB_RK5(matA, classA, operationA, matB)
902#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
903 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_ASS_CUDA_ONOA_CGMB_ONOB_RK5
906 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
907 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
908 type(upperDiag_type) ,
intent(in) :: classA
909 type(nothing_type) ,
intent(in) :: operationA
914 PURE module subroutine trmv_ASS_CUDA_ONOA_CGMB_ONOB_RK4(matA, classA, operationA, matB)
915#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
916 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_ASS_CUDA_ONOA_CGMB_ONOB_RK4
919 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
920 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
921 type(upperDiag_type) ,
intent(in) :: classA
922 type(nothing_type) ,
intent(in) :: operationA
927 PURE module subroutine trmv_ASS_CUDA_ONOA_CGMB_ONOB_RK3(matA, classA, operationA, matB)
928#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
929 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_ASS_CUDA_ONOA_CGMB_ONOB_RK3
932 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
933 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
934 type(upperDiag_type) ,
intent(in) :: classA
935 type(nothing_type) ,
intent(in) :: operationA
940 PURE module subroutine trmv_ASS_CUDA_ONOA_CGMB_ONOB_RK2(matA, classA, operationA, matB)
941#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
942 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_ASS_CUDA_ONOA_CGMB_ONOB_RK2
945 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
946 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
947 type(upperDiag_type) ,
intent(in) :: classA
948 type(nothing_type) ,
intent(in) :: operationA
953 PURE module subroutine trmv_ASS_CUDA_ONOA_CGMB_ONOB_RK1(matA, classA, operationA, matB)
954#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
955 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_ASS_CUDA_ONOA_CGMB_ONOB_RK1
958 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
959 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
960 type(upperDiag_type) ,
intent(in) :: classA
961 type(nothing_type) ,
intent(in) :: operationA
974 PURE module subroutine trmv_ASS_CUDA_OTSA_CGMB_ONOB_CK5(matA, classA, operationA, matB)
975#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
976 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_ASS_CUDA_OTSA_CGMB_ONOB_CK5
979 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
980 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
981 type(upperDiag_type) ,
intent(in) :: classA
982 type(transSymm_type) ,
intent(in) :: operationA
987 PURE module subroutine trmv_ASS_CUDA_OTSA_CGMB_ONOB_CK4(matA, classA, operationA, matB)
988#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
989 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_ASS_CUDA_OTSA_CGMB_ONOB_CK4
992 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
993 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
994 type(upperDiag_type) ,
intent(in) :: classA
995 type(transSymm_type) ,
intent(in) :: operationA
1000 PURE module subroutine trmv_ASS_CUDA_OTSA_CGMB_ONOB_CK3(matA, classA, operationA, matB)
1001#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1002 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_ASS_CUDA_OTSA_CGMB_ONOB_CK3
1005 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
1006 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
1007 type(upperDiag_type) ,
intent(in) :: classA
1008 type(transSymm_type) ,
intent(in) :: operationA
1013 PURE module subroutine trmv_ASS_CUDA_OTSA_CGMB_ONOB_CK2(matA, classA, operationA, matB)
1014#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1015 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_ASS_CUDA_OTSA_CGMB_ONOB_CK2
1018 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
1019 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
1020 type(upperDiag_type) ,
intent(in) :: classA
1021 type(transSymm_type) ,
intent(in) :: operationA
1026 PURE module subroutine trmv_ASS_CUDA_OTSA_CGMB_ONOB_CK1(matA, classA, operationA, matB)
1027#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1028 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_ASS_CUDA_OTSA_CGMB_ONOB_CK1
1031 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
1032 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
1033 type(upperDiag_type) ,
intent(in) :: classA
1034 type(transSymm_type) ,
intent(in) :: operationA
1041 PURE module subroutine trmv_ASS_CUDA_OTSA_CGMB_ONOB_RK5(matA, classA, operationA, matB)
1042#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1043 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_ASS_CUDA_OTSA_CGMB_ONOB_RK5
1046 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
1047 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
1048 type(upperDiag_type) ,
intent(in) :: classA
1049 type(transSymm_type) ,
intent(in) :: operationA
1054 PURE module subroutine trmv_ASS_CUDA_OTSA_CGMB_ONOB_RK4(matA, classA, operationA, matB)
1055#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1056 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_ASS_CUDA_OTSA_CGMB_ONOB_RK4
1059 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
1060 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
1061 type(upperDiag_type) ,
intent(in) :: classA
1062 type(transSymm_type) ,
intent(in) :: operationA
1067 PURE module subroutine trmv_ASS_CUDA_OTSA_CGMB_ONOB_RK3(matA, classA, operationA, matB)
1068#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1069 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_ASS_CUDA_OTSA_CGMB_ONOB_RK3
1072 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
1073 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
1074 type(upperDiag_type) ,
intent(in) :: classA
1075 type(transSymm_type) ,
intent(in) :: operationA
1080 PURE module subroutine trmv_ASS_CUDA_OTSA_CGMB_ONOB_RK2(matA, classA, operationA, matB)
1081#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1082 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_ASS_CUDA_OTSA_CGMB_ONOB_RK2
1085 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
1086 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
1087 type(upperDiag_type) ,
intent(in) :: classA
1088 type(transSymm_type) ,
intent(in) :: operationA
1093 PURE module subroutine trmv_ASS_CUDA_OTSA_CGMB_ONOB_RK1(matA, classA, operationA, matB)
1094#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1095 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_ASS_CUDA_OTSA_CGMB_ONOB_RK1
1098 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
1099 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
1100 type(upperDiag_type) ,
intent(in) :: classA
1101 type(transSymm_type) ,
intent(in) :: operationA
1114 PURE module subroutine trmv_ASS_CUDA_OTHA_CGMB_ONOB_CK5(matA, classA, operationA, matB)
1115#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1116 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_ASS_CUDA_OTHA_CGMB_ONOB_CK5
1119 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
1120 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
1121 type(upperDiag_type) ,
intent(in) :: classA
1122 type(transHerm_type) ,
intent(in) :: operationA
1127 PURE module subroutine trmv_ASS_CUDA_OTHA_CGMB_ONOB_CK4(matA, classA, operationA, matB)
1128#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1129 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_ASS_CUDA_OTHA_CGMB_ONOB_CK4
1132 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
1133 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
1134 type(upperDiag_type) ,
intent(in) :: classA
1135 type(transHerm_type) ,
intent(in) :: operationA
1140 PURE module subroutine trmv_ASS_CUDA_OTHA_CGMB_ONOB_CK3(matA, classA, operationA, matB)
1141#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1142 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_ASS_CUDA_OTHA_CGMB_ONOB_CK3
1145 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
1146 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
1147 type(upperDiag_type) ,
intent(in) :: classA
1148 type(transHerm_type) ,
intent(in) :: operationA
1153 PURE module subroutine trmv_ASS_CUDA_OTHA_CGMB_ONOB_CK2(matA, classA, operationA, matB)
1154#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1155 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_ASS_CUDA_OTHA_CGMB_ONOB_CK2
1158 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
1159 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
1160 type(upperDiag_type) ,
intent(in) :: classA
1161 type(transHerm_type) ,
intent(in) :: operationA
1166 PURE module subroutine trmv_ASS_CUDA_OTHA_CGMB_ONOB_CK1(matA, classA, operationA, matB)
1167#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1168 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_ASS_CUDA_OTHA_CGMB_ONOB_CK1
1171 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
1172 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
1173 type(upperDiag_type) ,
intent(in) :: classA
1174 type(transHerm_type) ,
intent(in) :: operationA
1181 PURE module subroutine trmv_ASS_CUDA_OTHA_CGMB_ONOB_RK5(matA, classA, operationA, matB)
1182#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1183 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_ASS_CUDA_OTHA_CGMB_ONOB_RK5
1186 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
1187 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
1188 type(upperDiag_type) ,
intent(in) :: classA
1189 type(transHerm_type) ,
intent(in) :: operationA
1194 PURE module subroutine trmv_ASS_CUDA_OTHA_CGMB_ONOB_RK4(matA, classA, operationA, matB)
1195#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1196 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_ASS_CUDA_OTHA_CGMB_ONOB_RK4
1199 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
1200 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
1201 type(upperDiag_type) ,
intent(in) :: classA
1202 type(transHerm_type) ,
intent(in) :: operationA
1207 PURE module subroutine trmv_ASS_CUDA_OTHA_CGMB_ONOB_RK3(matA, classA, operationA, matB)
1208#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1209 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_ASS_CUDA_OTHA_CGMB_ONOB_RK3
1212 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
1213 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
1214 type(upperDiag_type) ,
intent(in) :: classA
1215 type(transHerm_type) ,
intent(in) :: operationA
1220 PURE module subroutine trmv_ASS_CUDA_OTHA_CGMB_ONOB_RK2(matA, classA, operationA, matB)
1221#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1222 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_ASS_CUDA_OTHA_CGMB_ONOB_RK2
1225 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
1226 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
1227 type(upperDiag_type) ,
intent(in) :: classA
1228 type(transHerm_type) ,
intent(in) :: operationA
1233 PURE module subroutine trmv_ASS_CUDA_OTHA_CGMB_ONOB_RK1(matA, classA, operationA, matB)
1234#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1235 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_ASS_CUDA_OTHA_CGMB_ONOB_RK1
1238 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
1239 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
1240 type(upperDiag_type) ,
intent(in) :: classA
1241 type(transHerm_type) ,
intent(in) :: operationA
1258 PURE module subroutine trmv_ASS_CLUA_ONOA_CGMB_ONOB_CK5(matA, classA, operationA, matB)
1259#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1260 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_ASS_CLUA_ONOA_CGMB_ONOB_CK5
1263 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
1264 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
1265 type(lowerUnit_type) ,
intent(in) :: classA
1266 type(nothing_type) ,
intent(in) :: operationA
1271 PURE module subroutine trmv_ASS_CLUA_ONOA_CGMB_ONOB_CK4(matA, classA, operationA, matB)
1272#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1273 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_ASS_CLUA_ONOA_CGMB_ONOB_CK4
1276 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
1277 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
1278 type(lowerUnit_type) ,
intent(in) :: classA
1279 type(nothing_type) ,
intent(in) :: operationA
1284 PURE module subroutine trmv_ASS_CLUA_ONOA_CGMB_ONOB_CK3(matA, classA, operationA, matB)
1285#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1286 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_ASS_CLUA_ONOA_CGMB_ONOB_CK3
1289 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
1290 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
1291 type(lowerUnit_type) ,
intent(in) :: classA
1292 type(nothing_type) ,
intent(in) :: operationA
1297 PURE module subroutine trmv_ASS_CLUA_ONOA_CGMB_ONOB_CK2(matA, classA, operationA, matB)
1298#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1299 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_ASS_CLUA_ONOA_CGMB_ONOB_CK2
1302 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
1303 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
1304 type(lowerUnit_type) ,
intent(in) :: classA
1305 type(nothing_type) ,
intent(in) :: operationA
1310 PURE module subroutine trmv_ASS_CLUA_ONOA_CGMB_ONOB_CK1(matA, classA, operationA, matB)
1311#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1312 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_ASS_CLUA_ONOA_CGMB_ONOB_CK1
1315 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
1316 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
1317 type(lowerUnit_type) ,
intent(in) :: classA
1318 type(nothing_type) ,
intent(in) :: operationA
1325 PURE module subroutine trmv_ASS_CLUA_ONOA_CGMB_ONOB_RK5(matA, classA, operationA, matB)
1326#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1327 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_ASS_CLUA_ONOA_CGMB_ONOB_RK5
1330 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
1331 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
1332 type(lowerUnit_type) ,
intent(in) :: classA
1333 type(nothing_type) ,
intent(in) :: operationA
1338 PURE module subroutine trmv_ASS_CLUA_ONOA_CGMB_ONOB_RK4(matA, classA, operationA, matB)
1339#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1340 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_ASS_CLUA_ONOA_CGMB_ONOB_RK4
1343 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
1344 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
1345 type(lowerUnit_type) ,
intent(in) :: classA
1346 type(nothing_type) ,
intent(in) :: operationA
1351 PURE module subroutine trmv_ASS_CLUA_ONOA_CGMB_ONOB_RK3(matA, classA, operationA, matB)
1352#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1353 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_ASS_CLUA_ONOA_CGMB_ONOB_RK3
1356 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
1357 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
1358 type(lowerUnit_type) ,
intent(in) :: classA
1359 type(nothing_type) ,
intent(in) :: operationA
1364 PURE module subroutine trmv_ASS_CLUA_ONOA_CGMB_ONOB_RK2(matA, classA, operationA, matB)
1365#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1366 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_ASS_CLUA_ONOA_CGMB_ONOB_RK2
1369 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
1370 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
1371 type(lowerUnit_type) ,
intent(in) :: classA
1372 type(nothing_type) ,
intent(in) :: operationA
1377 PURE module subroutine trmv_ASS_CLUA_ONOA_CGMB_ONOB_RK1(matA, classA, operationA, matB)
1378#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1379 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_ASS_CLUA_ONOA_CGMB_ONOB_RK1
1382 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
1383 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
1384 type(lowerUnit_type) ,
intent(in) :: classA
1385 type(nothing_type) ,
intent(in) :: operationA
1398 PURE module subroutine trmv_ASS_CLUA_OTSA_CGMB_ONOB_CK5(matA, classA, operationA, matB)
1399#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1400 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_ASS_CLUA_OTSA_CGMB_ONOB_CK5
1403 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
1404 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
1405 type(lowerUnit_type) ,
intent(in) :: classA
1406 type(transSymm_type) ,
intent(in) :: operationA
1411 PURE module subroutine trmv_ASS_CLUA_OTSA_CGMB_ONOB_CK4(matA, classA, operationA, matB)
1412#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1413 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_ASS_CLUA_OTSA_CGMB_ONOB_CK4
1416 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
1417 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
1418 type(lowerUnit_type) ,
intent(in) :: classA
1419 type(transSymm_type) ,
intent(in) :: operationA
1424 PURE module subroutine trmv_ASS_CLUA_OTSA_CGMB_ONOB_CK3(matA, classA, operationA, matB)
1425#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1426 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_ASS_CLUA_OTSA_CGMB_ONOB_CK3
1429 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
1430 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
1431 type(lowerUnit_type) ,
intent(in) :: classA
1432 type(transSymm_type) ,
intent(in) :: operationA
1437 PURE module subroutine trmv_ASS_CLUA_OTSA_CGMB_ONOB_CK2(matA, classA, operationA, matB)
1438#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1439 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_ASS_CLUA_OTSA_CGMB_ONOB_CK2
1442 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
1443 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
1444 type(lowerUnit_type) ,
intent(in) :: classA
1445 type(transSymm_type) ,
intent(in) :: operationA
1450 PURE module subroutine trmv_ASS_CLUA_OTSA_CGMB_ONOB_CK1(matA, classA, operationA, matB)
1451#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1452 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_ASS_CLUA_OTSA_CGMB_ONOB_CK1
1455 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
1456 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
1457 type(lowerUnit_type) ,
intent(in) :: classA
1458 type(transSymm_type) ,
intent(in) :: operationA
1465 PURE module subroutine trmv_ASS_CLUA_OTSA_CGMB_ONOB_RK5(matA, classA, operationA, matB)
1466#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1467 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_ASS_CLUA_OTSA_CGMB_ONOB_RK5
1470 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
1471 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
1472 type(lowerUnit_type) ,
intent(in) :: classA
1473 type(transSymm_type) ,
intent(in) :: operationA
1478 PURE module subroutine trmv_ASS_CLUA_OTSA_CGMB_ONOB_RK4(matA, classA, operationA, matB)
1479#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1480 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_ASS_CLUA_OTSA_CGMB_ONOB_RK4
1483 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
1484 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
1485 type(lowerUnit_type) ,
intent(in) :: classA
1486 type(transSymm_type) ,
intent(in) :: operationA
1491 PURE module subroutine trmv_ASS_CLUA_OTSA_CGMB_ONOB_RK3(matA, classA, operationA, matB)
1492#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1493 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_ASS_CLUA_OTSA_CGMB_ONOB_RK3
1496 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
1497 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
1498 type(lowerUnit_type) ,
intent(in) :: classA
1499 type(transSymm_type) ,
intent(in) :: operationA
1504 PURE module subroutine trmv_ASS_CLUA_OTSA_CGMB_ONOB_RK2(matA, classA, operationA, matB)
1505#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1506 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_ASS_CLUA_OTSA_CGMB_ONOB_RK2
1509 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
1510 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
1511 type(lowerUnit_type) ,
intent(in) :: classA
1512 type(transSymm_type) ,
intent(in) :: operationA
1517 PURE module subroutine trmv_ASS_CLUA_OTSA_CGMB_ONOB_RK1(matA, classA, operationA, matB)
1518#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1519 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_ASS_CLUA_OTSA_CGMB_ONOB_RK1
1522 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
1523 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
1524 type(lowerUnit_type) ,
intent(in) :: classA
1525 type(transSymm_type) ,
intent(in) :: operationA
1538 PURE module subroutine trmv_ASS_CLUA_OTHA_CGMB_ONOB_CK5(matA, classA, operationA, matB)
1539#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1540 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_ASS_CLUA_OTHA_CGMB_ONOB_CK5
1543 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
1544 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
1545 type(lowerUnit_type) ,
intent(in) :: classA
1546 type(transHerm_type) ,
intent(in) :: operationA
1551 PURE module subroutine trmv_ASS_CLUA_OTHA_CGMB_ONOB_CK4(matA, classA, operationA, matB)
1552#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1553 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_ASS_CLUA_OTHA_CGMB_ONOB_CK4
1556 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
1557 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
1558 type(lowerUnit_type) ,
intent(in) :: classA
1559 type(transHerm_type) ,
intent(in) :: operationA
1564 PURE module subroutine trmv_ASS_CLUA_OTHA_CGMB_ONOB_CK3(matA, classA, operationA, matB)
1565#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1566 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_ASS_CLUA_OTHA_CGMB_ONOB_CK3
1569 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
1570 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
1571 type(lowerUnit_type) ,
intent(in) :: classA
1572 type(transHerm_type) ,
intent(in) :: operationA
1577 PURE module subroutine trmv_ASS_CLUA_OTHA_CGMB_ONOB_CK2(matA, classA, operationA, matB)
1578#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1579 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_ASS_CLUA_OTHA_CGMB_ONOB_CK2
1582 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
1583 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
1584 type(lowerUnit_type) ,
intent(in) :: classA
1585 type(transHerm_type) ,
intent(in) :: operationA
1590 PURE module subroutine trmv_ASS_CLUA_OTHA_CGMB_ONOB_CK1(matA, classA, operationA, matB)
1591#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1592 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_ASS_CLUA_OTHA_CGMB_ONOB_CK1
1595 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
1596 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
1597 type(lowerUnit_type) ,
intent(in) :: classA
1598 type(transHerm_type) ,
intent(in) :: operationA
1605 PURE module subroutine trmv_ASS_CLUA_OTHA_CGMB_ONOB_RK5(matA, classA, operationA, matB)
1606#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1607 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_ASS_CLUA_OTHA_CGMB_ONOB_RK5
1610 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
1611 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
1612 type(lowerUnit_type) ,
intent(in) :: classA
1613 type(transHerm_type) ,
intent(in) :: operationA
1618 PURE module subroutine trmv_ASS_CLUA_OTHA_CGMB_ONOB_RK4(matA, classA, operationA, matB)
1619#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1620 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_ASS_CLUA_OTHA_CGMB_ONOB_RK4
1623 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
1624 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
1625 type(lowerUnit_type) ,
intent(in) :: classA
1626 type(transHerm_type) ,
intent(in) :: operationA
1631 PURE module subroutine trmv_ASS_CLUA_OTHA_CGMB_ONOB_RK3(matA, classA, operationA, matB)
1632#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1633 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_ASS_CLUA_OTHA_CGMB_ONOB_RK3
1636 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
1637 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
1638 type(lowerUnit_type) ,
intent(in) :: classA
1639 type(transHerm_type) ,
intent(in) :: operationA
1644 PURE module subroutine trmv_ASS_CLUA_OTHA_CGMB_ONOB_RK2(matA, classA, operationA, matB)
1645#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1646 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_ASS_CLUA_OTHA_CGMB_ONOB_RK2
1649 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
1650 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
1651 type(lowerUnit_type) ,
intent(in) :: classA
1652 type(transHerm_type) ,
intent(in) :: operationA
1657 PURE module subroutine trmv_ASS_CLUA_OTHA_CGMB_ONOB_RK1(matA, classA, operationA, matB)
1658#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1659 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_ASS_CLUA_OTHA_CGMB_ONOB_RK1
1662 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
1663 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
1664 type(lowerUnit_type) ,
intent(in) :: classA
1665 type(transHerm_type) ,
intent(in) :: operationA
1682 PURE module subroutine trmv_ASS_CUUA_ONOA_CGMB_ONOB_CK5(matA, classA, operationA, matB)
1683#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1684 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_ASS_CUUA_ONOA_CGMB_ONOB_CK5
1687 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
1688 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
1689 type(upperUnit_type) ,
intent(in) :: classA
1690 type(nothing_type) ,
intent(in) :: operationA
1695 PURE module subroutine trmv_ASS_CUUA_ONOA_CGMB_ONOB_CK4(matA, classA, operationA, matB)
1696#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1697 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_ASS_CUUA_ONOA_CGMB_ONOB_CK4
1700 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
1701 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
1702 type(upperUnit_type) ,
intent(in) :: classA
1703 type(nothing_type) ,
intent(in) :: operationA
1708 PURE module subroutine trmv_ASS_CUUA_ONOA_CGMB_ONOB_CK3(matA, classA, operationA, matB)
1709#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1710 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_ASS_CUUA_ONOA_CGMB_ONOB_CK3
1713 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
1714 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
1715 type(upperUnit_type) ,
intent(in) :: classA
1716 type(nothing_type) ,
intent(in) :: operationA
1721 PURE module subroutine trmv_ASS_CUUA_ONOA_CGMB_ONOB_CK2(matA, classA, operationA, matB)
1722#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1723 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_ASS_CUUA_ONOA_CGMB_ONOB_CK2
1726 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
1727 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
1728 type(upperUnit_type) ,
intent(in) :: classA
1729 type(nothing_type) ,
intent(in) :: operationA
1734 PURE module subroutine trmv_ASS_CUUA_ONOA_CGMB_ONOB_CK1(matA, classA, operationA, matB)
1735#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1736 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_ASS_CUUA_ONOA_CGMB_ONOB_CK1
1739 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
1740 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
1741 type(upperUnit_type) ,
intent(in) :: classA
1742 type(nothing_type) ,
intent(in) :: operationA
1749 PURE module subroutine trmv_ASS_CUUA_ONOA_CGMB_ONOB_RK5(matA, classA, operationA, matB)
1750#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1751 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_ASS_CUUA_ONOA_CGMB_ONOB_RK5
1754 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
1755 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
1756 type(upperUnit_type) ,
intent(in) :: classA
1757 type(nothing_type) ,
intent(in) :: operationA
1762 PURE module subroutine trmv_ASS_CUUA_ONOA_CGMB_ONOB_RK4(matA, classA, operationA, matB)
1763#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1764 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_ASS_CUUA_ONOA_CGMB_ONOB_RK4
1767 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
1768 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
1769 type(upperUnit_type) ,
intent(in) :: classA
1770 type(nothing_type) ,
intent(in) :: operationA
1775 PURE module subroutine trmv_ASS_CUUA_ONOA_CGMB_ONOB_RK3(matA, classA, operationA, matB)
1776#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1777 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_ASS_CUUA_ONOA_CGMB_ONOB_RK3
1780 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
1781 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
1782 type(upperUnit_type) ,
intent(in) :: classA
1783 type(nothing_type) ,
intent(in) :: operationA
1788 PURE module subroutine trmv_ASS_CUUA_ONOA_CGMB_ONOB_RK2(matA, classA, operationA, matB)
1789#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1790 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_ASS_CUUA_ONOA_CGMB_ONOB_RK2
1793 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
1794 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
1795 type(upperUnit_type) ,
intent(in) :: classA
1796 type(nothing_type) ,
intent(in) :: operationA
1801 PURE module subroutine trmv_ASS_CUUA_ONOA_CGMB_ONOB_RK1(matA, classA, operationA, matB)
1802#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1803 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_ASS_CUUA_ONOA_CGMB_ONOB_RK1
1806 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
1807 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
1808 type(upperUnit_type) ,
intent(in) :: classA
1809 type(nothing_type) ,
intent(in) :: operationA
1822 PURE module subroutine trmv_ASS_CUUA_OTSA_CGMB_ONOB_CK5(matA, classA, operationA, matB)
1823#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1824 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_ASS_CUUA_OTSA_CGMB_ONOB_CK5
1827 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
1828 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
1829 type(upperUnit_type) ,
intent(in) :: classA
1830 type(transSymm_type) ,
intent(in) :: operationA
1835 PURE module subroutine trmv_ASS_CUUA_OTSA_CGMB_ONOB_CK4(matA, classA, operationA, matB)
1836#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1837 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_ASS_CUUA_OTSA_CGMB_ONOB_CK4
1840 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
1841 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
1842 type(upperUnit_type) ,
intent(in) :: classA
1843 type(transSymm_type) ,
intent(in) :: operationA
1848 PURE module subroutine trmv_ASS_CUUA_OTSA_CGMB_ONOB_CK3(matA, classA, operationA, matB)
1849#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1850 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_ASS_CUUA_OTSA_CGMB_ONOB_CK3
1853 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
1854 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
1855 type(upperUnit_type) ,
intent(in) :: classA
1856 type(transSymm_type) ,
intent(in) :: operationA
1861 PURE module subroutine trmv_ASS_CUUA_OTSA_CGMB_ONOB_CK2(matA, classA, operationA, matB)
1862#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1863 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_ASS_CUUA_OTSA_CGMB_ONOB_CK2
1866 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
1867 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
1868 type(upperUnit_type) ,
intent(in) :: classA
1869 type(transSymm_type) ,
intent(in) :: operationA
1874 PURE module subroutine trmv_ASS_CUUA_OTSA_CGMB_ONOB_CK1(matA, classA, operationA, matB)
1875#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1876 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_ASS_CUUA_OTSA_CGMB_ONOB_CK1
1879 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
1880 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
1881 type(upperUnit_type) ,
intent(in) :: classA
1882 type(transSymm_type) ,
intent(in) :: operationA
1889 PURE module subroutine trmv_ASS_CUUA_OTSA_CGMB_ONOB_RK5(matA, classA, operationA, matB)
1890#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1891 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_ASS_CUUA_OTSA_CGMB_ONOB_RK5
1894 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
1895 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
1896 type(upperUnit_type) ,
intent(in) :: classA
1897 type(transSymm_type) ,
intent(in) :: operationA
1902 PURE module subroutine trmv_ASS_CUUA_OTSA_CGMB_ONOB_RK4(matA, classA, operationA, matB)
1903#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1904 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_ASS_CUUA_OTSA_CGMB_ONOB_RK4
1907 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
1908 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
1909 type(upperUnit_type) ,
intent(in) :: classA
1910 type(transSymm_type) ,
intent(in) :: operationA
1915 PURE module subroutine trmv_ASS_CUUA_OTSA_CGMB_ONOB_RK3(matA, classA, operationA, matB)
1916#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1917 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_ASS_CUUA_OTSA_CGMB_ONOB_RK3
1920 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
1921 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
1922 type(upperUnit_type) ,
intent(in) :: classA
1923 type(transSymm_type) ,
intent(in) :: operationA
1928 PURE module subroutine trmv_ASS_CUUA_OTSA_CGMB_ONOB_RK2(matA, classA, operationA, matB)
1929#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1930 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_ASS_CUUA_OTSA_CGMB_ONOB_RK2
1933 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
1934 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
1935 type(upperUnit_type) ,
intent(in) :: classA
1936 type(transSymm_type) ,
intent(in) :: operationA
1941 PURE module subroutine trmv_ASS_CUUA_OTSA_CGMB_ONOB_RK1(matA, classA, operationA, matB)
1942#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1943 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_ASS_CUUA_OTSA_CGMB_ONOB_RK1
1946 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
1947 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
1948 type(upperUnit_type) ,
intent(in) :: classA
1949 type(transSymm_type) ,
intent(in) :: operationA
1962 PURE module subroutine trmv_ASS_CUUA_OTHA_CGMB_ONOB_CK5(matA, classA, operationA, matB)
1963#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1964 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_ASS_CUUA_OTHA_CGMB_ONOB_CK5
1967 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
1968 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
1969 type(upperUnit_type) ,
intent(in) :: classA
1970 type(transHerm_type) ,
intent(in) :: operationA
1975 PURE module subroutine trmv_ASS_CUUA_OTHA_CGMB_ONOB_CK4(matA, classA, operationA, matB)
1976#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1977 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_ASS_CUUA_OTHA_CGMB_ONOB_CK4
1980 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
1981 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
1982 type(upperUnit_type) ,
intent(in) :: classA
1983 type(transHerm_type) ,
intent(in) :: operationA
1988 PURE module subroutine trmv_ASS_CUUA_OTHA_CGMB_ONOB_CK3(matA, classA, operationA, matB)
1989#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1990 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_ASS_CUUA_OTHA_CGMB_ONOB_CK3
1993 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
1994 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
1995 type(upperUnit_type) ,
intent(in) :: classA
1996 type(transHerm_type) ,
intent(in) :: operationA
2001 PURE module subroutine trmv_ASS_CUUA_OTHA_CGMB_ONOB_CK2(matA, classA, operationA, matB)
2002#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2003 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_ASS_CUUA_OTHA_CGMB_ONOB_CK2
2006 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
2007 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
2008 type(upperUnit_type) ,
intent(in) :: classA
2009 type(transHerm_type) ,
intent(in) :: operationA
2014 PURE module subroutine trmv_ASS_CUUA_OTHA_CGMB_ONOB_CK1(matA, classA, operationA, matB)
2015#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2016 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_ASS_CUUA_OTHA_CGMB_ONOB_CK1
2019 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
2020 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
2021 type(upperUnit_type) ,
intent(in) :: classA
2022 type(transHerm_type) ,
intent(in) :: operationA
2029 PURE module subroutine trmv_ASS_CUUA_OTHA_CGMB_ONOB_RK5(matA, classA, operationA, matB)
2030#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2031 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_ASS_CUUA_OTHA_CGMB_ONOB_RK5
2034 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
2035 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
2036 type(upperUnit_type) ,
intent(in) :: classA
2037 type(transHerm_type) ,
intent(in) :: operationA
2042 PURE module subroutine trmv_ASS_CUUA_OTHA_CGMB_ONOB_RK4(matA, classA, operationA, matB)
2043#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2044 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_ASS_CUUA_OTHA_CGMB_ONOB_RK4
2047 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
2048 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
2049 type(upperUnit_type) ,
intent(in) :: classA
2050 type(transHerm_type) ,
intent(in) :: operationA
2055 PURE module subroutine trmv_ASS_CUUA_OTHA_CGMB_ONOB_RK3(matA, classA, operationA, matB)
2056#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2057 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_ASS_CUUA_OTHA_CGMB_ONOB_RK3
2060 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
2061 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
2062 type(upperUnit_type) ,
intent(in) :: classA
2063 type(transHerm_type) ,
intent(in) :: operationA
2068 PURE module subroutine trmv_ASS_CUUA_OTHA_CGMB_ONOB_RK2(matA, classA, operationA, matB)
2069#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2070 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_ASS_CUUA_OTHA_CGMB_ONOB_RK2
2073 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
2074 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
2075 type(upperUnit_type) ,
intent(in) :: classA
2076 type(transHerm_type) ,
intent(in) :: operationA
2081 PURE module subroutine trmv_ASS_CUUA_OTHA_CGMB_ONOB_RK1(matA, classA, operationA, matB)
2082#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2083 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_ASS_CUUA_OTHA_CGMB_ONOB_RK1
2086 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
2087 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
2088 type(upperUnit_type) ,
intent(in) :: classA
2089 type(transHerm_type) ,
intent(in) :: operationA
2110 PURE module subroutine trmv_EXP_CLDA_ONOA_CGMB_ONOB_CK5(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
2111#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2112 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_EXP_CLDA_ONOA_CGMB_ONOB_CK5
2115 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
2116 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
2117 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
2118 type(lowerDiag_type) ,
intent(in) :: classA
2119 type(nothing_type) ,
intent(in) :: operationA
2124 PURE module subroutine trmv_EXP_CLDA_ONOA_CGMB_ONOB_CK4(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
2125#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2126 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_EXP_CLDA_ONOA_CGMB_ONOB_CK4
2129 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
2130 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
2131 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
2132 type(lowerDiag_type) ,
intent(in) :: classA
2133 type(nothing_type) ,
intent(in) :: operationA
2138 PURE module subroutine trmv_EXP_CLDA_ONOA_CGMB_ONOB_CK3(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
2139#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2140 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_EXP_CLDA_ONOA_CGMB_ONOB_CK3
2143 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
2144 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
2145 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
2146 type(lowerDiag_type) ,
intent(in) :: classA
2147 type(nothing_type) ,
intent(in) :: operationA
2152 PURE module subroutine trmv_EXP_CLDA_ONOA_CGMB_ONOB_CK2(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
2153#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2154 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_EXP_CLDA_ONOA_CGMB_ONOB_CK2
2157 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
2158 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
2159 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
2160 type(lowerDiag_type) ,
intent(in) :: classA
2161 type(nothing_type) ,
intent(in) :: operationA
2166 PURE module subroutine trmv_EXP_CLDA_ONOA_CGMB_ONOB_CK1(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
2167#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2168 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_EXP_CLDA_ONOA_CGMB_ONOB_CK1
2171 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
2172 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
2173 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
2174 type(lowerDiag_type) ,
intent(in) :: classA
2175 type(nothing_type) ,
intent(in) :: operationA
2182 PURE module subroutine trmv_EXP_CLDA_ONOA_CGMB_ONOB_RK5(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
2183#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2184 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_EXP_CLDA_ONOA_CGMB_ONOB_RK5
2187 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
2188 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
2189 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
2190 type(lowerDiag_type) ,
intent(in) :: classA
2191 type(nothing_type) ,
intent(in) :: operationA
2196 PURE module subroutine trmv_EXP_CLDA_ONOA_CGMB_ONOB_RK4(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
2197#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2198 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_EXP_CLDA_ONOA_CGMB_ONOB_RK4
2201 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
2202 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
2203 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
2204 type(lowerDiag_type) ,
intent(in) :: classA
2205 type(nothing_type) ,
intent(in) :: operationA
2210 PURE module subroutine trmv_EXP_CLDA_ONOA_CGMB_ONOB_RK3(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
2211#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2212 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_EXP_CLDA_ONOA_CGMB_ONOB_RK3
2215 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
2216 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
2217 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
2218 type(lowerDiag_type) ,
intent(in) :: classA
2219 type(nothing_type) ,
intent(in) :: operationA
2224 PURE module subroutine trmv_EXP_CLDA_ONOA_CGMB_ONOB_RK2(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
2225#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2226 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_EXP_CLDA_ONOA_CGMB_ONOB_RK2
2229 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
2230 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
2231 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
2232 type(lowerDiag_type) ,
intent(in) :: classA
2233 type(nothing_type) ,
intent(in) :: operationA
2238 PURE module subroutine trmv_EXP_CLDA_ONOA_CGMB_ONOB_RK1(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
2239#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2240 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_EXP_CLDA_ONOA_CGMB_ONOB_RK1
2243 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
2244 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
2245 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
2246 type(lowerDiag_type) ,
intent(in) :: classA
2247 type(nothing_type) ,
intent(in) :: operationA
2260 PURE module subroutine trmv_EXP_CLDA_OTSA_CGMB_ONOB_CK5(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
2261#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2262 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_EXP_CLDA_OTSA_CGMB_ONOB_CK5
2265 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
2266 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
2267 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
2268 type(lowerDiag_type) ,
intent(in) :: classA
2269 type(transSymm_type) ,
intent(in) :: operationA
2274 PURE module subroutine trmv_EXP_CLDA_OTSA_CGMB_ONOB_CK4(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
2275#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2276 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_EXP_CLDA_OTSA_CGMB_ONOB_CK4
2279 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
2280 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
2281 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
2282 type(lowerDiag_type) ,
intent(in) :: classA
2283 type(transSymm_type) ,
intent(in) :: operationA
2288 PURE module subroutine trmv_EXP_CLDA_OTSA_CGMB_ONOB_CK3(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
2289#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2290 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_EXP_CLDA_OTSA_CGMB_ONOB_CK3
2293 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
2294 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
2295 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
2296 type(lowerDiag_type) ,
intent(in) :: classA
2297 type(transSymm_type) ,
intent(in) :: operationA
2302 PURE module subroutine trmv_EXP_CLDA_OTSA_CGMB_ONOB_CK2(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
2303#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2304 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_EXP_CLDA_OTSA_CGMB_ONOB_CK2
2307 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
2308 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
2309 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
2310 type(lowerDiag_type) ,
intent(in) :: classA
2311 type(transSymm_type) ,
intent(in) :: operationA
2316 PURE module subroutine trmv_EXP_CLDA_OTSA_CGMB_ONOB_CK1(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
2317#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2318 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_EXP_CLDA_OTSA_CGMB_ONOB_CK1
2321 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
2322 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
2323 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
2324 type(lowerDiag_type) ,
intent(in) :: classA
2325 type(transSymm_type) ,
intent(in) :: operationA
2332 PURE module subroutine trmv_EXP_CLDA_OTSA_CGMB_ONOB_RK5(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
2333#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2334 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_EXP_CLDA_OTSA_CGMB_ONOB_RK5
2337 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
2338 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
2339 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
2340 type(lowerDiag_type) ,
intent(in) :: classA
2341 type(transSymm_type) ,
intent(in) :: operationA
2346 PURE module subroutine trmv_EXP_CLDA_OTSA_CGMB_ONOB_RK4(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
2347#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2348 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_EXP_CLDA_OTSA_CGMB_ONOB_RK4
2351 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
2352 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
2353 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
2354 type(lowerDiag_type) ,
intent(in) :: classA
2355 type(transSymm_type) ,
intent(in) :: operationA
2360 PURE module subroutine trmv_EXP_CLDA_OTSA_CGMB_ONOB_RK3(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
2361#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2362 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_EXP_CLDA_OTSA_CGMB_ONOB_RK3
2365 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
2366 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
2367 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
2368 type(lowerDiag_type) ,
intent(in) :: classA
2369 type(transSymm_type) ,
intent(in) :: operationA
2374 PURE module subroutine trmv_EXP_CLDA_OTSA_CGMB_ONOB_RK2(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
2375#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2376 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_EXP_CLDA_OTSA_CGMB_ONOB_RK2
2379 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
2380 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
2381 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
2382 type(lowerDiag_type) ,
intent(in) :: classA
2383 type(transSymm_type) ,
intent(in) :: operationA
2388 PURE module subroutine trmv_EXP_CLDA_OTSA_CGMB_ONOB_RK1(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
2389#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2390 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_EXP_CLDA_OTSA_CGMB_ONOB_RK1
2393 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
2394 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
2395 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
2396 type(lowerDiag_type) ,
intent(in) :: classA
2397 type(transSymm_type) ,
intent(in) :: operationA
2410 PURE module subroutine trmv_EXP_CLDA_OTHA_CGMB_ONOB_CK5(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
2411#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2412 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_EXP_CLDA_OTHA_CGMB_ONOB_CK5
2415 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
2416 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
2417 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
2418 type(lowerDiag_type) ,
intent(in) :: classA
2419 type(transHerm_type) ,
intent(in) :: operationA
2424 PURE module subroutine trmv_EXP_CLDA_OTHA_CGMB_ONOB_CK4(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
2425#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2426 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_EXP_CLDA_OTHA_CGMB_ONOB_CK4
2429 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
2430 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
2431 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
2432 type(lowerDiag_type) ,
intent(in) :: classA
2433 type(transHerm_type) ,
intent(in) :: operationA
2438 PURE module subroutine trmv_EXP_CLDA_OTHA_CGMB_ONOB_CK3(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
2439#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2440 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_EXP_CLDA_OTHA_CGMB_ONOB_CK3
2443 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
2444 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
2445 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
2446 type(lowerDiag_type) ,
intent(in) :: classA
2447 type(transHerm_type) ,
intent(in) :: operationA
2452 PURE module subroutine trmv_EXP_CLDA_OTHA_CGMB_ONOB_CK2(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
2453#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2454 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_EXP_CLDA_OTHA_CGMB_ONOB_CK2
2457 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
2458 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
2459 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
2460 type(lowerDiag_type) ,
intent(in) :: classA
2461 type(transHerm_type) ,
intent(in) :: operationA
2466 PURE module subroutine trmv_EXP_CLDA_OTHA_CGMB_ONOB_CK1(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
2467#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2468 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_EXP_CLDA_OTHA_CGMB_ONOB_CK1
2471 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
2472 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
2473 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
2474 type(lowerDiag_type) ,
intent(in) :: classA
2475 type(transHerm_type) ,
intent(in) :: operationA
2482 PURE module subroutine trmv_EXP_CLDA_OTHA_CGMB_ONOB_RK5(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
2483#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2484 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_EXP_CLDA_OTHA_CGMB_ONOB_RK5
2487 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
2488 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
2489 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
2490 type(lowerDiag_type) ,
intent(in) :: classA
2491 type(transHerm_type) ,
intent(in) :: operationA
2496 PURE module subroutine trmv_EXP_CLDA_OTHA_CGMB_ONOB_RK4(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
2497#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2498 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_EXP_CLDA_OTHA_CGMB_ONOB_RK4
2501 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
2502 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
2503 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
2504 type(lowerDiag_type) ,
intent(in) :: classA
2505 type(transHerm_type) ,
intent(in) :: operationA
2510 PURE module subroutine trmv_EXP_CLDA_OTHA_CGMB_ONOB_RK3(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
2511#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2512 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_EXP_CLDA_OTHA_CGMB_ONOB_RK3
2515 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
2516 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
2517 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
2518 type(lowerDiag_type) ,
intent(in) :: classA
2519 type(transHerm_type) ,
intent(in) :: operationA
2524 PURE module subroutine trmv_EXP_CLDA_OTHA_CGMB_ONOB_RK2(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
2525#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2526 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_EXP_CLDA_OTHA_CGMB_ONOB_RK2
2529 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
2530 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
2531 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
2532 type(lowerDiag_type) ,
intent(in) :: classA
2533 type(transHerm_type) ,
intent(in) :: operationA
2538 PURE module subroutine trmv_EXP_CLDA_OTHA_CGMB_ONOB_RK1(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
2539#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2540 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_EXP_CLDA_OTHA_CGMB_ONOB_RK1
2543 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
2544 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
2545 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
2546 type(lowerDiag_type) ,
intent(in) :: classA
2547 type(transHerm_type) ,
intent(in) :: operationA
2564 PURE module subroutine trmv_EXP_CUDA_ONOA_CGMB_ONOB_CK5(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
2565#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2566 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_EXP_CUDA_ONOA_CGMB_ONOB_CK5
2569 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
2570 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
2571 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
2572 type(upperDiag_type) ,
intent(in) :: classA
2573 type(nothing_type) ,
intent(in) :: operationA
2578 PURE module subroutine trmv_EXP_CUDA_ONOA_CGMB_ONOB_CK4(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
2579#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2580 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_EXP_CUDA_ONOA_CGMB_ONOB_CK4
2583 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
2584 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
2585 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
2586 type(upperDiag_type) ,
intent(in) :: classA
2587 type(nothing_type) ,
intent(in) :: operationA
2592 PURE module subroutine trmv_EXP_CUDA_ONOA_CGMB_ONOB_CK3(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
2593#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2594 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_EXP_CUDA_ONOA_CGMB_ONOB_CK3
2597 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
2598 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
2599 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
2600 type(upperDiag_type) ,
intent(in) :: classA
2601 type(nothing_type) ,
intent(in) :: operationA
2606 PURE module subroutine trmv_EXP_CUDA_ONOA_CGMB_ONOB_CK2(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
2607#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2608 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_EXP_CUDA_ONOA_CGMB_ONOB_CK2
2611 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
2612 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
2613 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
2614 type(upperDiag_type) ,
intent(in) :: classA
2615 type(nothing_type) ,
intent(in) :: operationA
2620 PURE module subroutine trmv_EXP_CUDA_ONOA_CGMB_ONOB_CK1(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
2621#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2622 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_EXP_CUDA_ONOA_CGMB_ONOB_CK1
2625 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
2626 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
2627 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
2628 type(upperDiag_type) ,
intent(in) :: classA
2629 type(nothing_type) ,
intent(in) :: operationA
2636 PURE module subroutine trmv_EXP_CUDA_ONOA_CGMB_ONOB_RK5(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
2637#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2638 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_EXP_CUDA_ONOA_CGMB_ONOB_RK5
2641 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
2642 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
2643 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
2644 type(upperDiag_type) ,
intent(in) :: classA
2645 type(nothing_type) ,
intent(in) :: operationA
2650 PURE module subroutine trmv_EXP_CUDA_ONOA_CGMB_ONOB_RK4(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
2651#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2652 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_EXP_CUDA_ONOA_CGMB_ONOB_RK4
2655 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
2656 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
2657 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
2658 type(upperDiag_type) ,
intent(in) :: classA
2659 type(nothing_type) ,
intent(in) :: operationA
2664 PURE module subroutine trmv_EXP_CUDA_ONOA_CGMB_ONOB_RK3(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
2665#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2666 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_EXP_CUDA_ONOA_CGMB_ONOB_RK3
2669 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
2670 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
2671 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
2672 type(upperDiag_type) ,
intent(in) :: classA
2673 type(nothing_type) ,
intent(in) :: operationA
2678 PURE module subroutine trmv_EXP_CUDA_ONOA_CGMB_ONOB_RK2(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
2679#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2680 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_EXP_CUDA_ONOA_CGMB_ONOB_RK2
2683 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
2684 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
2685 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
2686 type(upperDiag_type) ,
intent(in) :: classA
2687 type(nothing_type) ,
intent(in) :: operationA
2692 PURE module subroutine trmv_EXP_CUDA_ONOA_CGMB_ONOB_RK1(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
2693#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2694 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_EXP_CUDA_ONOA_CGMB_ONOB_RK1
2697 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
2698 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
2699 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
2700 type(upperDiag_type) ,
intent(in) :: classA
2701 type(nothing_type) ,
intent(in) :: operationA
2714 PURE module subroutine trmv_EXP_CUDA_OTSA_CGMB_ONOB_CK5(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
2715#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2716 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_EXP_CUDA_OTSA_CGMB_ONOB_CK5
2719 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
2720 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
2721 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
2722 type(upperDiag_type) ,
intent(in) :: classA
2723 type(transSymm_type) ,
intent(in) :: operationA
2728 PURE module subroutine trmv_EXP_CUDA_OTSA_CGMB_ONOB_CK4(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
2729#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2730 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_EXP_CUDA_OTSA_CGMB_ONOB_CK4
2733 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
2734 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
2735 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
2736 type(upperDiag_type) ,
intent(in) :: classA
2737 type(transSymm_type) ,
intent(in) :: operationA
2742 PURE module subroutine trmv_EXP_CUDA_OTSA_CGMB_ONOB_CK3(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
2743#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2744 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_EXP_CUDA_OTSA_CGMB_ONOB_CK3
2747 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
2748 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
2749 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
2750 type(upperDiag_type) ,
intent(in) :: classA
2751 type(transSymm_type) ,
intent(in) :: operationA
2756 PURE module subroutine trmv_EXP_CUDA_OTSA_CGMB_ONOB_CK2(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
2757#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2758 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_EXP_CUDA_OTSA_CGMB_ONOB_CK2
2761 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
2762 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
2763 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
2764 type(upperDiag_type) ,
intent(in) :: classA
2765 type(transSymm_type) ,
intent(in) :: operationA
2770 PURE module subroutine trmv_EXP_CUDA_OTSA_CGMB_ONOB_CK1(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
2771#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2772 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_EXP_CUDA_OTSA_CGMB_ONOB_CK1
2775 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
2776 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
2777 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
2778 type(upperDiag_type) ,
intent(in) :: classA
2779 type(transSymm_type) ,
intent(in) :: operationA
2786 PURE module subroutine trmv_EXP_CUDA_OTSA_CGMB_ONOB_RK5(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
2787#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2788 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_EXP_CUDA_OTSA_CGMB_ONOB_RK5
2791 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
2792 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
2793 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
2794 type(upperDiag_type) ,
intent(in) :: classA
2795 type(transSymm_type) ,
intent(in) :: operationA
2800 PURE module subroutine trmv_EXP_CUDA_OTSA_CGMB_ONOB_RK4(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
2801#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2802 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_EXP_CUDA_OTSA_CGMB_ONOB_RK4
2805 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
2806 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
2807 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
2808 type(upperDiag_type) ,
intent(in) :: classA
2809 type(transSymm_type) ,
intent(in) :: operationA
2814 PURE module subroutine trmv_EXP_CUDA_OTSA_CGMB_ONOB_RK3(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
2815#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2816 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_EXP_CUDA_OTSA_CGMB_ONOB_RK3
2819 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
2820 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
2821 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
2822 type(upperDiag_type) ,
intent(in) :: classA
2823 type(transSymm_type) ,
intent(in) :: operationA
2828 PURE module subroutine trmv_EXP_CUDA_OTSA_CGMB_ONOB_RK2(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
2829#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2830 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_EXP_CUDA_OTSA_CGMB_ONOB_RK2
2833 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
2834 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
2835 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
2836 type(upperDiag_type) ,
intent(in) :: classA
2837 type(transSymm_type) ,
intent(in) :: operationA
2842 PURE module subroutine trmv_EXP_CUDA_OTSA_CGMB_ONOB_RK1(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
2843#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2844 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_EXP_CUDA_OTSA_CGMB_ONOB_RK1
2847 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
2848 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
2849 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
2850 type(upperDiag_type) ,
intent(in) :: classA
2851 type(transSymm_type) ,
intent(in) :: operationA
2864 PURE module subroutine trmv_EXP_CUDA_OTHA_CGMB_ONOB_CK5(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
2865#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2866 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_EXP_CUDA_OTHA_CGMB_ONOB_CK5
2869 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
2870 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
2871 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
2872 type(upperDiag_type) ,
intent(in) :: classA
2873 type(transHerm_type) ,
intent(in) :: operationA
2878 PURE module subroutine trmv_EXP_CUDA_OTHA_CGMB_ONOB_CK4(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
2879#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2880 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_EXP_CUDA_OTHA_CGMB_ONOB_CK4
2883 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
2884 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
2885 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
2886 type(upperDiag_type) ,
intent(in) :: classA
2887 type(transHerm_type) ,
intent(in) :: operationA
2892 PURE module subroutine trmv_EXP_CUDA_OTHA_CGMB_ONOB_CK3(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
2893#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2894 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_EXP_CUDA_OTHA_CGMB_ONOB_CK3
2897 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
2898 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
2899 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
2900 type(upperDiag_type) ,
intent(in) :: classA
2901 type(transHerm_type) ,
intent(in) :: operationA
2906 PURE module subroutine trmv_EXP_CUDA_OTHA_CGMB_ONOB_CK2(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
2907#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2908 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_EXP_CUDA_OTHA_CGMB_ONOB_CK2
2911 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
2912 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
2913 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
2914 type(upperDiag_type) ,
intent(in) :: classA
2915 type(transHerm_type) ,
intent(in) :: operationA
2920 PURE module subroutine trmv_EXP_CUDA_OTHA_CGMB_ONOB_CK1(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
2921#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2922 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_EXP_CUDA_OTHA_CGMB_ONOB_CK1
2925 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
2926 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
2927 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
2928 type(upperDiag_type) ,
intent(in) :: classA
2929 type(transHerm_type) ,
intent(in) :: operationA
2936 PURE module subroutine trmv_EXP_CUDA_OTHA_CGMB_ONOB_RK5(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
2937#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2938 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_EXP_CUDA_OTHA_CGMB_ONOB_RK5
2941 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
2942 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
2943 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
2944 type(upperDiag_type) ,
intent(in) :: classA
2945 type(transHerm_type) ,
intent(in) :: operationA
2950 PURE module subroutine trmv_EXP_CUDA_OTHA_CGMB_ONOB_RK4(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
2951#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2952 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_EXP_CUDA_OTHA_CGMB_ONOB_RK4
2955 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
2956 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
2957 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
2958 type(upperDiag_type) ,
intent(in) :: classA
2959 type(transHerm_type) ,
intent(in) :: operationA
2964 PURE module subroutine trmv_EXP_CUDA_OTHA_CGMB_ONOB_RK3(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
2965#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2966 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_EXP_CUDA_OTHA_CGMB_ONOB_RK3
2969 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
2970 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
2971 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
2972 type(upperDiag_type) ,
intent(in) :: classA
2973 type(transHerm_type) ,
intent(in) :: operationA
2978 PURE module subroutine trmv_EXP_CUDA_OTHA_CGMB_ONOB_RK2(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
2979#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2980 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_EXP_CUDA_OTHA_CGMB_ONOB_RK2
2983 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
2984 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
2985 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
2986 type(upperDiag_type) ,
intent(in) :: classA
2987 type(transHerm_type) ,
intent(in) :: operationA
2992 PURE module subroutine trmv_EXP_CUDA_OTHA_CGMB_ONOB_RK1(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
2993#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2994 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_EXP_CUDA_OTHA_CGMB_ONOB_RK1
2997 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
2998 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
2999 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
3000 type(upperDiag_type) ,
intent(in) :: classA
3001 type(transHerm_type) ,
intent(in) :: operationA
3018 PURE module subroutine trmv_EXP_CLUA_ONOA_CGMB_ONOB_CK5(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
3019#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3020 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_EXP_CLUA_ONOA_CGMB_ONOB_CK5
3023 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
3024 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
3025 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
3026 type(lowerUnit_type) ,
intent(in) :: classA
3027 type(nothing_type) ,
intent(in) :: operationA
3032 PURE module subroutine trmv_EXP_CLUA_ONOA_CGMB_ONOB_CK4(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
3033#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3034 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_EXP_CLUA_ONOA_CGMB_ONOB_CK4
3037 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
3038 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
3039 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
3040 type(lowerUnit_type) ,
intent(in) :: classA
3041 type(nothing_type) ,
intent(in) :: operationA
3046 PURE module subroutine trmv_EXP_CLUA_ONOA_CGMB_ONOB_CK3(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
3047#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3048 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_EXP_CLUA_ONOA_CGMB_ONOB_CK3
3051 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
3052 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
3053 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
3054 type(lowerUnit_type) ,
intent(in) :: classA
3055 type(nothing_type) ,
intent(in) :: operationA
3060 PURE module subroutine trmv_EXP_CLUA_ONOA_CGMB_ONOB_CK2(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
3061#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3062 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_EXP_CLUA_ONOA_CGMB_ONOB_CK2
3065 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
3066 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
3067 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
3068 type(lowerUnit_type) ,
intent(in) :: classA
3069 type(nothing_type) ,
intent(in) :: operationA
3074 PURE module subroutine trmv_EXP_CLUA_ONOA_CGMB_ONOB_CK1(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
3075#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3076 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_EXP_CLUA_ONOA_CGMB_ONOB_CK1
3079 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
3080 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
3081 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
3082 type(lowerUnit_type) ,
intent(in) :: classA
3083 type(nothing_type) ,
intent(in) :: operationA
3090 PURE module subroutine trmv_EXP_CLUA_ONOA_CGMB_ONOB_RK5(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
3091#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3092 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_EXP_CLUA_ONOA_CGMB_ONOB_RK5
3095 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
3096 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
3097 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
3098 type(lowerUnit_type) ,
intent(in) :: classA
3099 type(nothing_type) ,
intent(in) :: operationA
3104 PURE module subroutine trmv_EXP_CLUA_ONOA_CGMB_ONOB_RK4(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
3105#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3106 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_EXP_CLUA_ONOA_CGMB_ONOB_RK4
3109 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
3110 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
3111 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
3112 type(lowerUnit_type) ,
intent(in) :: classA
3113 type(nothing_type) ,
intent(in) :: operationA
3118 PURE module subroutine trmv_EXP_CLUA_ONOA_CGMB_ONOB_RK3(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
3119#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3120 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_EXP_CLUA_ONOA_CGMB_ONOB_RK3
3123 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
3124 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
3125 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
3126 type(lowerUnit_type) ,
intent(in) :: classA
3127 type(nothing_type) ,
intent(in) :: operationA
3132 PURE module subroutine trmv_EXP_CLUA_ONOA_CGMB_ONOB_RK2(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
3133#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3134 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_EXP_CLUA_ONOA_CGMB_ONOB_RK2
3137 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
3138 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
3139 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
3140 type(lowerUnit_type) ,
intent(in) :: classA
3141 type(nothing_type) ,
intent(in) :: operationA
3146 PURE module subroutine trmv_EXP_CLUA_ONOA_CGMB_ONOB_RK1(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
3147#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3148 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_EXP_CLUA_ONOA_CGMB_ONOB_RK1
3151 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
3152 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
3153 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
3154 type(lowerUnit_type) ,
intent(in) :: classA
3155 type(nothing_type) ,
intent(in) :: operationA
3168 PURE module subroutine trmv_EXP_CLUA_OTSA_CGMB_ONOB_CK5(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
3169#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3170 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_EXP_CLUA_OTSA_CGMB_ONOB_CK5
3173 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
3174 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
3175 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
3176 type(lowerUnit_type) ,
intent(in) :: classA
3177 type(transSymm_type) ,
intent(in) :: operationA
3182 PURE module subroutine trmv_EXP_CLUA_OTSA_CGMB_ONOB_CK4(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
3183#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3184 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_EXP_CLUA_OTSA_CGMB_ONOB_CK4
3187 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
3188 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
3189 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
3190 type(lowerUnit_type) ,
intent(in) :: classA
3191 type(transSymm_type) ,
intent(in) :: operationA
3196 PURE module subroutine trmv_EXP_CLUA_OTSA_CGMB_ONOB_CK3(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
3197#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3198 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_EXP_CLUA_OTSA_CGMB_ONOB_CK3
3201 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
3202 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
3203 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
3204 type(lowerUnit_type) ,
intent(in) :: classA
3205 type(transSymm_type) ,
intent(in) :: operationA
3210 PURE module subroutine trmv_EXP_CLUA_OTSA_CGMB_ONOB_CK2(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
3211#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3212 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_EXP_CLUA_OTSA_CGMB_ONOB_CK2
3215 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
3216 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
3217 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
3218 type(lowerUnit_type) ,
intent(in) :: classA
3219 type(transSymm_type) ,
intent(in) :: operationA
3224 PURE module subroutine trmv_EXP_CLUA_OTSA_CGMB_ONOB_CK1(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
3225#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3226 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_EXP_CLUA_OTSA_CGMB_ONOB_CK1
3229 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
3230 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
3231 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
3232 type(lowerUnit_type) ,
intent(in) :: classA
3233 type(transSymm_type) ,
intent(in) :: operationA
3240 PURE module subroutine trmv_EXP_CLUA_OTSA_CGMB_ONOB_RK5(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
3241#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3242 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_EXP_CLUA_OTSA_CGMB_ONOB_RK5
3245 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
3246 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
3247 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
3248 type(lowerUnit_type) ,
intent(in) :: classA
3249 type(transSymm_type) ,
intent(in) :: operationA
3254 PURE module subroutine trmv_EXP_CLUA_OTSA_CGMB_ONOB_RK4(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
3255#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3256 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_EXP_CLUA_OTSA_CGMB_ONOB_RK4
3259 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
3260 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
3261 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
3262 type(lowerUnit_type) ,
intent(in) :: classA
3263 type(transSymm_type) ,
intent(in) :: operationA
3268 PURE module subroutine trmv_EXP_CLUA_OTSA_CGMB_ONOB_RK3(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
3269#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3270 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_EXP_CLUA_OTSA_CGMB_ONOB_RK3
3273 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
3274 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
3275 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
3276 type(lowerUnit_type) ,
intent(in) :: classA
3277 type(transSymm_type) ,
intent(in) :: operationA
3282 PURE module subroutine trmv_EXP_CLUA_OTSA_CGMB_ONOB_RK2(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
3283#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3284 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_EXP_CLUA_OTSA_CGMB_ONOB_RK2
3287 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
3288 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
3289 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
3290 type(lowerUnit_type) ,
intent(in) :: classA
3291 type(transSymm_type) ,
intent(in) :: operationA
3296 PURE module subroutine trmv_EXP_CLUA_OTSA_CGMB_ONOB_RK1(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
3297#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3298 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_EXP_CLUA_OTSA_CGMB_ONOB_RK1
3301 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
3302 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
3303 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
3304 type(lowerUnit_type) ,
intent(in) :: classA
3305 type(transSymm_type) ,
intent(in) :: operationA
3318 PURE module subroutine trmv_EXP_CLUA_OTHA_CGMB_ONOB_CK5(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
3319#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3320 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_EXP_CLUA_OTHA_CGMB_ONOB_CK5
3323 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
3324 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
3325 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
3326 type(lowerUnit_type) ,
intent(in) :: classA
3327 type(transHerm_type) ,
intent(in) :: operationA
3332 PURE module subroutine trmv_EXP_CLUA_OTHA_CGMB_ONOB_CK4(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
3333#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3334 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_EXP_CLUA_OTHA_CGMB_ONOB_CK4
3337 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
3338 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
3339 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
3340 type(lowerUnit_type) ,
intent(in) :: classA
3341 type(transHerm_type) ,
intent(in) :: operationA
3346 PURE module subroutine trmv_EXP_CLUA_OTHA_CGMB_ONOB_CK3(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
3347#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3348 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_EXP_CLUA_OTHA_CGMB_ONOB_CK3
3351 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
3352 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
3353 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
3354 type(lowerUnit_type) ,
intent(in) :: classA
3355 type(transHerm_type) ,
intent(in) :: operationA
3360 PURE module subroutine trmv_EXP_CLUA_OTHA_CGMB_ONOB_CK2(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
3361#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3362 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_EXP_CLUA_OTHA_CGMB_ONOB_CK2
3365 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
3366 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
3367 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
3368 type(lowerUnit_type) ,
intent(in) :: classA
3369 type(transHerm_type) ,
intent(in) :: operationA
3374 PURE module subroutine trmv_EXP_CLUA_OTHA_CGMB_ONOB_CK1(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
3375#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3376 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_EXP_CLUA_OTHA_CGMB_ONOB_CK1
3379 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
3380 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
3381 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
3382 type(lowerUnit_type) ,
intent(in) :: classA
3383 type(transHerm_type) ,
intent(in) :: operationA
3390 PURE module subroutine trmv_EXP_CLUA_OTHA_CGMB_ONOB_RK5(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
3391#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3392 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_EXP_CLUA_OTHA_CGMB_ONOB_RK5
3395 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
3396 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
3397 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
3398 type(lowerUnit_type) ,
intent(in) :: classA
3399 type(transHerm_type) ,
intent(in) :: operationA
3404 PURE module subroutine trmv_EXP_CLUA_OTHA_CGMB_ONOB_RK4(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
3405#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3406 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_EXP_CLUA_OTHA_CGMB_ONOB_RK4
3409 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
3410 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
3411 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
3412 type(lowerUnit_type) ,
intent(in) :: classA
3413 type(transHerm_type) ,
intent(in) :: operationA
3418 PURE module subroutine trmv_EXP_CLUA_OTHA_CGMB_ONOB_RK3(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
3419#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3420 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_EXP_CLUA_OTHA_CGMB_ONOB_RK3
3423 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
3424 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
3425 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
3426 type(lowerUnit_type) ,
intent(in) :: classA
3427 type(transHerm_type) ,
intent(in) :: operationA
3432 PURE module subroutine trmv_EXP_CLUA_OTHA_CGMB_ONOB_RK2(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
3433#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3434 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_EXP_CLUA_OTHA_CGMB_ONOB_RK2
3437 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
3438 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
3439 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
3440 type(lowerUnit_type) ,
intent(in) :: classA
3441 type(transHerm_type) ,
intent(in) :: operationA
3446 PURE module subroutine trmv_EXP_CLUA_OTHA_CGMB_ONOB_RK1(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
3447#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3448 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_EXP_CLUA_OTHA_CGMB_ONOB_RK1
3451 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
3452 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
3453 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
3454 type(lowerUnit_type) ,
intent(in) :: classA
3455 type(transHerm_type) ,
intent(in) :: operationA
3472 PURE module subroutine trmv_EXP_CUUA_ONOA_CGMB_ONOB_CK5(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
3473#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3474 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_EXP_CUUA_ONOA_CGMB_ONOB_CK5
3477 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
3478 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
3479 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
3480 type(upperUnit_type) ,
intent(in) :: classA
3481 type(nothing_type) ,
intent(in) :: operationA
3486 PURE module subroutine trmv_EXP_CUUA_ONOA_CGMB_ONOB_CK4(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
3487#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3488 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_EXP_CUUA_ONOA_CGMB_ONOB_CK4
3491 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
3492 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
3493 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
3494 type(upperUnit_type) ,
intent(in) :: classA
3495 type(nothing_type) ,
intent(in) :: operationA
3500 PURE module subroutine trmv_EXP_CUUA_ONOA_CGMB_ONOB_CK3(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
3501#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3502 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_EXP_CUUA_ONOA_CGMB_ONOB_CK3
3505 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
3506 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
3507 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
3508 type(upperUnit_type) ,
intent(in) :: classA
3509 type(nothing_type) ,
intent(in) :: operationA
3514 PURE module subroutine trmv_EXP_CUUA_ONOA_CGMB_ONOB_CK2(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
3515#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3516 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_EXP_CUUA_ONOA_CGMB_ONOB_CK2
3519 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
3520 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
3521 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
3522 type(upperUnit_type) ,
intent(in) :: classA
3523 type(nothing_type) ,
intent(in) :: operationA
3528 PURE module subroutine trmv_EXP_CUUA_ONOA_CGMB_ONOB_CK1(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
3529#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3530 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_EXP_CUUA_ONOA_CGMB_ONOB_CK1
3533 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
3534 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
3535 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
3536 type(upperUnit_type) ,
intent(in) :: classA
3537 type(nothing_type) ,
intent(in) :: operationA
3544 PURE module subroutine trmv_EXP_CUUA_ONOA_CGMB_ONOB_RK5(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
3545#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3546 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_EXP_CUUA_ONOA_CGMB_ONOB_RK5
3549 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
3550 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
3551 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
3552 type(upperUnit_type) ,
intent(in) :: classA
3553 type(nothing_type) ,
intent(in) :: operationA
3558 PURE module subroutine trmv_EXP_CUUA_ONOA_CGMB_ONOB_RK4(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
3559#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3560 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_EXP_CUUA_ONOA_CGMB_ONOB_RK4
3563 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
3564 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
3565 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
3566 type(upperUnit_type) ,
intent(in) :: classA
3567 type(nothing_type) ,
intent(in) :: operationA
3572 PURE module subroutine trmv_EXP_CUUA_ONOA_CGMB_ONOB_RK3(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
3573#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3574 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_EXP_CUUA_ONOA_CGMB_ONOB_RK3
3577 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
3578 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
3579 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
3580 type(upperUnit_type) ,
intent(in) :: classA
3581 type(nothing_type) ,
intent(in) :: operationA
3586 PURE module subroutine trmv_EXP_CUUA_ONOA_CGMB_ONOB_RK2(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
3587#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3588 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_EXP_CUUA_ONOA_CGMB_ONOB_RK2
3591 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
3592 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
3593 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
3594 type(upperUnit_type) ,
intent(in) :: classA
3595 type(nothing_type) ,
intent(in) :: operationA
3600 PURE module subroutine trmv_EXP_CUUA_ONOA_CGMB_ONOB_RK1(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
3601#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3602 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_EXP_CUUA_ONOA_CGMB_ONOB_RK1
3605 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
3606 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
3607 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
3608 type(upperUnit_type) ,
intent(in) :: classA
3609 type(nothing_type) ,
intent(in) :: operationA
3622 PURE module subroutine trmv_EXP_CUUA_OTSA_CGMB_ONOB_CK5(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
3623#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3624 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_EXP_CUUA_OTSA_CGMB_ONOB_CK5
3627 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
3628 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
3629 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
3630 type(upperUnit_type) ,
intent(in) :: classA
3631 type(transSymm_type) ,
intent(in) :: operationA
3636 PURE module subroutine trmv_EXP_CUUA_OTSA_CGMB_ONOB_CK4(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
3637#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3638 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_EXP_CUUA_OTSA_CGMB_ONOB_CK4
3641 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
3642 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
3643 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
3644 type(upperUnit_type) ,
intent(in) :: classA
3645 type(transSymm_type) ,
intent(in) :: operationA
3650 PURE module subroutine trmv_EXP_CUUA_OTSA_CGMB_ONOB_CK3(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
3651#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3652 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_EXP_CUUA_OTSA_CGMB_ONOB_CK3
3655 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
3656 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
3657 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
3658 type(upperUnit_type) ,
intent(in) :: classA
3659 type(transSymm_type) ,
intent(in) :: operationA
3664 PURE module subroutine trmv_EXP_CUUA_OTSA_CGMB_ONOB_CK2(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
3665#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3666 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_EXP_CUUA_OTSA_CGMB_ONOB_CK2
3669 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
3670 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
3671 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
3672 type(upperUnit_type) ,
intent(in) :: classA
3673 type(transSymm_type) ,
intent(in) :: operationA
3678 PURE module subroutine trmv_EXP_CUUA_OTSA_CGMB_ONOB_CK1(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
3679#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3680 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_EXP_CUUA_OTSA_CGMB_ONOB_CK1
3683 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
3684 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
3685 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
3686 type(upperUnit_type) ,
intent(in) :: classA
3687 type(transSymm_type) ,
intent(in) :: operationA
3694 PURE module subroutine trmv_EXP_CUUA_OTSA_CGMB_ONOB_RK5(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
3695#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3696 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_EXP_CUUA_OTSA_CGMB_ONOB_RK5
3699 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
3700 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
3701 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
3702 type(upperUnit_type) ,
intent(in) :: classA
3703 type(transSymm_type) ,
intent(in) :: operationA
3708 PURE module subroutine trmv_EXP_CUUA_OTSA_CGMB_ONOB_RK4(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
3709#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3710 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_EXP_CUUA_OTSA_CGMB_ONOB_RK4
3713 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
3714 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
3715 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
3716 type(upperUnit_type) ,
intent(in) :: classA
3717 type(transSymm_type) ,
intent(in) :: operationA
3722 PURE module subroutine trmv_EXP_CUUA_OTSA_CGMB_ONOB_RK3(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
3723#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3724 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_EXP_CUUA_OTSA_CGMB_ONOB_RK3
3727 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
3728 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
3729 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
3730 type(upperUnit_type) ,
intent(in) :: classA
3731 type(transSymm_type) ,
intent(in) :: operationA
3736 PURE module subroutine trmv_EXP_CUUA_OTSA_CGMB_ONOB_RK2(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
3737#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3738 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_EXP_CUUA_OTSA_CGMB_ONOB_RK2
3741 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
3742 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
3743 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
3744 type(upperUnit_type) ,
intent(in) :: classA
3745 type(transSymm_type) ,
intent(in) :: operationA
3750 PURE module subroutine trmv_EXP_CUUA_OTSA_CGMB_ONOB_RK1(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
3751#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3752 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_EXP_CUUA_OTSA_CGMB_ONOB_RK1
3755 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
3756 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
3757 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
3758 type(upperUnit_type) ,
intent(in) :: classA
3759 type(transSymm_type) ,
intent(in) :: operationA
3772 PURE module subroutine trmv_EXP_CUUA_OTHA_CGMB_ONOB_CK5(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
3773#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3774 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_EXP_CUUA_OTHA_CGMB_ONOB_CK5
3777 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
3778 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
3779 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
3780 type(upperUnit_type) ,
intent(in) :: classA
3781 type(transHerm_type) ,
intent(in) :: operationA
3786 PURE module subroutine trmv_EXP_CUUA_OTHA_CGMB_ONOB_CK4(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
3787#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3788 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_EXP_CUUA_OTHA_CGMB_ONOB_CK4
3791 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
3792 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
3793 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
3794 type(upperUnit_type) ,
intent(in) :: classA
3795 type(transHerm_type) ,
intent(in) :: operationA
3800 PURE module subroutine trmv_EXP_CUUA_OTHA_CGMB_ONOB_CK3(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
3801#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3802 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_EXP_CUUA_OTHA_CGMB_ONOB_CK3
3805 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
3806 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
3807 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
3808 type(upperUnit_type) ,
intent(in) :: classA
3809 type(transHerm_type) ,
intent(in) :: operationA
3814 PURE module subroutine trmv_EXP_CUUA_OTHA_CGMB_ONOB_CK2(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
3815#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3816 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_EXP_CUUA_OTHA_CGMB_ONOB_CK2
3819 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
3820 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
3821 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
3822 type(upperUnit_type) ,
intent(in) :: classA
3823 type(transHerm_type) ,
intent(in) :: operationA
3828 PURE module subroutine trmv_EXP_CUUA_OTHA_CGMB_ONOB_CK1(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
3829#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3830 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_EXP_CUUA_OTHA_CGMB_ONOB_CK1
3833 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
3834 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
3835 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
3836 type(upperUnit_type) ,
intent(in) :: classA
3837 type(transHerm_type) ,
intent(in) :: operationA
3844 PURE module subroutine trmv_EXP_CUUA_OTHA_CGMB_ONOB_RK5(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
3845#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3846 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_EXP_CUUA_OTHA_CGMB_ONOB_RK5
3849 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
3850 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
3851 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
3852 type(upperUnit_type) ,
intent(in) :: classA
3853 type(transHerm_type) ,
intent(in) :: operationA
3858 PURE module subroutine trmv_EXP_CUUA_OTHA_CGMB_ONOB_RK4(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
3859#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3860 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_EXP_CUUA_OTHA_CGMB_ONOB_RK4
3863 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
3864 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
3865 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
3866 type(upperUnit_type) ,
intent(in) :: classA
3867 type(transHerm_type) ,
intent(in) :: operationA
3872 PURE module subroutine trmv_EXP_CUUA_OTHA_CGMB_ONOB_RK3(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
3873#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3874 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_EXP_CUUA_OTHA_CGMB_ONOB_RK3
3877 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
3878 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
3879 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
3880 type(upperUnit_type) ,
intent(in) :: classA
3881 type(transHerm_type) ,
intent(in) :: operationA
3886 PURE module subroutine trmv_EXP_CUUA_OTHA_CGMB_ONOB_RK2(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
3887#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3888 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_EXP_CUUA_OTHA_CGMB_ONOB_RK2
3891 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
3892 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
3893 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
3894 type(upperUnit_type) ,
intent(in) :: classA
3895 type(transHerm_type) ,
intent(in) :: operationA
3900 PURE module subroutine trmv_EXP_CUUA_OTHA_CGMB_ONOB_RK1(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
3901#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3902 !DEC$ ATTRIBUTES DLLEXPORT :: trmv_EXP_CUUA_OTHA_CGMB_ONOB_RK1
3905 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
3906 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
3907 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
3908 type(upperUnit_type) ,
intent(in) :: classA
3909 type(transHerm_type) ,
intent(in) :: operationA
3952 PURE module subroutine trsv_ASS_CLDA_INVA_CGMB_ONOB_CK5(matA, classA, operationA, matB)
3953#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3954 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_ASS_CLDA_INVA_CGMB_ONOB_CK5
3957 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
3958 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
3959 type(lowerDiag_type) ,
intent(in) :: classA
3960 type(inversion_type) ,
intent(in) :: operationA
3965 PURE module subroutine trsv_ASS_CLDA_INVA_CGMB_ONOB_CK4(matA, classA, operationA, matB)
3966#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3967 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_ASS_CLDA_INVA_CGMB_ONOB_CK4
3970 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
3971 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
3972 type(lowerDiag_type) ,
intent(in) :: classA
3973 type(inversion_type) ,
intent(in) :: operationA
3978 PURE module subroutine trsv_ASS_CLDA_INVA_CGMB_ONOB_CK3(matA, classA, operationA, matB)
3979#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3980 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_ASS_CLDA_INVA_CGMB_ONOB_CK3
3983 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
3984 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
3985 type(lowerDiag_type) ,
intent(in) :: classA
3986 type(inversion_type) ,
intent(in) :: operationA
3991 PURE module subroutine trsv_ASS_CLDA_INVA_CGMB_ONOB_CK2(matA, classA, operationA, matB)
3992#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3993 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_ASS_CLDA_INVA_CGMB_ONOB_CK2
3996 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
3997 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
3998 type(lowerDiag_type) ,
intent(in) :: classA
3999 type(inversion_type) ,
intent(in) :: operationA
4004 PURE module subroutine trsv_ASS_CLDA_INVA_CGMB_ONOB_CK1(matA, classA, operationA, matB)
4005#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4006 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_ASS_CLDA_INVA_CGMB_ONOB_CK1
4009 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
4010 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
4011 type(lowerDiag_type) ,
intent(in) :: classA
4012 type(inversion_type) ,
intent(in) :: operationA
4019 PURE module subroutine trsv_ASS_CLDA_INVA_CGMB_ONOB_RK5(matA, classA, operationA, matB)
4020#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4021 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_ASS_CLDA_INVA_CGMB_ONOB_RK5
4024 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
4025 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
4026 type(lowerDiag_type) ,
intent(in) :: classA
4027 type(inversion_type) ,
intent(in) :: operationA
4032 PURE module subroutine trsv_ASS_CLDA_INVA_CGMB_ONOB_RK4(matA, classA, operationA, matB)
4033#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4034 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_ASS_CLDA_INVA_CGMB_ONOB_RK4
4037 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
4038 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
4039 type(lowerDiag_type) ,
intent(in) :: classA
4040 type(inversion_type) ,
intent(in) :: operationA
4045 PURE module subroutine trsv_ASS_CLDA_INVA_CGMB_ONOB_RK3(matA, classA, operationA, matB)
4046#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4047 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_ASS_CLDA_INVA_CGMB_ONOB_RK3
4050 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
4051 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
4052 type(lowerDiag_type) ,
intent(in) :: classA
4053 type(inversion_type) ,
intent(in) :: operationA
4058 PURE module subroutine trsv_ASS_CLDA_INVA_CGMB_ONOB_RK2(matA, classA, operationA, matB)
4059#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4060 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_ASS_CLDA_INVA_CGMB_ONOB_RK2
4063 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
4064 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
4065 type(lowerDiag_type) ,
intent(in) :: classA
4066 type(inversion_type) ,
intent(in) :: operationA
4071 PURE module subroutine trsv_ASS_CLDA_INVA_CGMB_ONOB_RK1(matA, classA, operationA, matB)
4072#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4073 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_ASS_CLDA_INVA_CGMB_ONOB_RK1
4076 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
4077 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
4078 type(lowerDiag_type) ,
intent(in) :: classA
4079 type(inversion_type) ,
intent(in) :: operationA
4092 PURE module subroutine trsv_ASS_CLDA_OTOA_CGMB_ONOB_CK5(matA, classA, operationA, matB)
4093#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4094 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_ASS_CLDA_OTOA_CGMB_ONOB_CK5
4097 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
4098 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
4099 type(lowerDiag_type) ,
intent(in) :: classA
4100 type(transOrth_type) ,
intent(in) :: operationA
4105 PURE module subroutine trsv_ASS_CLDA_OTOA_CGMB_ONOB_CK4(matA, classA, operationA, matB)
4106#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4107 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_ASS_CLDA_OTOA_CGMB_ONOB_CK4
4110 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
4111 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
4112 type(lowerDiag_type) ,
intent(in) :: classA
4113 type(transOrth_type) ,
intent(in) :: operationA
4118 PURE module subroutine trsv_ASS_CLDA_OTOA_CGMB_ONOB_CK3(matA, classA, operationA, matB)
4119#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4120 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_ASS_CLDA_OTOA_CGMB_ONOB_CK3
4123 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
4124 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
4125 type(lowerDiag_type) ,
intent(in) :: classA
4126 type(transOrth_type) ,
intent(in) :: operationA
4131 PURE module subroutine trsv_ASS_CLDA_OTOA_CGMB_ONOB_CK2(matA, classA, operationA, matB)
4132#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4133 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_ASS_CLDA_OTOA_CGMB_ONOB_CK2
4136 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
4137 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
4138 type(lowerDiag_type) ,
intent(in) :: classA
4139 type(transOrth_type) ,
intent(in) :: operationA
4144 PURE module subroutine trsv_ASS_CLDA_OTOA_CGMB_ONOB_CK1(matA, classA, operationA, matB)
4145#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4146 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_ASS_CLDA_OTOA_CGMB_ONOB_CK1
4149 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
4150 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
4151 type(lowerDiag_type) ,
intent(in) :: classA
4152 type(transOrth_type) ,
intent(in) :: operationA
4159 PURE module subroutine trsv_ASS_CLDA_OTOA_CGMB_ONOB_RK5(matA, classA, operationA, matB)
4160#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4161 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_ASS_CLDA_OTOA_CGMB_ONOB_RK5
4164 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
4165 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
4166 type(lowerDiag_type) ,
intent(in) :: classA
4167 type(transOrth_type) ,
intent(in) :: operationA
4172 PURE module subroutine trsv_ASS_CLDA_OTOA_CGMB_ONOB_RK4(matA, classA, operationA, matB)
4173#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4174 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_ASS_CLDA_OTOA_CGMB_ONOB_RK4
4177 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
4178 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
4179 type(lowerDiag_type) ,
intent(in) :: classA
4180 type(transOrth_type) ,
intent(in) :: operationA
4185 PURE module subroutine trsv_ASS_CLDA_OTOA_CGMB_ONOB_RK3(matA, classA, operationA, matB)
4186#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4187 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_ASS_CLDA_OTOA_CGMB_ONOB_RK3
4190 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
4191 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
4192 type(lowerDiag_type) ,
intent(in) :: classA
4193 type(transOrth_type) ,
intent(in) :: operationA
4198 PURE module subroutine trsv_ASS_CLDA_OTOA_CGMB_ONOB_RK2(matA, classA, operationA, matB)
4199#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4200 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_ASS_CLDA_OTOA_CGMB_ONOB_RK2
4203 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
4204 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
4205 type(lowerDiag_type) ,
intent(in) :: classA
4206 type(transOrth_type) ,
intent(in) :: operationA
4211 PURE module subroutine trsv_ASS_CLDA_OTOA_CGMB_ONOB_RK1(matA, classA, operationA, matB)
4212#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4213 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_ASS_CLDA_OTOA_CGMB_ONOB_RK1
4216 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
4217 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
4218 type(lowerDiag_type) ,
intent(in) :: classA
4219 type(transOrth_type) ,
intent(in) :: operationA
4232 PURE module subroutine trsv_ASS_CLDA_OTUA_CGMB_ONOB_CK5(matA, classA, operationA, matB)
4233#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4234 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_ASS_CLDA_OTUA_CGMB_ONOB_CK5
4237 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
4238 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
4239 type(lowerDiag_type) ,
intent(in) :: classA
4240 type(transUnit_type) ,
intent(in) :: operationA
4245 PURE module subroutine trsv_ASS_CLDA_OTUA_CGMB_ONOB_CK4(matA, classA, operationA, matB)
4246#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4247 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_ASS_CLDA_OTUA_CGMB_ONOB_CK4
4250 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
4251 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
4252 type(lowerDiag_type) ,
intent(in) :: classA
4253 type(transUnit_type) ,
intent(in) :: operationA
4258 PURE module subroutine trsv_ASS_CLDA_OTUA_CGMB_ONOB_CK3(matA, classA, operationA, matB)
4259#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4260 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_ASS_CLDA_OTUA_CGMB_ONOB_CK3
4263 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
4264 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
4265 type(lowerDiag_type) ,
intent(in) :: classA
4266 type(transUnit_type) ,
intent(in) :: operationA
4271 PURE module subroutine trsv_ASS_CLDA_OTUA_CGMB_ONOB_CK2(matA, classA, operationA, matB)
4272#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4273 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_ASS_CLDA_OTUA_CGMB_ONOB_CK2
4276 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
4277 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
4278 type(lowerDiag_type) ,
intent(in) :: classA
4279 type(transUnit_type) ,
intent(in) :: operationA
4284 PURE module subroutine trsv_ASS_CLDA_OTUA_CGMB_ONOB_CK1(matA, classA, operationA, matB)
4285#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4286 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_ASS_CLDA_OTUA_CGMB_ONOB_CK1
4289 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
4290 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
4291 type(lowerDiag_type) ,
intent(in) :: classA
4292 type(transUnit_type) ,
intent(in) :: operationA
4299 PURE module subroutine trsv_ASS_CLDA_OTUA_CGMB_ONOB_RK5(matA, classA, operationA, matB)
4300#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4301 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_ASS_CLDA_OTUA_CGMB_ONOB_RK5
4304 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
4305 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
4306 type(lowerDiag_type) ,
intent(in) :: classA
4307 type(transUnit_type) ,
intent(in) :: operationA
4312 PURE module subroutine trsv_ASS_CLDA_OTUA_CGMB_ONOB_RK4(matA, classA, operationA, matB)
4313#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4314 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_ASS_CLDA_OTUA_CGMB_ONOB_RK4
4317 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
4318 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
4319 type(lowerDiag_type) ,
intent(in) :: classA
4320 type(transUnit_type) ,
intent(in) :: operationA
4325 PURE module subroutine trsv_ASS_CLDA_OTUA_CGMB_ONOB_RK3(matA, classA, operationA, matB)
4326#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4327 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_ASS_CLDA_OTUA_CGMB_ONOB_RK3
4330 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
4331 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
4332 type(lowerDiag_type) ,
intent(in) :: classA
4333 type(transUnit_type) ,
intent(in) :: operationA
4338 PURE module subroutine trsv_ASS_CLDA_OTUA_CGMB_ONOB_RK2(matA, classA, operationA, matB)
4339#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4340 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_ASS_CLDA_OTUA_CGMB_ONOB_RK2
4343 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
4344 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
4345 type(lowerDiag_type) ,
intent(in) :: classA
4346 type(transUnit_type) ,
intent(in) :: operationA
4351 PURE module subroutine trsv_ASS_CLDA_OTUA_CGMB_ONOB_RK1(matA, classA, operationA, matB)
4352#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4353 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_ASS_CLDA_OTUA_CGMB_ONOB_RK1
4356 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
4357 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
4358 type(lowerDiag_type) ,
intent(in) :: classA
4359 type(transUnit_type) ,
intent(in) :: operationA
4376 PURE module subroutine trsv_ASS_CUDA_INVA_CGMB_ONOB_CK5(matA, classA, operationA, matB)
4377#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4378 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_ASS_CUDA_INVA_CGMB_ONOB_CK5
4381 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
4382 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
4383 type(upperDiag_type) ,
intent(in) :: classA
4384 type(inversion_type) ,
intent(in) :: operationA
4389 PURE module subroutine trsv_ASS_CUDA_INVA_CGMB_ONOB_CK4(matA, classA, operationA, matB)
4390#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4391 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_ASS_CUDA_INVA_CGMB_ONOB_CK4
4394 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
4395 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
4396 type(upperDiag_type) ,
intent(in) :: classA
4397 type(inversion_type) ,
intent(in) :: operationA
4402 PURE module subroutine trsv_ASS_CUDA_INVA_CGMB_ONOB_CK3(matA, classA, operationA, matB)
4403#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4404 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_ASS_CUDA_INVA_CGMB_ONOB_CK3
4407 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
4408 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
4409 type(upperDiag_type) ,
intent(in) :: classA
4410 type(inversion_type) ,
intent(in) :: operationA
4415 PURE module subroutine trsv_ASS_CUDA_INVA_CGMB_ONOB_CK2(matA, classA, operationA, matB)
4416#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4417 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_ASS_CUDA_INVA_CGMB_ONOB_CK2
4420 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
4421 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
4422 type(upperDiag_type) ,
intent(in) :: classA
4423 type(inversion_type) ,
intent(in) :: operationA
4428 PURE module subroutine trsv_ASS_CUDA_INVA_CGMB_ONOB_CK1(matA, classA, operationA, matB)
4429#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4430 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_ASS_CUDA_INVA_CGMB_ONOB_CK1
4433 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
4434 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
4435 type(upperDiag_type) ,
intent(in) :: classA
4436 type(inversion_type) ,
intent(in) :: operationA
4443 PURE module subroutine trsv_ASS_CUDA_INVA_CGMB_ONOB_RK5(matA, classA, operationA, matB)
4444#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4445 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_ASS_CUDA_INVA_CGMB_ONOB_RK5
4448 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
4449 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
4450 type(upperDiag_type) ,
intent(in) :: classA
4451 type(inversion_type) ,
intent(in) :: operationA
4456 PURE module subroutine trsv_ASS_CUDA_INVA_CGMB_ONOB_RK4(matA, classA, operationA, matB)
4457#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4458 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_ASS_CUDA_INVA_CGMB_ONOB_RK4
4461 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
4462 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
4463 type(upperDiag_type) ,
intent(in) :: classA
4464 type(inversion_type) ,
intent(in) :: operationA
4469 PURE module subroutine trsv_ASS_CUDA_INVA_CGMB_ONOB_RK3(matA, classA, operationA, matB)
4470#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4471 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_ASS_CUDA_INVA_CGMB_ONOB_RK3
4474 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
4475 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
4476 type(upperDiag_type) ,
intent(in) :: classA
4477 type(inversion_type) ,
intent(in) :: operationA
4482 PURE module subroutine trsv_ASS_CUDA_INVA_CGMB_ONOB_RK2(matA, classA, operationA, matB)
4483#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4484 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_ASS_CUDA_INVA_CGMB_ONOB_RK2
4487 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
4488 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
4489 type(upperDiag_type) ,
intent(in) :: classA
4490 type(inversion_type) ,
intent(in) :: operationA
4495 PURE module subroutine trsv_ASS_CUDA_INVA_CGMB_ONOB_RK1(matA, classA, operationA, matB)
4496#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4497 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_ASS_CUDA_INVA_CGMB_ONOB_RK1
4500 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
4501 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
4502 type(upperDiag_type) ,
intent(in) :: classA
4503 type(inversion_type) ,
intent(in) :: operationA
4516 PURE module subroutine trsv_ASS_CUDA_OTOA_CGMB_ONOB_CK5(matA, classA, operationA, matB)
4517#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4518 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_ASS_CUDA_OTOA_CGMB_ONOB_CK5
4521 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
4522 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
4523 type(upperDiag_type) ,
intent(in) :: classA
4524 type(transOrth_type) ,
intent(in) :: operationA
4529 PURE module subroutine trsv_ASS_CUDA_OTOA_CGMB_ONOB_CK4(matA, classA, operationA, matB)
4530#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4531 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_ASS_CUDA_OTOA_CGMB_ONOB_CK4
4534 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
4535 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
4536 type(upperDiag_type) ,
intent(in) :: classA
4537 type(transOrth_type) ,
intent(in) :: operationA
4542 PURE module subroutine trsv_ASS_CUDA_OTOA_CGMB_ONOB_CK3(matA, classA, operationA, matB)
4543#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4544 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_ASS_CUDA_OTOA_CGMB_ONOB_CK3
4547 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
4548 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
4549 type(upperDiag_type) ,
intent(in) :: classA
4550 type(transOrth_type) ,
intent(in) :: operationA
4555 PURE module subroutine trsv_ASS_CUDA_OTOA_CGMB_ONOB_CK2(matA, classA, operationA, matB)
4556#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4557 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_ASS_CUDA_OTOA_CGMB_ONOB_CK2
4560 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
4561 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
4562 type(upperDiag_type) ,
intent(in) :: classA
4563 type(transOrth_type) ,
intent(in) :: operationA
4568 PURE module subroutine trsv_ASS_CUDA_OTOA_CGMB_ONOB_CK1(matA, classA, operationA, matB)
4569#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4570 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_ASS_CUDA_OTOA_CGMB_ONOB_CK1
4573 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
4574 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
4575 type(upperDiag_type) ,
intent(in) :: classA
4576 type(transOrth_type) ,
intent(in) :: operationA
4583 PURE module subroutine trsv_ASS_CUDA_OTOA_CGMB_ONOB_RK5(matA, classA, operationA, matB)
4584#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4585 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_ASS_CUDA_OTOA_CGMB_ONOB_RK5
4588 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
4589 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
4590 type(upperDiag_type) ,
intent(in) :: classA
4591 type(transOrth_type) ,
intent(in) :: operationA
4596 PURE module subroutine trsv_ASS_CUDA_OTOA_CGMB_ONOB_RK4(matA, classA, operationA, matB)
4597#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4598 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_ASS_CUDA_OTOA_CGMB_ONOB_RK4
4601 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
4602 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
4603 type(upperDiag_type) ,
intent(in) :: classA
4604 type(transOrth_type) ,
intent(in) :: operationA
4609 PURE module subroutine trsv_ASS_CUDA_OTOA_CGMB_ONOB_RK3(matA, classA, operationA, matB)
4610#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4611 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_ASS_CUDA_OTOA_CGMB_ONOB_RK3
4614 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
4615 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
4616 type(upperDiag_type) ,
intent(in) :: classA
4617 type(transOrth_type) ,
intent(in) :: operationA
4622 PURE module subroutine trsv_ASS_CUDA_OTOA_CGMB_ONOB_RK2(matA, classA, operationA, matB)
4623#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4624 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_ASS_CUDA_OTOA_CGMB_ONOB_RK2
4627 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
4628 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
4629 type(upperDiag_type) ,
intent(in) :: classA
4630 type(transOrth_type) ,
intent(in) :: operationA
4635 PURE module subroutine trsv_ASS_CUDA_OTOA_CGMB_ONOB_RK1(matA, classA, operationA, matB)
4636#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4637 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_ASS_CUDA_OTOA_CGMB_ONOB_RK1
4640 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
4641 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
4642 type(upperDiag_type) ,
intent(in) :: classA
4643 type(transOrth_type) ,
intent(in) :: operationA
4656 PURE module subroutine trsv_ASS_CUDA_OTUA_CGMB_ONOB_CK5(matA, classA, operationA, matB)
4657#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4658 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_ASS_CUDA_OTUA_CGMB_ONOB_CK5
4661 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
4662 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
4663 type(upperDiag_type) ,
intent(in) :: classA
4664 type(transUnit_type) ,
intent(in) :: operationA
4669 PURE module subroutine trsv_ASS_CUDA_OTUA_CGMB_ONOB_CK4(matA, classA, operationA, matB)
4670#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4671 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_ASS_CUDA_OTUA_CGMB_ONOB_CK4
4674 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
4675 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
4676 type(upperDiag_type) ,
intent(in) :: classA
4677 type(transUnit_type) ,
intent(in) :: operationA
4682 PURE module subroutine trsv_ASS_CUDA_OTUA_CGMB_ONOB_CK3(matA, classA, operationA, matB)
4683#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4684 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_ASS_CUDA_OTUA_CGMB_ONOB_CK3
4687 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
4688 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
4689 type(upperDiag_type) ,
intent(in) :: classA
4690 type(transUnit_type) ,
intent(in) :: operationA
4695 PURE module subroutine trsv_ASS_CUDA_OTUA_CGMB_ONOB_CK2(matA, classA, operationA, matB)
4696#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4697 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_ASS_CUDA_OTUA_CGMB_ONOB_CK2
4700 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
4701 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
4702 type(upperDiag_type) ,
intent(in) :: classA
4703 type(transUnit_type) ,
intent(in) :: operationA
4708 PURE module subroutine trsv_ASS_CUDA_OTUA_CGMB_ONOB_CK1(matA, classA, operationA, matB)
4709#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4710 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_ASS_CUDA_OTUA_CGMB_ONOB_CK1
4713 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
4714 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
4715 type(upperDiag_type) ,
intent(in) :: classA
4716 type(transUnit_type) ,
intent(in) :: operationA
4723 PURE module subroutine trsv_ASS_CUDA_OTUA_CGMB_ONOB_RK5(matA, classA, operationA, matB)
4724#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4725 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_ASS_CUDA_OTUA_CGMB_ONOB_RK5
4728 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
4729 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
4730 type(upperDiag_type) ,
intent(in) :: classA
4731 type(transUnit_type) ,
intent(in) :: operationA
4736 PURE module subroutine trsv_ASS_CUDA_OTUA_CGMB_ONOB_RK4(matA, classA, operationA, matB)
4737#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4738 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_ASS_CUDA_OTUA_CGMB_ONOB_RK4
4741 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
4742 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
4743 type(upperDiag_type) ,
intent(in) :: classA
4744 type(transUnit_type) ,
intent(in) :: operationA
4749 PURE module subroutine trsv_ASS_CUDA_OTUA_CGMB_ONOB_RK3(matA, classA, operationA, matB)
4750#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4751 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_ASS_CUDA_OTUA_CGMB_ONOB_RK3
4754 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
4755 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
4756 type(upperDiag_type) ,
intent(in) :: classA
4757 type(transUnit_type) ,
intent(in) :: operationA
4762 PURE module subroutine trsv_ASS_CUDA_OTUA_CGMB_ONOB_RK2(matA, classA, operationA, matB)
4763#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4764 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_ASS_CUDA_OTUA_CGMB_ONOB_RK2
4767 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
4768 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
4769 type(upperDiag_type) ,
intent(in) :: classA
4770 type(transUnit_type) ,
intent(in) :: operationA
4775 PURE module subroutine trsv_ASS_CUDA_OTUA_CGMB_ONOB_RK1(matA, classA, operationA, matB)
4776#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4777 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_ASS_CUDA_OTUA_CGMB_ONOB_RK1
4780 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
4781 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
4782 type(upperDiag_type) ,
intent(in) :: classA
4783 type(transUnit_type) ,
intent(in) :: operationA
4800 PURE module subroutine trsv_ASS_CLUA_INVA_CGMB_ONOB_CK5(matA, classA, operationA, matB)
4801#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4802 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_ASS_CLUA_INVA_CGMB_ONOB_CK5
4805 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
4806 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
4807 type(lowerUnit_type) ,
intent(in) :: classA
4808 type(inversion_type) ,
intent(in) :: operationA
4813 PURE module subroutine trsv_ASS_CLUA_INVA_CGMB_ONOB_CK4(matA, classA, operationA, matB)
4814#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4815 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_ASS_CLUA_INVA_CGMB_ONOB_CK4
4818 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
4819 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
4820 type(lowerUnit_type) ,
intent(in) :: classA
4821 type(inversion_type) ,
intent(in) :: operationA
4826 PURE module subroutine trsv_ASS_CLUA_INVA_CGMB_ONOB_CK3(matA, classA, operationA, matB)
4827#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4828 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_ASS_CLUA_INVA_CGMB_ONOB_CK3
4831 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
4832 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
4833 type(lowerUnit_type) ,
intent(in) :: classA
4834 type(inversion_type) ,
intent(in) :: operationA
4839 PURE module subroutine trsv_ASS_CLUA_INVA_CGMB_ONOB_CK2(matA, classA, operationA, matB)
4840#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4841 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_ASS_CLUA_INVA_CGMB_ONOB_CK2
4844 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
4845 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
4846 type(lowerUnit_type) ,
intent(in) :: classA
4847 type(inversion_type) ,
intent(in) :: operationA
4852 PURE module subroutine trsv_ASS_CLUA_INVA_CGMB_ONOB_CK1(matA, classA, operationA, matB)
4853#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4854 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_ASS_CLUA_INVA_CGMB_ONOB_CK1
4857 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
4858 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
4859 type(lowerUnit_type) ,
intent(in) :: classA
4860 type(inversion_type) ,
intent(in) :: operationA
4867 PURE module subroutine trsv_ASS_CLUA_INVA_CGMB_ONOB_RK5(matA, classA, operationA, matB)
4868#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4869 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_ASS_CLUA_INVA_CGMB_ONOB_RK5
4872 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
4873 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
4874 type(lowerUnit_type) ,
intent(in) :: classA
4875 type(inversion_type) ,
intent(in) :: operationA
4880 PURE module subroutine trsv_ASS_CLUA_INVA_CGMB_ONOB_RK4(matA, classA, operationA, matB)
4881#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4882 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_ASS_CLUA_INVA_CGMB_ONOB_RK4
4885 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
4886 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
4887 type(lowerUnit_type) ,
intent(in) :: classA
4888 type(inversion_type) ,
intent(in) :: operationA
4893 PURE module subroutine trsv_ASS_CLUA_INVA_CGMB_ONOB_RK3(matA, classA, operationA, matB)
4894#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4895 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_ASS_CLUA_INVA_CGMB_ONOB_RK3
4898 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
4899 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
4900 type(lowerUnit_type) ,
intent(in) :: classA
4901 type(inversion_type) ,
intent(in) :: operationA
4906 PURE module subroutine trsv_ASS_CLUA_INVA_CGMB_ONOB_RK2(matA, classA, operationA, matB)
4907#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4908 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_ASS_CLUA_INVA_CGMB_ONOB_RK2
4911 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
4912 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
4913 type(lowerUnit_type) ,
intent(in) :: classA
4914 type(inversion_type) ,
intent(in) :: operationA
4919 PURE module subroutine trsv_ASS_CLUA_INVA_CGMB_ONOB_RK1(matA, classA, operationA, matB)
4920#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4921 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_ASS_CLUA_INVA_CGMB_ONOB_RK1
4924 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
4925 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
4926 type(lowerUnit_type) ,
intent(in) :: classA
4927 type(inversion_type) ,
intent(in) :: operationA
4940 PURE module subroutine trsv_ASS_CLUA_OTOA_CGMB_ONOB_CK5(matA, classA, operationA, matB)
4941#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4942 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_ASS_CLUA_OTOA_CGMB_ONOB_CK5
4945 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
4946 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
4947 type(lowerUnit_type) ,
intent(in) :: classA
4948 type(transOrth_type) ,
intent(in) :: operationA
4953 PURE module subroutine trsv_ASS_CLUA_OTOA_CGMB_ONOB_CK4(matA, classA, operationA, matB)
4954#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4955 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_ASS_CLUA_OTOA_CGMB_ONOB_CK4
4958 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
4959 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
4960 type(lowerUnit_type) ,
intent(in) :: classA
4961 type(transOrth_type) ,
intent(in) :: operationA
4966 PURE module subroutine trsv_ASS_CLUA_OTOA_CGMB_ONOB_CK3(matA, classA, operationA, matB)
4967#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4968 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_ASS_CLUA_OTOA_CGMB_ONOB_CK3
4971 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
4972 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
4973 type(lowerUnit_type) ,
intent(in) :: classA
4974 type(transOrth_type) ,
intent(in) :: operationA
4979 PURE module subroutine trsv_ASS_CLUA_OTOA_CGMB_ONOB_CK2(matA, classA, operationA, matB)
4980#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4981 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_ASS_CLUA_OTOA_CGMB_ONOB_CK2
4984 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
4985 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
4986 type(lowerUnit_type) ,
intent(in) :: classA
4987 type(transOrth_type) ,
intent(in) :: operationA
4992 PURE module subroutine trsv_ASS_CLUA_OTOA_CGMB_ONOB_CK1(matA, classA, operationA, matB)
4993#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4994 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_ASS_CLUA_OTOA_CGMB_ONOB_CK1
4997 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
4998 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
4999 type(lowerUnit_type) ,
intent(in) :: classA
5000 type(transOrth_type) ,
intent(in) :: operationA
5007 PURE module subroutine trsv_ASS_CLUA_OTOA_CGMB_ONOB_RK5(matA, classA, operationA, matB)
5008#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5009 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_ASS_CLUA_OTOA_CGMB_ONOB_RK5
5012 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
5013 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
5014 type(lowerUnit_type) ,
intent(in) :: classA
5015 type(transOrth_type) ,
intent(in) :: operationA
5020 PURE module subroutine trsv_ASS_CLUA_OTOA_CGMB_ONOB_RK4(matA, classA, operationA, matB)
5021#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5022 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_ASS_CLUA_OTOA_CGMB_ONOB_RK4
5025 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
5026 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
5027 type(lowerUnit_type) ,
intent(in) :: classA
5028 type(transOrth_type) ,
intent(in) :: operationA
5033 PURE module subroutine trsv_ASS_CLUA_OTOA_CGMB_ONOB_RK3(matA, classA, operationA, matB)
5034#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5035 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_ASS_CLUA_OTOA_CGMB_ONOB_RK3
5038 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
5039 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
5040 type(lowerUnit_type) ,
intent(in) :: classA
5041 type(transOrth_type) ,
intent(in) :: operationA
5046 PURE module subroutine trsv_ASS_CLUA_OTOA_CGMB_ONOB_RK2(matA, classA, operationA, matB)
5047#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5048 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_ASS_CLUA_OTOA_CGMB_ONOB_RK2
5051 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
5052 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
5053 type(lowerUnit_type) ,
intent(in) :: classA
5054 type(transOrth_type) ,
intent(in) :: operationA
5059 PURE module subroutine trsv_ASS_CLUA_OTOA_CGMB_ONOB_RK1(matA, classA, operationA, matB)
5060#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5061 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_ASS_CLUA_OTOA_CGMB_ONOB_RK1
5064 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
5065 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
5066 type(lowerUnit_type) ,
intent(in) :: classA
5067 type(transOrth_type) ,
intent(in) :: operationA
5080 PURE module subroutine trsv_ASS_CLUA_OTUA_CGMB_ONOB_CK5(matA, classA, operationA, matB)
5081#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5082 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_ASS_CLUA_OTUA_CGMB_ONOB_CK5
5085 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
5086 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
5087 type(lowerUnit_type) ,
intent(in) :: classA
5088 type(transUnit_type) ,
intent(in) :: operationA
5093 PURE module subroutine trsv_ASS_CLUA_OTUA_CGMB_ONOB_CK4(matA, classA, operationA, matB)
5094#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5095 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_ASS_CLUA_OTUA_CGMB_ONOB_CK4
5098 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
5099 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
5100 type(lowerUnit_type) ,
intent(in) :: classA
5101 type(transUnit_type) ,
intent(in) :: operationA
5106 PURE module subroutine trsv_ASS_CLUA_OTUA_CGMB_ONOB_CK3(matA, classA, operationA, matB)
5107#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5108 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_ASS_CLUA_OTUA_CGMB_ONOB_CK3
5111 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
5112 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
5113 type(lowerUnit_type) ,
intent(in) :: classA
5114 type(transUnit_type) ,
intent(in) :: operationA
5119 PURE module subroutine trsv_ASS_CLUA_OTUA_CGMB_ONOB_CK2(matA, classA, operationA, matB)
5120#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5121 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_ASS_CLUA_OTUA_CGMB_ONOB_CK2
5124 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
5125 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
5126 type(lowerUnit_type) ,
intent(in) :: classA
5127 type(transUnit_type) ,
intent(in) :: operationA
5132 PURE module subroutine trsv_ASS_CLUA_OTUA_CGMB_ONOB_CK1(matA, classA, operationA, matB)
5133#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5134 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_ASS_CLUA_OTUA_CGMB_ONOB_CK1
5137 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
5138 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
5139 type(lowerUnit_type) ,
intent(in) :: classA
5140 type(transUnit_type) ,
intent(in) :: operationA
5147 PURE module subroutine trsv_ASS_CLUA_OTUA_CGMB_ONOB_RK5(matA, classA, operationA, matB)
5148#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5149 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_ASS_CLUA_OTUA_CGMB_ONOB_RK5
5152 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
5153 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
5154 type(lowerUnit_type) ,
intent(in) :: classA
5155 type(transUnit_type) ,
intent(in) :: operationA
5160 PURE module subroutine trsv_ASS_CLUA_OTUA_CGMB_ONOB_RK4(matA, classA, operationA, matB)
5161#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5162 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_ASS_CLUA_OTUA_CGMB_ONOB_RK4
5165 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
5166 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
5167 type(lowerUnit_type) ,
intent(in) :: classA
5168 type(transUnit_type) ,
intent(in) :: operationA
5173 PURE module subroutine trsv_ASS_CLUA_OTUA_CGMB_ONOB_RK3(matA, classA, operationA, matB)
5174#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5175 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_ASS_CLUA_OTUA_CGMB_ONOB_RK3
5178 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
5179 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
5180 type(lowerUnit_type) ,
intent(in) :: classA
5181 type(transUnit_type) ,
intent(in) :: operationA
5186 PURE module subroutine trsv_ASS_CLUA_OTUA_CGMB_ONOB_RK2(matA, classA, operationA, matB)
5187#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5188 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_ASS_CLUA_OTUA_CGMB_ONOB_RK2
5191 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
5192 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
5193 type(lowerUnit_type) ,
intent(in) :: classA
5194 type(transUnit_type) ,
intent(in) :: operationA
5199 PURE module subroutine trsv_ASS_CLUA_OTUA_CGMB_ONOB_RK1(matA, classA, operationA, matB)
5200#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5201 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_ASS_CLUA_OTUA_CGMB_ONOB_RK1
5204 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
5205 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
5206 type(lowerUnit_type) ,
intent(in) :: classA
5207 type(transUnit_type) ,
intent(in) :: operationA
5224 PURE module subroutine trsv_ASS_CUUA_INVA_CGMB_ONOB_CK5(matA, classA, operationA, matB)
5225#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5226 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_ASS_CUUA_INVA_CGMB_ONOB_CK5
5229 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
5230 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
5231 type(upperUnit_type) ,
intent(in) :: classA
5232 type(inversion_type) ,
intent(in) :: operationA
5237 PURE module subroutine trsv_ASS_CUUA_INVA_CGMB_ONOB_CK4(matA, classA, operationA, matB)
5238#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5239 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_ASS_CUUA_INVA_CGMB_ONOB_CK4
5242 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
5243 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
5244 type(upperUnit_type) ,
intent(in) :: classA
5245 type(inversion_type) ,
intent(in) :: operationA
5250 PURE module subroutine trsv_ASS_CUUA_INVA_CGMB_ONOB_CK3(matA, classA, operationA, matB)
5251#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5252 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_ASS_CUUA_INVA_CGMB_ONOB_CK3
5255 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
5256 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
5257 type(upperUnit_type) ,
intent(in) :: classA
5258 type(inversion_type) ,
intent(in) :: operationA
5263 PURE module subroutine trsv_ASS_CUUA_INVA_CGMB_ONOB_CK2(matA, classA, operationA, matB)
5264#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5265 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_ASS_CUUA_INVA_CGMB_ONOB_CK2
5268 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
5269 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
5270 type(upperUnit_type) ,
intent(in) :: classA
5271 type(inversion_type) ,
intent(in) :: operationA
5276 PURE module subroutine trsv_ASS_CUUA_INVA_CGMB_ONOB_CK1(matA, classA, operationA, matB)
5277#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5278 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_ASS_CUUA_INVA_CGMB_ONOB_CK1
5281 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
5282 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
5283 type(upperUnit_type) ,
intent(in) :: classA
5284 type(inversion_type) ,
intent(in) :: operationA
5291 PURE module subroutine trsv_ASS_CUUA_INVA_CGMB_ONOB_RK5(matA, classA, operationA, matB)
5292#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5293 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_ASS_CUUA_INVA_CGMB_ONOB_RK5
5296 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
5297 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
5298 type(upperUnit_type) ,
intent(in) :: classA
5299 type(inversion_type) ,
intent(in) :: operationA
5304 PURE module subroutine trsv_ASS_CUUA_INVA_CGMB_ONOB_RK4(matA, classA, operationA, matB)
5305#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5306 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_ASS_CUUA_INVA_CGMB_ONOB_RK4
5309 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
5310 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
5311 type(upperUnit_type) ,
intent(in) :: classA
5312 type(inversion_type) ,
intent(in) :: operationA
5317 PURE module subroutine trsv_ASS_CUUA_INVA_CGMB_ONOB_RK3(matA, classA, operationA, matB)
5318#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5319 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_ASS_CUUA_INVA_CGMB_ONOB_RK3
5322 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
5323 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
5324 type(upperUnit_type) ,
intent(in) :: classA
5325 type(inversion_type) ,
intent(in) :: operationA
5330 PURE module subroutine trsv_ASS_CUUA_INVA_CGMB_ONOB_RK2(matA, classA, operationA, matB)
5331#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5332 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_ASS_CUUA_INVA_CGMB_ONOB_RK2
5335 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
5336 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
5337 type(upperUnit_type) ,
intent(in) :: classA
5338 type(inversion_type) ,
intent(in) :: operationA
5343 PURE module subroutine trsv_ASS_CUUA_INVA_CGMB_ONOB_RK1(matA, classA, operationA, matB)
5344#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5345 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_ASS_CUUA_INVA_CGMB_ONOB_RK1
5348 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
5349 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
5350 type(upperUnit_type) ,
intent(in) :: classA
5351 type(inversion_type) ,
intent(in) :: operationA
5364 PURE module subroutine trsv_ASS_CUUA_OTOA_CGMB_ONOB_CK5(matA, classA, operationA, matB)
5365#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5366 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_ASS_CUUA_OTOA_CGMB_ONOB_CK5
5369 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
5370 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
5371 type(upperUnit_type) ,
intent(in) :: classA
5372 type(transOrth_type) ,
intent(in) :: operationA
5377 PURE module subroutine trsv_ASS_CUUA_OTOA_CGMB_ONOB_CK4(matA, classA, operationA, matB)
5378#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5379 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_ASS_CUUA_OTOA_CGMB_ONOB_CK4
5382 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
5383 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
5384 type(upperUnit_type) ,
intent(in) :: classA
5385 type(transOrth_type) ,
intent(in) :: operationA
5390 PURE module subroutine trsv_ASS_CUUA_OTOA_CGMB_ONOB_CK3(matA, classA, operationA, matB)
5391#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5392 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_ASS_CUUA_OTOA_CGMB_ONOB_CK3
5395 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
5396 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
5397 type(upperUnit_type) ,
intent(in) :: classA
5398 type(transOrth_type) ,
intent(in) :: operationA
5403 PURE module subroutine trsv_ASS_CUUA_OTOA_CGMB_ONOB_CK2(matA, classA, operationA, matB)
5404#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5405 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_ASS_CUUA_OTOA_CGMB_ONOB_CK2
5408 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
5409 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
5410 type(upperUnit_type) ,
intent(in) :: classA
5411 type(transOrth_type) ,
intent(in) :: operationA
5416 PURE module subroutine trsv_ASS_CUUA_OTOA_CGMB_ONOB_CK1(matA, classA, operationA, matB)
5417#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5418 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_ASS_CUUA_OTOA_CGMB_ONOB_CK1
5421 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
5422 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
5423 type(upperUnit_type) ,
intent(in) :: classA
5424 type(transOrth_type) ,
intent(in) :: operationA
5431 PURE module subroutine trsv_ASS_CUUA_OTOA_CGMB_ONOB_RK5(matA, classA, operationA, matB)
5432#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5433 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_ASS_CUUA_OTOA_CGMB_ONOB_RK5
5436 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
5437 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
5438 type(upperUnit_type) ,
intent(in) :: classA
5439 type(transOrth_type) ,
intent(in) :: operationA
5444 PURE module subroutine trsv_ASS_CUUA_OTOA_CGMB_ONOB_RK4(matA, classA, operationA, matB)
5445#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5446 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_ASS_CUUA_OTOA_CGMB_ONOB_RK4
5449 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
5450 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
5451 type(upperUnit_type) ,
intent(in) :: classA
5452 type(transOrth_type) ,
intent(in) :: operationA
5457 PURE module subroutine trsv_ASS_CUUA_OTOA_CGMB_ONOB_RK3(matA, classA, operationA, matB)
5458#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5459 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_ASS_CUUA_OTOA_CGMB_ONOB_RK3
5462 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
5463 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
5464 type(upperUnit_type) ,
intent(in) :: classA
5465 type(transOrth_type) ,
intent(in) :: operationA
5470 PURE module subroutine trsv_ASS_CUUA_OTOA_CGMB_ONOB_RK2(matA, classA, operationA, matB)
5471#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5472 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_ASS_CUUA_OTOA_CGMB_ONOB_RK2
5475 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
5476 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
5477 type(upperUnit_type) ,
intent(in) :: classA
5478 type(transOrth_type) ,
intent(in) :: operationA
5483 PURE module subroutine trsv_ASS_CUUA_OTOA_CGMB_ONOB_RK1(matA, classA, operationA, matB)
5484#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5485 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_ASS_CUUA_OTOA_CGMB_ONOB_RK1
5488 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
5489 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
5490 type(upperUnit_type) ,
intent(in) :: classA
5491 type(transOrth_type) ,
intent(in) :: operationA
5504 PURE module subroutine trsv_ASS_CUUA_OTUA_CGMB_ONOB_CK5(matA, classA, operationA, matB)
5505#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5506 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_ASS_CUUA_OTUA_CGMB_ONOB_CK5
5509 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
5510 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
5511 type(upperUnit_type) ,
intent(in) :: classA
5512 type(transUnit_type) ,
intent(in) :: operationA
5517 PURE module subroutine trsv_ASS_CUUA_OTUA_CGMB_ONOB_CK4(matA, classA, operationA, matB)
5518#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5519 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_ASS_CUUA_OTUA_CGMB_ONOB_CK4
5522 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
5523 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
5524 type(upperUnit_type) ,
intent(in) :: classA
5525 type(transUnit_type) ,
intent(in) :: operationA
5530 PURE module subroutine trsv_ASS_CUUA_OTUA_CGMB_ONOB_CK3(matA, classA, operationA, matB)
5531#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5532 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_ASS_CUUA_OTUA_CGMB_ONOB_CK3
5535 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
5536 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
5537 type(upperUnit_type) ,
intent(in) :: classA
5538 type(transUnit_type) ,
intent(in) :: operationA
5543 PURE module subroutine trsv_ASS_CUUA_OTUA_CGMB_ONOB_CK2(matA, classA, operationA, matB)
5544#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5545 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_ASS_CUUA_OTUA_CGMB_ONOB_CK2
5548 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
5549 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
5550 type(upperUnit_type) ,
intent(in) :: classA
5551 type(transUnit_type) ,
intent(in) :: operationA
5556 PURE module subroutine trsv_ASS_CUUA_OTUA_CGMB_ONOB_CK1(matA, classA, operationA, matB)
5557#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5558 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_ASS_CUUA_OTUA_CGMB_ONOB_CK1
5561 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
5562 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
5563 type(upperUnit_type) ,
intent(in) :: classA
5564 type(transUnit_type) ,
intent(in) :: operationA
5571 PURE module subroutine trsv_ASS_CUUA_OTUA_CGMB_ONOB_RK5(matA, classA, operationA, matB)
5572#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5573 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_ASS_CUUA_OTUA_CGMB_ONOB_RK5
5576 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
5577 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
5578 type(upperUnit_type) ,
intent(in) :: classA
5579 type(transUnit_type) ,
intent(in) :: operationA
5584 PURE module subroutine trsv_ASS_CUUA_OTUA_CGMB_ONOB_RK4(matA, classA, operationA, matB)
5585#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5586 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_ASS_CUUA_OTUA_CGMB_ONOB_RK4
5589 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
5590 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
5591 type(upperUnit_type) ,
intent(in) :: classA
5592 type(transUnit_type) ,
intent(in) :: operationA
5597 PURE module subroutine trsv_ASS_CUUA_OTUA_CGMB_ONOB_RK3(matA, classA, operationA, matB)
5598#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5599 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_ASS_CUUA_OTUA_CGMB_ONOB_RK3
5602 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
5603 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
5604 type(upperUnit_type) ,
intent(in) :: classA
5605 type(transUnit_type) ,
intent(in) :: operationA
5610 PURE module subroutine trsv_ASS_CUUA_OTUA_CGMB_ONOB_RK2(matA, classA, operationA, matB)
5611#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5612 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_ASS_CUUA_OTUA_CGMB_ONOB_RK2
5615 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
5616 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
5617 type(upperUnit_type) ,
intent(in) :: classA
5618 type(transUnit_type) ,
intent(in) :: operationA
5623 PURE module subroutine trsv_ASS_CUUA_OTUA_CGMB_ONOB_RK1(matA, classA, operationA, matB)
5624#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5625 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_ASS_CUUA_OTUA_CGMB_ONOB_RK1
5628 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
5629 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
5630 type(upperUnit_type) ,
intent(in) :: classA
5631 type(transUnit_type) ,
intent(in) :: operationA
5652 PURE module subroutine trsv_EXP_CLDA_INVA_CGMB_ONOB_CK5(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
5653#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5654 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_EXP_CLDA_INVA_CGMB_ONOB_CK5
5657 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
5658 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
5659 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
5660 type(lowerDiag_type) ,
intent(in) :: classA
5661 type(inversion_type) ,
intent(in) :: operationA
5666 PURE module subroutine trsv_EXP_CLDA_INVA_CGMB_ONOB_CK4(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
5667#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5668 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_EXP_CLDA_INVA_CGMB_ONOB_CK4
5671 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
5672 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
5673 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
5674 type(lowerDiag_type) ,
intent(in) :: classA
5675 type(inversion_type) ,
intent(in) :: operationA
5680 PURE module subroutine trsv_EXP_CLDA_INVA_CGMB_ONOB_CK3(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
5681#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5682 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_EXP_CLDA_INVA_CGMB_ONOB_CK3
5685 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
5686 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
5687 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
5688 type(lowerDiag_type) ,
intent(in) :: classA
5689 type(inversion_type) ,
intent(in) :: operationA
5694 PURE module subroutine trsv_EXP_CLDA_INVA_CGMB_ONOB_CK2(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
5695#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5696 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_EXP_CLDA_INVA_CGMB_ONOB_CK2
5699 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
5700 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
5701 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
5702 type(lowerDiag_type) ,
intent(in) :: classA
5703 type(inversion_type) ,
intent(in) :: operationA
5708 PURE module subroutine trsv_EXP_CLDA_INVA_CGMB_ONOB_CK1(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
5709#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5710 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_EXP_CLDA_INVA_CGMB_ONOB_CK1
5713 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
5714 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
5715 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
5716 type(lowerDiag_type) ,
intent(in) :: classA
5717 type(inversion_type) ,
intent(in) :: operationA
5724 PURE module subroutine trsv_EXP_CLDA_INVA_CGMB_ONOB_RK5(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
5725#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5726 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_EXP_CLDA_INVA_CGMB_ONOB_RK5
5729 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
5730 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
5731 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
5732 type(lowerDiag_type) ,
intent(in) :: classA
5733 type(inversion_type) ,
intent(in) :: operationA
5738 PURE module subroutine trsv_EXP_CLDA_INVA_CGMB_ONOB_RK4(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
5739#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5740 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_EXP_CLDA_INVA_CGMB_ONOB_RK4
5743 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
5744 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
5745 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
5746 type(lowerDiag_type) ,
intent(in) :: classA
5747 type(inversion_type) ,
intent(in) :: operationA
5752 PURE module subroutine trsv_EXP_CLDA_INVA_CGMB_ONOB_RK3(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
5753#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5754 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_EXP_CLDA_INVA_CGMB_ONOB_RK3
5757 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
5758 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
5759 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
5760 type(lowerDiag_type) ,
intent(in) :: classA
5761 type(inversion_type) ,
intent(in) :: operationA
5766 PURE module subroutine trsv_EXP_CLDA_INVA_CGMB_ONOB_RK2(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
5767#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5768 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_EXP_CLDA_INVA_CGMB_ONOB_RK2
5771 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
5772 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
5773 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
5774 type(lowerDiag_type) ,
intent(in) :: classA
5775 type(inversion_type) ,
intent(in) :: operationA
5780 PURE module subroutine trsv_EXP_CLDA_INVA_CGMB_ONOB_RK1(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
5781#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5782 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_EXP_CLDA_INVA_CGMB_ONOB_RK1
5785 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
5786 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
5787 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
5788 type(lowerDiag_type) ,
intent(in) :: classA
5789 type(inversion_type) ,
intent(in) :: operationA
5802 PURE module subroutine trsv_EXP_CLDA_OTOA_CGMB_ONOB_CK5(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
5803#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5804 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_EXP_CLDA_OTOA_CGMB_ONOB_CK5
5807 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
5808 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
5809 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
5810 type(lowerDiag_type) ,
intent(in) :: classA
5811 type(transOrth_type) ,
intent(in) :: operationA
5816 PURE module subroutine trsv_EXP_CLDA_OTOA_CGMB_ONOB_CK4(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
5817#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5818 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_EXP_CLDA_OTOA_CGMB_ONOB_CK4
5821 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
5822 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
5823 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
5824 type(lowerDiag_type) ,
intent(in) :: classA
5825 type(transOrth_type) ,
intent(in) :: operationA
5830 PURE module subroutine trsv_EXP_CLDA_OTOA_CGMB_ONOB_CK3(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
5831#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5832 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_EXP_CLDA_OTOA_CGMB_ONOB_CK3
5835 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
5836 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
5837 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
5838 type(lowerDiag_type) ,
intent(in) :: classA
5839 type(transOrth_type) ,
intent(in) :: operationA
5844 PURE module subroutine trsv_EXP_CLDA_OTOA_CGMB_ONOB_CK2(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
5845#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5846 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_EXP_CLDA_OTOA_CGMB_ONOB_CK2
5849 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
5850 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
5851 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
5852 type(lowerDiag_type) ,
intent(in) :: classA
5853 type(transOrth_type) ,
intent(in) :: operationA
5858 PURE module subroutine trsv_EXP_CLDA_OTOA_CGMB_ONOB_CK1(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
5859#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5860 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_EXP_CLDA_OTOA_CGMB_ONOB_CK1
5863 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
5864 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
5865 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
5866 type(lowerDiag_type) ,
intent(in) :: classA
5867 type(transOrth_type) ,
intent(in) :: operationA
5874 PURE module subroutine trsv_EXP_CLDA_OTOA_CGMB_ONOB_RK5(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
5875#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5876 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_EXP_CLDA_OTOA_CGMB_ONOB_RK5
5879 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
5880 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
5881 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
5882 type(lowerDiag_type) ,
intent(in) :: classA
5883 type(transOrth_type) ,
intent(in) :: operationA
5888 PURE module subroutine trsv_EXP_CLDA_OTOA_CGMB_ONOB_RK4(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
5889#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5890 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_EXP_CLDA_OTOA_CGMB_ONOB_RK4
5893 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
5894 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
5895 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
5896 type(lowerDiag_type) ,
intent(in) :: classA
5897 type(transOrth_type) ,
intent(in) :: operationA
5902 PURE module subroutine trsv_EXP_CLDA_OTOA_CGMB_ONOB_RK3(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
5903#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5904 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_EXP_CLDA_OTOA_CGMB_ONOB_RK3
5907 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
5908 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
5909 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
5910 type(lowerDiag_type) ,
intent(in) :: classA
5911 type(transOrth_type) ,
intent(in) :: operationA
5916 PURE module subroutine trsv_EXP_CLDA_OTOA_CGMB_ONOB_RK2(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
5917#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5918 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_EXP_CLDA_OTOA_CGMB_ONOB_RK2
5921 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
5922 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
5923 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
5924 type(lowerDiag_type) ,
intent(in) :: classA
5925 type(transOrth_type) ,
intent(in) :: operationA
5930 PURE module subroutine trsv_EXP_CLDA_OTOA_CGMB_ONOB_RK1(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
5931#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5932 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_EXP_CLDA_OTOA_CGMB_ONOB_RK1
5935 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
5936 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
5937 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
5938 type(lowerDiag_type) ,
intent(in) :: classA
5939 type(transOrth_type) ,
intent(in) :: operationA
5952 PURE module subroutine trsv_EXP_CLDA_OTUA_CGMB_ONOB_CK5(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
5953#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5954 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_EXP_CLDA_OTUA_CGMB_ONOB_CK5
5957 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
5958 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
5959 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
5960 type(lowerDiag_type) ,
intent(in) :: classA
5961 type(transUnit_type) ,
intent(in) :: operationA
5966 PURE module subroutine trsv_EXP_CLDA_OTUA_CGMB_ONOB_CK4(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
5967#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5968 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_EXP_CLDA_OTUA_CGMB_ONOB_CK4
5971 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
5972 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
5973 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
5974 type(lowerDiag_type) ,
intent(in) :: classA
5975 type(transUnit_type) ,
intent(in) :: operationA
5980 PURE module subroutine trsv_EXP_CLDA_OTUA_CGMB_ONOB_CK3(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
5981#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5982 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_EXP_CLDA_OTUA_CGMB_ONOB_CK3
5985 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
5986 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
5987 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
5988 type(lowerDiag_type) ,
intent(in) :: classA
5989 type(transUnit_type) ,
intent(in) :: operationA
5994 PURE module subroutine trsv_EXP_CLDA_OTUA_CGMB_ONOB_CK2(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
5995#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5996 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_EXP_CLDA_OTUA_CGMB_ONOB_CK2
5999 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
6000 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
6001 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
6002 type(lowerDiag_type) ,
intent(in) :: classA
6003 type(transUnit_type) ,
intent(in) :: operationA
6008 PURE module subroutine trsv_EXP_CLDA_OTUA_CGMB_ONOB_CK1(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
6009#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6010 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_EXP_CLDA_OTUA_CGMB_ONOB_CK1
6013 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
6014 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
6015 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
6016 type(lowerDiag_type) ,
intent(in) :: classA
6017 type(transUnit_type) ,
intent(in) :: operationA
6024 PURE module subroutine trsv_EXP_CLDA_OTUA_CGMB_ONOB_RK5(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
6025#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6026 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_EXP_CLDA_OTUA_CGMB_ONOB_RK5
6029 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
6030 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
6031 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
6032 type(lowerDiag_type) ,
intent(in) :: classA
6033 type(transUnit_type) ,
intent(in) :: operationA
6038 PURE module subroutine trsv_EXP_CLDA_OTUA_CGMB_ONOB_RK4(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
6039#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6040 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_EXP_CLDA_OTUA_CGMB_ONOB_RK4
6043 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
6044 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
6045 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
6046 type(lowerDiag_type) ,
intent(in) :: classA
6047 type(transUnit_type) ,
intent(in) :: operationA
6052 PURE module subroutine trsv_EXP_CLDA_OTUA_CGMB_ONOB_RK3(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
6053#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6054 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_EXP_CLDA_OTUA_CGMB_ONOB_RK3
6057 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
6058 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
6059 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
6060 type(lowerDiag_type) ,
intent(in) :: classA
6061 type(transUnit_type) ,
intent(in) :: operationA
6066 PURE module subroutine trsv_EXP_CLDA_OTUA_CGMB_ONOB_RK2(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
6067#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6068 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_EXP_CLDA_OTUA_CGMB_ONOB_RK2
6071 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
6072 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
6073 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
6074 type(lowerDiag_type) ,
intent(in) :: classA
6075 type(transUnit_type) ,
intent(in) :: operationA
6080 PURE module subroutine trsv_EXP_CLDA_OTUA_CGMB_ONOB_RK1(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
6081#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6082 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_EXP_CLDA_OTUA_CGMB_ONOB_RK1
6085 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
6086 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
6087 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
6088 type(lowerDiag_type) ,
intent(in) :: classA
6089 type(transUnit_type) ,
intent(in) :: operationA
6106 PURE module subroutine trsv_EXP_CUDA_INVA_CGMB_ONOB_CK5(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
6107#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6108 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_EXP_CUDA_INVA_CGMB_ONOB_CK5
6111 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
6112 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
6113 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
6114 type(upperDiag_type) ,
intent(in) :: classA
6115 type(inversion_type) ,
intent(in) :: operationA
6120 PURE module subroutine trsv_EXP_CUDA_INVA_CGMB_ONOB_CK4(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
6121#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6122 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_EXP_CUDA_INVA_CGMB_ONOB_CK4
6125 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
6126 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
6127 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
6128 type(upperDiag_type) ,
intent(in) :: classA
6129 type(inversion_type) ,
intent(in) :: operationA
6134 PURE module subroutine trsv_EXP_CUDA_INVA_CGMB_ONOB_CK3(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
6135#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6136 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_EXP_CUDA_INVA_CGMB_ONOB_CK3
6139 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
6140 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
6141 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
6142 type(upperDiag_type) ,
intent(in) :: classA
6143 type(inversion_type) ,
intent(in) :: operationA
6148 PURE module subroutine trsv_EXP_CUDA_INVA_CGMB_ONOB_CK2(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
6149#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6150 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_EXP_CUDA_INVA_CGMB_ONOB_CK2
6153 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
6154 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
6155 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
6156 type(upperDiag_type) ,
intent(in) :: classA
6157 type(inversion_type) ,
intent(in) :: operationA
6162 PURE module subroutine trsv_EXP_CUDA_INVA_CGMB_ONOB_CK1(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
6163#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6164 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_EXP_CUDA_INVA_CGMB_ONOB_CK1
6167 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
6168 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
6169 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
6170 type(upperDiag_type) ,
intent(in) :: classA
6171 type(inversion_type) ,
intent(in) :: operationA
6178 PURE module subroutine trsv_EXP_CUDA_INVA_CGMB_ONOB_RK5(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
6179#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6180 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_EXP_CUDA_INVA_CGMB_ONOB_RK5
6183 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
6184 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
6185 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
6186 type(upperDiag_type) ,
intent(in) :: classA
6187 type(inversion_type) ,
intent(in) :: operationA
6192 PURE module subroutine trsv_EXP_CUDA_INVA_CGMB_ONOB_RK4(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
6193#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6194 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_EXP_CUDA_INVA_CGMB_ONOB_RK4
6197 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
6198 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
6199 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
6200 type(upperDiag_type) ,
intent(in) :: classA
6201 type(inversion_type) ,
intent(in) :: operationA
6206 PURE module subroutine trsv_EXP_CUDA_INVA_CGMB_ONOB_RK3(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
6207#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6208 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_EXP_CUDA_INVA_CGMB_ONOB_RK3
6211 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
6212 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
6213 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
6214 type(upperDiag_type) ,
intent(in) :: classA
6215 type(inversion_type) ,
intent(in) :: operationA
6220 PURE module subroutine trsv_EXP_CUDA_INVA_CGMB_ONOB_RK2(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
6221#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6222 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_EXP_CUDA_INVA_CGMB_ONOB_RK2
6225 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
6226 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
6227 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
6228 type(upperDiag_type) ,
intent(in) :: classA
6229 type(inversion_type) ,
intent(in) :: operationA
6234 PURE module subroutine trsv_EXP_CUDA_INVA_CGMB_ONOB_RK1(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
6235#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6236 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_EXP_CUDA_INVA_CGMB_ONOB_RK1
6239 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
6240 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
6241 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
6242 type(upperDiag_type) ,
intent(in) :: classA
6243 type(inversion_type) ,
intent(in) :: operationA
6256 PURE module subroutine trsv_EXP_CUDA_OTOA_CGMB_ONOB_CK5(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
6257#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6258 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_EXP_CUDA_OTOA_CGMB_ONOB_CK5
6261 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
6262 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
6263 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
6264 type(upperDiag_type) ,
intent(in) :: classA
6265 type(transOrth_type) ,
intent(in) :: operationA
6270 PURE module subroutine trsv_EXP_CUDA_OTOA_CGMB_ONOB_CK4(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
6271#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6272 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_EXP_CUDA_OTOA_CGMB_ONOB_CK4
6275 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
6276 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
6277 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
6278 type(upperDiag_type) ,
intent(in) :: classA
6279 type(transOrth_type) ,
intent(in) :: operationA
6284 PURE module subroutine trsv_EXP_CUDA_OTOA_CGMB_ONOB_CK3(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
6285#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6286 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_EXP_CUDA_OTOA_CGMB_ONOB_CK3
6289 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
6290 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
6291 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
6292 type(upperDiag_type) ,
intent(in) :: classA
6293 type(transOrth_type) ,
intent(in) :: operationA
6298 PURE module subroutine trsv_EXP_CUDA_OTOA_CGMB_ONOB_CK2(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
6299#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6300 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_EXP_CUDA_OTOA_CGMB_ONOB_CK2
6303 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
6304 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
6305 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
6306 type(upperDiag_type) ,
intent(in) :: classA
6307 type(transOrth_type) ,
intent(in) :: operationA
6312 PURE module subroutine trsv_EXP_CUDA_OTOA_CGMB_ONOB_CK1(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
6313#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6314 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_EXP_CUDA_OTOA_CGMB_ONOB_CK1
6317 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
6318 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
6319 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
6320 type(upperDiag_type) ,
intent(in) :: classA
6321 type(transOrth_type) ,
intent(in) :: operationA
6328 PURE module subroutine trsv_EXP_CUDA_OTOA_CGMB_ONOB_RK5(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
6329#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6330 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_EXP_CUDA_OTOA_CGMB_ONOB_RK5
6333 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
6334 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
6335 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
6336 type(upperDiag_type) ,
intent(in) :: classA
6337 type(transOrth_type) ,
intent(in) :: operationA
6342 PURE module subroutine trsv_EXP_CUDA_OTOA_CGMB_ONOB_RK4(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
6343#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6344 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_EXP_CUDA_OTOA_CGMB_ONOB_RK4
6347 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
6348 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
6349 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
6350 type(upperDiag_type) ,
intent(in) :: classA
6351 type(transOrth_type) ,
intent(in) :: operationA
6356 PURE module subroutine trsv_EXP_CUDA_OTOA_CGMB_ONOB_RK3(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
6357#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6358 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_EXP_CUDA_OTOA_CGMB_ONOB_RK3
6361 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
6362 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
6363 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
6364 type(upperDiag_type) ,
intent(in) :: classA
6365 type(transOrth_type) ,
intent(in) :: operationA
6370 PURE module subroutine trsv_EXP_CUDA_OTOA_CGMB_ONOB_RK2(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
6371#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6372 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_EXP_CUDA_OTOA_CGMB_ONOB_RK2
6375 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
6376 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
6377 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
6378 type(upperDiag_type) ,
intent(in) :: classA
6379 type(transOrth_type) ,
intent(in) :: operationA
6384 PURE module subroutine trsv_EXP_CUDA_OTOA_CGMB_ONOB_RK1(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
6385#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6386 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_EXP_CUDA_OTOA_CGMB_ONOB_RK1
6389 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
6390 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
6391 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
6392 type(upperDiag_type) ,
intent(in) :: classA
6393 type(transOrth_type) ,
intent(in) :: operationA
6406 PURE module subroutine trsv_EXP_CUDA_OTUA_CGMB_ONOB_CK5(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
6407#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6408 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_EXP_CUDA_OTUA_CGMB_ONOB_CK5
6411 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
6412 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
6413 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
6414 type(upperDiag_type) ,
intent(in) :: classA
6415 type(transUnit_type) ,
intent(in) :: operationA
6420 PURE module subroutine trsv_EXP_CUDA_OTUA_CGMB_ONOB_CK4(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
6421#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6422 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_EXP_CUDA_OTUA_CGMB_ONOB_CK4
6425 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
6426 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
6427 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
6428 type(upperDiag_type) ,
intent(in) :: classA
6429 type(transUnit_type) ,
intent(in) :: operationA
6434 PURE module subroutine trsv_EXP_CUDA_OTUA_CGMB_ONOB_CK3(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
6435#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6436 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_EXP_CUDA_OTUA_CGMB_ONOB_CK3
6439 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
6440 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
6441 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
6442 type(upperDiag_type) ,
intent(in) :: classA
6443 type(transUnit_type) ,
intent(in) :: operationA
6448 PURE module subroutine trsv_EXP_CUDA_OTUA_CGMB_ONOB_CK2(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
6449#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6450 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_EXP_CUDA_OTUA_CGMB_ONOB_CK2
6453 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
6454 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
6455 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
6456 type(upperDiag_type) ,
intent(in) :: classA
6457 type(transUnit_type) ,
intent(in) :: operationA
6462 PURE module subroutine trsv_EXP_CUDA_OTUA_CGMB_ONOB_CK1(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
6463#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6464 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_EXP_CUDA_OTUA_CGMB_ONOB_CK1
6467 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
6468 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
6469 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
6470 type(upperDiag_type) ,
intent(in) :: classA
6471 type(transUnit_type) ,
intent(in) :: operationA
6478 PURE module subroutine trsv_EXP_CUDA_OTUA_CGMB_ONOB_RK5(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
6479#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6480 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_EXP_CUDA_OTUA_CGMB_ONOB_RK5
6483 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
6484 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
6485 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
6486 type(upperDiag_type) ,
intent(in) :: classA
6487 type(transUnit_type) ,
intent(in) :: operationA
6492 PURE module subroutine trsv_EXP_CUDA_OTUA_CGMB_ONOB_RK4(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
6493#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6494 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_EXP_CUDA_OTUA_CGMB_ONOB_RK4
6497 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
6498 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
6499 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
6500 type(upperDiag_type) ,
intent(in) :: classA
6501 type(transUnit_type) ,
intent(in) :: operationA
6506 PURE module subroutine trsv_EXP_CUDA_OTUA_CGMB_ONOB_RK3(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
6507#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6508 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_EXP_CUDA_OTUA_CGMB_ONOB_RK3
6511 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
6512 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
6513 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
6514 type(upperDiag_type) ,
intent(in) :: classA
6515 type(transUnit_type) ,
intent(in) :: operationA
6520 PURE module subroutine trsv_EXP_CUDA_OTUA_CGMB_ONOB_RK2(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
6521#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6522 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_EXP_CUDA_OTUA_CGMB_ONOB_RK2
6525 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
6526 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
6527 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
6528 type(upperDiag_type) ,
intent(in) :: classA
6529 type(transUnit_type) ,
intent(in) :: operationA
6534 PURE module subroutine trsv_EXP_CUDA_OTUA_CGMB_ONOB_RK1(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
6535#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6536 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_EXP_CUDA_OTUA_CGMB_ONOB_RK1
6539 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
6540 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
6541 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
6542 type(upperDiag_type) ,
intent(in) :: classA
6543 type(transUnit_type) ,
intent(in) :: operationA
6560 PURE module subroutine trsv_EXP_CLUA_INVA_CGMB_ONOB_CK5(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
6561#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6562 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_EXP_CLUA_INVA_CGMB_ONOB_CK5
6565 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
6566 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
6567 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
6568 type(lowerUnit_type) ,
intent(in) :: classA
6569 type(inversion_type) ,
intent(in) :: operationA
6574 PURE module subroutine trsv_EXP_CLUA_INVA_CGMB_ONOB_CK4(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
6575#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6576 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_EXP_CLUA_INVA_CGMB_ONOB_CK4
6579 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
6580 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
6581 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
6582 type(lowerUnit_type) ,
intent(in) :: classA
6583 type(inversion_type) ,
intent(in) :: operationA
6588 PURE module subroutine trsv_EXP_CLUA_INVA_CGMB_ONOB_CK3(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
6589#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6590 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_EXP_CLUA_INVA_CGMB_ONOB_CK3
6593 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
6594 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
6595 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
6596 type(lowerUnit_type) ,
intent(in) :: classA
6597 type(inversion_type) ,
intent(in) :: operationA
6602 PURE module subroutine trsv_EXP_CLUA_INVA_CGMB_ONOB_CK2(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
6603#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6604 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_EXP_CLUA_INVA_CGMB_ONOB_CK2
6607 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
6608 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
6609 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
6610 type(lowerUnit_type) ,
intent(in) :: classA
6611 type(inversion_type) ,
intent(in) :: operationA
6616 PURE module subroutine trsv_EXP_CLUA_INVA_CGMB_ONOB_CK1(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
6617#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6618 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_EXP_CLUA_INVA_CGMB_ONOB_CK1
6621 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
6622 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
6623 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
6624 type(lowerUnit_type) ,
intent(in) :: classA
6625 type(inversion_type) ,
intent(in) :: operationA
6632 PURE module subroutine trsv_EXP_CLUA_INVA_CGMB_ONOB_RK5(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
6633#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6634 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_EXP_CLUA_INVA_CGMB_ONOB_RK5
6637 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
6638 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
6639 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
6640 type(lowerUnit_type) ,
intent(in) :: classA
6641 type(inversion_type) ,
intent(in) :: operationA
6646 PURE module subroutine trsv_EXP_CLUA_INVA_CGMB_ONOB_RK4(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
6647#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6648 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_EXP_CLUA_INVA_CGMB_ONOB_RK4
6651 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
6652 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
6653 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
6654 type(lowerUnit_type) ,
intent(in) :: classA
6655 type(inversion_type) ,
intent(in) :: operationA
6660 PURE module subroutine trsv_EXP_CLUA_INVA_CGMB_ONOB_RK3(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
6661#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6662 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_EXP_CLUA_INVA_CGMB_ONOB_RK3
6665 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
6666 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
6667 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
6668 type(lowerUnit_type) ,
intent(in) :: classA
6669 type(inversion_type) ,
intent(in) :: operationA
6674 PURE module subroutine trsv_EXP_CLUA_INVA_CGMB_ONOB_RK2(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
6675#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6676 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_EXP_CLUA_INVA_CGMB_ONOB_RK2
6679 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
6680 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
6681 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
6682 type(lowerUnit_type) ,
intent(in) :: classA
6683 type(inversion_type) ,
intent(in) :: operationA
6688 PURE module subroutine trsv_EXP_CLUA_INVA_CGMB_ONOB_RK1(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
6689#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6690 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_EXP_CLUA_INVA_CGMB_ONOB_RK1
6693 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
6694 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
6695 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
6696 type(lowerUnit_type) ,
intent(in) :: classA
6697 type(inversion_type) ,
intent(in) :: operationA
6710 PURE module subroutine trsv_EXP_CLUA_OTOA_CGMB_ONOB_CK5(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
6711#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6712 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_EXP_CLUA_OTOA_CGMB_ONOB_CK5
6715 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
6716 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
6717 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
6718 type(lowerUnit_type) ,
intent(in) :: classA
6719 type(transOrth_type) ,
intent(in) :: operationA
6724 PURE module subroutine trsv_EXP_CLUA_OTOA_CGMB_ONOB_CK4(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
6725#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6726 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_EXP_CLUA_OTOA_CGMB_ONOB_CK4
6729 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
6730 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
6731 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
6732 type(lowerUnit_type) ,
intent(in) :: classA
6733 type(transOrth_type) ,
intent(in) :: operationA
6738 PURE module subroutine trsv_EXP_CLUA_OTOA_CGMB_ONOB_CK3(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
6739#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6740 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_EXP_CLUA_OTOA_CGMB_ONOB_CK3
6743 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
6744 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
6745 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
6746 type(lowerUnit_type) ,
intent(in) :: classA
6747 type(transOrth_type) ,
intent(in) :: operationA
6752 PURE module subroutine trsv_EXP_CLUA_OTOA_CGMB_ONOB_CK2(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
6753#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6754 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_EXP_CLUA_OTOA_CGMB_ONOB_CK2
6757 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
6758 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
6759 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
6760 type(lowerUnit_type) ,
intent(in) :: classA
6761 type(transOrth_type) ,
intent(in) :: operationA
6766 PURE module subroutine trsv_EXP_CLUA_OTOA_CGMB_ONOB_CK1(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
6767#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6768 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_EXP_CLUA_OTOA_CGMB_ONOB_CK1
6771 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
6772 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
6773 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
6774 type(lowerUnit_type) ,
intent(in) :: classA
6775 type(transOrth_type) ,
intent(in) :: operationA
6782 PURE module subroutine trsv_EXP_CLUA_OTOA_CGMB_ONOB_RK5(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
6783#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6784 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_EXP_CLUA_OTOA_CGMB_ONOB_RK5
6787 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
6788 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
6789 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
6790 type(lowerUnit_type) ,
intent(in) :: classA
6791 type(transOrth_type) ,
intent(in) :: operationA
6796 PURE module subroutine trsv_EXP_CLUA_OTOA_CGMB_ONOB_RK4(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
6797#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6798 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_EXP_CLUA_OTOA_CGMB_ONOB_RK4
6801 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
6802 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
6803 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
6804 type(lowerUnit_type) ,
intent(in) :: classA
6805 type(transOrth_type) ,
intent(in) :: operationA
6810 PURE module subroutine trsv_EXP_CLUA_OTOA_CGMB_ONOB_RK3(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
6811#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6812 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_EXP_CLUA_OTOA_CGMB_ONOB_RK3
6815 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
6816 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
6817 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
6818 type(lowerUnit_type) ,
intent(in) :: classA
6819 type(transOrth_type) ,
intent(in) :: operationA
6824 PURE module subroutine trsv_EXP_CLUA_OTOA_CGMB_ONOB_RK2(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
6825#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6826 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_EXP_CLUA_OTOA_CGMB_ONOB_RK2
6829 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
6830 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
6831 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
6832 type(lowerUnit_type) ,
intent(in) :: classA
6833 type(transOrth_type) ,
intent(in) :: operationA
6838 PURE module subroutine trsv_EXP_CLUA_OTOA_CGMB_ONOB_RK1(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
6839#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6840 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_EXP_CLUA_OTOA_CGMB_ONOB_RK1
6843 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
6844 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
6845 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
6846 type(lowerUnit_type) ,
intent(in) :: classA
6847 type(transOrth_type) ,
intent(in) :: operationA
6860 PURE module subroutine trsv_EXP_CLUA_OTUA_CGMB_ONOB_CK5(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
6861#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6862 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_EXP_CLUA_OTUA_CGMB_ONOB_CK5
6865 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
6866 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
6867 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
6868 type(lowerUnit_type) ,
intent(in) :: classA
6869 type(transUnit_type) ,
intent(in) :: operationA
6874 PURE module subroutine trsv_EXP_CLUA_OTUA_CGMB_ONOB_CK4(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
6875#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6876 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_EXP_CLUA_OTUA_CGMB_ONOB_CK4
6879 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
6880 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
6881 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
6882 type(lowerUnit_type) ,
intent(in) :: classA
6883 type(transUnit_type) ,
intent(in) :: operationA
6888 PURE module subroutine trsv_EXP_CLUA_OTUA_CGMB_ONOB_CK3(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
6889#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6890 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_EXP_CLUA_OTUA_CGMB_ONOB_CK3
6893 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
6894 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
6895 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
6896 type(lowerUnit_type) ,
intent(in) :: classA
6897 type(transUnit_type) ,
intent(in) :: operationA
6902 PURE module subroutine trsv_EXP_CLUA_OTUA_CGMB_ONOB_CK2(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
6903#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6904 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_EXP_CLUA_OTUA_CGMB_ONOB_CK2
6907 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
6908 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
6909 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
6910 type(lowerUnit_type) ,
intent(in) :: classA
6911 type(transUnit_type) ,
intent(in) :: operationA
6916 PURE module subroutine trsv_EXP_CLUA_OTUA_CGMB_ONOB_CK1(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
6917#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6918 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_EXP_CLUA_OTUA_CGMB_ONOB_CK1
6921 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
6922 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
6923 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
6924 type(lowerUnit_type) ,
intent(in) :: classA
6925 type(transUnit_type) ,
intent(in) :: operationA
6932 PURE module subroutine trsv_EXP_CLUA_OTUA_CGMB_ONOB_RK5(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
6933#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6934 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_EXP_CLUA_OTUA_CGMB_ONOB_RK5
6937 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
6938 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
6939 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
6940 type(lowerUnit_type) ,
intent(in) :: classA
6941 type(transUnit_type) ,
intent(in) :: operationA
6946 PURE module subroutine trsv_EXP_CLUA_OTUA_CGMB_ONOB_RK4(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
6947#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6948 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_EXP_CLUA_OTUA_CGMB_ONOB_RK4
6951 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
6952 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
6953 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
6954 type(lowerUnit_type) ,
intent(in) :: classA
6955 type(transUnit_type) ,
intent(in) :: operationA
6960 PURE module subroutine trsv_EXP_CLUA_OTUA_CGMB_ONOB_RK3(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
6961#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6962 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_EXP_CLUA_OTUA_CGMB_ONOB_RK3
6965 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
6966 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
6967 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
6968 type(lowerUnit_type) ,
intent(in) :: classA
6969 type(transUnit_type) ,
intent(in) :: operationA
6974 PURE module subroutine trsv_EXP_CLUA_OTUA_CGMB_ONOB_RK2(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
6975#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6976 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_EXP_CLUA_OTUA_CGMB_ONOB_RK2
6979 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
6980 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
6981 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
6982 type(lowerUnit_type) ,
intent(in) :: classA
6983 type(transUnit_type) ,
intent(in) :: operationA
6988 PURE module subroutine trsv_EXP_CLUA_OTUA_CGMB_ONOB_RK1(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
6989#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6990 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_EXP_CLUA_OTUA_CGMB_ONOB_RK1
6993 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
6994 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
6995 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
6996 type(lowerUnit_type) ,
intent(in) :: classA
6997 type(transUnit_type) ,
intent(in) :: operationA
7014 PURE module subroutine trsv_EXP_CUUA_INVA_CGMB_ONOB_CK5(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
7015#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7016 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_EXP_CUUA_INVA_CGMB_ONOB_CK5
7019 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
7020 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
7021 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
7022 type(upperUnit_type) ,
intent(in) :: classA
7023 type(inversion_type) ,
intent(in) :: operationA
7028 PURE module subroutine trsv_EXP_CUUA_INVA_CGMB_ONOB_CK4(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
7029#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7030 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_EXP_CUUA_INVA_CGMB_ONOB_CK4
7033 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
7034 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
7035 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
7036 type(upperUnit_type) ,
intent(in) :: classA
7037 type(inversion_type) ,
intent(in) :: operationA
7042 PURE module subroutine trsv_EXP_CUUA_INVA_CGMB_ONOB_CK3(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
7043#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7044 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_EXP_CUUA_INVA_CGMB_ONOB_CK3
7047 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
7048 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
7049 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
7050 type(upperUnit_type) ,
intent(in) :: classA
7051 type(inversion_type) ,
intent(in) :: operationA
7056 PURE module subroutine trsv_EXP_CUUA_INVA_CGMB_ONOB_CK2(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
7057#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7058 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_EXP_CUUA_INVA_CGMB_ONOB_CK2
7061 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
7062 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
7063 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
7064 type(upperUnit_type) ,
intent(in) :: classA
7065 type(inversion_type) ,
intent(in) :: operationA
7070 PURE module subroutine trsv_EXP_CUUA_INVA_CGMB_ONOB_CK1(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
7071#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7072 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_EXP_CUUA_INVA_CGMB_ONOB_CK1
7075 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
7076 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
7077 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
7078 type(upperUnit_type) ,
intent(in) :: classA
7079 type(inversion_type) ,
intent(in) :: operationA
7086 PURE module subroutine trsv_EXP_CUUA_INVA_CGMB_ONOB_RK5(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
7087#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7088 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_EXP_CUUA_INVA_CGMB_ONOB_RK5
7091 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
7092 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
7093 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
7094 type(upperUnit_type) ,
intent(in) :: classA
7095 type(inversion_type) ,
intent(in) :: operationA
7100 PURE module subroutine trsv_EXP_CUUA_INVA_CGMB_ONOB_RK4(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
7101#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7102 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_EXP_CUUA_INVA_CGMB_ONOB_RK4
7105 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
7106 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
7107 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
7108 type(upperUnit_type) ,
intent(in) :: classA
7109 type(inversion_type) ,
intent(in) :: operationA
7114 PURE module subroutine trsv_EXP_CUUA_INVA_CGMB_ONOB_RK3(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
7115#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7116 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_EXP_CUUA_INVA_CGMB_ONOB_RK3
7119 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
7120 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
7121 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
7122 type(upperUnit_type) ,
intent(in) :: classA
7123 type(inversion_type) ,
intent(in) :: operationA
7128 PURE module subroutine trsv_EXP_CUUA_INVA_CGMB_ONOB_RK2(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
7129#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7130 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_EXP_CUUA_INVA_CGMB_ONOB_RK2
7133 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
7134 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
7135 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
7136 type(upperUnit_type) ,
intent(in) :: classA
7137 type(inversion_type) ,
intent(in) :: operationA
7142 PURE module subroutine trsv_EXP_CUUA_INVA_CGMB_ONOB_RK1(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
7143#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7144 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_EXP_CUUA_INVA_CGMB_ONOB_RK1
7147 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
7148 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
7149 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
7150 type(upperUnit_type) ,
intent(in) :: classA
7151 type(inversion_type) ,
intent(in) :: operationA
7164 PURE module subroutine trsv_EXP_CUUA_OTOA_CGMB_ONOB_CK5(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
7165#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7166 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_EXP_CUUA_OTOA_CGMB_ONOB_CK5
7169 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
7170 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
7171 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
7172 type(upperUnit_type) ,
intent(in) :: classA
7173 type(transOrth_type) ,
intent(in) :: operationA
7178 PURE module subroutine trsv_EXP_CUUA_OTOA_CGMB_ONOB_CK4(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
7179#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7180 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_EXP_CUUA_OTOA_CGMB_ONOB_CK4
7183 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
7184 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
7185 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
7186 type(upperUnit_type) ,
intent(in) :: classA
7187 type(transOrth_type) ,
intent(in) :: operationA
7192 PURE module subroutine trsv_EXP_CUUA_OTOA_CGMB_ONOB_CK3(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
7193#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7194 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_EXP_CUUA_OTOA_CGMB_ONOB_CK3
7197 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
7198 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
7199 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
7200 type(upperUnit_type) ,
intent(in) :: classA
7201 type(transOrth_type) ,
intent(in) :: operationA
7206 PURE module subroutine trsv_EXP_CUUA_OTOA_CGMB_ONOB_CK2(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
7207#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7208 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_EXP_CUUA_OTOA_CGMB_ONOB_CK2
7211 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
7212 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
7213 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
7214 type(upperUnit_type) ,
intent(in) :: classA
7215 type(transOrth_type) ,
intent(in) :: operationA
7220 PURE module subroutine trsv_EXP_CUUA_OTOA_CGMB_ONOB_CK1(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
7221#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7222 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_EXP_CUUA_OTOA_CGMB_ONOB_CK1
7225 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
7226 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
7227 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
7228 type(upperUnit_type) ,
intent(in) :: classA
7229 type(transOrth_type) ,
intent(in) :: operationA
7236 PURE module subroutine trsv_EXP_CUUA_OTOA_CGMB_ONOB_RK5(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
7237#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7238 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_EXP_CUUA_OTOA_CGMB_ONOB_RK5
7241 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
7242 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
7243 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
7244 type(upperUnit_type) ,
intent(in) :: classA
7245 type(transOrth_type) ,
intent(in) :: operationA
7250 PURE module subroutine trsv_EXP_CUUA_OTOA_CGMB_ONOB_RK4(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
7251#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7252 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_EXP_CUUA_OTOA_CGMB_ONOB_RK4
7255 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
7256 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
7257 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
7258 type(upperUnit_type) ,
intent(in) :: classA
7259 type(transOrth_type) ,
intent(in) :: operationA
7264 PURE module subroutine trsv_EXP_CUUA_OTOA_CGMB_ONOB_RK3(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
7265#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7266 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_EXP_CUUA_OTOA_CGMB_ONOB_RK3
7269 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
7270 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
7271 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
7272 type(upperUnit_type) ,
intent(in) :: classA
7273 type(transOrth_type) ,
intent(in) :: operationA
7278 PURE module subroutine trsv_EXP_CUUA_OTOA_CGMB_ONOB_RK2(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
7279#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7280 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_EXP_CUUA_OTOA_CGMB_ONOB_RK2
7283 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
7284 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
7285 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
7286 type(upperUnit_type) ,
intent(in) :: classA
7287 type(transOrth_type) ,
intent(in) :: operationA
7292 PURE module subroutine trsv_EXP_CUUA_OTOA_CGMB_ONOB_RK1(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
7293#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7294 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_EXP_CUUA_OTOA_CGMB_ONOB_RK1
7297 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
7298 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
7299 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
7300 type(upperUnit_type) ,
intent(in) :: classA
7301 type(transOrth_type) ,
intent(in) :: operationA
7314 PURE module subroutine trsv_EXP_CUUA_OTUA_CGMB_ONOB_CK5(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
7315#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7316 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_EXP_CUUA_OTUA_CGMB_ONOB_CK5
7319 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
7320 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
7321 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
7322 type(upperUnit_type) ,
intent(in) :: classA
7323 type(transUnit_type) ,
intent(in) :: operationA
7328 PURE module subroutine trsv_EXP_CUUA_OTUA_CGMB_ONOB_CK4(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
7329#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7330 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_EXP_CUUA_OTUA_CGMB_ONOB_CK4
7333 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
7334 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
7335 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
7336 type(upperUnit_type) ,
intent(in) :: classA
7337 type(transUnit_type) ,
intent(in) :: operationA
7342 PURE module subroutine trsv_EXP_CUUA_OTUA_CGMB_ONOB_CK3(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
7343#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7344 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_EXP_CUUA_OTUA_CGMB_ONOB_CK3
7347 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
7348 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
7349 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
7350 type(upperUnit_type) ,
intent(in) :: classA
7351 type(transUnit_type) ,
intent(in) :: operationA
7356 PURE module subroutine trsv_EXP_CUUA_OTUA_CGMB_ONOB_CK2(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
7357#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7358 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_EXP_CUUA_OTUA_CGMB_ONOB_CK2
7361 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
7362 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
7363 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
7364 type(upperUnit_type) ,
intent(in) :: classA
7365 type(transUnit_type) ,
intent(in) :: operationA
7370 PURE module subroutine trsv_EXP_CUUA_OTUA_CGMB_ONOB_CK1(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
7371#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7372 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_EXP_CUUA_OTUA_CGMB_ONOB_CK1
7375 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
7376 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
7377 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:)
7378 type(upperUnit_type) ,
intent(in) :: classA
7379 type(transUnit_type) ,
intent(in) :: operationA
7386 PURE module subroutine trsv_EXP_CUUA_OTUA_CGMB_ONOB_RK5(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
7387#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7388 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_EXP_CUUA_OTUA_CGMB_ONOB_RK5
7391 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
7392 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
7393 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
7394 type(upperUnit_type) ,
intent(in) :: classA
7395 type(transUnit_type) ,
intent(in) :: operationA
7400 PURE module subroutine trsv_EXP_CUUA_OTUA_CGMB_ONOB_RK4(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
7401#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7402 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_EXP_CUUA_OTUA_CGMB_ONOB_RK4
7405 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
7406 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
7407 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
7408 type(upperUnit_type) ,
intent(in) :: classA
7409 type(transUnit_type) ,
intent(in) :: operationA
7414 PURE module subroutine trsv_EXP_CUUA_OTUA_CGMB_ONOB_RK3(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
7415#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7416 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_EXP_CUUA_OTUA_CGMB_ONOB_RK3
7419 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
7420 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
7421 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
7422 type(upperUnit_type) ,
intent(in) :: classA
7423 type(transUnit_type) ,
intent(in) :: operationA
7428 PURE module subroutine trsv_EXP_CUUA_OTUA_CGMB_ONOB_RK2(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
7429#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7430 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_EXP_CUUA_OTUA_CGMB_ONOB_RK2
7433 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
7434 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
7435 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
7436 type(upperUnit_type) ,
intent(in) :: classA
7437 type(transUnit_type) ,
intent(in) :: operationA
7442 PURE module subroutine trsv_EXP_CUUA_OTUA_CGMB_ONOB_RK1(matA, classA, operationA, matB, nrow, roffA, coffA, incB)
7443#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7444 !DEC$ ATTRIBUTES DLLEXPORT :: trsv_EXP_CUUA_OTUA_CGMB_ONOB_RK1
7447 integer(IK) ,
intent(in) :: nrow, roffA, coffA, incB
7448 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
7449 real(RKG) ,
intent(inout) ,
contiguous :: matB(:)
7450 type(upperUnit_type) ,
intent(in) :: classA
7451 type(transUnit_type) ,
intent(in) :: operationA
7494 PURE module subroutine trmm_ASS_CLDA_ONOA_CGMB_ONOB_CK5(matA, classA, operationA, matB, alpha)
7495#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7496 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CLDA_ONOA_CGMB_ONOB_CK5
7499 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
7500 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:,:)
7501 complex(CKG) ,
intent(in) ,
optional :: alpha
7502 type(lowerDiag_type) ,
intent(in) :: classA
7503 type(nothing_type) ,
intent(in) :: operationA
7508 PURE module subroutine trmm_ASS_CLDA_ONOA_CGMB_ONOB_CK4(matA, classA, operationA, matB, alpha)
7509#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7510 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CLDA_ONOA_CGMB_ONOB_CK4
7513 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
7514 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:,:)
7515 complex(CKG) ,
intent(in) ,
optional :: alpha
7516 type(lowerDiag_type) ,
intent(in) :: classA
7517 type(nothing_type) ,
intent(in) :: operationA
7522 PURE module subroutine trmm_ASS_CLDA_ONOA_CGMB_ONOB_CK3(matA, classA, operationA, matB, alpha)
7523#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7524 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CLDA_ONOA_CGMB_ONOB_CK3
7527 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
7528 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:,:)
7529 complex(CKG) ,
intent(in) ,
optional :: alpha
7530 type(lowerDiag_type) ,
intent(in) :: classA
7531 type(nothing_type) ,
intent(in) :: operationA
7536 PURE module subroutine trmm_ASS_CLDA_ONOA_CGMB_ONOB_CK2(matA, classA, operationA, matB, alpha)
7537#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7538 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CLDA_ONOA_CGMB_ONOB_CK2
7541 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
7542 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:,:)
7543 complex(CKG) ,
intent(in) ,
optional :: alpha
7544 type(lowerDiag_type) ,
intent(in) :: classA
7545 type(nothing_type) ,
intent(in) :: operationA
7550 PURE module subroutine trmm_ASS_CLDA_ONOA_CGMB_ONOB_CK1(matA, classA, operationA, matB, alpha)
7551#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7552 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CLDA_ONOA_CGMB_ONOB_CK1
7555 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
7556 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:,:)
7557 complex(CKG) ,
intent(in) ,
optional :: alpha
7558 type(lowerDiag_type) ,
intent(in) :: classA
7559 type(nothing_type) ,
intent(in) :: operationA
7566 PURE module subroutine trmm_ASS_CLDA_ONOA_CGMB_ONOB_RK5(matA, classA, operationA, matB, alpha)
7567#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7568 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CLDA_ONOA_CGMB_ONOB_RK5
7571 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
7572 real(RKG) ,
intent(inout) ,
contiguous :: matB(:,:)
7573 real(RKG) ,
intent(in) ,
optional :: alpha
7574 type(lowerDiag_type) ,
intent(in) :: classA
7575 type(nothing_type) ,
intent(in) :: operationA
7580 PURE module subroutine trmm_ASS_CLDA_ONOA_CGMB_ONOB_RK4(matA, classA, operationA, matB, alpha)
7581#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7582 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CLDA_ONOA_CGMB_ONOB_RK4
7585 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
7586 real(RKG) ,
intent(inout) ,
contiguous :: matB(:,:)
7587 real(RKG) ,
intent(in) ,
optional :: alpha
7588 type(lowerDiag_type) ,
intent(in) :: classA
7589 type(nothing_type) ,
intent(in) :: operationA
7594 PURE module subroutine trmm_ASS_CLDA_ONOA_CGMB_ONOB_RK3(matA, classA, operationA, matB, alpha)
7595#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7596 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CLDA_ONOA_CGMB_ONOB_RK3
7599 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
7600 real(RKG) ,
intent(inout) ,
contiguous :: matB(:,:)
7601 real(RKG) ,
intent(in) ,
optional :: alpha
7602 type(lowerDiag_type) ,
intent(in) :: classA
7603 type(nothing_type) ,
intent(in) :: operationA
7608 PURE module subroutine trmm_ASS_CLDA_ONOA_CGMB_ONOB_RK2(matA, classA, operationA, matB, alpha)
7609#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7610 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CLDA_ONOA_CGMB_ONOB_RK2
7613 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
7614 real(RKG) ,
intent(inout) ,
contiguous :: matB(:,:)
7615 real(RKG) ,
intent(in) ,
optional :: alpha
7616 type(lowerDiag_type) ,
intent(in) :: classA
7617 type(nothing_type) ,
intent(in) :: operationA
7622 PURE module subroutine trmm_ASS_CLDA_ONOA_CGMB_ONOB_RK1(matA, classA, operationA, matB, alpha)
7623#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7624 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CLDA_ONOA_CGMB_ONOB_RK1
7627 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
7628 real(RKG) ,
intent(inout) ,
contiguous :: matB(:,:)
7629 real(RKG) ,
intent(in) ,
optional :: alpha
7630 type(lowerDiag_type) ,
intent(in) :: classA
7631 type(nothing_type) ,
intent(in) :: operationA
7644 PURE module subroutine trmm_ASS_CLDA_OTSA_CGMB_ONOB_CK5(matA, classA, operationA, matB, alpha)
7645#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7646 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CLDA_OTSA_CGMB_ONOB_CK5
7649 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
7650 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:,:)
7651 complex(CKG) ,
intent(in) ,
optional :: alpha
7652 type(lowerDiag_type) ,
intent(in) :: classA
7653 type(transSymm_type) ,
intent(in) :: operationA
7658 PURE module subroutine trmm_ASS_CLDA_OTSA_CGMB_ONOB_CK4(matA, classA, operationA, matB, alpha)
7659#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7660 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CLDA_OTSA_CGMB_ONOB_CK4
7663 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
7664 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:,:)
7665 complex(CKG) ,
intent(in) ,
optional :: alpha
7666 type(lowerDiag_type) ,
intent(in) :: classA
7667 type(transSymm_type) ,
intent(in) :: operationA
7672 PURE module subroutine trmm_ASS_CLDA_OTSA_CGMB_ONOB_CK3(matA, classA, operationA, matB, alpha)
7673#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7674 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CLDA_OTSA_CGMB_ONOB_CK3
7677 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
7678 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:,:)
7679 complex(CKG) ,
intent(in) ,
optional :: alpha
7680 type(lowerDiag_type) ,
intent(in) :: classA
7681 type(transSymm_type) ,
intent(in) :: operationA
7686 PURE module subroutine trmm_ASS_CLDA_OTSA_CGMB_ONOB_CK2(matA, classA, operationA, matB, alpha)
7687#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7688 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CLDA_OTSA_CGMB_ONOB_CK2
7691 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
7692 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:,:)
7693 complex(CKG) ,
intent(in) ,
optional :: alpha
7694 type(lowerDiag_type) ,
intent(in) :: classA
7695 type(transSymm_type) ,
intent(in) :: operationA
7700 PURE module subroutine trmm_ASS_CLDA_OTSA_CGMB_ONOB_CK1(matA, classA, operationA, matB, alpha)
7701#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7702 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CLDA_OTSA_CGMB_ONOB_CK1
7705 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
7706 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:,:)
7707 complex(CKG) ,
intent(in) ,
optional :: alpha
7708 type(lowerDiag_type) ,
intent(in) :: classA
7709 type(transSymm_type) ,
intent(in) :: operationA
7716 PURE module subroutine trmm_ASS_CLDA_OTSA_CGMB_ONOB_RK5(matA, classA, operationA, matB, alpha)
7717#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7718 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CLDA_OTSA_CGMB_ONOB_RK5
7721 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
7722 real(RKG) ,
intent(inout) ,
contiguous :: matB(:,:)
7723 real(RKG) ,
intent(in) ,
optional :: alpha
7724 type(lowerDiag_type) ,
intent(in) :: classA
7725 type(transSymm_type) ,
intent(in) :: operationA
7730 PURE module subroutine trmm_ASS_CLDA_OTSA_CGMB_ONOB_RK4(matA, classA, operationA, matB, alpha)
7731#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7732 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CLDA_OTSA_CGMB_ONOB_RK4
7735 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
7736 real(RKG) ,
intent(inout) ,
contiguous :: matB(:,:)
7737 real(RKG) ,
intent(in) ,
optional :: alpha
7738 type(lowerDiag_type) ,
intent(in) :: classA
7739 type(transSymm_type) ,
intent(in) :: operationA
7744 PURE module subroutine trmm_ASS_CLDA_OTSA_CGMB_ONOB_RK3(matA, classA, operationA, matB, alpha)
7745#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7746 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CLDA_OTSA_CGMB_ONOB_RK3
7749 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
7750 real(RKG) ,
intent(inout) ,
contiguous :: matB(:,:)
7751 real(RKG) ,
intent(in) ,
optional :: alpha
7752 type(lowerDiag_type) ,
intent(in) :: classA
7753 type(transSymm_type) ,
intent(in) :: operationA
7758 PURE module subroutine trmm_ASS_CLDA_OTSA_CGMB_ONOB_RK2(matA, classA, operationA, matB, alpha)
7759#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7760 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CLDA_OTSA_CGMB_ONOB_RK2
7763 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
7764 real(RKG) ,
intent(inout) ,
contiguous :: matB(:,:)
7765 real(RKG) ,
intent(in) ,
optional :: alpha
7766 type(lowerDiag_type) ,
intent(in) :: classA
7767 type(transSymm_type) ,
intent(in) :: operationA
7772 PURE module subroutine trmm_ASS_CLDA_OTSA_CGMB_ONOB_RK1(matA, classA, operationA, matB, alpha)
7773#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7774 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CLDA_OTSA_CGMB_ONOB_RK1
7777 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
7778 real(RKG) ,
intent(inout) ,
contiguous :: matB(:,:)
7779 real(RKG) ,
intent(in) ,
optional :: alpha
7780 type(lowerDiag_type) ,
intent(in) :: classA
7781 type(transSymm_type) ,
intent(in) :: operationA
7794 PURE module subroutine trmm_ASS_CLDA_OTHA_CGMB_ONOB_CK5(matA, classA, operationA, matB, alpha)
7795#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7796 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CLDA_OTHA_CGMB_ONOB_CK5
7799 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
7800 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:,:)
7801 complex(CKG) ,
intent(in) ,
optional :: alpha
7802 type(lowerDiag_type) ,
intent(in) :: classA
7803 type(transHerm_type) ,
intent(in) :: operationA
7808 PURE module subroutine trmm_ASS_CLDA_OTHA_CGMB_ONOB_CK4(matA, classA, operationA, matB, alpha)
7809#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7810 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CLDA_OTHA_CGMB_ONOB_CK4
7813 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
7814 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:,:)
7815 complex(CKG) ,
intent(in) ,
optional :: alpha
7816 type(lowerDiag_type) ,
intent(in) :: classA
7817 type(transHerm_type) ,
intent(in) :: operationA
7822 PURE module subroutine trmm_ASS_CLDA_OTHA_CGMB_ONOB_CK3(matA, classA, operationA, matB, alpha)
7823#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7824 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CLDA_OTHA_CGMB_ONOB_CK3
7827 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
7828 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:,:)
7829 complex(CKG) ,
intent(in) ,
optional :: alpha
7830 type(lowerDiag_type) ,
intent(in) :: classA
7831 type(transHerm_type) ,
intent(in) :: operationA
7836 PURE module subroutine trmm_ASS_CLDA_OTHA_CGMB_ONOB_CK2(matA, classA, operationA, matB, alpha)
7837#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7838 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CLDA_OTHA_CGMB_ONOB_CK2
7841 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
7842 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:,:)
7843 complex(CKG) ,
intent(in) ,
optional :: alpha
7844 type(lowerDiag_type) ,
intent(in) :: classA
7845 type(transHerm_type) ,
intent(in) :: operationA
7850 PURE module subroutine trmm_ASS_CLDA_OTHA_CGMB_ONOB_CK1(matA, classA, operationA, matB, alpha)
7851#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7852 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CLDA_OTHA_CGMB_ONOB_CK1
7855 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
7856 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:,:)
7857 complex(CKG) ,
intent(in) ,
optional :: alpha
7858 type(lowerDiag_type) ,
intent(in) :: classA
7859 type(transHerm_type) ,
intent(in) :: operationA
7866 PURE module subroutine trmm_ASS_CLDA_OTHA_CGMB_ONOB_RK5(matA, classA, operationA, matB, alpha)
7867#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7868 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CLDA_OTHA_CGMB_ONOB_RK5
7871 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
7872 real(RKG) ,
intent(inout) ,
contiguous :: matB(:,:)
7873 real(RKG) ,
intent(in) ,
optional :: alpha
7874 type(lowerDiag_type) ,
intent(in) :: classA
7875 type(transHerm_type) ,
intent(in) :: operationA
7880 PURE module subroutine trmm_ASS_CLDA_OTHA_CGMB_ONOB_RK4(matA, classA, operationA, matB, alpha)
7881#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7882 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CLDA_OTHA_CGMB_ONOB_RK4
7885 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
7886 real(RKG) ,
intent(inout) ,
contiguous :: matB(:,:)
7887 real(RKG) ,
intent(in) ,
optional :: alpha
7888 type(lowerDiag_type) ,
intent(in) :: classA
7889 type(transHerm_type) ,
intent(in) :: operationA
7894 PURE module subroutine trmm_ASS_CLDA_OTHA_CGMB_ONOB_RK3(matA, classA, operationA, matB, alpha)
7895#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7896 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CLDA_OTHA_CGMB_ONOB_RK3
7899 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
7900 real(RKG) ,
intent(inout) ,
contiguous :: matB(:,:)
7901 real(RKG) ,
intent(in) ,
optional :: alpha
7902 type(lowerDiag_type) ,
intent(in) :: classA
7903 type(transHerm_type) ,
intent(in) :: operationA
7908 PURE module subroutine trmm_ASS_CLDA_OTHA_CGMB_ONOB_RK2(matA, classA, operationA, matB, alpha)
7909#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7910 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CLDA_OTHA_CGMB_ONOB_RK2
7913 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
7914 real(RKG) ,
intent(inout) ,
contiguous :: matB(:,:)
7915 real(RKG) ,
intent(in) ,
optional :: alpha
7916 type(lowerDiag_type) ,
intent(in) :: classA
7917 type(transHerm_type) ,
intent(in) :: operationA
7922 PURE module subroutine trmm_ASS_CLDA_OTHA_CGMB_ONOB_RK1(matA, classA, operationA, matB, alpha)
7923#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7924 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CLDA_OTHA_CGMB_ONOB_RK1
7927 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
7928 real(RKG) ,
intent(inout) ,
contiguous :: matB(:,:)
7929 real(RKG) ,
intent(in) ,
optional :: alpha
7930 type(lowerDiag_type) ,
intent(in) :: classA
7931 type(transHerm_type) ,
intent(in) :: operationA
7948 PURE module subroutine trmm_ASS_CUDA_ONOA_CGMB_ONOB_CK5(matA, classA, operationA, matB, alpha)
7949#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7950 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CUDA_ONOA_CGMB_ONOB_CK5
7953 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
7954 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:,:)
7955 complex(CKG) ,
intent(in) ,
optional :: alpha
7956 type(upperDiag_type) ,
intent(in) :: classA
7957 type(nothing_type) ,
intent(in) :: operationA
7962 PURE module subroutine trmm_ASS_CUDA_ONOA_CGMB_ONOB_CK4(matA, classA, operationA, matB, alpha)
7963#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7964 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CUDA_ONOA_CGMB_ONOB_CK4
7967 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
7968 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:,:)
7969 complex(CKG) ,
intent(in) ,
optional :: alpha
7970 type(upperDiag_type) ,
intent(in) :: classA
7971 type(nothing_type) ,
intent(in) :: operationA
7976 PURE module subroutine trmm_ASS_CUDA_ONOA_CGMB_ONOB_CK3(matA, classA, operationA, matB, alpha)
7977#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7978 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CUDA_ONOA_CGMB_ONOB_CK3
7981 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
7982 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:,:)
7983 complex(CKG) ,
intent(in) ,
optional :: alpha
7984 type(upperDiag_type) ,
intent(in) :: classA
7985 type(nothing_type) ,
intent(in) :: operationA
7990 PURE module subroutine trmm_ASS_CUDA_ONOA_CGMB_ONOB_CK2(matA, classA, operationA, matB, alpha)
7991#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7992 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CUDA_ONOA_CGMB_ONOB_CK2
7995 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
7996 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:,:)
7997 complex(CKG) ,
intent(in) ,
optional :: alpha
7998 type(upperDiag_type) ,
intent(in) :: classA
7999 type(nothing_type) ,
intent(in) :: operationA
8004 PURE module subroutine trmm_ASS_CUDA_ONOA_CGMB_ONOB_CK1(matA, classA, operationA, matB, alpha)
8005#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8006 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CUDA_ONOA_CGMB_ONOB_CK1
8009 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
8010 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:,:)
8011 complex(CKG) ,
intent(in) ,
optional :: alpha
8012 type(upperDiag_type) ,
intent(in) :: classA
8013 type(nothing_type) ,
intent(in) :: operationA
8020 PURE module subroutine trmm_ASS_CUDA_ONOA_CGMB_ONOB_RK5(matA, classA, operationA, matB, alpha)
8021#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8022 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CUDA_ONOA_CGMB_ONOB_RK5
8025 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
8026 real(RKG) ,
intent(inout) ,
contiguous :: matB(:,:)
8027 real(RKG) ,
intent(in) ,
optional :: alpha
8028 type(upperDiag_type) ,
intent(in) :: classA
8029 type(nothing_type) ,
intent(in) :: operationA
8034 PURE module subroutine trmm_ASS_CUDA_ONOA_CGMB_ONOB_RK4(matA, classA, operationA, matB, alpha)
8035#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8036 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CUDA_ONOA_CGMB_ONOB_RK4
8039 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
8040 real(RKG) ,
intent(inout) ,
contiguous :: matB(:,:)
8041 real(RKG) ,
intent(in) ,
optional :: alpha
8042 type(upperDiag_type) ,
intent(in) :: classA
8043 type(nothing_type) ,
intent(in) :: operationA
8048 PURE module subroutine trmm_ASS_CUDA_ONOA_CGMB_ONOB_RK3(matA, classA, operationA, matB, alpha)
8049#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8050 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CUDA_ONOA_CGMB_ONOB_RK3
8053 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
8054 real(RKG) ,
intent(inout) ,
contiguous :: matB(:,:)
8055 real(RKG) ,
intent(in) ,
optional :: alpha
8056 type(upperDiag_type) ,
intent(in) :: classA
8057 type(nothing_type) ,
intent(in) :: operationA
8062 PURE module subroutine trmm_ASS_CUDA_ONOA_CGMB_ONOB_RK2(matA, classA, operationA, matB, alpha)
8063#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8064 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CUDA_ONOA_CGMB_ONOB_RK2
8067 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
8068 real(RKG) ,
intent(inout) ,
contiguous :: matB(:,:)
8069 real(RKG) ,
intent(in) ,
optional :: alpha
8070 type(upperDiag_type) ,
intent(in) :: classA
8071 type(nothing_type) ,
intent(in) :: operationA
8076 PURE module subroutine trmm_ASS_CUDA_ONOA_CGMB_ONOB_RK1(matA, classA, operationA, matB, alpha)
8077#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8078 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CUDA_ONOA_CGMB_ONOB_RK1
8081 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
8082 real(RKG) ,
intent(inout) ,
contiguous :: matB(:,:)
8083 real(RKG) ,
intent(in) ,
optional :: alpha
8084 type(upperDiag_type) ,
intent(in) :: classA
8085 type(nothing_type) ,
intent(in) :: operationA
8098 PURE module subroutine trmm_ASS_CUDA_OTSA_CGMB_ONOB_CK5(matA, classA, operationA, matB, alpha)
8099#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8100 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CUDA_OTSA_CGMB_ONOB_CK5
8103 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
8104 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:,:)
8105 complex(CKG) ,
intent(in) ,
optional :: alpha
8106 type(upperDiag_type) ,
intent(in) :: classA
8107 type(transSymm_type) ,
intent(in) :: operationA
8112 PURE module subroutine trmm_ASS_CUDA_OTSA_CGMB_ONOB_CK4(matA, classA, operationA, matB, alpha)
8113#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8114 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CUDA_OTSA_CGMB_ONOB_CK4
8117 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
8118 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:,:)
8119 complex(CKG) ,
intent(in) ,
optional :: alpha
8120 type(upperDiag_type) ,
intent(in) :: classA
8121 type(transSymm_type) ,
intent(in) :: operationA
8126 PURE module subroutine trmm_ASS_CUDA_OTSA_CGMB_ONOB_CK3(matA, classA, operationA, matB, alpha)
8127#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8128 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CUDA_OTSA_CGMB_ONOB_CK3
8131 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
8132 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:,:)
8133 complex(CKG) ,
intent(in) ,
optional :: alpha
8134 type(upperDiag_type) ,
intent(in) :: classA
8135 type(transSymm_type) ,
intent(in) :: operationA
8140 PURE module subroutine trmm_ASS_CUDA_OTSA_CGMB_ONOB_CK2(matA, classA, operationA, matB, alpha)
8141#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8142 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CUDA_OTSA_CGMB_ONOB_CK2
8145 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
8146 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:,:)
8147 complex(CKG) ,
intent(in) ,
optional :: alpha
8148 type(upperDiag_type) ,
intent(in) :: classA
8149 type(transSymm_type) ,
intent(in) :: operationA
8154 PURE module subroutine trmm_ASS_CUDA_OTSA_CGMB_ONOB_CK1(matA, classA, operationA, matB, alpha)
8155#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8156 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CUDA_OTSA_CGMB_ONOB_CK1
8159 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
8160 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:,:)
8161 complex(CKG) ,
intent(in) ,
optional :: alpha
8162 type(upperDiag_type) ,
intent(in) :: classA
8163 type(transSymm_type) ,
intent(in) :: operationA
8170 PURE module subroutine trmm_ASS_CUDA_OTSA_CGMB_ONOB_RK5(matA, classA, operationA, matB, alpha)
8171#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8172 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CUDA_OTSA_CGMB_ONOB_RK5
8175 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
8176 real(RKG) ,
intent(inout) ,
contiguous :: matB(:,:)
8177 real(RKG) ,
intent(in) ,
optional :: alpha
8178 type(upperDiag_type) ,
intent(in) :: classA
8179 type(transSymm_type) ,
intent(in) :: operationA
8184 PURE module subroutine trmm_ASS_CUDA_OTSA_CGMB_ONOB_RK4(matA, classA, operationA, matB, alpha)
8185#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8186 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CUDA_OTSA_CGMB_ONOB_RK4
8189 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
8190 real(RKG) ,
intent(inout) ,
contiguous :: matB(:,:)
8191 real(RKG) ,
intent(in) ,
optional :: alpha
8192 type(upperDiag_type) ,
intent(in) :: classA
8193 type(transSymm_type) ,
intent(in) :: operationA
8198 PURE module subroutine trmm_ASS_CUDA_OTSA_CGMB_ONOB_RK3(matA, classA, operationA, matB, alpha)
8199#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8200 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CUDA_OTSA_CGMB_ONOB_RK3
8203 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
8204 real(RKG) ,
intent(inout) ,
contiguous :: matB(:,:)
8205 real(RKG) ,
intent(in) ,
optional :: alpha
8206 type(upperDiag_type) ,
intent(in) :: classA
8207 type(transSymm_type) ,
intent(in) :: operationA
8212 PURE module subroutine trmm_ASS_CUDA_OTSA_CGMB_ONOB_RK2(matA, classA, operationA, matB, alpha)
8213#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8214 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CUDA_OTSA_CGMB_ONOB_RK2
8217 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
8218 real(RKG) ,
intent(inout) ,
contiguous :: matB(:,:)
8219 real(RKG) ,
intent(in) ,
optional :: alpha
8220 type(upperDiag_type) ,
intent(in) :: classA
8221 type(transSymm_type) ,
intent(in) :: operationA
8226 PURE module subroutine trmm_ASS_CUDA_OTSA_CGMB_ONOB_RK1(matA, classA, operationA, matB, alpha)
8227#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8228 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CUDA_OTSA_CGMB_ONOB_RK1
8231 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
8232 real(RKG) ,
intent(inout) ,
contiguous :: matB(:,:)
8233 real(RKG) ,
intent(in) ,
optional :: alpha
8234 type(upperDiag_type) ,
intent(in) :: classA
8235 type(transSymm_type) ,
intent(in) :: operationA
8248 PURE module subroutine trmm_ASS_CUDA_OTHA_CGMB_ONOB_CK5(matA, classA, operationA, matB, alpha)
8249#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8250 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CUDA_OTHA_CGMB_ONOB_CK5
8253 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
8254 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:,:)
8255 complex(CKG) ,
intent(in) ,
optional :: alpha
8256 type(upperDiag_type) ,
intent(in) :: classA
8257 type(transHerm_type) ,
intent(in) :: operationA
8262 PURE module subroutine trmm_ASS_CUDA_OTHA_CGMB_ONOB_CK4(matA, classA, operationA, matB, alpha)
8263#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8264 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CUDA_OTHA_CGMB_ONOB_CK4
8267 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
8268 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:,:)
8269 complex(CKG) ,
intent(in) ,
optional :: alpha
8270 type(upperDiag_type) ,
intent(in) :: classA
8271 type(transHerm_type) ,
intent(in) :: operationA
8276 PURE module subroutine trmm_ASS_CUDA_OTHA_CGMB_ONOB_CK3(matA, classA, operationA, matB, alpha)
8277#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8278 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CUDA_OTHA_CGMB_ONOB_CK3
8281 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
8282 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:,:)
8283 complex(CKG) ,
intent(in) ,
optional :: alpha
8284 type(upperDiag_type) ,
intent(in) :: classA
8285 type(transHerm_type) ,
intent(in) :: operationA
8290 PURE module subroutine trmm_ASS_CUDA_OTHA_CGMB_ONOB_CK2(matA, classA, operationA, matB, alpha)
8291#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8292 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CUDA_OTHA_CGMB_ONOB_CK2
8295 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
8296 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:,:)
8297 complex(CKG) ,
intent(in) ,
optional :: alpha
8298 type(upperDiag_type) ,
intent(in) :: classA
8299 type(transHerm_type) ,
intent(in) :: operationA
8304 PURE module subroutine trmm_ASS_CUDA_OTHA_CGMB_ONOB_CK1(matA, classA, operationA, matB, alpha)
8305#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8306 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CUDA_OTHA_CGMB_ONOB_CK1
8309 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
8310 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:,:)
8311 complex(CKG) ,
intent(in) ,
optional :: alpha
8312 type(upperDiag_type) ,
intent(in) :: classA
8313 type(transHerm_type) ,
intent(in) :: operationA
8320 PURE module subroutine trmm_ASS_CUDA_OTHA_CGMB_ONOB_RK5(matA, classA, operationA, matB, alpha)
8321#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8322 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CUDA_OTHA_CGMB_ONOB_RK5
8325 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
8326 real(RKG) ,
intent(inout) ,
contiguous :: matB(:,:)
8327 real(RKG) ,
intent(in) ,
optional :: alpha
8328 type(upperDiag_type) ,
intent(in) :: classA
8329 type(transHerm_type) ,
intent(in) :: operationA
8334 PURE module subroutine trmm_ASS_CUDA_OTHA_CGMB_ONOB_RK4(matA, classA, operationA, matB, alpha)
8335#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8336 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CUDA_OTHA_CGMB_ONOB_RK4
8339 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
8340 real(RKG) ,
intent(inout) ,
contiguous :: matB(:,:)
8341 real(RKG) ,
intent(in) ,
optional :: alpha
8342 type(upperDiag_type) ,
intent(in) :: classA
8343 type(transHerm_type) ,
intent(in) :: operationA
8348 PURE module subroutine trmm_ASS_CUDA_OTHA_CGMB_ONOB_RK3(matA, classA, operationA, matB, alpha)
8349#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8350 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CUDA_OTHA_CGMB_ONOB_RK3
8353 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
8354 real(RKG) ,
intent(inout) ,
contiguous :: matB(:,:)
8355 real(RKG) ,
intent(in) ,
optional :: alpha
8356 type(upperDiag_type) ,
intent(in) :: classA
8357 type(transHerm_type) ,
intent(in) :: operationA
8362 PURE module subroutine trmm_ASS_CUDA_OTHA_CGMB_ONOB_RK2(matA, classA, operationA, matB, alpha)
8363#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8364 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CUDA_OTHA_CGMB_ONOB_RK2
8367 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
8368 real(RKG) ,
intent(inout) ,
contiguous :: matB(:,:)
8369 real(RKG) ,
intent(in) ,
optional :: alpha
8370 type(upperDiag_type) ,
intent(in) :: classA
8371 type(transHerm_type) ,
intent(in) :: operationA
8376 PURE module subroutine trmm_ASS_CUDA_OTHA_CGMB_ONOB_RK1(matA, classA, operationA, matB, alpha)
8377#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8378 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CUDA_OTHA_CGMB_ONOB_RK1
8381 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
8382 real(RKG) ,
intent(inout) ,
contiguous :: matB(:,:)
8383 real(RKG) ,
intent(in) ,
optional :: alpha
8384 type(upperDiag_type) ,
intent(in) :: classA
8385 type(transHerm_type) ,
intent(in) :: operationA
8402 PURE module subroutine trmm_ASS_CLUA_ONOA_CGMB_ONOB_CK5(matA, classA, operationA, matB, alpha)
8403#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8404 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CLUA_ONOA_CGMB_ONOB_CK5
8407 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
8408 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:,:)
8409 complex(CKG) ,
intent(in) ,
optional :: alpha
8410 type(lowerUnit_type) ,
intent(in) :: classA
8411 type(nothing_type) ,
intent(in) :: operationA
8416 PURE module subroutine trmm_ASS_CLUA_ONOA_CGMB_ONOB_CK4(matA, classA, operationA, matB, alpha)
8417#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8418 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CLUA_ONOA_CGMB_ONOB_CK4
8421 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
8422 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:,:)
8423 complex(CKG) ,
intent(in) ,
optional :: alpha
8424 type(lowerUnit_type) ,
intent(in) :: classA
8425 type(nothing_type) ,
intent(in) :: operationA
8430 PURE module subroutine trmm_ASS_CLUA_ONOA_CGMB_ONOB_CK3(matA, classA, operationA, matB, alpha)
8431#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8432 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CLUA_ONOA_CGMB_ONOB_CK3
8435 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
8436 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:,:)
8437 complex(CKG) ,
intent(in) ,
optional :: alpha
8438 type(lowerUnit_type) ,
intent(in) :: classA
8439 type(nothing_type) ,
intent(in) :: operationA
8444 PURE module subroutine trmm_ASS_CLUA_ONOA_CGMB_ONOB_CK2(matA, classA, operationA, matB, alpha)
8445#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8446 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CLUA_ONOA_CGMB_ONOB_CK2
8449 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
8450 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:,:)
8451 complex(CKG) ,
intent(in) ,
optional :: alpha
8452 type(lowerUnit_type) ,
intent(in) :: classA
8453 type(nothing_type) ,
intent(in) :: operationA
8458 PURE module subroutine trmm_ASS_CLUA_ONOA_CGMB_ONOB_CK1(matA, classA, operationA, matB, alpha)
8459#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8460 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CLUA_ONOA_CGMB_ONOB_CK1
8463 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
8464 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:,:)
8465 complex(CKG) ,
intent(in) ,
optional :: alpha
8466 type(lowerUnit_type) ,
intent(in) :: classA
8467 type(nothing_type) ,
intent(in) :: operationA
8474 PURE module subroutine trmm_ASS_CLUA_ONOA_CGMB_ONOB_RK5(matA, classA, operationA, matB, alpha)
8475#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8476 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CLUA_ONOA_CGMB_ONOB_RK5
8479 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
8480 real(RKG) ,
intent(inout) ,
contiguous :: matB(:,:)
8481 real(RKG) ,
intent(in) ,
optional :: alpha
8482 type(lowerUnit_type) ,
intent(in) :: classA
8483 type(nothing_type) ,
intent(in) :: operationA
8488 PURE module subroutine trmm_ASS_CLUA_ONOA_CGMB_ONOB_RK4(matA, classA, operationA, matB, alpha)
8489#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8490 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CLUA_ONOA_CGMB_ONOB_RK4
8493 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
8494 real(RKG) ,
intent(inout) ,
contiguous :: matB(:,:)
8495 real(RKG) ,
intent(in) ,
optional :: alpha
8496 type(lowerUnit_type) ,
intent(in) :: classA
8497 type(nothing_type) ,
intent(in) :: operationA
8502 PURE module subroutine trmm_ASS_CLUA_ONOA_CGMB_ONOB_RK3(matA, classA, operationA, matB, alpha)
8503#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8504 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CLUA_ONOA_CGMB_ONOB_RK3
8507 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
8508 real(RKG) ,
intent(inout) ,
contiguous :: matB(:,:)
8509 real(RKG) ,
intent(in) ,
optional :: alpha
8510 type(lowerUnit_type) ,
intent(in) :: classA
8511 type(nothing_type) ,
intent(in) :: operationA
8516 PURE module subroutine trmm_ASS_CLUA_ONOA_CGMB_ONOB_RK2(matA, classA, operationA, matB, alpha)
8517#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8518 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CLUA_ONOA_CGMB_ONOB_RK2
8521 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
8522 real(RKG) ,
intent(inout) ,
contiguous :: matB(:,:)
8523 real(RKG) ,
intent(in) ,
optional :: alpha
8524 type(lowerUnit_type) ,
intent(in) :: classA
8525 type(nothing_type) ,
intent(in) :: operationA
8530 PURE module subroutine trmm_ASS_CLUA_ONOA_CGMB_ONOB_RK1(matA, classA, operationA, matB, alpha)
8531#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8532 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CLUA_ONOA_CGMB_ONOB_RK1
8535 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
8536 real(RKG) ,
intent(inout) ,
contiguous :: matB(:,:)
8537 real(RKG) ,
intent(in) ,
optional :: alpha
8538 type(lowerUnit_type) ,
intent(in) :: classA
8539 type(nothing_type) ,
intent(in) :: operationA
8552 PURE module subroutine trmm_ASS_CLUA_OTSA_CGMB_ONOB_CK5(matA, classA, operationA, matB, alpha)
8553#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8554 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CLUA_OTSA_CGMB_ONOB_CK5
8557 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
8558 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:,:)
8559 complex(CKG) ,
intent(in) ,
optional :: alpha
8560 type(lowerUnit_type) ,
intent(in) :: classA
8561 type(transSymm_type) ,
intent(in) :: operationA
8566 PURE module subroutine trmm_ASS_CLUA_OTSA_CGMB_ONOB_CK4(matA, classA, operationA, matB, alpha)
8567#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8568 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CLUA_OTSA_CGMB_ONOB_CK4
8571 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
8572 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:,:)
8573 complex(CKG) ,
intent(in) ,
optional :: alpha
8574 type(lowerUnit_type) ,
intent(in) :: classA
8575 type(transSymm_type) ,
intent(in) :: operationA
8580 PURE module subroutine trmm_ASS_CLUA_OTSA_CGMB_ONOB_CK3(matA, classA, operationA, matB, alpha)
8581#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8582 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CLUA_OTSA_CGMB_ONOB_CK3
8585 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
8586 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:,:)
8587 complex(CKG) ,
intent(in) ,
optional :: alpha
8588 type(lowerUnit_type) ,
intent(in) :: classA
8589 type(transSymm_type) ,
intent(in) :: operationA
8594 PURE module subroutine trmm_ASS_CLUA_OTSA_CGMB_ONOB_CK2(matA, classA, operationA, matB, alpha)
8595#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8596 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CLUA_OTSA_CGMB_ONOB_CK2
8599 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
8600 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:,:)
8601 complex(CKG) ,
intent(in) ,
optional :: alpha
8602 type(lowerUnit_type) ,
intent(in) :: classA
8603 type(transSymm_type) ,
intent(in) :: operationA
8608 PURE module subroutine trmm_ASS_CLUA_OTSA_CGMB_ONOB_CK1(matA, classA, operationA, matB, alpha)
8609#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8610 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CLUA_OTSA_CGMB_ONOB_CK1
8613 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
8614 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:,:)
8615 complex(CKG) ,
intent(in) ,
optional :: alpha
8616 type(lowerUnit_type) ,
intent(in) :: classA
8617 type(transSymm_type) ,
intent(in) :: operationA
8624 PURE module subroutine trmm_ASS_CLUA_OTSA_CGMB_ONOB_RK5(matA, classA, operationA, matB, alpha)
8625#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8626 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CLUA_OTSA_CGMB_ONOB_RK5
8629 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
8630 real(RKG) ,
intent(inout) ,
contiguous :: matB(:,:)
8631 real(RKG) ,
intent(in) ,
optional :: alpha
8632 type(lowerUnit_type) ,
intent(in) :: classA
8633 type(transSymm_type) ,
intent(in) :: operationA
8638 PURE module subroutine trmm_ASS_CLUA_OTSA_CGMB_ONOB_RK4(matA, classA, operationA, matB, alpha)
8639#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8640 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CLUA_OTSA_CGMB_ONOB_RK4
8643 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
8644 real(RKG) ,
intent(inout) ,
contiguous :: matB(:,:)
8645 real(RKG) ,
intent(in) ,
optional :: alpha
8646 type(lowerUnit_type) ,
intent(in) :: classA
8647 type(transSymm_type) ,
intent(in) :: operationA
8652 PURE module subroutine trmm_ASS_CLUA_OTSA_CGMB_ONOB_RK3(matA, classA, operationA, matB, alpha)
8653#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8654 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CLUA_OTSA_CGMB_ONOB_RK3
8657 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
8658 real(RKG) ,
intent(inout) ,
contiguous :: matB(:,:)
8659 real(RKG) ,
intent(in) ,
optional :: alpha
8660 type(lowerUnit_type) ,
intent(in) :: classA
8661 type(transSymm_type) ,
intent(in) :: operationA
8666 PURE module subroutine trmm_ASS_CLUA_OTSA_CGMB_ONOB_RK2(matA, classA, operationA, matB, alpha)
8667#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8668 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CLUA_OTSA_CGMB_ONOB_RK2
8671 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
8672 real(RKG) ,
intent(inout) ,
contiguous :: matB(:,:)
8673 real(RKG) ,
intent(in) ,
optional :: alpha
8674 type(lowerUnit_type) ,
intent(in) :: classA
8675 type(transSymm_type) ,
intent(in) :: operationA
8680 PURE module subroutine trmm_ASS_CLUA_OTSA_CGMB_ONOB_RK1(matA, classA, operationA, matB, alpha)
8681#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8682 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CLUA_OTSA_CGMB_ONOB_RK1
8685 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
8686 real(RKG) ,
intent(inout) ,
contiguous :: matB(:,:)
8687 real(RKG) ,
intent(in) ,
optional :: alpha
8688 type(lowerUnit_type) ,
intent(in) :: classA
8689 type(transSymm_type) ,
intent(in) :: operationA
8702 PURE module subroutine trmm_ASS_CLUA_OTHA_CGMB_ONOB_CK5(matA, classA, operationA, matB, alpha)
8703#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8704 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CLUA_OTHA_CGMB_ONOB_CK5
8707 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
8708 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:,:)
8709 complex(CKG) ,
intent(in) ,
optional :: alpha
8710 type(lowerUnit_type) ,
intent(in) :: classA
8711 type(transHerm_type) ,
intent(in) :: operationA
8716 PURE module subroutine trmm_ASS_CLUA_OTHA_CGMB_ONOB_CK4(matA, classA, operationA, matB, alpha)
8717#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8718 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CLUA_OTHA_CGMB_ONOB_CK4
8721 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
8722 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:,:)
8723 complex(CKG) ,
intent(in) ,
optional :: alpha
8724 type(lowerUnit_type) ,
intent(in) :: classA
8725 type(transHerm_type) ,
intent(in) :: operationA
8730 PURE module subroutine trmm_ASS_CLUA_OTHA_CGMB_ONOB_CK3(matA, classA, operationA, matB, alpha)
8731#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8732 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CLUA_OTHA_CGMB_ONOB_CK3
8735 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
8736 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:,:)
8737 complex(CKG) ,
intent(in) ,
optional :: alpha
8738 type(lowerUnit_type) ,
intent(in) :: classA
8739 type(transHerm_type) ,
intent(in) :: operationA
8744 PURE module subroutine trmm_ASS_CLUA_OTHA_CGMB_ONOB_CK2(matA, classA, operationA, matB, alpha)
8745#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8746 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CLUA_OTHA_CGMB_ONOB_CK2
8749 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
8750 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:,:)
8751 complex(CKG) ,
intent(in) ,
optional :: alpha
8752 type(lowerUnit_type) ,
intent(in) :: classA
8753 type(transHerm_type) ,
intent(in) :: operationA
8758 PURE module subroutine trmm_ASS_CLUA_OTHA_CGMB_ONOB_CK1(matA, classA, operationA, matB, alpha)
8759#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8760 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CLUA_OTHA_CGMB_ONOB_CK1
8763 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
8764 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:,:)
8765 complex(CKG) ,
intent(in) ,
optional :: alpha
8766 type(lowerUnit_type) ,
intent(in) :: classA
8767 type(transHerm_type) ,
intent(in) :: operationA
8774 PURE module subroutine trmm_ASS_CLUA_OTHA_CGMB_ONOB_RK5(matA, classA, operationA, matB, alpha)
8775#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8776 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CLUA_OTHA_CGMB_ONOB_RK5
8779 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
8780 real(RKG) ,
intent(inout) ,
contiguous :: matB(:,:)
8781 real(RKG) ,
intent(in) ,
optional :: alpha
8782 type(lowerUnit_type) ,
intent(in) :: classA
8783 type(transHerm_type) ,
intent(in) :: operationA
8788 PURE module subroutine trmm_ASS_CLUA_OTHA_CGMB_ONOB_RK4(matA, classA, operationA, matB, alpha)
8789#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8790 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CLUA_OTHA_CGMB_ONOB_RK4
8793 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
8794 real(RKG) ,
intent(inout) ,
contiguous :: matB(:,:)
8795 real(RKG) ,
intent(in) ,
optional :: alpha
8796 type(lowerUnit_type) ,
intent(in) :: classA
8797 type(transHerm_type) ,
intent(in) :: operationA
8802 PURE module subroutine trmm_ASS_CLUA_OTHA_CGMB_ONOB_RK3(matA, classA, operationA, matB, alpha)
8803#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8804 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CLUA_OTHA_CGMB_ONOB_RK3
8807 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
8808 real(RKG) ,
intent(inout) ,
contiguous :: matB(:,:)
8809 real(RKG) ,
intent(in) ,
optional :: alpha
8810 type(lowerUnit_type) ,
intent(in) :: classA
8811 type(transHerm_type) ,
intent(in) :: operationA
8816 PURE module subroutine trmm_ASS_CLUA_OTHA_CGMB_ONOB_RK2(matA, classA, operationA, matB, alpha)
8817#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8818 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CLUA_OTHA_CGMB_ONOB_RK2
8821 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
8822 real(RKG) ,
intent(inout) ,
contiguous :: matB(:,:)
8823 real(RKG) ,
intent(in) ,
optional :: alpha
8824 type(lowerUnit_type) ,
intent(in) :: classA
8825 type(transHerm_type) ,
intent(in) :: operationA
8830 PURE module subroutine trmm_ASS_CLUA_OTHA_CGMB_ONOB_RK1(matA, classA, operationA, matB, alpha)
8831#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8832 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CLUA_OTHA_CGMB_ONOB_RK1
8835 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
8836 real(RKG) ,
intent(inout) ,
contiguous :: matB(:,:)
8837 real(RKG) ,
intent(in) ,
optional :: alpha
8838 type(lowerUnit_type) ,
intent(in) :: classA
8839 type(transHerm_type) ,
intent(in) :: operationA
8856 PURE module subroutine trmm_ASS_CUUA_ONOA_CGMB_ONOB_CK5(matA, classA, operationA, matB, alpha)
8857#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8858 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CUUA_ONOA_CGMB_ONOB_CK5
8861 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
8862 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:,:)
8863 complex(CKG) ,
intent(in) ,
optional :: alpha
8864 type(upperUnit_type) ,
intent(in) :: classA
8865 type(nothing_type) ,
intent(in) :: operationA
8870 PURE module subroutine trmm_ASS_CUUA_ONOA_CGMB_ONOB_CK4(matA, classA, operationA, matB, alpha)
8871#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8872 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CUUA_ONOA_CGMB_ONOB_CK4
8875 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
8876 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:,:)
8877 complex(CKG) ,
intent(in) ,
optional :: alpha
8878 type(upperUnit_type) ,
intent(in) :: classA
8879 type(nothing_type) ,
intent(in) :: operationA
8884 PURE module subroutine trmm_ASS_CUUA_ONOA_CGMB_ONOB_CK3(matA, classA, operationA, matB, alpha)
8885#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8886 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CUUA_ONOA_CGMB_ONOB_CK3
8889 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
8890 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:,:)
8891 complex(CKG) ,
intent(in) ,
optional :: alpha
8892 type(upperUnit_type) ,
intent(in) :: classA
8893 type(nothing_type) ,
intent(in) :: operationA
8898 PURE module subroutine trmm_ASS_CUUA_ONOA_CGMB_ONOB_CK2(matA, classA, operationA, matB, alpha)
8899#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8900 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CUUA_ONOA_CGMB_ONOB_CK2
8903 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
8904 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:,:)
8905 complex(CKG) ,
intent(in) ,
optional :: alpha
8906 type(upperUnit_type) ,
intent(in) :: classA
8907 type(nothing_type) ,
intent(in) :: operationA
8912 PURE module subroutine trmm_ASS_CUUA_ONOA_CGMB_ONOB_CK1(matA, classA, operationA, matB, alpha)
8913#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8914 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CUUA_ONOA_CGMB_ONOB_CK1
8917 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
8918 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:,:)
8919 complex(CKG) ,
intent(in) ,
optional :: alpha
8920 type(upperUnit_type) ,
intent(in) :: classA
8921 type(nothing_type) ,
intent(in) :: operationA
8928 PURE module subroutine trmm_ASS_CUUA_ONOA_CGMB_ONOB_RK5(matA, classA, operationA, matB, alpha)
8929#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8930 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CUUA_ONOA_CGMB_ONOB_RK5
8933 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
8934 real(RKG) ,
intent(inout) ,
contiguous :: matB(:,:)
8935 real(RKG) ,
intent(in) ,
optional :: alpha
8936 type(upperUnit_type) ,
intent(in) :: classA
8937 type(nothing_type) ,
intent(in) :: operationA
8942 PURE module subroutine trmm_ASS_CUUA_ONOA_CGMB_ONOB_RK4(matA, classA, operationA, matB, alpha)
8943#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8944 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CUUA_ONOA_CGMB_ONOB_RK4
8947 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
8948 real(RKG) ,
intent(inout) ,
contiguous :: matB(:,:)
8949 real(RKG) ,
intent(in) ,
optional :: alpha
8950 type(upperUnit_type) ,
intent(in) :: classA
8951 type(nothing_type) ,
intent(in) :: operationA
8956 PURE module subroutine trmm_ASS_CUUA_ONOA_CGMB_ONOB_RK3(matA, classA, operationA, matB, alpha)
8957#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8958 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CUUA_ONOA_CGMB_ONOB_RK3
8961 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
8962 real(RKG) ,
intent(inout) ,
contiguous :: matB(:,:)
8963 real(RKG) ,
intent(in) ,
optional :: alpha
8964 type(upperUnit_type) ,
intent(in) :: classA
8965 type(nothing_type) ,
intent(in) :: operationA
8970 PURE module subroutine trmm_ASS_CUUA_ONOA_CGMB_ONOB_RK2(matA, classA, operationA, matB, alpha)
8971#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8972 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CUUA_ONOA_CGMB_ONOB_RK2
8975 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
8976 real(RKG) ,
intent(inout) ,
contiguous :: matB(:,:)
8977 real(RKG) ,
intent(in) ,
optional :: alpha
8978 type(upperUnit_type) ,
intent(in) :: classA
8979 type(nothing_type) ,
intent(in) :: operationA
8984 PURE module subroutine trmm_ASS_CUUA_ONOA_CGMB_ONOB_RK1(matA, classA, operationA, matB, alpha)
8985#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8986 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CUUA_ONOA_CGMB_ONOB_RK1
8989 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
8990 real(RKG) ,
intent(inout) ,
contiguous :: matB(:,:)
8991 real(RKG) ,
intent(in) ,
optional :: alpha
8992 type(upperUnit_type) ,
intent(in) :: classA
8993 type(nothing_type) ,
intent(in) :: operationA
9006 PURE module subroutine trmm_ASS_CUUA_OTSA_CGMB_ONOB_CK5(matA, classA, operationA, matB, alpha)
9007#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9008 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CUUA_OTSA_CGMB_ONOB_CK5
9011 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
9012 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:,:)
9013 complex(CKG) ,
intent(in) ,
optional :: alpha
9014 type(upperUnit_type) ,
intent(in) :: classA
9015 type(transSymm_type) ,
intent(in) :: operationA
9020 PURE module subroutine trmm_ASS_CUUA_OTSA_CGMB_ONOB_CK4(matA, classA, operationA, matB, alpha)
9021#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9022 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CUUA_OTSA_CGMB_ONOB_CK4
9025 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
9026 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:,:)
9027 complex(CKG) ,
intent(in) ,
optional :: alpha
9028 type(upperUnit_type) ,
intent(in) :: classA
9029 type(transSymm_type) ,
intent(in) :: operationA
9034 PURE module subroutine trmm_ASS_CUUA_OTSA_CGMB_ONOB_CK3(matA, classA, operationA, matB, alpha)
9035#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9036 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CUUA_OTSA_CGMB_ONOB_CK3
9039 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
9040 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:,:)
9041 complex(CKG) ,
intent(in) ,
optional :: alpha
9042 type(upperUnit_type) ,
intent(in) :: classA
9043 type(transSymm_type) ,
intent(in) :: operationA
9048 PURE module subroutine trmm_ASS_CUUA_OTSA_CGMB_ONOB_CK2(matA, classA, operationA, matB, alpha)
9049#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9050 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CUUA_OTSA_CGMB_ONOB_CK2
9053 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
9054 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:,:)
9055 complex(CKG) ,
intent(in) ,
optional :: alpha
9056 type(upperUnit_type) ,
intent(in) :: classA
9057 type(transSymm_type) ,
intent(in) :: operationA
9062 PURE module subroutine trmm_ASS_CUUA_OTSA_CGMB_ONOB_CK1(matA, classA, operationA, matB, alpha)
9063#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9064 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CUUA_OTSA_CGMB_ONOB_CK1
9067 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
9068 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:,:)
9069 complex(CKG) ,
intent(in) ,
optional :: alpha
9070 type(upperUnit_type) ,
intent(in) :: classA
9071 type(transSymm_type) ,
intent(in) :: operationA
9078 PURE module subroutine trmm_ASS_CUUA_OTSA_CGMB_ONOB_RK5(matA, classA, operationA, matB, alpha)
9079#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9080 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CUUA_OTSA_CGMB_ONOB_RK5
9083 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
9084 real(RKG) ,
intent(inout) ,
contiguous :: matB(:,:)
9085 real(RKG) ,
intent(in) ,
optional :: alpha
9086 type(upperUnit_type) ,
intent(in) :: classA
9087 type(transSymm_type) ,
intent(in) :: operationA
9092 PURE module subroutine trmm_ASS_CUUA_OTSA_CGMB_ONOB_RK4(matA, classA, operationA, matB, alpha)
9093#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9094 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CUUA_OTSA_CGMB_ONOB_RK4
9097 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
9098 real(RKG) ,
intent(inout) ,
contiguous :: matB(:,:)
9099 real(RKG) ,
intent(in) ,
optional :: alpha
9100 type(upperUnit_type) ,
intent(in) :: classA
9101 type(transSymm_type) ,
intent(in) :: operationA
9106 PURE module subroutine trmm_ASS_CUUA_OTSA_CGMB_ONOB_RK3(matA, classA, operationA, matB, alpha)
9107#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9108 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CUUA_OTSA_CGMB_ONOB_RK3
9111 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
9112 real(RKG) ,
intent(inout) ,
contiguous :: matB(:,:)
9113 real(RKG) ,
intent(in) ,
optional :: alpha
9114 type(upperUnit_type) ,
intent(in) :: classA
9115 type(transSymm_type) ,
intent(in) :: operationA
9120 PURE module subroutine trmm_ASS_CUUA_OTSA_CGMB_ONOB_RK2(matA, classA, operationA, matB, alpha)
9121#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9122 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CUUA_OTSA_CGMB_ONOB_RK2
9125 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
9126 real(RKG) ,
intent(inout) ,
contiguous :: matB(:,:)
9127 real(RKG) ,
intent(in) ,
optional :: alpha
9128 type(upperUnit_type) ,
intent(in) :: classA
9129 type(transSymm_type) ,
intent(in) :: operationA
9134 PURE module subroutine trmm_ASS_CUUA_OTSA_CGMB_ONOB_RK1(matA, classA, operationA, matB, alpha)
9135#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9136 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CUUA_OTSA_CGMB_ONOB_RK1
9139 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
9140 real(RKG) ,
intent(inout) ,
contiguous :: matB(:,:)
9141 real(RKG) ,
intent(in) ,
optional :: alpha
9142 type(upperUnit_type) ,
intent(in) :: classA
9143 type(transSymm_type) ,
intent(in) :: operationA
9156 PURE module subroutine trmm_ASS_CUUA_OTHA_CGMB_ONOB_CK5(matA, classA, operationA, matB, alpha)
9157#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9158 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CUUA_OTHA_CGMB_ONOB_CK5
9161 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
9162 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:,:)
9163 complex(CKG) ,
intent(in) ,
optional :: alpha
9164 type(upperUnit_type) ,
intent(in) :: classA
9165 type(transHerm_type) ,
intent(in) :: operationA
9170 PURE module subroutine trmm_ASS_CUUA_OTHA_CGMB_ONOB_CK4(matA, classA, operationA, matB, alpha)
9171#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9172 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CUUA_OTHA_CGMB_ONOB_CK4
9175 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
9176 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:,:)
9177 complex(CKG) ,
intent(in) ,
optional :: alpha
9178 type(upperUnit_type) ,
intent(in) :: classA
9179 type(transHerm_type) ,
intent(in) :: operationA
9184 PURE module subroutine trmm_ASS_CUUA_OTHA_CGMB_ONOB_CK3(matA, classA, operationA, matB, alpha)
9185#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9186 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CUUA_OTHA_CGMB_ONOB_CK3
9189 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
9190 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:,:)
9191 complex(CKG) ,
intent(in) ,
optional :: alpha
9192 type(upperUnit_type) ,
intent(in) :: classA
9193 type(transHerm_type) ,
intent(in) :: operationA
9198 PURE module subroutine trmm_ASS_CUUA_OTHA_CGMB_ONOB_CK2(matA, classA, operationA, matB, alpha)
9199#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9200 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CUUA_OTHA_CGMB_ONOB_CK2
9203 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
9204 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:,:)
9205 complex(CKG) ,
intent(in) ,
optional :: alpha
9206 type(upperUnit_type) ,
intent(in) :: classA
9207 type(transHerm_type) ,
intent(in) :: operationA
9212 PURE module subroutine trmm_ASS_CUUA_OTHA_CGMB_ONOB_CK1(matA, classA, operationA, matB, alpha)
9213#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9214 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CUUA_OTHA_CGMB_ONOB_CK1
9217 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
9218 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:,:)
9219 complex(CKG) ,
intent(in) ,
optional :: alpha
9220 type(upperUnit_type) ,
intent(in) :: classA
9221 type(transHerm_type) ,
intent(in) :: operationA
9228 PURE module subroutine trmm_ASS_CUUA_OTHA_CGMB_ONOB_RK5(matA, classA, operationA, matB, alpha)
9229#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9230 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CUUA_OTHA_CGMB_ONOB_RK5
9233 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
9234 real(RKG) ,
intent(inout) ,
contiguous :: matB(:,:)
9235 real(RKG) ,
intent(in) ,
optional :: alpha
9236 type(upperUnit_type) ,
intent(in) :: classA
9237 type(transHerm_type) ,
intent(in) :: operationA
9242 PURE module subroutine trmm_ASS_CUUA_OTHA_CGMB_ONOB_RK4(matA, classA, operationA, matB, alpha)
9243#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9244 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CUUA_OTHA_CGMB_ONOB_RK4
9247 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
9248 real(RKG) ,
intent(inout) ,
contiguous :: matB(:,:)
9249 real(RKG) ,
intent(in) ,
optional :: alpha
9250 type(upperUnit_type) ,
intent(in) :: classA
9251 type(transHerm_type) ,
intent(in) :: operationA
9256 PURE module subroutine trmm_ASS_CUUA_OTHA_CGMB_ONOB_RK3(matA, classA, operationA, matB, alpha)
9257#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9258 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CUUA_OTHA_CGMB_ONOB_RK3
9261 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
9262 real(RKG) ,
intent(inout) ,
contiguous :: matB(:,:)
9263 real(RKG) ,
intent(in) ,
optional :: alpha
9264 type(upperUnit_type) ,
intent(in) :: classA
9265 type(transHerm_type) ,
intent(in) :: operationA
9270 PURE module subroutine trmm_ASS_CUUA_OTHA_CGMB_ONOB_RK2(matA, classA, operationA, matB, alpha)
9271#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9272 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CUUA_OTHA_CGMB_ONOB_RK2
9275 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
9276 real(RKG) ,
intent(inout) ,
contiguous :: matB(:,:)
9277 real(RKG) ,
intent(in) ,
optional :: alpha
9278 type(upperUnit_type) ,
intent(in) :: classA
9279 type(transHerm_type) ,
intent(in) :: operationA
9284 PURE module subroutine trmm_ASS_CUUA_OTHA_CGMB_ONOB_RK1(matA, classA, operationA, matB, alpha)
9285#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9286 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CUUA_OTHA_CGMB_ONOB_RK1
9289 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
9290 real(RKG) ,
intent(inout) ,
contiguous :: matB(:,:)
9291 real(RKG) ,
intent(in) ,
optional :: alpha
9292 type(upperUnit_type) ,
intent(in) :: classA
9293 type(transHerm_type) ,
intent(in) :: operationA
9314 PURE module subroutine trmm_ASS_CGMA_ONOA_CLDB_ONOB_CK5(matA, matB, classB, operationB, alpha)
9315#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9316 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CGMA_ONOA_CLDB_ONOB_CK5
9319 complex(CKG) ,
intent(inout) ,
contiguous :: matA(:,:)
9320 complex(CKG) ,
intent(in) ,
contiguous :: matB(:,:)
9321 complex(CKG) ,
intent(in) ,
optional :: alpha
9322 type(lowerDiag_type) ,
intent(in) :: classB
9323 type(nothing_type) ,
intent(in) :: operationB
9328 PURE module subroutine trmm_ASS_CGMA_ONOA_CLDB_ONOB_CK4(matA, matB, classB, operationB, alpha)
9329#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9330 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CGMA_ONOA_CLDB_ONOB_CK4
9333 complex(CKG) ,
intent(inout) ,
contiguous :: matA(:,:)
9334 complex(CKG) ,
intent(in) ,
contiguous :: matB(:,:)
9335 complex(CKG) ,
intent(in) ,
optional :: alpha
9336 type(lowerDiag_type) ,
intent(in) :: classB
9337 type(nothing_type) ,
intent(in) :: operationB
9342 PURE module subroutine trmm_ASS_CGMA_ONOA_CLDB_ONOB_CK3(matA, matB, classB, operationB, alpha)
9343#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9344 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CGMA_ONOA_CLDB_ONOB_CK3
9347 complex(CKG) ,
intent(inout) ,
contiguous :: matA(:,:)
9348 complex(CKG) ,
intent(in) ,
contiguous :: matB(:,:)
9349 complex(CKG) ,
intent(in) ,
optional :: alpha
9350 type(lowerDiag_type) ,
intent(in) :: classB
9351 type(nothing_type) ,
intent(in) :: operationB
9356 PURE module subroutine trmm_ASS_CGMA_ONOA_CLDB_ONOB_CK2(matA, matB, classB, operationB, alpha)
9357#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9358 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CGMA_ONOA_CLDB_ONOB_CK2
9361 complex(CKG) ,
intent(inout) ,
contiguous :: matA(:,:)
9362 complex(CKG) ,
intent(in) ,
contiguous :: matB(:,:)
9363 complex(CKG) ,
intent(in) ,
optional :: alpha
9364 type(lowerDiag_type) ,
intent(in) :: classB
9365 type(nothing_type) ,
intent(in) :: operationB
9370 PURE module subroutine trmm_ASS_CGMA_ONOA_CLDB_ONOB_CK1(matA, matB, classB, operationB, alpha)
9371#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9372 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CGMA_ONOA_CLDB_ONOB_CK1
9375 complex(CKG) ,
intent(inout) ,
contiguous :: matA(:,:)
9376 complex(CKG) ,
intent(in) ,
contiguous :: matB(:,:)
9377 complex(CKG) ,
intent(in) ,
optional :: alpha
9378 type(lowerDiag_type) ,
intent(in) :: classB
9379 type(nothing_type) ,
intent(in) :: operationB
9386 PURE module subroutine trmm_ASS_CGMA_ONOA_CLDB_ONOB_RK5(matA, matB, classB, operationB, alpha)
9387#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9388 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CGMA_ONOA_CLDB_ONOB_RK5
9391 real(RKG) ,
intent(inout) ,
contiguous :: matA(:,:)
9392 real(RKG) ,
intent(in) ,
contiguous :: matB(:,:)
9393 real(RKG) ,
intent(in) ,
optional :: alpha
9394 type(lowerDiag_type) ,
intent(in) :: classB
9395 type(nothing_type) ,
intent(in) :: operationB
9400 PURE module subroutine trmm_ASS_CGMA_ONOA_CLDB_ONOB_RK4(matA, matB, classB, operationB, alpha)
9401#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9402 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CGMA_ONOA_CLDB_ONOB_RK4
9405 real(RKG) ,
intent(inout) ,
contiguous :: matA(:,:)
9406 real(RKG) ,
intent(in) ,
contiguous :: matB(:,:)
9407 real(RKG) ,
intent(in) ,
optional :: alpha
9408 type(lowerDiag_type) ,
intent(in) :: classB
9409 type(nothing_type) ,
intent(in) :: operationB
9414 PURE module subroutine trmm_ASS_CGMA_ONOA_CLDB_ONOB_RK3(matA, matB, classB, operationB, alpha)
9415#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9416 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CGMA_ONOA_CLDB_ONOB_RK3
9419 real(RKG) ,
intent(inout) ,
contiguous :: matA(:,:)
9420 real(RKG) ,
intent(in) ,
contiguous :: matB(:,:)
9421 real(RKG) ,
intent(in) ,
optional :: alpha
9422 type(lowerDiag_type) ,
intent(in) :: classB
9423 type(nothing_type) ,
intent(in) :: operationB
9428 PURE module subroutine trmm_ASS_CGMA_ONOA_CLDB_ONOB_RK2(matA, matB, classB, operationB, alpha)
9429#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9430 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CGMA_ONOA_CLDB_ONOB_RK2
9433 real(RKG) ,
intent(inout) ,
contiguous :: matA(:,:)
9434 real(RKG) ,
intent(in) ,
contiguous :: matB(:,:)
9435 real(RKG) ,
intent(in) ,
optional :: alpha
9436 type(lowerDiag_type) ,
intent(in) :: classB
9437 type(nothing_type) ,
intent(in) :: operationB
9442 PURE module subroutine trmm_ASS_CGMA_ONOA_CLDB_ONOB_RK1(matA, matB, classB, operationB, alpha)
9443#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9444 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CGMA_ONOA_CLDB_ONOB_RK1
9447 real(RKG) ,
intent(inout) ,
contiguous :: matA(:,:)
9448 real(RKG) ,
intent(in) ,
contiguous :: matB(:,:)
9449 real(RKG) ,
intent(in) ,
optional :: alpha
9450 type(lowerDiag_type) ,
intent(in) :: classB
9451 type(nothing_type) ,
intent(in) :: operationB
9464 PURE module subroutine trmm_ASS_CGMA_ONOA_CLDB_OTSB_CK5(matA, matB, classB, operationB, alpha)
9465#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9466 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CGMA_ONOA_CLDB_OTSB_CK5
9469 complex(CKG) ,
intent(inout) ,
contiguous :: matA(:,:)
9470 complex(CKG) ,
intent(in) ,
contiguous :: matB(:,:)
9471 complex(CKG) ,
intent(in) ,
optional :: alpha
9472 type(lowerDiag_type) ,
intent(in) :: classB
9473 type(transSymm_type) ,
intent(in) :: operationB
9478 PURE module subroutine trmm_ASS_CGMA_ONOA_CLDB_OTSB_CK4(matA, matB, classB, operationB, alpha)
9479#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9480 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CGMA_ONOA_CLDB_OTSB_CK4
9483 complex(CKG) ,
intent(inout) ,
contiguous :: matA(:,:)
9484 complex(CKG) ,
intent(in) ,
contiguous :: matB(:,:)
9485 complex(CKG) ,
intent(in) ,
optional :: alpha
9486 type(lowerDiag_type) ,
intent(in) :: classB
9487 type(transSymm_type) ,
intent(in) :: operationB
9492 PURE module subroutine trmm_ASS_CGMA_ONOA_CLDB_OTSB_CK3(matA, matB, classB, operationB, alpha)
9493#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9494 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CGMA_ONOA_CLDB_OTSB_CK3
9497 complex(CKG) ,
intent(inout) ,
contiguous :: matA(:,:)
9498 complex(CKG) ,
intent(in) ,
contiguous :: matB(:,:)
9499 complex(CKG) ,
intent(in) ,
optional :: alpha
9500 type(lowerDiag_type) ,
intent(in) :: classB
9501 type(transSymm_type) ,
intent(in) :: operationB
9506 PURE module subroutine trmm_ASS_CGMA_ONOA_CLDB_OTSB_CK2(matA, matB, classB, operationB, alpha)
9507#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9508 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CGMA_ONOA_CLDB_OTSB_CK2
9511 complex(CKG) ,
intent(inout) ,
contiguous :: matA(:,:)
9512 complex(CKG) ,
intent(in) ,
contiguous :: matB(:,:)
9513 complex(CKG) ,
intent(in) ,
optional :: alpha
9514 type(lowerDiag_type) ,
intent(in) :: classB
9515 type(transSymm_type) ,
intent(in) :: operationB
9520 PURE module subroutine trmm_ASS_CGMA_ONOA_CLDB_OTSB_CK1(matA, matB, classB, operationB, alpha)
9521#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9522 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CGMA_ONOA_CLDB_OTSB_CK1
9525 complex(CKG) ,
intent(inout) ,
contiguous :: matA(:,:)
9526 complex(CKG) ,
intent(in) ,
contiguous :: matB(:,:)
9527 complex(CKG) ,
intent(in) ,
optional :: alpha
9528 type(lowerDiag_type) ,
intent(in) :: classB
9529 type(transSymm_type) ,
intent(in) :: operationB
9536 PURE module subroutine trmm_ASS_CGMA_ONOA_CLDB_OTSB_RK5(matA, matB, classB, operationB, alpha)
9537#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9538 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CGMA_ONOA_CLDB_OTSB_RK5
9541 real(RKG) ,
intent(inout) ,
contiguous :: matA(:,:)
9542 real(RKG) ,
intent(in) ,
contiguous :: matB(:,:)
9543 real(RKG) ,
intent(in) ,
optional :: alpha
9544 type(lowerDiag_type) ,
intent(in) :: classB
9545 type(transSymm_type) ,
intent(in) :: operationB
9550 PURE module subroutine trmm_ASS_CGMA_ONOA_CLDB_OTSB_RK4(matA, matB, classB, operationB, alpha)
9551#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9552 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CGMA_ONOA_CLDB_OTSB_RK4
9555 real(RKG) ,
intent(inout) ,
contiguous :: matA(:,:)
9556 real(RKG) ,
intent(in) ,
contiguous :: matB(:,:)
9557 real(RKG) ,
intent(in) ,
optional :: alpha
9558 type(lowerDiag_type) ,
intent(in) :: classB
9559 type(transSymm_type) ,
intent(in) :: operationB
9564 PURE module subroutine trmm_ASS_CGMA_ONOA_CLDB_OTSB_RK3(matA, matB, classB, operationB, alpha)
9565#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9566 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CGMA_ONOA_CLDB_OTSB_RK3
9569 real(RKG) ,
intent(inout) ,
contiguous :: matA(:,:)
9570 real(RKG) ,
intent(in) ,
contiguous :: matB(:,:)
9571 real(RKG) ,
intent(in) ,
optional :: alpha
9572 type(lowerDiag_type) ,
intent(in) :: classB
9573 type(transSymm_type) ,
intent(in) :: operationB
9578 PURE module subroutine trmm_ASS_CGMA_ONOA_CLDB_OTSB_RK2(matA, matB, classB, operationB, alpha)
9579#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9580 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CGMA_ONOA_CLDB_OTSB_RK2
9583 real(RKG) ,
intent(inout) ,
contiguous :: matA(:,:)
9584 real(RKG) ,
intent(in) ,
contiguous :: matB(:,:)
9585 real(RKG) ,
intent(in) ,
optional :: alpha
9586 type(lowerDiag_type) ,
intent(in) :: classB
9587 type(transSymm_type) ,
intent(in) :: operationB
9592 PURE module subroutine trmm_ASS_CGMA_ONOA_CLDB_OTSB_RK1(matA, matB, classB, operationB, alpha)
9593#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9594 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CGMA_ONOA_CLDB_OTSB_RK1
9597 real(RKG) ,
intent(inout) ,
contiguous :: matA(:,:)
9598 real(RKG) ,
intent(in) ,
contiguous :: matB(:,:)
9599 real(RKG) ,
intent(in) ,
optional :: alpha
9600 type(lowerDiag_type) ,
intent(in) :: classB
9601 type(transSymm_type) ,
intent(in) :: operationB
9614 PURE module subroutine trmm_ASS_CGMA_ONOA_CLDB_OTHB_CK5(matA, matB, classB, operationB, alpha)
9615#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9616 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CGMA_ONOA_CLDB_OTHB_CK5
9619 complex(CKG) ,
intent(inout) ,
contiguous :: matA(:,:)
9620 complex(CKG) ,
intent(in) ,
contiguous :: matB(:,:)
9621 complex(CKG) ,
intent(in) ,
optional :: alpha
9622 type(lowerDiag_type) ,
intent(in) :: classB
9623 type(transHerm_type) ,
intent(in) :: operationB
9628 PURE module subroutine trmm_ASS_CGMA_ONOA_CLDB_OTHB_CK4(matA, matB, classB, operationB, alpha)
9629#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9630 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CGMA_ONOA_CLDB_OTHB_CK4
9633 complex(CKG) ,
intent(inout) ,
contiguous :: matA(:,:)
9634 complex(CKG) ,
intent(in) ,
contiguous :: matB(:,:)
9635 complex(CKG) ,
intent(in) ,
optional :: alpha
9636 type(lowerDiag_type) ,
intent(in) :: classB
9637 type(transHerm_type) ,
intent(in) :: operationB
9642 PURE module subroutine trmm_ASS_CGMA_ONOA_CLDB_OTHB_CK3(matA, matB, classB, operationB, alpha)
9643#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9644 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CGMA_ONOA_CLDB_OTHB_CK3
9647 complex(CKG) ,
intent(inout) ,
contiguous :: matA(:,:)
9648 complex(CKG) ,
intent(in) ,
contiguous :: matB(:,:)
9649 complex(CKG) ,
intent(in) ,
optional :: alpha
9650 type(lowerDiag_type) ,
intent(in) :: classB
9651 type(transHerm_type) ,
intent(in) :: operationB
9656 PURE module subroutine trmm_ASS_CGMA_ONOA_CLDB_OTHB_CK2(matA, matB, classB, operationB, alpha)
9657#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9658 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CGMA_ONOA_CLDB_OTHB_CK2
9661 complex(CKG) ,
intent(inout) ,
contiguous :: matA(:,:)
9662 complex(CKG) ,
intent(in) ,
contiguous :: matB(:,:)
9663 complex(CKG) ,
intent(in) ,
optional :: alpha
9664 type(lowerDiag_type) ,
intent(in) :: classB
9665 type(transHerm_type) ,
intent(in) :: operationB
9670 PURE module subroutine trmm_ASS_CGMA_ONOA_CLDB_OTHB_CK1(matA, matB, classB, operationB, alpha)
9671#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9672 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CGMA_ONOA_CLDB_OTHB_CK1
9675 complex(CKG) ,
intent(inout) ,
contiguous :: matA(:,:)
9676 complex(CKG) ,
intent(in) ,
contiguous :: matB(:,:)
9677 complex(CKG) ,
intent(in) ,
optional :: alpha
9678 type(lowerDiag_type) ,
intent(in) :: classB
9679 type(transHerm_type) ,
intent(in) :: operationB
9686 PURE module subroutine trmm_ASS_CGMA_ONOA_CLDB_OTHB_RK5(matA, matB, classB, operationB, alpha)
9687#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9688 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CGMA_ONOA_CLDB_OTHB_RK5
9691 real(RKG) ,
intent(inout) ,
contiguous :: matA(:,:)
9692 real(RKG) ,
intent(in) ,
contiguous :: matB(:,:)
9693 real(RKG) ,
intent(in) ,
optional :: alpha
9694 type(lowerDiag_type) ,
intent(in) :: classB
9695 type(transHerm_type) ,
intent(in) :: operationB
9700 PURE module subroutine trmm_ASS_CGMA_ONOA_CLDB_OTHB_RK4(matA, matB, classB, operationB, alpha)
9701#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9702 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CGMA_ONOA_CLDB_OTHB_RK4
9705 real(RKG) ,
intent(inout) ,
contiguous :: matA(:,:)
9706 real(RKG) ,
intent(in) ,
contiguous :: matB(:,:)
9707 real(RKG) ,
intent(in) ,
optional :: alpha
9708 type(lowerDiag_type) ,
intent(in) :: classB
9709 type(transHerm_type) ,
intent(in) :: operationB
9714 PURE module subroutine trmm_ASS_CGMA_ONOA_CLDB_OTHB_RK3(matA, matB, classB, operationB, alpha)
9715#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9716 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CGMA_ONOA_CLDB_OTHB_RK3
9719 real(RKG) ,
intent(inout) ,
contiguous :: matA(:,:)
9720 real(RKG) ,
intent(in) ,
contiguous :: matB(:,:)
9721 real(RKG) ,
intent(in) ,
optional :: alpha
9722 type(lowerDiag_type) ,
intent(in) :: classB
9723 type(transHerm_type) ,
intent(in) :: operationB
9728 PURE module subroutine trmm_ASS_CGMA_ONOA_CLDB_OTHB_RK2(matA, matB, classB, operationB, alpha)
9729#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9730 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CGMA_ONOA_CLDB_OTHB_RK2
9733 real(RKG) ,
intent(inout) ,
contiguous :: matA(:,:)
9734 real(RKG) ,
intent(in) ,
contiguous :: matB(:,:)
9735 real(RKG) ,
intent(in) ,
optional :: alpha
9736 type(lowerDiag_type) ,
intent(in) :: classB
9737 type(transHerm_type) ,
intent(in) :: operationB
9742 PURE module subroutine trmm_ASS_CGMA_ONOA_CLDB_OTHB_RK1(matA, matB, classB, operationB, alpha)
9743#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9744 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CGMA_ONOA_CLDB_OTHB_RK1
9747 real(RKG) ,
intent(inout) ,
contiguous :: matA(:,:)
9748 real(RKG) ,
intent(in) ,
contiguous :: matB(:,:)
9749 real(RKG) ,
intent(in) ,
optional :: alpha
9750 type(lowerDiag_type) ,
intent(in) :: classB
9751 type(transHerm_type) ,
intent(in) :: operationB
9768 PURE module subroutine trmm_ASS_CGMA_ONOA_CUDB_ONOB_CK5(matA, matB, classB, operationB, alpha)
9769#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9770 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CGMA_ONOA_CUDB_ONOB_CK5
9773 complex(CKG) ,
intent(inout) ,
contiguous :: matA(:,:)
9774 complex(CKG) ,
intent(in) ,
contiguous :: matB(:,:)
9775 complex(CKG) ,
intent(in) ,
optional :: alpha
9776 type(upperDiag_type) ,
intent(in) :: classB
9777 type(nothing_type) ,
intent(in) :: operationB
9782 PURE module subroutine trmm_ASS_CGMA_ONOA_CUDB_ONOB_CK4(matA, matB, classB, operationB, alpha)
9783#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9784 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CGMA_ONOA_CUDB_ONOB_CK4
9787 complex(CKG) ,
intent(inout) ,
contiguous :: matA(:,:)
9788 complex(CKG) ,
intent(in) ,
contiguous :: matB(:,:)
9789 complex(CKG) ,
intent(in) ,
optional :: alpha
9790 type(upperDiag_type) ,
intent(in) :: classB
9791 type(nothing_type) ,
intent(in) :: operationB
9796 PURE module subroutine trmm_ASS_CGMA_ONOA_CUDB_ONOB_CK3(matA, matB, classB, operationB, alpha)
9797#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9798 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CGMA_ONOA_CUDB_ONOB_CK3
9801 complex(CKG) ,
intent(inout) ,
contiguous :: matA(:,:)
9802 complex(CKG) ,
intent(in) ,
contiguous :: matB(:,:)
9803 complex(CKG) ,
intent(in) ,
optional :: alpha
9804 type(upperDiag_type) ,
intent(in) :: classB
9805 type(nothing_type) ,
intent(in) :: operationB
9810 PURE module subroutine trmm_ASS_CGMA_ONOA_CUDB_ONOB_CK2(matA, matB, classB, operationB, alpha)
9811#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9812 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CGMA_ONOA_CUDB_ONOB_CK2
9815 complex(CKG) ,
intent(inout) ,
contiguous :: matA(:,:)
9816 complex(CKG) ,
intent(in) ,
contiguous :: matB(:,:)
9817 complex(CKG) ,
intent(in) ,
optional :: alpha
9818 type(upperDiag_type) ,
intent(in) :: classB
9819 type(nothing_type) ,
intent(in) :: operationB
9824 PURE module subroutine trmm_ASS_CGMA_ONOA_CUDB_ONOB_CK1(matA, matB, classB, operationB, alpha)
9825#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9826 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CGMA_ONOA_CUDB_ONOB_CK1
9829 complex(CKG) ,
intent(inout) ,
contiguous :: matA(:,:)
9830 complex(CKG) ,
intent(in) ,
contiguous :: matB(:,:)
9831 complex(CKG) ,
intent(in) ,
optional :: alpha
9832 type(upperDiag_type) ,
intent(in) :: classB
9833 type(nothing_type) ,
intent(in) :: operationB
9840 PURE module subroutine trmm_ASS_CGMA_ONOA_CUDB_ONOB_RK5(matA, matB, classB, operationB, alpha)
9841#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9842 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CGMA_ONOA_CUDB_ONOB_RK5
9845 real(RKG) ,
intent(inout) ,
contiguous :: matA(:,:)
9846 real(RKG) ,
intent(in) ,
contiguous :: matB(:,:)
9847 real(RKG) ,
intent(in) ,
optional :: alpha
9848 type(upperDiag_type) ,
intent(in) :: classB
9849 type(nothing_type) ,
intent(in) :: operationB
9854 PURE module subroutine trmm_ASS_CGMA_ONOA_CUDB_ONOB_RK4(matA, matB, classB, operationB, alpha)
9855#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9856 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CGMA_ONOA_CUDB_ONOB_RK4
9859 real(RKG) ,
intent(inout) ,
contiguous :: matA(:,:)
9860 real(RKG) ,
intent(in) ,
contiguous :: matB(:,:)
9861 real(RKG) ,
intent(in) ,
optional :: alpha
9862 type(upperDiag_type) ,
intent(in) :: classB
9863 type(nothing_type) ,
intent(in) :: operationB
9868 PURE module subroutine trmm_ASS_CGMA_ONOA_CUDB_ONOB_RK3(matA, matB, classB, operationB, alpha)
9869#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9870 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CGMA_ONOA_CUDB_ONOB_RK3
9873 real(RKG) ,
intent(inout) ,
contiguous :: matA(:,:)
9874 real(RKG) ,
intent(in) ,
contiguous :: matB(:,:)
9875 real(RKG) ,
intent(in) ,
optional :: alpha
9876 type(upperDiag_type) ,
intent(in) :: classB
9877 type(nothing_type) ,
intent(in) :: operationB
9882 PURE module subroutine trmm_ASS_CGMA_ONOA_CUDB_ONOB_RK2(matA, matB, classB, operationB, alpha)
9883#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9884 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CGMA_ONOA_CUDB_ONOB_RK2
9887 real(RKG) ,
intent(inout) ,
contiguous :: matA(:,:)
9888 real(RKG) ,
intent(in) ,
contiguous :: matB(:,:)
9889 real(RKG) ,
intent(in) ,
optional :: alpha
9890 type(upperDiag_type) ,
intent(in) :: classB
9891 type(nothing_type) ,
intent(in) :: operationB
9896 PURE module subroutine trmm_ASS_CGMA_ONOA_CUDB_ONOB_RK1(matA, matB, classB, operationB, alpha)
9897#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9898 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CGMA_ONOA_CUDB_ONOB_RK1
9901 real(RKG) ,
intent(inout) ,
contiguous :: matA(:,:)
9902 real(RKG) ,
intent(in) ,
contiguous :: matB(:,:)
9903 real(RKG) ,
intent(in) ,
optional :: alpha
9904 type(upperDiag_type) ,
intent(in) :: classB
9905 type(nothing_type) ,
intent(in) :: operationB
9918 PURE module subroutine trmm_ASS_CGMA_ONOA_CUDB_OTSB_CK5(matA, matB, classB, operationB, alpha)
9919#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9920 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CGMA_ONOA_CUDB_OTSB_CK5
9923 complex(CKG) ,
intent(inout) ,
contiguous :: matA(:,:)
9924 complex(CKG) ,
intent(in) ,
contiguous :: matB(:,:)
9925 complex(CKG) ,
intent(in) ,
optional :: alpha
9926 type(upperDiag_type) ,
intent(in) :: classB
9927 type(transSymm_type) ,
intent(in) :: operationB
9932 PURE module subroutine trmm_ASS_CGMA_ONOA_CUDB_OTSB_CK4(matA, matB, classB, operationB, alpha)
9933#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9934 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CGMA_ONOA_CUDB_OTSB_CK4
9937 complex(CKG) ,
intent(inout) ,
contiguous :: matA(:,:)
9938 complex(CKG) ,
intent(in) ,
contiguous :: matB(:,:)
9939 complex(CKG) ,
intent(in) ,
optional :: alpha
9940 type(upperDiag_type) ,
intent(in) :: classB
9941 type(transSymm_type) ,
intent(in) :: operationB
9946 PURE module subroutine trmm_ASS_CGMA_ONOA_CUDB_OTSB_CK3(matA, matB, classB, operationB, alpha)
9947#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9948 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CGMA_ONOA_CUDB_OTSB_CK3
9951 complex(CKG) ,
intent(inout) ,
contiguous :: matA(:,:)
9952 complex(CKG) ,
intent(in) ,
contiguous :: matB(:,:)
9953 complex(CKG) ,
intent(in) ,
optional :: alpha
9954 type(upperDiag_type) ,
intent(in) :: classB
9955 type(transSymm_type) ,
intent(in) :: operationB
9960 PURE module subroutine trmm_ASS_CGMA_ONOA_CUDB_OTSB_CK2(matA, matB, classB, operationB, alpha)
9961#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9962 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CGMA_ONOA_CUDB_OTSB_CK2
9965 complex(CKG) ,
intent(inout) ,
contiguous :: matA(:,:)
9966 complex(CKG) ,
intent(in) ,
contiguous :: matB(:,:)
9967 complex(CKG) ,
intent(in) ,
optional :: alpha
9968 type(upperDiag_type) ,
intent(in) :: classB
9969 type(transSymm_type) ,
intent(in) :: operationB
9974 PURE module subroutine trmm_ASS_CGMA_ONOA_CUDB_OTSB_CK1(matA, matB, classB, operationB, alpha)
9975#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9976 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CGMA_ONOA_CUDB_OTSB_CK1
9979 complex(CKG) ,
intent(inout) ,
contiguous :: matA(:,:)
9980 complex(CKG) ,
intent(in) ,
contiguous :: matB(:,:)
9981 complex(CKG) ,
intent(in) ,
optional :: alpha
9982 type(upperDiag_type) ,
intent(in) :: classB
9983 type(transSymm_type) ,
intent(in) :: operationB
9990 PURE module subroutine trmm_ASS_CGMA_ONOA_CUDB_OTSB_RK5(matA, matB, classB, operationB, alpha)
9991#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9992 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CGMA_ONOA_CUDB_OTSB_RK5
9995 real(RKG) ,
intent(inout) ,
contiguous :: matA(:,:)
9996 real(RKG) ,
intent(in) ,
contiguous :: matB(:,:)
9997 real(RKG) ,
intent(in) ,
optional :: alpha
9998 type(upperDiag_type) ,
intent(in) :: classB
9999 type(transSymm_type) ,
intent(in) :: operationB
10004 PURE module subroutine trmm_ASS_CGMA_ONOA_CUDB_OTSB_RK4(matA, matB, classB, operationB, alpha)
10005#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10006 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CGMA_ONOA_CUDB_OTSB_RK4
10009 real(RKG) ,
intent(inout) ,
contiguous :: matA(:,:)
10010 real(RKG) ,
intent(in) ,
contiguous :: matB(:,:)
10011 real(RKG) ,
intent(in) ,
optional :: alpha
10012 type(upperDiag_type) ,
intent(in) :: classB
10013 type(transSymm_type) ,
intent(in) :: operationB
10018 PURE module subroutine trmm_ASS_CGMA_ONOA_CUDB_OTSB_RK3(matA, matB, classB, operationB, alpha)
10019#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10020 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CGMA_ONOA_CUDB_OTSB_RK3
10023 real(RKG) ,
intent(inout) ,
contiguous :: matA(:,:)
10024 real(RKG) ,
intent(in) ,
contiguous :: matB(:,:)
10025 real(RKG) ,
intent(in) ,
optional :: alpha
10026 type(upperDiag_type) ,
intent(in) :: classB
10027 type(transSymm_type) ,
intent(in) :: operationB
10032 PURE module subroutine trmm_ASS_CGMA_ONOA_CUDB_OTSB_RK2(matA, matB, classB, operationB, alpha)
10033#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10034 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CGMA_ONOA_CUDB_OTSB_RK2
10037 real(RKG) ,
intent(inout) ,
contiguous :: matA(:,:)
10038 real(RKG) ,
intent(in) ,
contiguous :: matB(:,:)
10039 real(RKG) ,
intent(in) ,
optional :: alpha
10040 type(upperDiag_type) ,
intent(in) :: classB
10041 type(transSymm_type) ,
intent(in) :: operationB
10046 PURE module subroutine trmm_ASS_CGMA_ONOA_CUDB_OTSB_RK1(matA, matB, classB, operationB, alpha)
10047#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10048 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CGMA_ONOA_CUDB_OTSB_RK1
10051 real(RKG) ,
intent(inout) ,
contiguous :: matA(:,:)
10052 real(RKG) ,
intent(in) ,
contiguous :: matB(:,:)
10053 real(RKG) ,
intent(in) ,
optional :: alpha
10054 type(upperDiag_type) ,
intent(in) :: classB
10055 type(transSymm_type) ,
intent(in) :: operationB
10068 PURE module subroutine trmm_ASS_CGMA_ONOA_CUDB_OTHB_CK5(matA, matB, classB, operationB, alpha)
10069#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10070 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CGMA_ONOA_CUDB_OTHB_CK5
10073 complex(CKG) ,
intent(inout) ,
contiguous :: matA(:,:)
10074 complex(CKG) ,
intent(in) ,
contiguous :: matB(:,:)
10075 complex(CKG) ,
intent(in) ,
optional :: alpha
10076 type(upperDiag_type) ,
intent(in) :: classB
10077 type(transHerm_type) ,
intent(in) :: operationB
10082 PURE module subroutine trmm_ASS_CGMA_ONOA_CUDB_OTHB_CK4(matA, matB, classB, operationB, alpha)
10083#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10084 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CGMA_ONOA_CUDB_OTHB_CK4
10087 complex(CKG) ,
intent(inout) ,
contiguous :: matA(:,:)
10088 complex(CKG) ,
intent(in) ,
contiguous :: matB(:,:)
10089 complex(CKG) ,
intent(in) ,
optional :: alpha
10090 type(upperDiag_type) ,
intent(in) :: classB
10091 type(transHerm_type) ,
intent(in) :: operationB
10096 PURE module subroutine trmm_ASS_CGMA_ONOA_CUDB_OTHB_CK3(matA, matB, classB, operationB, alpha)
10097#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10098 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CGMA_ONOA_CUDB_OTHB_CK3
10101 complex(CKG) ,
intent(inout) ,
contiguous :: matA(:,:)
10102 complex(CKG) ,
intent(in) ,
contiguous :: matB(:,:)
10103 complex(CKG) ,
intent(in) ,
optional :: alpha
10104 type(upperDiag_type) ,
intent(in) :: classB
10105 type(transHerm_type) ,
intent(in) :: operationB
10110 PURE module subroutine trmm_ASS_CGMA_ONOA_CUDB_OTHB_CK2(matA, matB, classB, operationB, alpha)
10111#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10112 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CGMA_ONOA_CUDB_OTHB_CK2
10115 complex(CKG) ,
intent(inout) ,
contiguous :: matA(:,:)
10116 complex(CKG) ,
intent(in) ,
contiguous :: matB(:,:)
10117 complex(CKG) ,
intent(in) ,
optional :: alpha
10118 type(upperDiag_type) ,
intent(in) :: classB
10119 type(transHerm_type) ,
intent(in) :: operationB
10124 PURE module subroutine trmm_ASS_CGMA_ONOA_CUDB_OTHB_CK1(matA, matB, classB, operationB, alpha)
10125#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10126 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CGMA_ONOA_CUDB_OTHB_CK1
10129 complex(CKG) ,
intent(inout) ,
contiguous :: matA(:,:)
10130 complex(CKG) ,
intent(in) ,
contiguous :: matB(:,:)
10131 complex(CKG) ,
intent(in) ,
optional :: alpha
10132 type(upperDiag_type) ,
intent(in) :: classB
10133 type(transHerm_type) ,
intent(in) :: operationB
10140 PURE module subroutine trmm_ASS_CGMA_ONOA_CUDB_OTHB_RK5(matA, matB, classB, operationB, alpha)
10141#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10142 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CGMA_ONOA_CUDB_OTHB_RK5
10145 real(RKG) ,
intent(inout) ,
contiguous :: matA(:,:)
10146 real(RKG) ,
intent(in) ,
contiguous :: matB(:,:)
10147 real(RKG) ,
intent(in) ,
optional :: alpha
10148 type(upperDiag_type) ,
intent(in) :: classB
10149 type(transHerm_type) ,
intent(in) :: operationB
10154 PURE module subroutine trmm_ASS_CGMA_ONOA_CUDB_OTHB_RK4(matA, matB, classB, operationB, alpha)
10155#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10156 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CGMA_ONOA_CUDB_OTHB_RK4
10159 real(RKG) ,
intent(inout) ,
contiguous :: matA(:,:)
10160 real(RKG) ,
intent(in) ,
contiguous :: matB(:,:)
10161 real(RKG) ,
intent(in) ,
optional :: alpha
10162 type(upperDiag_type) ,
intent(in) :: classB
10163 type(transHerm_type) ,
intent(in) :: operationB
10168 PURE module subroutine trmm_ASS_CGMA_ONOA_CUDB_OTHB_RK3(matA, matB, classB, operationB, alpha)
10169#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10170 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CGMA_ONOA_CUDB_OTHB_RK3
10173 real(RKG) ,
intent(inout) ,
contiguous :: matA(:,:)
10174 real(RKG) ,
intent(in) ,
contiguous :: matB(:,:)
10175 real(RKG) ,
intent(in) ,
optional :: alpha
10176 type(upperDiag_type) ,
intent(in) :: classB
10177 type(transHerm_type) ,
intent(in) :: operationB
10182 PURE module subroutine trmm_ASS_CGMA_ONOA_CUDB_OTHB_RK2(matA, matB, classB, operationB, alpha)
10183#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10184 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CGMA_ONOA_CUDB_OTHB_RK2
10187 real(RKG) ,
intent(inout) ,
contiguous :: matA(:,:)
10188 real(RKG) ,
intent(in) ,
contiguous :: matB(:,:)
10189 real(RKG) ,
intent(in) ,
optional :: alpha
10190 type(upperDiag_type) ,
intent(in) :: classB
10191 type(transHerm_type) ,
intent(in) :: operationB
10196 PURE module subroutine trmm_ASS_CGMA_ONOA_CUDB_OTHB_RK1(matA, matB, classB, operationB, alpha)
10197#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10198 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CGMA_ONOA_CUDB_OTHB_RK1
10201 real(RKG) ,
intent(inout) ,
contiguous :: matA(:,:)
10202 real(RKG) ,
intent(in) ,
contiguous :: matB(:,:)
10203 real(RKG) ,
intent(in) ,
optional :: alpha
10204 type(upperDiag_type) ,
intent(in) :: classB
10205 type(transHerm_type) ,
intent(in) :: operationB
10222 PURE module subroutine trmm_ASS_CGMA_ONOA_CLUB_ONOB_CK5(matA, matB, classB, operationB, alpha)
10223#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10224 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CGMA_ONOA_CLUB_ONOB_CK5
10227 complex(CKG) ,
intent(inout) ,
contiguous :: matA(:,:)
10228 complex(CKG) ,
intent(in) ,
contiguous :: matB(:,:)
10229 complex(CKG) ,
intent(in) ,
optional :: alpha
10230 type(lowerUnit_type) ,
intent(in) :: classB
10231 type(nothing_type) ,
intent(in) :: operationB
10236 PURE module subroutine trmm_ASS_CGMA_ONOA_CLUB_ONOB_CK4(matA, matB, classB, operationB, alpha)
10237#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10238 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CGMA_ONOA_CLUB_ONOB_CK4
10241 complex(CKG) ,
intent(inout) ,
contiguous :: matA(:,:)
10242 complex(CKG) ,
intent(in) ,
contiguous :: matB(:,:)
10243 complex(CKG) ,
intent(in) ,
optional :: alpha
10244 type(lowerUnit_type) ,
intent(in) :: classB
10245 type(nothing_type) ,
intent(in) :: operationB
10250 PURE module subroutine trmm_ASS_CGMA_ONOA_CLUB_ONOB_CK3(matA, matB, classB, operationB, alpha)
10251#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10252 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CGMA_ONOA_CLUB_ONOB_CK3
10255 complex(CKG) ,
intent(inout) ,
contiguous :: matA(:,:)
10256 complex(CKG) ,
intent(in) ,
contiguous :: matB(:,:)
10257 complex(CKG) ,
intent(in) ,
optional :: alpha
10258 type(lowerUnit_type) ,
intent(in) :: classB
10259 type(nothing_type) ,
intent(in) :: operationB
10264 PURE module subroutine trmm_ASS_CGMA_ONOA_CLUB_ONOB_CK2(matA, matB, classB, operationB, alpha)
10265#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10266 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CGMA_ONOA_CLUB_ONOB_CK2
10269 complex(CKG) ,
intent(inout) ,
contiguous :: matA(:,:)
10270 complex(CKG) ,
intent(in) ,
contiguous :: matB(:,:)
10271 complex(CKG) ,
intent(in) ,
optional :: alpha
10272 type(lowerUnit_type) ,
intent(in) :: classB
10273 type(nothing_type) ,
intent(in) :: operationB
10278 PURE module subroutine trmm_ASS_CGMA_ONOA_CLUB_ONOB_CK1(matA, matB, classB, operationB, alpha)
10279#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10280 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CGMA_ONOA_CLUB_ONOB_CK1
10283 complex(CKG) ,
intent(inout) ,
contiguous :: matA(:,:)
10284 complex(CKG) ,
intent(in) ,
contiguous :: matB(:,:)
10285 complex(CKG) ,
intent(in) ,
optional :: alpha
10286 type(lowerUnit_type) ,
intent(in) :: classB
10287 type(nothing_type) ,
intent(in) :: operationB
10294 PURE module subroutine trmm_ASS_CGMA_ONOA_CLUB_ONOB_RK5(matA, matB, classB, operationB, alpha)
10295#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10296 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CGMA_ONOA_CLUB_ONOB_RK5
10299 real(RKG) ,
intent(inout) ,
contiguous :: matA(:,:)
10300 real(RKG) ,
intent(in) ,
contiguous :: matB(:,:)
10301 real(RKG) ,
intent(in) ,
optional :: alpha
10302 type(lowerUnit_type) ,
intent(in) :: classB
10303 type(nothing_type) ,
intent(in) :: operationB
10308 PURE module subroutine trmm_ASS_CGMA_ONOA_CLUB_ONOB_RK4(matA, matB, classB, operationB, alpha)
10309#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10310 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CGMA_ONOA_CLUB_ONOB_RK4
10313 real(RKG) ,
intent(inout) ,
contiguous :: matA(:,:)
10314 real(RKG) ,
intent(in) ,
contiguous :: matB(:,:)
10315 real(RKG) ,
intent(in) ,
optional :: alpha
10316 type(lowerUnit_type) ,
intent(in) :: classB
10317 type(nothing_type) ,
intent(in) :: operationB
10322 PURE module subroutine trmm_ASS_CGMA_ONOA_CLUB_ONOB_RK3(matA, matB, classB, operationB, alpha)
10323#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10324 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CGMA_ONOA_CLUB_ONOB_RK3
10327 real(RKG) ,
intent(inout) ,
contiguous :: matA(:,:)
10328 real(RKG) ,
intent(in) ,
contiguous :: matB(:,:)
10329 real(RKG) ,
intent(in) ,
optional :: alpha
10330 type(lowerUnit_type) ,
intent(in) :: classB
10331 type(nothing_type) ,
intent(in) :: operationB
10336 PURE module subroutine trmm_ASS_CGMA_ONOA_CLUB_ONOB_RK2(matA, matB, classB, operationB, alpha)
10337#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10338 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CGMA_ONOA_CLUB_ONOB_RK2
10341 real(RKG) ,
intent(inout) ,
contiguous :: matA(:,:)
10342 real(RKG) ,
intent(in) ,
contiguous :: matB(:,:)
10343 real(RKG) ,
intent(in) ,
optional :: alpha
10344 type(lowerUnit_type) ,
intent(in) :: classB
10345 type(nothing_type) ,
intent(in) :: operationB
10350 PURE module subroutine trmm_ASS_CGMA_ONOA_CLUB_ONOB_RK1(matA, matB, classB, operationB, alpha)
10351#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10352 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CGMA_ONOA_CLUB_ONOB_RK1
10355 real(RKG) ,
intent(inout) ,
contiguous :: matA(:,:)
10356 real(RKG) ,
intent(in) ,
contiguous :: matB(:,:)
10357 real(RKG) ,
intent(in) ,
optional :: alpha
10358 type(lowerUnit_type) ,
intent(in) :: classB
10359 type(nothing_type) ,
intent(in) :: operationB
10372 PURE module subroutine trmm_ASS_CGMA_ONOA_CLUB_OTSB_CK5(matA, matB, classB, operationB, alpha)
10373#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10374 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CGMA_ONOA_CLUB_OTSB_CK5
10377 complex(CKG) ,
intent(inout) ,
contiguous :: matA(:,:)
10378 complex(CKG) ,
intent(in) ,
contiguous :: matB(:,:)
10379 complex(CKG) ,
intent(in) ,
optional :: alpha
10380 type(lowerUnit_type) ,
intent(in) :: classB
10381 type(transSymm_type) ,
intent(in) :: operationB
10386 PURE module subroutine trmm_ASS_CGMA_ONOA_CLUB_OTSB_CK4(matA, matB, classB, operationB, alpha)
10387#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10388 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CGMA_ONOA_CLUB_OTSB_CK4
10391 complex(CKG) ,
intent(inout) ,
contiguous :: matA(:,:)
10392 complex(CKG) ,
intent(in) ,
contiguous :: matB(:,:)
10393 complex(CKG) ,
intent(in) ,
optional :: alpha
10394 type(lowerUnit_type) ,
intent(in) :: classB
10395 type(transSymm_type) ,
intent(in) :: operationB
10400 PURE module subroutine trmm_ASS_CGMA_ONOA_CLUB_OTSB_CK3(matA, matB, classB, operationB, alpha)
10401#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10402 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CGMA_ONOA_CLUB_OTSB_CK3
10405 complex(CKG) ,
intent(inout) ,
contiguous :: matA(:,:)
10406 complex(CKG) ,
intent(in) ,
contiguous :: matB(:,:)
10407 complex(CKG) ,
intent(in) ,
optional :: alpha
10408 type(lowerUnit_type) ,
intent(in) :: classB
10409 type(transSymm_type) ,
intent(in) :: operationB
10414 PURE module subroutine trmm_ASS_CGMA_ONOA_CLUB_OTSB_CK2(matA, matB, classB, operationB, alpha)
10415#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10416 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CGMA_ONOA_CLUB_OTSB_CK2
10419 complex(CKG) ,
intent(inout) ,
contiguous :: matA(:,:)
10420 complex(CKG) ,
intent(in) ,
contiguous :: matB(:,:)
10421 complex(CKG) ,
intent(in) ,
optional :: alpha
10422 type(lowerUnit_type) ,
intent(in) :: classB
10423 type(transSymm_type) ,
intent(in) :: operationB
10428 PURE module subroutine trmm_ASS_CGMA_ONOA_CLUB_OTSB_CK1(matA, matB, classB, operationB, alpha)
10429#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10430 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CGMA_ONOA_CLUB_OTSB_CK1
10433 complex(CKG) ,
intent(inout) ,
contiguous :: matA(:,:)
10434 complex(CKG) ,
intent(in) ,
contiguous :: matB(:,:)
10435 complex(CKG) ,
intent(in) ,
optional :: alpha
10436 type(lowerUnit_type) ,
intent(in) :: classB
10437 type(transSymm_type) ,
intent(in) :: operationB
10444 PURE module subroutine trmm_ASS_CGMA_ONOA_CLUB_OTSB_RK5(matA, matB, classB, operationB, alpha)
10445#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10446 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CGMA_ONOA_CLUB_OTSB_RK5
10449 real(RKG) ,
intent(inout) ,
contiguous :: matA(:,:)
10450 real(RKG) ,
intent(in) ,
contiguous :: matB(:,:)
10451 real(RKG) ,
intent(in) ,
optional :: alpha
10452 type(lowerUnit_type) ,
intent(in) :: classB
10453 type(transSymm_type) ,
intent(in) :: operationB
10458 PURE module subroutine trmm_ASS_CGMA_ONOA_CLUB_OTSB_RK4(matA, matB, classB, operationB, alpha)
10459#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10460 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CGMA_ONOA_CLUB_OTSB_RK4
10463 real(RKG) ,
intent(inout) ,
contiguous :: matA(:,:)
10464 real(RKG) ,
intent(in) ,
contiguous :: matB(:,:)
10465 real(RKG) ,
intent(in) ,
optional :: alpha
10466 type(lowerUnit_type) ,
intent(in) :: classB
10467 type(transSymm_type) ,
intent(in) :: operationB
10472 PURE module subroutine trmm_ASS_CGMA_ONOA_CLUB_OTSB_RK3(matA, matB, classB, operationB, alpha)
10473#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10474 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CGMA_ONOA_CLUB_OTSB_RK3
10477 real(RKG) ,
intent(inout) ,
contiguous :: matA(:,:)
10478 real(RKG) ,
intent(in) ,
contiguous :: matB(:,:)
10479 real(RKG) ,
intent(in) ,
optional :: alpha
10480 type(lowerUnit_type) ,
intent(in) :: classB
10481 type(transSymm_type) ,
intent(in) :: operationB
10486 PURE module subroutine trmm_ASS_CGMA_ONOA_CLUB_OTSB_RK2(matA, matB, classB, operationB, alpha)
10487#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10488 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CGMA_ONOA_CLUB_OTSB_RK2
10491 real(RKG) ,
intent(inout) ,
contiguous :: matA(:,:)
10492 real(RKG) ,
intent(in) ,
contiguous :: matB(:,:)
10493 real(RKG) ,
intent(in) ,
optional :: alpha
10494 type(lowerUnit_type) ,
intent(in) :: classB
10495 type(transSymm_type) ,
intent(in) :: operationB
10500 PURE module subroutine trmm_ASS_CGMA_ONOA_CLUB_OTSB_RK1(matA, matB, classB, operationB, alpha)
10501#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10502 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CGMA_ONOA_CLUB_OTSB_RK1
10505 real(RKG) ,
intent(inout) ,
contiguous :: matA(:,:)
10506 real(RKG) ,
intent(in) ,
contiguous :: matB(:,:)
10507 real(RKG) ,
intent(in) ,
optional :: alpha
10508 type(lowerUnit_type) ,
intent(in) :: classB
10509 type(transSymm_type) ,
intent(in) :: operationB
10522 PURE module subroutine trmm_ASS_CGMA_ONOA_CLUB_OTHB_CK5(matA, matB, classB, operationB, alpha)
10523#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10524 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CGMA_ONOA_CLUB_OTHB_CK5
10527 complex(CKG) ,
intent(inout) ,
contiguous :: matA(:,:)
10528 complex(CKG) ,
intent(in) ,
contiguous :: matB(:,:)
10529 complex(CKG) ,
intent(in) ,
optional :: alpha
10530 type(lowerUnit_type) ,
intent(in) :: classB
10531 type(transHerm_type) ,
intent(in) :: operationB
10536 PURE module subroutine trmm_ASS_CGMA_ONOA_CLUB_OTHB_CK4(matA, matB, classB, operationB, alpha)
10537#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10538 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CGMA_ONOA_CLUB_OTHB_CK4
10541 complex(CKG) ,
intent(inout) ,
contiguous :: matA(:,:)
10542 complex(CKG) ,
intent(in) ,
contiguous :: matB(:,:)
10543 complex(CKG) ,
intent(in) ,
optional :: alpha
10544 type(lowerUnit_type) ,
intent(in) :: classB
10545 type(transHerm_type) ,
intent(in) :: operationB
10550 PURE module subroutine trmm_ASS_CGMA_ONOA_CLUB_OTHB_CK3(matA, matB, classB, operationB, alpha)
10551#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10552 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CGMA_ONOA_CLUB_OTHB_CK3
10555 complex(CKG) ,
intent(inout) ,
contiguous :: matA(:,:)
10556 complex(CKG) ,
intent(in) ,
contiguous :: matB(:,:)
10557 complex(CKG) ,
intent(in) ,
optional :: alpha
10558 type(lowerUnit_type) ,
intent(in) :: classB
10559 type(transHerm_type) ,
intent(in) :: operationB
10564 PURE module subroutine trmm_ASS_CGMA_ONOA_CLUB_OTHB_CK2(matA, matB, classB, operationB, alpha)
10565#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10566 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CGMA_ONOA_CLUB_OTHB_CK2
10569 complex(CKG) ,
intent(inout) ,
contiguous :: matA(:,:)
10570 complex(CKG) ,
intent(in) ,
contiguous :: matB(:,:)
10571 complex(CKG) ,
intent(in) ,
optional :: alpha
10572 type(lowerUnit_type) ,
intent(in) :: classB
10573 type(transHerm_type) ,
intent(in) :: operationB
10578 PURE module subroutine trmm_ASS_CGMA_ONOA_CLUB_OTHB_CK1(matA, matB, classB, operationB, alpha)
10579#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10580 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CGMA_ONOA_CLUB_OTHB_CK1
10583 complex(CKG) ,
intent(inout) ,
contiguous :: matA(:,:)
10584 complex(CKG) ,
intent(in) ,
contiguous :: matB(:,:)
10585 complex(CKG) ,
intent(in) ,
optional :: alpha
10586 type(lowerUnit_type) ,
intent(in) :: classB
10587 type(transHerm_type) ,
intent(in) :: operationB
10594 PURE module subroutine trmm_ASS_CGMA_ONOA_CLUB_OTHB_RK5(matA, matB, classB, operationB, alpha)
10595#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10596 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CGMA_ONOA_CLUB_OTHB_RK5
10599 real(RKG) ,
intent(inout) ,
contiguous :: matA(:,:)
10600 real(RKG) ,
intent(in) ,
contiguous :: matB(:,:)
10601 real(RKG) ,
intent(in) ,
optional :: alpha
10602 type(lowerUnit_type) ,
intent(in) :: classB
10603 type(transHerm_type) ,
intent(in) :: operationB
10608 PURE module subroutine trmm_ASS_CGMA_ONOA_CLUB_OTHB_RK4(matA, matB, classB, operationB, alpha)
10609#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10610 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CGMA_ONOA_CLUB_OTHB_RK4
10613 real(RKG) ,
intent(inout) ,
contiguous :: matA(:,:)
10614 real(RKG) ,
intent(in) ,
contiguous :: matB(:,:)
10615 real(RKG) ,
intent(in) ,
optional :: alpha
10616 type(lowerUnit_type) ,
intent(in) :: classB
10617 type(transHerm_type) ,
intent(in) :: operationB
10622 PURE module subroutine trmm_ASS_CGMA_ONOA_CLUB_OTHB_RK3(matA, matB, classB, operationB, alpha)
10623#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10624 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CGMA_ONOA_CLUB_OTHB_RK3
10627 real(RKG) ,
intent(inout) ,
contiguous :: matA(:,:)
10628 real(RKG) ,
intent(in) ,
contiguous :: matB(:,:)
10629 real(RKG) ,
intent(in) ,
optional :: alpha
10630 type(lowerUnit_type) ,
intent(in) :: classB
10631 type(transHerm_type) ,
intent(in) :: operationB
10636 PURE module subroutine trmm_ASS_CGMA_ONOA_CLUB_OTHB_RK2(matA, matB, classB, operationB, alpha)
10637#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10638 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CGMA_ONOA_CLUB_OTHB_RK2
10641 real(RKG) ,
intent(inout) ,
contiguous :: matA(:,:)
10642 real(RKG) ,
intent(in) ,
contiguous :: matB(:,:)
10643 real(RKG) ,
intent(in) ,
optional :: alpha
10644 type(lowerUnit_type) ,
intent(in) :: classB
10645 type(transHerm_type) ,
intent(in) :: operationB
10650 PURE module subroutine trmm_ASS_CGMA_ONOA_CLUB_OTHB_RK1(matA, matB, classB, operationB, alpha)
10651#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10652 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CGMA_ONOA_CLUB_OTHB_RK1
10655 real(RKG) ,
intent(inout) ,
contiguous :: matA(:,:)
10656 real(RKG) ,
intent(in) ,
contiguous :: matB(:,:)
10657 real(RKG) ,
intent(in) ,
optional :: alpha
10658 type(lowerUnit_type) ,
intent(in) :: classB
10659 type(transHerm_type) ,
intent(in) :: operationB
10676 PURE module subroutine trmm_ASS_CGMA_ONOA_CUUB_ONOB_CK5(matA, matB, classB, operationB, alpha)
10677#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10678 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CGMA_ONOA_CUUB_ONOB_CK5
10681 complex(CKG) ,
intent(inout) ,
contiguous :: matA(:,:)
10682 complex(CKG) ,
intent(in) ,
contiguous :: matB(:,:)
10683 complex(CKG) ,
intent(in) ,
optional :: alpha
10684 type(upperUnit_type) ,
intent(in) :: classB
10685 type(nothing_type) ,
intent(in) :: operationB
10690 PURE module subroutine trmm_ASS_CGMA_ONOA_CUUB_ONOB_CK4(matA, matB, classB, operationB, alpha)
10691#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10692 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CGMA_ONOA_CUUB_ONOB_CK4
10695 complex(CKG) ,
intent(inout) ,
contiguous :: matA(:,:)
10696 complex(CKG) ,
intent(in) ,
contiguous :: matB(:,:)
10697 complex(CKG) ,
intent(in) ,
optional :: alpha
10698 type(upperUnit_type) ,
intent(in) :: classB
10699 type(nothing_type) ,
intent(in) :: operationB
10704 PURE module subroutine trmm_ASS_CGMA_ONOA_CUUB_ONOB_CK3(matA, matB, classB, operationB, alpha)
10705#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10706 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CGMA_ONOA_CUUB_ONOB_CK3
10709 complex(CKG) ,
intent(inout) ,
contiguous :: matA(:,:)
10710 complex(CKG) ,
intent(in) ,
contiguous :: matB(:,:)
10711 complex(CKG) ,
intent(in) ,
optional :: alpha
10712 type(upperUnit_type) ,
intent(in) :: classB
10713 type(nothing_type) ,
intent(in) :: operationB
10718 PURE module subroutine trmm_ASS_CGMA_ONOA_CUUB_ONOB_CK2(matA, matB, classB, operationB, alpha)
10719#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10720 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CGMA_ONOA_CUUB_ONOB_CK2
10723 complex(CKG) ,
intent(inout) ,
contiguous :: matA(:,:)
10724 complex(CKG) ,
intent(in) ,
contiguous :: matB(:,:)
10725 complex(CKG) ,
intent(in) ,
optional :: alpha
10726 type(upperUnit_type) ,
intent(in) :: classB
10727 type(nothing_type) ,
intent(in) :: operationB
10732 PURE module subroutine trmm_ASS_CGMA_ONOA_CUUB_ONOB_CK1(matA, matB, classB, operationB, alpha)
10733#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10734 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CGMA_ONOA_CUUB_ONOB_CK1
10737 complex(CKG) ,
intent(inout) ,
contiguous :: matA(:,:)
10738 complex(CKG) ,
intent(in) ,
contiguous :: matB(:,:)
10739 complex(CKG) ,
intent(in) ,
optional :: alpha
10740 type(upperUnit_type) ,
intent(in) :: classB
10741 type(nothing_type) ,
intent(in) :: operationB
10748 PURE module subroutine trmm_ASS_CGMA_ONOA_CUUB_ONOB_RK5(matA, matB, classB, operationB, alpha)
10749#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10750 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CGMA_ONOA_CUUB_ONOB_RK5
10753 real(RKG) ,
intent(inout) ,
contiguous :: matA(:,:)
10754 real(RKG) ,
intent(in) ,
contiguous :: matB(:,:)
10755 real(RKG) ,
intent(in) ,
optional :: alpha
10756 type(upperUnit_type) ,
intent(in) :: classB
10757 type(nothing_type) ,
intent(in) :: operationB
10762 PURE module subroutine trmm_ASS_CGMA_ONOA_CUUB_ONOB_RK4(matA, matB, classB, operationB, alpha)
10763#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10764 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CGMA_ONOA_CUUB_ONOB_RK4
10767 real(RKG) ,
intent(inout) ,
contiguous :: matA(:,:)
10768 real(RKG) ,
intent(in) ,
contiguous :: matB(:,:)
10769 real(RKG) ,
intent(in) ,
optional :: alpha
10770 type(upperUnit_type) ,
intent(in) :: classB
10771 type(nothing_type) ,
intent(in) :: operationB
10776 PURE module subroutine trmm_ASS_CGMA_ONOA_CUUB_ONOB_RK3(matA, matB, classB, operationB, alpha)
10777#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10778 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CGMA_ONOA_CUUB_ONOB_RK3
10781 real(RKG) ,
intent(inout) ,
contiguous :: matA(:,:)
10782 real(RKG) ,
intent(in) ,
contiguous :: matB(:,:)
10783 real(RKG) ,
intent(in) ,
optional :: alpha
10784 type(upperUnit_type) ,
intent(in) :: classB
10785 type(nothing_type) ,
intent(in) :: operationB
10790 PURE module subroutine trmm_ASS_CGMA_ONOA_CUUB_ONOB_RK2(matA, matB, classB, operationB, alpha)
10791#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10792 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CGMA_ONOA_CUUB_ONOB_RK2
10795 real(RKG) ,
intent(inout) ,
contiguous :: matA(:,:)
10796 real(RKG) ,
intent(in) ,
contiguous :: matB(:,:)
10797 real(RKG) ,
intent(in) ,
optional :: alpha
10798 type(upperUnit_type) ,
intent(in) :: classB
10799 type(nothing_type) ,
intent(in) :: operationB
10804 PURE module subroutine trmm_ASS_CGMA_ONOA_CUUB_ONOB_RK1(matA, matB, classB, operationB, alpha)
10805#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10806 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CGMA_ONOA_CUUB_ONOB_RK1
10809 real(RKG) ,
intent(inout) ,
contiguous :: matA(:,:)
10810 real(RKG) ,
intent(in) ,
contiguous :: matB(:,:)
10811 real(RKG) ,
intent(in) ,
optional :: alpha
10812 type(upperUnit_type) ,
intent(in) :: classB
10813 type(nothing_type) ,
intent(in) :: operationB
10826 PURE module subroutine trmm_ASS_CGMA_ONOA_CUUB_OTSB_CK5(matA, matB, classB, operationB, alpha)
10827#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10828 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CGMA_ONOA_CUUB_OTSB_CK5
10831 complex(CKG) ,
intent(inout) ,
contiguous :: matA(:,:)
10832 complex(CKG) ,
intent(in) ,
contiguous :: matB(:,:)
10833 complex(CKG) ,
intent(in) ,
optional :: alpha
10834 type(upperUnit_type) ,
intent(in) :: classB
10835 type(transSymm_type) ,
intent(in) :: operationB
10840 PURE module subroutine trmm_ASS_CGMA_ONOA_CUUB_OTSB_CK4(matA, matB, classB, operationB, alpha)
10841#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10842 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CGMA_ONOA_CUUB_OTSB_CK4
10845 complex(CKG) ,
intent(inout) ,
contiguous :: matA(:,:)
10846 complex(CKG) ,
intent(in) ,
contiguous :: matB(:,:)
10847 complex(CKG) ,
intent(in) ,
optional :: alpha
10848 type(upperUnit_type) ,
intent(in) :: classB
10849 type(transSymm_type) ,
intent(in) :: operationB
10854 PURE module subroutine trmm_ASS_CGMA_ONOA_CUUB_OTSB_CK3(matA, matB, classB, operationB, alpha)
10855#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10856 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CGMA_ONOA_CUUB_OTSB_CK3
10859 complex(CKG) ,
intent(inout) ,
contiguous :: matA(:,:)
10860 complex(CKG) ,
intent(in) ,
contiguous :: matB(:,:)
10861 complex(CKG) ,
intent(in) ,
optional :: alpha
10862 type(upperUnit_type) ,
intent(in) :: classB
10863 type(transSymm_type) ,
intent(in) :: operationB
10868 PURE module subroutine trmm_ASS_CGMA_ONOA_CUUB_OTSB_CK2(matA, matB, classB, operationB, alpha)
10869#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10870 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CGMA_ONOA_CUUB_OTSB_CK2
10873 complex(CKG) ,
intent(inout) ,
contiguous :: matA(:,:)
10874 complex(CKG) ,
intent(in) ,
contiguous :: matB(:,:)
10875 complex(CKG) ,
intent(in) ,
optional :: alpha
10876 type(upperUnit_type) ,
intent(in) :: classB
10877 type(transSymm_type) ,
intent(in) :: operationB
10882 PURE module subroutine trmm_ASS_CGMA_ONOA_CUUB_OTSB_CK1(matA, matB, classB, operationB, alpha)
10883#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10884 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CGMA_ONOA_CUUB_OTSB_CK1
10887 complex(CKG) ,
intent(inout) ,
contiguous :: matA(:,:)
10888 complex(CKG) ,
intent(in) ,
contiguous :: matB(:,:)
10889 complex(CKG) ,
intent(in) ,
optional :: alpha
10890 type(upperUnit_type) ,
intent(in) :: classB
10891 type(transSymm_type) ,
intent(in) :: operationB
10898 PURE module subroutine trmm_ASS_CGMA_ONOA_CUUB_OTSB_RK5(matA, matB, classB, operationB, alpha)
10899#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10900 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CGMA_ONOA_CUUB_OTSB_RK5
10903 real(RKG) ,
intent(inout) ,
contiguous :: matA(:,:)
10904 real(RKG) ,
intent(in) ,
contiguous :: matB(:,:)
10905 real(RKG) ,
intent(in) ,
optional :: alpha
10906 type(upperUnit_type) ,
intent(in) :: classB
10907 type(transSymm_type) ,
intent(in) :: operationB
10912 PURE module subroutine trmm_ASS_CGMA_ONOA_CUUB_OTSB_RK4(matA, matB, classB, operationB, alpha)
10913#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10914 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CGMA_ONOA_CUUB_OTSB_RK4
10917 real(RKG) ,
intent(inout) ,
contiguous :: matA(:,:)
10918 real(RKG) ,
intent(in) ,
contiguous :: matB(:,:)
10919 real(RKG) ,
intent(in) ,
optional :: alpha
10920 type(upperUnit_type) ,
intent(in) :: classB
10921 type(transSymm_type) ,
intent(in) :: operationB
10926 PURE module subroutine trmm_ASS_CGMA_ONOA_CUUB_OTSB_RK3(matA, matB, classB, operationB, alpha)
10927#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10928 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CGMA_ONOA_CUUB_OTSB_RK3
10931 real(RKG) ,
intent(inout) ,
contiguous :: matA(:,:)
10932 real(RKG) ,
intent(in) ,
contiguous :: matB(:,:)
10933 real(RKG) ,
intent(in) ,
optional :: alpha
10934 type(upperUnit_type) ,
intent(in) :: classB
10935 type(transSymm_type) ,
intent(in) :: operationB
10940 PURE module subroutine trmm_ASS_CGMA_ONOA_CUUB_OTSB_RK2(matA, matB, classB, operationB, alpha)
10941#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10942 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CGMA_ONOA_CUUB_OTSB_RK2
10945 real(RKG) ,
intent(inout) ,
contiguous :: matA(:,:)
10946 real(RKG) ,
intent(in) ,
contiguous :: matB(:,:)
10947 real(RKG) ,
intent(in) ,
optional :: alpha
10948 type(upperUnit_type) ,
intent(in) :: classB
10949 type(transSymm_type) ,
intent(in) :: operationB
10954 PURE module subroutine trmm_ASS_CGMA_ONOA_CUUB_OTSB_RK1(matA, matB, classB, operationB, alpha)
10955#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10956 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CGMA_ONOA_CUUB_OTSB_RK1
10959 real(RKG) ,
intent(inout) ,
contiguous :: matA(:,:)
10960 real(RKG) ,
intent(in) ,
contiguous :: matB(:,:)
10961 real(RKG) ,
intent(in) ,
optional :: alpha
10962 type(upperUnit_type) ,
intent(in) :: classB
10963 type(transSymm_type) ,
intent(in) :: operationB
10976 PURE module subroutine trmm_ASS_CGMA_ONOA_CUUB_OTHB_CK5(matA, matB, classB, operationB, alpha)
10977#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10978 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CGMA_ONOA_CUUB_OTHB_CK5
10981 complex(CKG) ,
intent(inout) ,
contiguous :: matA(:,:)
10982 complex(CKG) ,
intent(in) ,
contiguous :: matB(:,:)
10983 complex(CKG) ,
intent(in) ,
optional :: alpha
10984 type(upperUnit_type) ,
intent(in) :: classB
10985 type(transHerm_type) ,
intent(in) :: operationB
10990 PURE module subroutine trmm_ASS_CGMA_ONOA_CUUB_OTHB_CK4(matA, matB, classB, operationB, alpha)
10991#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10992 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CGMA_ONOA_CUUB_OTHB_CK4
10995 complex(CKG) ,
intent(inout) ,
contiguous :: matA(:,:)
10996 complex(CKG) ,
intent(in) ,
contiguous :: matB(:,:)
10997 complex(CKG) ,
intent(in) ,
optional :: alpha
10998 type(upperUnit_type) ,
intent(in) :: classB
10999 type(transHerm_type) ,
intent(in) :: operationB
11004 PURE module subroutine trmm_ASS_CGMA_ONOA_CUUB_OTHB_CK3(matA, matB, classB, operationB, alpha)
11005#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11006 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CGMA_ONOA_CUUB_OTHB_CK3
11009 complex(CKG) ,
intent(inout) ,
contiguous :: matA(:,:)
11010 complex(CKG) ,
intent(in) ,
contiguous :: matB(:,:)
11011 complex(CKG) ,
intent(in) ,
optional :: alpha
11012 type(upperUnit_type) ,
intent(in) :: classB
11013 type(transHerm_type) ,
intent(in) :: operationB
11018 PURE module subroutine trmm_ASS_CGMA_ONOA_CUUB_OTHB_CK2(matA, matB, classB, operationB, alpha)
11019#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11020 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CGMA_ONOA_CUUB_OTHB_CK2
11023 complex(CKG) ,
intent(inout) ,
contiguous :: matA(:,:)
11024 complex(CKG) ,
intent(in) ,
contiguous :: matB(:,:)
11025 complex(CKG) ,
intent(in) ,
optional :: alpha
11026 type(upperUnit_type) ,
intent(in) :: classB
11027 type(transHerm_type) ,
intent(in) :: operationB
11032 PURE module subroutine trmm_ASS_CGMA_ONOA_CUUB_OTHB_CK1(matA, matB, classB, operationB, alpha)
11033#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11034 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CGMA_ONOA_CUUB_OTHB_CK1
11037 complex(CKG) ,
intent(inout) ,
contiguous :: matA(:,:)
11038 complex(CKG) ,
intent(in) ,
contiguous :: matB(:,:)
11039 complex(CKG) ,
intent(in) ,
optional :: alpha
11040 type(upperUnit_type) ,
intent(in) :: classB
11041 type(transHerm_type) ,
intent(in) :: operationB
11048 PURE module subroutine trmm_ASS_CGMA_ONOA_CUUB_OTHB_RK5(matA, matB, classB, operationB, alpha)
11049#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11050 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CGMA_ONOA_CUUB_OTHB_RK5
11053 real(RKG) ,
intent(inout) ,
contiguous :: matA(:,:)
11054 real(RKG) ,
intent(in) ,
contiguous :: matB(:,:)
11055 real(RKG) ,
intent(in) ,
optional :: alpha
11056 type(upperUnit_type) ,
intent(in) :: classB
11057 type(transHerm_type) ,
intent(in) :: operationB
11062 PURE module subroutine trmm_ASS_CGMA_ONOA_CUUB_OTHB_RK4(matA, matB, classB, operationB, alpha)
11063#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11064 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CGMA_ONOA_CUUB_OTHB_RK4
11067 real(RKG) ,
intent(inout) ,
contiguous :: matA(:,:)
11068 real(RKG) ,
intent(in) ,
contiguous :: matB(:,:)
11069 real(RKG) ,
intent(in) ,
optional :: alpha
11070 type(upperUnit_type) ,
intent(in) :: classB
11071 type(transHerm_type) ,
intent(in) :: operationB
11076 PURE module subroutine trmm_ASS_CGMA_ONOA_CUUB_OTHB_RK3(matA, matB, classB, operationB, alpha)
11077#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11078 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CGMA_ONOA_CUUB_OTHB_RK3
11081 real(RKG) ,
intent(inout) ,
contiguous :: matA(:,:)
11082 real(RKG) ,
intent(in) ,
contiguous :: matB(:,:)
11083 real(RKG) ,
intent(in) ,
optional :: alpha
11084 type(upperUnit_type) ,
intent(in) :: classB
11085 type(transHerm_type) ,
intent(in) :: operationB
11090 PURE module subroutine trmm_ASS_CGMA_ONOA_CUUB_OTHB_RK2(matA, matB, classB, operationB, alpha)
11091#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11092 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CGMA_ONOA_CUUB_OTHB_RK2
11095 real(RKG) ,
intent(inout) ,
contiguous :: matA(:,:)
11096 real(RKG) ,
intent(in) ,
contiguous :: matB(:,:)
11097 real(RKG) ,
intent(in) ,
optional :: alpha
11098 type(upperUnit_type) ,
intent(in) :: classB
11099 type(transHerm_type) ,
intent(in) :: operationB
11104 PURE module subroutine trmm_ASS_CGMA_ONOA_CUUB_OTHB_RK1(matA, matB, classB, operationB, alpha)
11105#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11106 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_ASS_CGMA_ONOA_CUUB_OTHB_RK1
11109 real(RKG) ,
intent(inout) ,
contiguous :: matA(:,:)
11110 real(RKG) ,
intent(in) ,
contiguous :: matB(:,:)
11111 real(RKG) ,
intent(in) ,
optional :: alpha
11112 type(upperUnit_type) ,
intent(in) :: classB
11113 type(transHerm_type) ,
intent(in) :: operationB
11134 PURE module subroutine trmm_EXP_CLDA_ONOA_CGMB_ONOB_CK5(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
11135#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11136 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CLDA_ONOA_CGMB_ONOB_CK5
11139 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
11140 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
11141 complex(CKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
11142 complex(CKG) ,
intent(in) :: alpha
11143 type(lowerDiag_type) ,
intent(in) :: classA
11144 type(nothing_type) ,
intent(in) :: operationA
11149 PURE module subroutine trmm_EXP_CLDA_ONOA_CGMB_ONOB_CK4(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
11150#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11151 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CLDA_ONOA_CGMB_ONOB_CK4
11154 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
11155 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
11156 complex(CKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
11157 complex(CKG) ,
intent(in) :: alpha
11158 type(lowerDiag_type) ,
intent(in) :: classA
11159 type(nothing_type) ,
intent(in) :: operationA
11164 PURE module subroutine trmm_EXP_CLDA_ONOA_CGMB_ONOB_CK3(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
11165#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11166 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CLDA_ONOA_CGMB_ONOB_CK3
11169 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
11170 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
11171 complex(CKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
11172 complex(CKG) ,
intent(in) :: alpha
11173 type(lowerDiag_type) ,
intent(in) :: classA
11174 type(nothing_type) ,
intent(in) :: operationA
11179 PURE module subroutine trmm_EXP_CLDA_ONOA_CGMB_ONOB_CK2(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
11180#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11181 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CLDA_ONOA_CGMB_ONOB_CK2
11184 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
11185 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
11186 complex(CKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
11187 complex(CKG) ,
intent(in) :: alpha
11188 type(lowerDiag_type) ,
intent(in) :: classA
11189 type(nothing_type) ,
intent(in) :: operationA
11194 PURE module subroutine trmm_EXP_CLDA_ONOA_CGMB_ONOB_CK1(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
11195#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11196 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CLDA_ONOA_CGMB_ONOB_CK1
11199 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
11200 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
11201 complex(CKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
11202 complex(CKG) ,
intent(in) :: alpha
11203 type(lowerDiag_type) ,
intent(in) :: classA
11204 type(nothing_type) ,
intent(in) :: operationA
11211 PURE module subroutine trmm_EXP_CLDA_ONOA_CGMB_ONOB_RK5(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
11212#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11213 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CLDA_ONOA_CGMB_ONOB_RK5
11216 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
11217 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
11218 real(RKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
11219 real(RKG) ,
intent(in) :: alpha
11220 type(lowerDiag_type) ,
intent(in) :: classA
11221 type(nothing_type) ,
intent(in) :: operationA
11226 PURE module subroutine trmm_EXP_CLDA_ONOA_CGMB_ONOB_RK4(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
11227#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11228 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CLDA_ONOA_CGMB_ONOB_RK4
11231 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
11232 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
11233 real(RKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
11234 real(RKG) ,
intent(in) :: alpha
11235 type(lowerDiag_type) ,
intent(in) :: classA
11236 type(nothing_type) ,
intent(in) :: operationA
11241 PURE module subroutine trmm_EXP_CLDA_ONOA_CGMB_ONOB_RK3(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
11242#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11243 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CLDA_ONOA_CGMB_ONOB_RK3
11246 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
11247 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
11248 real(RKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
11249 real(RKG) ,
intent(in) :: alpha
11250 type(lowerDiag_type) ,
intent(in) :: classA
11251 type(nothing_type) ,
intent(in) :: operationA
11256 PURE module subroutine trmm_EXP_CLDA_ONOA_CGMB_ONOB_RK2(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
11257#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11258 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CLDA_ONOA_CGMB_ONOB_RK2
11261 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
11262 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
11263 real(RKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
11264 real(RKG) ,
intent(in) :: alpha
11265 type(lowerDiag_type) ,
intent(in) :: classA
11266 type(nothing_type) ,
intent(in) :: operationA
11271 PURE module subroutine trmm_EXP_CLDA_ONOA_CGMB_ONOB_RK1(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
11272#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11273 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CLDA_ONOA_CGMB_ONOB_RK1
11276 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
11277 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
11278 real(RKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
11279 real(RKG) ,
intent(in) :: alpha
11280 type(lowerDiag_type) ,
intent(in) :: classA
11281 type(nothing_type) ,
intent(in) :: operationA
11294 PURE module subroutine trmm_EXP_CLDA_OTSA_CGMB_ONOB_CK5(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
11295#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11296 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CLDA_OTSA_CGMB_ONOB_CK5
11299 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
11300 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
11301 complex(CKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
11302 complex(CKG) ,
intent(in) :: alpha
11303 type(lowerDiag_type) ,
intent(in) :: classA
11304 type(transSymm_type) ,
intent(in) :: operationA
11309 PURE module subroutine trmm_EXP_CLDA_OTSA_CGMB_ONOB_CK4(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
11310#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11311 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CLDA_OTSA_CGMB_ONOB_CK4
11314 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
11315 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
11316 complex(CKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
11317 complex(CKG) ,
intent(in) :: alpha
11318 type(lowerDiag_type) ,
intent(in) :: classA
11319 type(transSymm_type) ,
intent(in) :: operationA
11324 PURE module subroutine trmm_EXP_CLDA_OTSA_CGMB_ONOB_CK3(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
11325#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11326 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CLDA_OTSA_CGMB_ONOB_CK3
11329 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
11330 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
11331 complex(CKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
11332 complex(CKG) ,
intent(in) :: alpha
11333 type(lowerDiag_type) ,
intent(in) :: classA
11334 type(transSymm_type) ,
intent(in) :: operationA
11339 PURE module subroutine trmm_EXP_CLDA_OTSA_CGMB_ONOB_CK2(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
11340#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11341 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CLDA_OTSA_CGMB_ONOB_CK2
11344 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
11345 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
11346 complex(CKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
11347 complex(CKG) ,
intent(in) :: alpha
11348 type(lowerDiag_type) ,
intent(in) :: classA
11349 type(transSymm_type) ,
intent(in) :: operationA
11354 PURE module subroutine trmm_EXP_CLDA_OTSA_CGMB_ONOB_CK1(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
11355#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11356 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CLDA_OTSA_CGMB_ONOB_CK1
11359 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
11360 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
11361 complex(CKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
11362 complex(CKG) ,
intent(in) :: alpha
11363 type(lowerDiag_type) ,
intent(in) :: classA
11364 type(transSymm_type) ,
intent(in) :: operationA
11371 PURE module subroutine trmm_EXP_CLDA_OTSA_CGMB_ONOB_RK5(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
11372#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11373 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CLDA_OTSA_CGMB_ONOB_RK5
11376 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
11377 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
11378 real(RKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
11379 real(RKG) ,
intent(in) :: alpha
11380 type(lowerDiag_type) ,
intent(in) :: classA
11381 type(transSymm_type) ,
intent(in) :: operationA
11386 PURE module subroutine trmm_EXP_CLDA_OTSA_CGMB_ONOB_RK4(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
11387#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11388 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CLDA_OTSA_CGMB_ONOB_RK4
11391 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
11392 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
11393 real(RKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
11394 real(RKG) ,
intent(in) :: alpha
11395 type(lowerDiag_type) ,
intent(in) :: classA
11396 type(transSymm_type) ,
intent(in) :: operationA
11401 PURE module subroutine trmm_EXP_CLDA_OTSA_CGMB_ONOB_RK3(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
11402#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11403 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CLDA_OTSA_CGMB_ONOB_RK3
11406 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
11407 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
11408 real(RKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
11409 real(RKG) ,
intent(in) :: alpha
11410 type(lowerDiag_type) ,
intent(in) :: classA
11411 type(transSymm_type) ,
intent(in) :: operationA
11416 PURE module subroutine trmm_EXP_CLDA_OTSA_CGMB_ONOB_RK2(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
11417#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11418 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CLDA_OTSA_CGMB_ONOB_RK2
11421 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
11422 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
11423 real(RKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
11424 real(RKG) ,
intent(in) :: alpha
11425 type(lowerDiag_type) ,
intent(in) :: classA
11426 type(transSymm_type) ,
intent(in) :: operationA
11431 PURE module subroutine trmm_EXP_CLDA_OTSA_CGMB_ONOB_RK1(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
11432#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11433 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CLDA_OTSA_CGMB_ONOB_RK1
11436 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
11437 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
11438 real(RKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
11439 real(RKG) ,
intent(in) :: alpha
11440 type(lowerDiag_type) ,
intent(in) :: classA
11441 type(transSymm_type) ,
intent(in) :: operationA
11454 PURE module subroutine trmm_EXP_CLDA_OTHA_CGMB_ONOB_CK5(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
11455#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11456 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CLDA_OTHA_CGMB_ONOB_CK5
11459 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
11460 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
11461 complex(CKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
11462 complex(CKG) ,
intent(in) :: alpha
11463 type(lowerDiag_type) ,
intent(in) :: classA
11464 type(transHerm_type) ,
intent(in) :: operationA
11469 PURE module subroutine trmm_EXP_CLDA_OTHA_CGMB_ONOB_CK4(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
11470#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11471 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CLDA_OTHA_CGMB_ONOB_CK4
11474 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
11475 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
11476 complex(CKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
11477 complex(CKG) ,
intent(in) :: alpha
11478 type(lowerDiag_type) ,
intent(in) :: classA
11479 type(transHerm_type) ,
intent(in) :: operationA
11484 PURE module subroutine trmm_EXP_CLDA_OTHA_CGMB_ONOB_CK3(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
11485#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11486 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CLDA_OTHA_CGMB_ONOB_CK3
11489 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
11490 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
11491 complex(CKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
11492 complex(CKG) ,
intent(in) :: alpha
11493 type(lowerDiag_type) ,
intent(in) :: classA
11494 type(transHerm_type) ,
intent(in) :: operationA
11499 PURE module subroutine trmm_EXP_CLDA_OTHA_CGMB_ONOB_CK2(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
11500#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11501 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CLDA_OTHA_CGMB_ONOB_CK2
11504 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
11505 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
11506 complex(CKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
11507 complex(CKG) ,
intent(in) :: alpha
11508 type(lowerDiag_type) ,
intent(in) :: classA
11509 type(transHerm_type) ,
intent(in) :: operationA
11514 PURE module subroutine trmm_EXP_CLDA_OTHA_CGMB_ONOB_CK1(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
11515#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11516 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CLDA_OTHA_CGMB_ONOB_CK1
11519 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
11520 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
11521 complex(CKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
11522 complex(CKG) ,
intent(in) :: alpha
11523 type(lowerDiag_type) ,
intent(in) :: classA
11524 type(transHerm_type) ,
intent(in) :: operationA
11531 PURE module subroutine trmm_EXP_CLDA_OTHA_CGMB_ONOB_RK5(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
11532#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11533 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CLDA_OTHA_CGMB_ONOB_RK5
11536 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
11537 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
11538 real(RKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
11539 real(RKG) ,
intent(in) :: alpha
11540 type(lowerDiag_type) ,
intent(in) :: classA
11541 type(transHerm_type) ,
intent(in) :: operationA
11546 PURE module subroutine trmm_EXP_CLDA_OTHA_CGMB_ONOB_RK4(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
11547#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11548 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CLDA_OTHA_CGMB_ONOB_RK4
11551 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
11552 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
11553 real(RKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
11554 real(RKG) ,
intent(in) :: alpha
11555 type(lowerDiag_type) ,
intent(in) :: classA
11556 type(transHerm_type) ,
intent(in) :: operationA
11561 PURE module subroutine trmm_EXP_CLDA_OTHA_CGMB_ONOB_RK3(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
11562#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11563 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CLDA_OTHA_CGMB_ONOB_RK3
11566 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
11567 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
11568 real(RKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
11569 real(RKG) ,
intent(in) :: alpha
11570 type(lowerDiag_type) ,
intent(in) :: classA
11571 type(transHerm_type) ,
intent(in) :: operationA
11576 PURE module subroutine trmm_EXP_CLDA_OTHA_CGMB_ONOB_RK2(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
11577#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11578 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CLDA_OTHA_CGMB_ONOB_RK2
11581 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
11582 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
11583 real(RKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
11584 real(RKG) ,
intent(in) :: alpha
11585 type(lowerDiag_type) ,
intent(in) :: classA
11586 type(transHerm_type) ,
intent(in) :: operationA
11591 PURE module subroutine trmm_EXP_CLDA_OTHA_CGMB_ONOB_RK1(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
11592#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11593 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CLDA_OTHA_CGMB_ONOB_RK1
11596 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
11597 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
11598 real(RKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
11599 real(RKG) ,
intent(in) :: alpha
11600 type(lowerDiag_type) ,
intent(in) :: classA
11601 type(transHerm_type) ,
intent(in) :: operationA
11618 PURE module subroutine trmm_EXP_CUDA_ONOA_CGMB_ONOB_CK5(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
11619#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11620 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CUDA_ONOA_CGMB_ONOB_CK5
11623 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
11624 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
11625 complex(CKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
11626 complex(CKG) ,
intent(in) :: alpha
11627 type(upperDiag_type) ,
intent(in) :: classA
11628 type(nothing_type) ,
intent(in) :: operationA
11633 PURE module subroutine trmm_EXP_CUDA_ONOA_CGMB_ONOB_CK4(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
11634#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11635 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CUDA_ONOA_CGMB_ONOB_CK4
11638 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
11639 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
11640 complex(CKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
11641 complex(CKG) ,
intent(in) :: alpha
11642 type(upperDiag_type) ,
intent(in) :: classA
11643 type(nothing_type) ,
intent(in) :: operationA
11648 PURE module subroutine trmm_EXP_CUDA_ONOA_CGMB_ONOB_CK3(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
11649#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11650 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CUDA_ONOA_CGMB_ONOB_CK3
11653 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
11654 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
11655 complex(CKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
11656 complex(CKG) ,
intent(in) :: alpha
11657 type(upperDiag_type) ,
intent(in) :: classA
11658 type(nothing_type) ,
intent(in) :: operationA
11663 PURE module subroutine trmm_EXP_CUDA_ONOA_CGMB_ONOB_CK2(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
11664#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11665 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CUDA_ONOA_CGMB_ONOB_CK2
11668 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
11669 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
11670 complex(CKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
11671 complex(CKG) ,
intent(in) :: alpha
11672 type(upperDiag_type) ,
intent(in) :: classA
11673 type(nothing_type) ,
intent(in) :: operationA
11678 PURE module subroutine trmm_EXP_CUDA_ONOA_CGMB_ONOB_CK1(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
11679#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11680 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CUDA_ONOA_CGMB_ONOB_CK1
11683 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
11684 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
11685 complex(CKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
11686 complex(CKG) ,
intent(in) :: alpha
11687 type(upperDiag_type) ,
intent(in) :: classA
11688 type(nothing_type) ,
intent(in) :: operationA
11695 PURE module subroutine trmm_EXP_CUDA_ONOA_CGMB_ONOB_RK5(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
11696#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11697 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CUDA_ONOA_CGMB_ONOB_RK5
11700 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
11701 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
11702 real(RKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
11703 real(RKG) ,
intent(in) :: alpha
11704 type(upperDiag_type) ,
intent(in) :: classA
11705 type(nothing_type) ,
intent(in) :: operationA
11710 PURE module subroutine trmm_EXP_CUDA_ONOA_CGMB_ONOB_RK4(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
11711#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11712 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CUDA_ONOA_CGMB_ONOB_RK4
11715 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
11716 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
11717 real(RKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
11718 real(RKG) ,
intent(in) :: alpha
11719 type(upperDiag_type) ,
intent(in) :: classA
11720 type(nothing_type) ,
intent(in) :: operationA
11725 PURE module subroutine trmm_EXP_CUDA_ONOA_CGMB_ONOB_RK3(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
11726#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11727 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CUDA_ONOA_CGMB_ONOB_RK3
11730 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
11731 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
11732 real(RKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
11733 real(RKG) ,
intent(in) :: alpha
11734 type(upperDiag_type) ,
intent(in) :: classA
11735 type(nothing_type) ,
intent(in) :: operationA
11740 PURE module subroutine trmm_EXP_CUDA_ONOA_CGMB_ONOB_RK2(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
11741#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11742 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CUDA_ONOA_CGMB_ONOB_RK2
11745 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
11746 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
11747 real(RKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
11748 real(RKG) ,
intent(in) :: alpha
11749 type(upperDiag_type) ,
intent(in) :: classA
11750 type(nothing_type) ,
intent(in) :: operationA
11755 PURE module subroutine trmm_EXP_CUDA_ONOA_CGMB_ONOB_RK1(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
11756#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11757 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CUDA_ONOA_CGMB_ONOB_RK1
11760 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
11761 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
11762 real(RKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
11763 real(RKG) ,
intent(in) :: alpha
11764 type(upperDiag_type) ,
intent(in) :: classA
11765 type(nothing_type) ,
intent(in) :: operationA
11778 PURE module subroutine trmm_EXP_CUDA_OTSA_CGMB_ONOB_CK5(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
11779#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11780 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CUDA_OTSA_CGMB_ONOB_CK5
11783 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
11784 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
11785 complex(CKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
11786 complex(CKG) ,
intent(in) :: alpha
11787 type(upperDiag_type) ,
intent(in) :: classA
11788 type(transSymm_type) ,
intent(in) :: operationA
11793 PURE module subroutine trmm_EXP_CUDA_OTSA_CGMB_ONOB_CK4(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
11794#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11795 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CUDA_OTSA_CGMB_ONOB_CK4
11798 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
11799 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
11800 complex(CKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
11801 complex(CKG) ,
intent(in) :: alpha
11802 type(upperDiag_type) ,
intent(in) :: classA
11803 type(transSymm_type) ,
intent(in) :: operationA
11808 PURE module subroutine trmm_EXP_CUDA_OTSA_CGMB_ONOB_CK3(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
11809#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11810 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CUDA_OTSA_CGMB_ONOB_CK3
11813 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
11814 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
11815 complex(CKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
11816 complex(CKG) ,
intent(in) :: alpha
11817 type(upperDiag_type) ,
intent(in) :: classA
11818 type(transSymm_type) ,
intent(in) :: operationA
11823 PURE module subroutine trmm_EXP_CUDA_OTSA_CGMB_ONOB_CK2(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
11824#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11825 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CUDA_OTSA_CGMB_ONOB_CK2
11828 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
11829 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
11830 complex(CKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
11831 complex(CKG) ,
intent(in) :: alpha
11832 type(upperDiag_type) ,
intent(in) :: classA
11833 type(transSymm_type) ,
intent(in) :: operationA
11838 PURE module subroutine trmm_EXP_CUDA_OTSA_CGMB_ONOB_CK1(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
11839#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11840 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CUDA_OTSA_CGMB_ONOB_CK1
11843 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
11844 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
11845 complex(CKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
11846 complex(CKG) ,
intent(in) :: alpha
11847 type(upperDiag_type) ,
intent(in) :: classA
11848 type(transSymm_type) ,
intent(in) :: operationA
11855 PURE module subroutine trmm_EXP_CUDA_OTSA_CGMB_ONOB_RK5(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
11856#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11857 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CUDA_OTSA_CGMB_ONOB_RK5
11860 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
11861 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
11862 real(RKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
11863 real(RKG) ,
intent(in) :: alpha
11864 type(upperDiag_type) ,
intent(in) :: classA
11865 type(transSymm_type) ,
intent(in) :: operationA
11870 PURE module subroutine trmm_EXP_CUDA_OTSA_CGMB_ONOB_RK4(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
11871#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11872 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CUDA_OTSA_CGMB_ONOB_RK4
11875 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
11876 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
11877 real(RKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
11878 real(RKG) ,
intent(in) :: alpha
11879 type(upperDiag_type) ,
intent(in) :: classA
11880 type(transSymm_type) ,
intent(in) :: operationA
11885 PURE module subroutine trmm_EXP_CUDA_OTSA_CGMB_ONOB_RK3(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
11886#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11887 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CUDA_OTSA_CGMB_ONOB_RK3
11890 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
11891 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
11892 real(RKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
11893 real(RKG) ,
intent(in) :: alpha
11894 type(upperDiag_type) ,
intent(in) :: classA
11895 type(transSymm_type) ,
intent(in) :: operationA
11900 PURE module subroutine trmm_EXP_CUDA_OTSA_CGMB_ONOB_RK2(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
11901#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11902 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CUDA_OTSA_CGMB_ONOB_RK2
11905 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
11906 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
11907 real(RKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
11908 real(RKG) ,
intent(in) :: alpha
11909 type(upperDiag_type) ,
intent(in) :: classA
11910 type(transSymm_type) ,
intent(in) :: operationA
11915 PURE module subroutine trmm_EXP_CUDA_OTSA_CGMB_ONOB_RK1(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
11916#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11917 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CUDA_OTSA_CGMB_ONOB_RK1
11920 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
11921 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
11922 real(RKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
11923 real(RKG) ,
intent(in) :: alpha
11924 type(upperDiag_type) ,
intent(in) :: classA
11925 type(transSymm_type) ,
intent(in) :: operationA
11938 PURE module subroutine trmm_EXP_CUDA_OTHA_CGMB_ONOB_CK5(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
11939#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11940 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CUDA_OTHA_CGMB_ONOB_CK5
11943 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
11944 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
11945 complex(CKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
11946 complex(CKG) ,
intent(in) :: alpha
11947 type(upperDiag_type) ,
intent(in) :: classA
11948 type(transHerm_type) ,
intent(in) :: operationA
11953 PURE module subroutine trmm_EXP_CUDA_OTHA_CGMB_ONOB_CK4(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
11954#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11955 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CUDA_OTHA_CGMB_ONOB_CK4
11958 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
11959 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
11960 complex(CKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
11961 complex(CKG) ,
intent(in) :: alpha
11962 type(upperDiag_type) ,
intent(in) :: classA
11963 type(transHerm_type) ,
intent(in) :: operationA
11968 PURE module subroutine trmm_EXP_CUDA_OTHA_CGMB_ONOB_CK3(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
11969#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11970 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CUDA_OTHA_CGMB_ONOB_CK3
11973 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
11974 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
11975 complex(CKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
11976 complex(CKG) ,
intent(in) :: alpha
11977 type(upperDiag_type) ,
intent(in) :: classA
11978 type(transHerm_type) ,
intent(in) :: operationA
11983 PURE module subroutine trmm_EXP_CUDA_OTHA_CGMB_ONOB_CK2(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
11984#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11985 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CUDA_OTHA_CGMB_ONOB_CK2
11988 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
11989 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
11990 complex(CKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
11991 complex(CKG) ,
intent(in) :: alpha
11992 type(upperDiag_type) ,
intent(in) :: classA
11993 type(transHerm_type) ,
intent(in) :: operationA
11998 PURE module subroutine trmm_EXP_CUDA_OTHA_CGMB_ONOB_CK1(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
11999#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12000 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CUDA_OTHA_CGMB_ONOB_CK1
12003 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
12004 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
12005 complex(CKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
12006 complex(CKG) ,
intent(in) :: alpha
12007 type(upperDiag_type) ,
intent(in) :: classA
12008 type(transHerm_type) ,
intent(in) :: operationA
12015 PURE module subroutine trmm_EXP_CUDA_OTHA_CGMB_ONOB_RK5(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
12016#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12017 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CUDA_OTHA_CGMB_ONOB_RK5
12020 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
12021 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
12022 real(RKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
12023 real(RKG) ,
intent(in) :: alpha
12024 type(upperDiag_type) ,
intent(in) :: classA
12025 type(transHerm_type) ,
intent(in) :: operationA
12030 PURE module subroutine trmm_EXP_CUDA_OTHA_CGMB_ONOB_RK4(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
12031#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12032 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CUDA_OTHA_CGMB_ONOB_RK4
12035 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
12036 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
12037 real(RKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
12038 real(RKG) ,
intent(in) :: alpha
12039 type(upperDiag_type) ,
intent(in) :: classA
12040 type(transHerm_type) ,
intent(in) :: operationA
12045 PURE module subroutine trmm_EXP_CUDA_OTHA_CGMB_ONOB_RK3(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
12046#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12047 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CUDA_OTHA_CGMB_ONOB_RK3
12050 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
12051 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
12052 real(RKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
12053 real(RKG) ,
intent(in) :: alpha
12054 type(upperDiag_type) ,
intent(in) :: classA
12055 type(transHerm_type) ,
intent(in) :: operationA
12060 PURE module subroutine trmm_EXP_CUDA_OTHA_CGMB_ONOB_RK2(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
12061#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12062 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CUDA_OTHA_CGMB_ONOB_RK2
12065 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
12066 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
12067 real(RKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
12068 real(RKG) ,
intent(in) :: alpha
12069 type(upperDiag_type) ,
intent(in) :: classA
12070 type(transHerm_type) ,
intent(in) :: operationA
12075 PURE module subroutine trmm_EXP_CUDA_OTHA_CGMB_ONOB_RK1(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
12076#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12077 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CUDA_OTHA_CGMB_ONOB_RK1
12080 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
12081 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
12082 real(RKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
12083 real(RKG) ,
intent(in) :: alpha
12084 type(upperDiag_type) ,
intent(in) :: classA
12085 type(transHerm_type) ,
intent(in) :: operationA
12102 PURE module subroutine trmm_EXP_CLUA_ONOA_CGMB_ONOB_CK5(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
12103#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12104 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CLUA_ONOA_CGMB_ONOB_CK5
12107 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
12108 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
12109 complex(CKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
12110 complex(CKG) ,
intent(in) :: alpha
12111 type(lowerUnit_type) ,
intent(in) :: classA
12112 type(nothing_type) ,
intent(in) :: operationA
12117 PURE module subroutine trmm_EXP_CLUA_ONOA_CGMB_ONOB_CK4(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
12118#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12119 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CLUA_ONOA_CGMB_ONOB_CK4
12122 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
12123 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
12124 complex(CKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
12125 complex(CKG) ,
intent(in) :: alpha
12126 type(lowerUnit_type) ,
intent(in) :: classA
12127 type(nothing_type) ,
intent(in) :: operationA
12132 PURE module subroutine trmm_EXP_CLUA_ONOA_CGMB_ONOB_CK3(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
12133#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12134 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CLUA_ONOA_CGMB_ONOB_CK3
12137 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
12138 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
12139 complex(CKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
12140 complex(CKG) ,
intent(in) :: alpha
12141 type(lowerUnit_type) ,
intent(in) :: classA
12142 type(nothing_type) ,
intent(in) :: operationA
12147 PURE module subroutine trmm_EXP_CLUA_ONOA_CGMB_ONOB_CK2(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
12148#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12149 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CLUA_ONOA_CGMB_ONOB_CK2
12152 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
12153 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
12154 complex(CKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
12155 complex(CKG) ,
intent(in) :: alpha
12156 type(lowerUnit_type) ,
intent(in) :: classA
12157 type(nothing_type) ,
intent(in) :: operationA
12162 PURE module subroutine trmm_EXP_CLUA_ONOA_CGMB_ONOB_CK1(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
12163#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12164 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CLUA_ONOA_CGMB_ONOB_CK1
12167 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
12168 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
12169 complex(CKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
12170 complex(CKG) ,
intent(in) :: alpha
12171 type(lowerUnit_type) ,
intent(in) :: classA
12172 type(nothing_type) ,
intent(in) :: operationA
12179 PURE module subroutine trmm_EXP_CLUA_ONOA_CGMB_ONOB_RK5(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
12180#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12181 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CLUA_ONOA_CGMB_ONOB_RK5
12184 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
12185 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
12186 real(RKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
12187 real(RKG) ,
intent(in) :: alpha
12188 type(lowerUnit_type) ,
intent(in) :: classA
12189 type(nothing_type) ,
intent(in) :: operationA
12194 PURE module subroutine trmm_EXP_CLUA_ONOA_CGMB_ONOB_RK4(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
12195#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12196 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CLUA_ONOA_CGMB_ONOB_RK4
12199 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
12200 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
12201 real(RKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
12202 real(RKG) ,
intent(in) :: alpha
12203 type(lowerUnit_type) ,
intent(in) :: classA
12204 type(nothing_type) ,
intent(in) :: operationA
12209 PURE module subroutine trmm_EXP_CLUA_ONOA_CGMB_ONOB_RK3(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
12210#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12211 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CLUA_ONOA_CGMB_ONOB_RK3
12214 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
12215 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
12216 real(RKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
12217 real(RKG) ,
intent(in) :: alpha
12218 type(lowerUnit_type) ,
intent(in) :: classA
12219 type(nothing_type) ,
intent(in) :: operationA
12224 PURE module subroutine trmm_EXP_CLUA_ONOA_CGMB_ONOB_RK2(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
12225#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12226 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CLUA_ONOA_CGMB_ONOB_RK2
12229 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
12230 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
12231 real(RKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
12232 real(RKG) ,
intent(in) :: alpha
12233 type(lowerUnit_type) ,
intent(in) :: classA
12234 type(nothing_type) ,
intent(in) :: operationA
12239 PURE module subroutine trmm_EXP_CLUA_ONOA_CGMB_ONOB_RK1(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
12240#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12241 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CLUA_ONOA_CGMB_ONOB_RK1
12244 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
12245 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
12246 real(RKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
12247 real(RKG) ,
intent(in) :: alpha
12248 type(lowerUnit_type) ,
intent(in) :: classA
12249 type(nothing_type) ,
intent(in) :: operationA
12262 PURE module subroutine trmm_EXP_CLUA_OTSA_CGMB_ONOB_CK5(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
12263#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12264 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CLUA_OTSA_CGMB_ONOB_CK5
12267 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
12268 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
12269 complex(CKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
12270 complex(CKG) ,
intent(in) :: alpha
12271 type(lowerUnit_type) ,
intent(in) :: classA
12272 type(transSymm_type) ,
intent(in) :: operationA
12277 PURE module subroutine trmm_EXP_CLUA_OTSA_CGMB_ONOB_CK4(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
12278#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12279 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CLUA_OTSA_CGMB_ONOB_CK4
12282 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
12283 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
12284 complex(CKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
12285 complex(CKG) ,
intent(in) :: alpha
12286 type(lowerUnit_type) ,
intent(in) :: classA
12287 type(transSymm_type) ,
intent(in) :: operationA
12292 PURE module subroutine trmm_EXP_CLUA_OTSA_CGMB_ONOB_CK3(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
12293#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12294 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CLUA_OTSA_CGMB_ONOB_CK3
12297 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
12298 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
12299 complex(CKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
12300 complex(CKG) ,
intent(in) :: alpha
12301 type(lowerUnit_type) ,
intent(in) :: classA
12302 type(transSymm_type) ,
intent(in) :: operationA
12307 PURE module subroutine trmm_EXP_CLUA_OTSA_CGMB_ONOB_CK2(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
12308#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12309 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CLUA_OTSA_CGMB_ONOB_CK2
12312 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
12313 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
12314 complex(CKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
12315 complex(CKG) ,
intent(in) :: alpha
12316 type(lowerUnit_type) ,
intent(in) :: classA
12317 type(transSymm_type) ,
intent(in) :: operationA
12322 PURE module subroutine trmm_EXP_CLUA_OTSA_CGMB_ONOB_CK1(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
12323#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12324 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CLUA_OTSA_CGMB_ONOB_CK1
12327 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
12328 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
12329 complex(CKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
12330 complex(CKG) ,
intent(in) :: alpha
12331 type(lowerUnit_type) ,
intent(in) :: classA
12332 type(transSymm_type) ,
intent(in) :: operationA
12339 PURE module subroutine trmm_EXP_CLUA_OTSA_CGMB_ONOB_RK5(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
12340#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12341 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CLUA_OTSA_CGMB_ONOB_RK5
12344 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
12345 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
12346 real(RKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
12347 real(RKG) ,
intent(in) :: alpha
12348 type(lowerUnit_type) ,
intent(in) :: classA
12349 type(transSymm_type) ,
intent(in) :: operationA
12354 PURE module subroutine trmm_EXP_CLUA_OTSA_CGMB_ONOB_RK4(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
12355#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12356 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CLUA_OTSA_CGMB_ONOB_RK4
12359 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
12360 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
12361 real(RKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
12362 real(RKG) ,
intent(in) :: alpha
12363 type(lowerUnit_type) ,
intent(in) :: classA
12364 type(transSymm_type) ,
intent(in) :: operationA
12369 PURE module subroutine trmm_EXP_CLUA_OTSA_CGMB_ONOB_RK3(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
12370#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12371 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CLUA_OTSA_CGMB_ONOB_RK3
12374 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
12375 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
12376 real(RKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
12377 real(RKG) ,
intent(in) :: alpha
12378 type(lowerUnit_type) ,
intent(in) :: classA
12379 type(transSymm_type) ,
intent(in) :: operationA
12384 PURE module subroutine trmm_EXP_CLUA_OTSA_CGMB_ONOB_RK2(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
12385#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12386 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CLUA_OTSA_CGMB_ONOB_RK2
12389 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
12390 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
12391 real(RKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
12392 real(RKG) ,
intent(in) :: alpha
12393 type(lowerUnit_type) ,
intent(in) :: classA
12394 type(transSymm_type) ,
intent(in) :: operationA
12399 PURE module subroutine trmm_EXP_CLUA_OTSA_CGMB_ONOB_RK1(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
12400#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12401 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CLUA_OTSA_CGMB_ONOB_RK1
12404 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
12405 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
12406 real(RKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
12407 real(RKG) ,
intent(in) :: alpha
12408 type(lowerUnit_type) ,
intent(in) :: classA
12409 type(transSymm_type) ,
intent(in) :: operationA
12422 PURE module subroutine trmm_EXP_CLUA_OTHA_CGMB_ONOB_CK5(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
12423#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12424 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CLUA_OTHA_CGMB_ONOB_CK5
12427 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
12428 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
12429 complex(CKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
12430 complex(CKG) ,
intent(in) :: alpha
12431 type(lowerUnit_type) ,
intent(in) :: classA
12432 type(transHerm_type) ,
intent(in) :: operationA
12437 PURE module subroutine trmm_EXP_CLUA_OTHA_CGMB_ONOB_CK4(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
12438#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12439 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CLUA_OTHA_CGMB_ONOB_CK4
12442 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
12443 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
12444 complex(CKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
12445 complex(CKG) ,
intent(in) :: alpha
12446 type(lowerUnit_type) ,
intent(in) :: classA
12447 type(transHerm_type) ,
intent(in) :: operationA
12452 PURE module subroutine trmm_EXP_CLUA_OTHA_CGMB_ONOB_CK3(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
12453#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12454 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CLUA_OTHA_CGMB_ONOB_CK3
12457 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
12458 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
12459 complex(CKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
12460 complex(CKG) ,
intent(in) :: alpha
12461 type(lowerUnit_type) ,
intent(in) :: classA
12462 type(transHerm_type) ,
intent(in) :: operationA
12467 PURE module subroutine trmm_EXP_CLUA_OTHA_CGMB_ONOB_CK2(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
12468#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12469 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CLUA_OTHA_CGMB_ONOB_CK2
12472 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
12473 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
12474 complex(CKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
12475 complex(CKG) ,
intent(in) :: alpha
12476 type(lowerUnit_type) ,
intent(in) :: classA
12477 type(transHerm_type) ,
intent(in) :: operationA
12482 PURE module subroutine trmm_EXP_CLUA_OTHA_CGMB_ONOB_CK1(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
12483#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12484 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CLUA_OTHA_CGMB_ONOB_CK1
12487 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
12488 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
12489 complex(CKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
12490 complex(CKG) ,
intent(in) :: alpha
12491 type(lowerUnit_type) ,
intent(in) :: classA
12492 type(transHerm_type) ,
intent(in) :: operationA
12499 PURE module subroutine trmm_EXP_CLUA_OTHA_CGMB_ONOB_RK5(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
12500#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12501 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CLUA_OTHA_CGMB_ONOB_RK5
12504 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
12505 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
12506 real(RKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
12507 real(RKG) ,
intent(in) :: alpha
12508 type(lowerUnit_type) ,
intent(in) :: classA
12509 type(transHerm_type) ,
intent(in) :: operationA
12514 PURE module subroutine trmm_EXP_CLUA_OTHA_CGMB_ONOB_RK4(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
12515#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12516 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CLUA_OTHA_CGMB_ONOB_RK4
12519 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
12520 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
12521 real(RKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
12522 real(RKG) ,
intent(in) :: alpha
12523 type(lowerUnit_type) ,
intent(in) :: classA
12524 type(transHerm_type) ,
intent(in) :: operationA
12529 PURE module subroutine trmm_EXP_CLUA_OTHA_CGMB_ONOB_RK3(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
12530#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12531 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CLUA_OTHA_CGMB_ONOB_RK3
12534 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
12535 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
12536 real(RKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
12537 real(RKG) ,
intent(in) :: alpha
12538 type(lowerUnit_type) ,
intent(in) :: classA
12539 type(transHerm_type) ,
intent(in) :: operationA
12544 PURE module subroutine trmm_EXP_CLUA_OTHA_CGMB_ONOB_RK2(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
12545#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12546 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CLUA_OTHA_CGMB_ONOB_RK2
12549 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
12550 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
12551 real(RKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
12552 real(RKG) ,
intent(in) :: alpha
12553 type(lowerUnit_type) ,
intent(in) :: classA
12554 type(transHerm_type) ,
intent(in) :: operationA
12559 PURE module subroutine trmm_EXP_CLUA_OTHA_CGMB_ONOB_RK1(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
12560#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12561 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CLUA_OTHA_CGMB_ONOB_RK1
12564 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
12565 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
12566 real(RKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
12567 real(RKG) ,
intent(in) :: alpha
12568 type(lowerUnit_type) ,
intent(in) :: classA
12569 type(transHerm_type) ,
intent(in) :: operationA
12586 PURE module subroutine trmm_EXP_CUUA_ONOA_CGMB_ONOB_CK5(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
12587#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12588 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CUUA_ONOA_CGMB_ONOB_CK5
12591 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
12592 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
12593 complex(CKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
12594 complex(CKG) ,
intent(in) :: alpha
12595 type(upperUnit_type) ,
intent(in) :: classA
12596 type(nothing_type) ,
intent(in) :: operationA
12601 PURE module subroutine trmm_EXP_CUUA_ONOA_CGMB_ONOB_CK4(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
12602#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12603 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CUUA_ONOA_CGMB_ONOB_CK4
12606 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
12607 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
12608 complex(CKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
12609 complex(CKG) ,
intent(in) :: alpha
12610 type(upperUnit_type) ,
intent(in) :: classA
12611 type(nothing_type) ,
intent(in) :: operationA
12616 PURE module subroutine trmm_EXP_CUUA_ONOA_CGMB_ONOB_CK3(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
12617#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12618 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CUUA_ONOA_CGMB_ONOB_CK3
12621 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
12622 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
12623 complex(CKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
12624 complex(CKG) ,
intent(in) :: alpha
12625 type(upperUnit_type) ,
intent(in) :: classA
12626 type(nothing_type) ,
intent(in) :: operationA
12631 PURE module subroutine trmm_EXP_CUUA_ONOA_CGMB_ONOB_CK2(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
12632#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12633 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CUUA_ONOA_CGMB_ONOB_CK2
12636 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
12637 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
12638 complex(CKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
12639 complex(CKG) ,
intent(in) :: alpha
12640 type(upperUnit_type) ,
intent(in) :: classA
12641 type(nothing_type) ,
intent(in) :: operationA
12646 PURE module subroutine trmm_EXP_CUUA_ONOA_CGMB_ONOB_CK1(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
12647#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12648 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CUUA_ONOA_CGMB_ONOB_CK1
12651 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
12652 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
12653 complex(CKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
12654 complex(CKG) ,
intent(in) :: alpha
12655 type(upperUnit_type) ,
intent(in) :: classA
12656 type(nothing_type) ,
intent(in) :: operationA
12663 PURE module subroutine trmm_EXP_CUUA_ONOA_CGMB_ONOB_RK5(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
12664#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12665 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CUUA_ONOA_CGMB_ONOB_RK5
12668 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
12669 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
12670 real(RKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
12671 real(RKG) ,
intent(in) :: alpha
12672 type(upperUnit_type) ,
intent(in) :: classA
12673 type(nothing_type) ,
intent(in) :: operationA
12678 PURE module subroutine trmm_EXP_CUUA_ONOA_CGMB_ONOB_RK4(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
12679#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12680 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CUUA_ONOA_CGMB_ONOB_RK4
12683 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
12684 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
12685 real(RKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
12686 real(RKG) ,
intent(in) :: alpha
12687 type(upperUnit_type) ,
intent(in) :: classA
12688 type(nothing_type) ,
intent(in) :: operationA
12693 PURE module subroutine trmm_EXP_CUUA_ONOA_CGMB_ONOB_RK3(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
12694#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12695 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CUUA_ONOA_CGMB_ONOB_RK3
12698 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
12699 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
12700 real(RKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
12701 real(RKG) ,
intent(in) :: alpha
12702 type(upperUnit_type) ,
intent(in) :: classA
12703 type(nothing_type) ,
intent(in) :: operationA
12708 PURE module subroutine trmm_EXP_CUUA_ONOA_CGMB_ONOB_RK2(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
12709#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12710 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CUUA_ONOA_CGMB_ONOB_RK2
12713 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
12714 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
12715 real(RKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
12716 real(RKG) ,
intent(in) :: alpha
12717 type(upperUnit_type) ,
intent(in) :: classA
12718 type(nothing_type) ,
intent(in) :: operationA
12723 PURE module subroutine trmm_EXP_CUUA_ONOA_CGMB_ONOB_RK1(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
12724#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12725 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CUUA_ONOA_CGMB_ONOB_RK1
12728 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
12729 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
12730 real(RKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
12731 real(RKG) ,
intent(in) :: alpha
12732 type(upperUnit_type) ,
intent(in) :: classA
12733 type(nothing_type) ,
intent(in) :: operationA
12746 PURE module subroutine trmm_EXP_CUUA_OTSA_CGMB_ONOB_CK5(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
12747#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12748 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CUUA_OTSA_CGMB_ONOB_CK5
12751 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
12752 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
12753 complex(CKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
12754 complex(CKG) ,
intent(in) :: alpha
12755 type(upperUnit_type) ,
intent(in) :: classA
12756 type(transSymm_type) ,
intent(in) :: operationA
12761 PURE module subroutine trmm_EXP_CUUA_OTSA_CGMB_ONOB_CK4(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
12762#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12763 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CUUA_OTSA_CGMB_ONOB_CK4
12766 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
12767 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
12768 complex(CKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
12769 complex(CKG) ,
intent(in) :: alpha
12770 type(upperUnit_type) ,
intent(in) :: classA
12771 type(transSymm_type) ,
intent(in) :: operationA
12776 PURE module subroutine trmm_EXP_CUUA_OTSA_CGMB_ONOB_CK3(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
12777#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12778 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CUUA_OTSA_CGMB_ONOB_CK3
12781 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
12782 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
12783 complex(CKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
12784 complex(CKG) ,
intent(in) :: alpha
12785 type(upperUnit_type) ,
intent(in) :: classA
12786 type(transSymm_type) ,
intent(in) :: operationA
12791 PURE module subroutine trmm_EXP_CUUA_OTSA_CGMB_ONOB_CK2(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
12792#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12793 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CUUA_OTSA_CGMB_ONOB_CK2
12796 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
12797 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
12798 complex(CKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
12799 complex(CKG) ,
intent(in) :: alpha
12800 type(upperUnit_type) ,
intent(in) :: classA
12801 type(transSymm_type) ,
intent(in) :: operationA
12806 PURE module subroutine trmm_EXP_CUUA_OTSA_CGMB_ONOB_CK1(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
12807#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12808 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CUUA_OTSA_CGMB_ONOB_CK1
12811 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
12812 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
12813 complex(CKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
12814 complex(CKG) ,
intent(in) :: alpha
12815 type(upperUnit_type) ,
intent(in) :: classA
12816 type(transSymm_type) ,
intent(in) :: operationA
12823 PURE module subroutine trmm_EXP_CUUA_OTSA_CGMB_ONOB_RK5(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
12824#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12825 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CUUA_OTSA_CGMB_ONOB_RK5
12828 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
12829 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
12830 real(RKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
12831 real(RKG) ,
intent(in) :: alpha
12832 type(upperUnit_type) ,
intent(in) :: classA
12833 type(transSymm_type) ,
intent(in) :: operationA
12838 PURE module subroutine trmm_EXP_CUUA_OTSA_CGMB_ONOB_RK4(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
12839#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12840 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CUUA_OTSA_CGMB_ONOB_RK4
12843 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
12844 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
12845 real(RKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
12846 real(RKG) ,
intent(in) :: alpha
12847 type(upperUnit_type) ,
intent(in) :: classA
12848 type(transSymm_type) ,
intent(in) :: operationA
12853 PURE module subroutine trmm_EXP_CUUA_OTSA_CGMB_ONOB_RK3(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
12854#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12855 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CUUA_OTSA_CGMB_ONOB_RK3
12858 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
12859 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
12860 real(RKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
12861 real(RKG) ,
intent(in) :: alpha
12862 type(upperUnit_type) ,
intent(in) :: classA
12863 type(transSymm_type) ,
intent(in) :: operationA
12868 PURE module subroutine trmm_EXP_CUUA_OTSA_CGMB_ONOB_RK2(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
12869#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12870 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CUUA_OTSA_CGMB_ONOB_RK2
12873 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
12874 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
12875 real(RKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
12876 real(RKG) ,
intent(in) :: alpha
12877 type(upperUnit_type) ,
intent(in) :: classA
12878 type(transSymm_type) ,
intent(in) :: operationA
12883 PURE module subroutine trmm_EXP_CUUA_OTSA_CGMB_ONOB_RK1(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
12884#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12885 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CUUA_OTSA_CGMB_ONOB_RK1
12888 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
12889 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
12890 real(RKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
12891 real(RKG) ,
intent(in) :: alpha
12892 type(upperUnit_type) ,
intent(in) :: classA
12893 type(transSymm_type) ,
intent(in) :: operationA
12906 PURE module subroutine trmm_EXP_CUUA_OTHA_CGMB_ONOB_CK5(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
12907#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12908 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CUUA_OTHA_CGMB_ONOB_CK5
12911 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
12912 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
12913 complex(CKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
12914 complex(CKG) ,
intent(in) :: alpha
12915 type(upperUnit_type) ,
intent(in) :: classA
12916 type(transHerm_type) ,
intent(in) :: operationA
12921 PURE module subroutine trmm_EXP_CUUA_OTHA_CGMB_ONOB_CK4(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
12922#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12923 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CUUA_OTHA_CGMB_ONOB_CK4
12926 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
12927 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
12928 complex(CKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
12929 complex(CKG) ,
intent(in) :: alpha
12930 type(upperUnit_type) ,
intent(in) :: classA
12931 type(transHerm_type) ,
intent(in) :: operationA
12936 PURE module subroutine trmm_EXP_CUUA_OTHA_CGMB_ONOB_CK3(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
12937#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12938 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CUUA_OTHA_CGMB_ONOB_CK3
12941 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
12942 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
12943 complex(CKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
12944 complex(CKG) ,
intent(in) :: alpha
12945 type(upperUnit_type) ,
intent(in) :: classA
12946 type(transHerm_type) ,
intent(in) :: operationA
12951 PURE module subroutine trmm_EXP_CUUA_OTHA_CGMB_ONOB_CK2(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
12952#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12953 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CUUA_OTHA_CGMB_ONOB_CK2
12956 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
12957 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
12958 complex(CKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
12959 complex(CKG) ,
intent(in) :: alpha
12960 type(upperUnit_type) ,
intent(in) :: classA
12961 type(transHerm_type) ,
intent(in) :: operationA
12966 PURE module subroutine trmm_EXP_CUUA_OTHA_CGMB_ONOB_CK1(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
12967#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12968 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CUUA_OTHA_CGMB_ONOB_CK1
12971 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
12972 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
12973 complex(CKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
12974 complex(CKG) ,
intent(in) :: alpha
12975 type(upperUnit_type) ,
intent(in) :: classA
12976 type(transHerm_type) ,
intent(in) :: operationA
12983 PURE module subroutine trmm_EXP_CUUA_OTHA_CGMB_ONOB_RK5(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
12984#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12985 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CUUA_OTHA_CGMB_ONOB_RK5
12988 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
12989 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
12990 real(RKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
12991 real(RKG) ,
intent(in) :: alpha
12992 type(upperUnit_type) ,
intent(in) :: classA
12993 type(transHerm_type) ,
intent(in) :: operationA
12998 PURE module subroutine trmm_EXP_CUUA_OTHA_CGMB_ONOB_RK4(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
12999#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13000 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CUUA_OTHA_CGMB_ONOB_RK4
13003 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
13004 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
13005 real(RKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
13006 real(RKG) ,
intent(in) :: alpha
13007 type(upperUnit_type) ,
intent(in) :: classA
13008 type(transHerm_type) ,
intent(in) :: operationA
13013 PURE module subroutine trmm_EXP_CUUA_OTHA_CGMB_ONOB_RK3(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
13014#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13015 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CUUA_OTHA_CGMB_ONOB_RK3
13018 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
13019 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
13020 real(RKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
13021 real(RKG) ,
intent(in) :: alpha
13022 type(upperUnit_type) ,
intent(in) :: classA
13023 type(transHerm_type) ,
intent(in) :: operationA
13028 PURE module subroutine trmm_EXP_CUUA_OTHA_CGMB_ONOB_RK2(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
13029#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13030 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CUUA_OTHA_CGMB_ONOB_RK2
13033 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
13034 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
13035 real(RKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
13036 real(RKG) ,
intent(in) :: alpha
13037 type(upperUnit_type) ,
intent(in) :: classA
13038 type(transHerm_type) ,
intent(in) :: operationA
13043 PURE module subroutine trmm_EXP_CUUA_OTHA_CGMB_ONOB_RK1(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
13044#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13045 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CUUA_OTHA_CGMB_ONOB_RK1
13048 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
13049 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
13050 real(RKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
13051 real(RKG) ,
intent(in) :: alpha
13052 type(upperUnit_type) ,
intent(in) :: classA
13053 type(transHerm_type) ,
intent(in) :: operationA
13074 PURE module subroutine trmm_EXP_CGMA_ONOA_CLDB_ONOB_CK5(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
13075#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13076 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CGMA_ONOA_CLDB_ONOB_CK5
13079 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
13080 complex(CKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
13081 complex(CKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
13082 complex(CKG) ,
intent(in) :: alpha
13083 type(lowerDiag_type) ,
intent(in) :: classB
13084 type(nothing_type) ,
intent(in) :: operationB
13089 PURE module subroutine trmm_EXP_CGMA_ONOA_CLDB_ONOB_CK4(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
13090#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13091 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CGMA_ONOA_CLDB_ONOB_CK4
13094 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
13095 complex(CKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
13096 complex(CKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
13097 complex(CKG) ,
intent(in) :: alpha
13098 type(lowerDiag_type) ,
intent(in) :: classB
13099 type(nothing_type) ,
intent(in) :: operationB
13104 PURE module subroutine trmm_EXP_CGMA_ONOA_CLDB_ONOB_CK3(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
13105#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13106 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CGMA_ONOA_CLDB_ONOB_CK3
13109 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
13110 complex(CKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
13111 complex(CKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
13112 complex(CKG) ,
intent(in) :: alpha
13113 type(lowerDiag_type) ,
intent(in) :: classB
13114 type(nothing_type) ,
intent(in) :: operationB
13119 PURE module subroutine trmm_EXP_CGMA_ONOA_CLDB_ONOB_CK2(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
13120#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13121 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CGMA_ONOA_CLDB_ONOB_CK2
13124 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
13125 complex(CKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
13126 complex(CKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
13127 complex(CKG) ,
intent(in) :: alpha
13128 type(lowerDiag_type) ,
intent(in) :: classB
13129 type(nothing_type) ,
intent(in) :: operationB
13134 PURE module subroutine trmm_EXP_CGMA_ONOA_CLDB_ONOB_CK1(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
13135#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13136 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CGMA_ONOA_CLDB_ONOB_CK1
13139 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
13140 complex(CKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
13141 complex(CKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
13142 complex(CKG) ,
intent(in) :: alpha
13143 type(lowerDiag_type) ,
intent(in) :: classB
13144 type(nothing_type) ,
intent(in) :: operationB
13151 PURE module subroutine trmm_EXP_CGMA_ONOA_CLDB_ONOB_RK5(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
13152#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13153 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CGMA_ONOA_CLDB_ONOB_RK5
13156 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
13157 real(RKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
13158 real(RKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
13159 real(RKG) ,
intent(in) :: alpha
13160 type(lowerDiag_type) ,
intent(in) :: classB
13161 type(nothing_type) ,
intent(in) :: operationB
13166 PURE module subroutine trmm_EXP_CGMA_ONOA_CLDB_ONOB_RK4(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
13167#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13168 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CGMA_ONOA_CLDB_ONOB_RK4
13171 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
13172 real(RKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
13173 real(RKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
13174 real(RKG) ,
intent(in) :: alpha
13175 type(lowerDiag_type) ,
intent(in) :: classB
13176 type(nothing_type) ,
intent(in) :: operationB
13181 PURE module subroutine trmm_EXP_CGMA_ONOA_CLDB_ONOB_RK3(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
13182#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13183 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CGMA_ONOA_CLDB_ONOB_RK3
13186 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
13187 real(RKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
13188 real(RKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
13189 real(RKG) ,
intent(in) :: alpha
13190 type(lowerDiag_type) ,
intent(in) :: classB
13191 type(nothing_type) ,
intent(in) :: operationB
13196 PURE module subroutine trmm_EXP_CGMA_ONOA_CLDB_ONOB_RK2(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
13197#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13198 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CGMA_ONOA_CLDB_ONOB_RK2
13201 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
13202 real(RKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
13203 real(RKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
13204 real(RKG) ,
intent(in) :: alpha
13205 type(lowerDiag_type) ,
intent(in) :: classB
13206 type(nothing_type) ,
intent(in) :: operationB
13211 PURE module subroutine trmm_EXP_CGMA_ONOA_CLDB_ONOB_RK1(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
13212#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13213 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CGMA_ONOA_CLDB_ONOB_RK1
13216 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
13217 real(RKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
13218 real(RKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
13219 real(RKG) ,
intent(in) :: alpha
13220 type(lowerDiag_type) ,
intent(in) :: classB
13221 type(nothing_type) ,
intent(in) :: operationB
13234 PURE module subroutine trmm_EXP_CGMA_ONOA_CLDB_OTSB_CK5(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
13235#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13236 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CGMA_ONOA_CLDB_OTSB_CK5
13239 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
13240 complex(CKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
13241 complex(CKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
13242 complex(CKG) ,
intent(in) :: alpha
13243 type(lowerDiag_type) ,
intent(in) :: classB
13244 type(transSymm_type) ,
intent(in) :: operationB
13249 PURE module subroutine trmm_EXP_CGMA_ONOA_CLDB_OTSB_CK4(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
13250#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13251 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CGMA_ONOA_CLDB_OTSB_CK4
13254 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
13255 complex(CKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
13256 complex(CKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
13257 complex(CKG) ,
intent(in) :: alpha
13258 type(lowerDiag_type) ,
intent(in) :: classB
13259 type(transSymm_type) ,
intent(in) :: operationB
13264 PURE module subroutine trmm_EXP_CGMA_ONOA_CLDB_OTSB_CK3(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
13265#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13266 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CGMA_ONOA_CLDB_OTSB_CK3
13269 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
13270 complex(CKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
13271 complex(CKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
13272 complex(CKG) ,
intent(in) :: alpha
13273 type(lowerDiag_type) ,
intent(in) :: classB
13274 type(transSymm_type) ,
intent(in) :: operationB
13279 PURE module subroutine trmm_EXP_CGMA_ONOA_CLDB_OTSB_CK2(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
13280#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13281 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CGMA_ONOA_CLDB_OTSB_CK2
13284 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
13285 complex(CKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
13286 complex(CKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
13287 complex(CKG) ,
intent(in) :: alpha
13288 type(lowerDiag_type) ,
intent(in) :: classB
13289 type(transSymm_type) ,
intent(in) :: operationB
13294 PURE module subroutine trmm_EXP_CGMA_ONOA_CLDB_OTSB_CK1(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
13295#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13296 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CGMA_ONOA_CLDB_OTSB_CK1
13299 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
13300 complex(CKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
13301 complex(CKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
13302 complex(CKG) ,
intent(in) :: alpha
13303 type(lowerDiag_type) ,
intent(in) :: classB
13304 type(transSymm_type) ,
intent(in) :: operationB
13311 PURE module subroutine trmm_EXP_CGMA_ONOA_CLDB_OTSB_RK5(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
13312#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13313 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CGMA_ONOA_CLDB_OTSB_RK5
13316 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
13317 real(RKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
13318 real(RKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
13319 real(RKG) ,
intent(in) :: alpha
13320 type(lowerDiag_type) ,
intent(in) :: classB
13321 type(transSymm_type) ,
intent(in) :: operationB
13326 PURE module subroutine trmm_EXP_CGMA_ONOA_CLDB_OTSB_RK4(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
13327#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13328 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CGMA_ONOA_CLDB_OTSB_RK4
13331 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
13332 real(RKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
13333 real(RKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
13334 real(RKG) ,
intent(in) :: alpha
13335 type(lowerDiag_type) ,
intent(in) :: classB
13336 type(transSymm_type) ,
intent(in) :: operationB
13341 PURE module subroutine trmm_EXP_CGMA_ONOA_CLDB_OTSB_RK3(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
13342#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13343 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CGMA_ONOA_CLDB_OTSB_RK3
13346 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
13347 real(RKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
13348 real(RKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
13349 real(RKG) ,
intent(in) :: alpha
13350 type(lowerDiag_type) ,
intent(in) :: classB
13351 type(transSymm_type) ,
intent(in) :: operationB
13356 PURE module subroutine trmm_EXP_CGMA_ONOA_CLDB_OTSB_RK2(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
13357#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13358 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CGMA_ONOA_CLDB_OTSB_RK2
13361 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
13362 real(RKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
13363 real(RKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
13364 real(RKG) ,
intent(in) :: alpha
13365 type(lowerDiag_type) ,
intent(in) :: classB
13366 type(transSymm_type) ,
intent(in) :: operationB
13371 PURE module subroutine trmm_EXP_CGMA_ONOA_CLDB_OTSB_RK1(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
13372#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13373 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CGMA_ONOA_CLDB_OTSB_RK1
13376 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
13377 real(RKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
13378 real(RKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
13379 real(RKG) ,
intent(in) :: alpha
13380 type(lowerDiag_type) ,
intent(in) :: classB
13381 type(transSymm_type) ,
intent(in) :: operationB
13394 PURE module subroutine trmm_EXP_CGMA_ONOA_CLDB_OTHB_CK5(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
13395#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13396 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CGMA_ONOA_CLDB_OTHB_CK5
13399 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
13400 complex(CKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
13401 complex(CKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
13402 complex(CKG) ,
intent(in) :: alpha
13403 type(lowerDiag_type) ,
intent(in) :: classB
13404 type(transHerm_type) ,
intent(in) :: operationB
13409 PURE module subroutine trmm_EXP_CGMA_ONOA_CLDB_OTHB_CK4(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
13410#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13411 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CGMA_ONOA_CLDB_OTHB_CK4
13414 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
13415 complex(CKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
13416 complex(CKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
13417 complex(CKG) ,
intent(in) :: alpha
13418 type(lowerDiag_type) ,
intent(in) :: classB
13419 type(transHerm_type) ,
intent(in) :: operationB
13424 PURE module subroutine trmm_EXP_CGMA_ONOA_CLDB_OTHB_CK3(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
13425#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13426 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CGMA_ONOA_CLDB_OTHB_CK3
13429 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
13430 complex(CKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
13431 complex(CKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
13432 complex(CKG) ,
intent(in) :: alpha
13433 type(lowerDiag_type) ,
intent(in) :: classB
13434 type(transHerm_type) ,
intent(in) :: operationB
13439 PURE module subroutine trmm_EXP_CGMA_ONOA_CLDB_OTHB_CK2(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
13440#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13441 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CGMA_ONOA_CLDB_OTHB_CK2
13444 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
13445 complex(CKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
13446 complex(CKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
13447 complex(CKG) ,
intent(in) :: alpha
13448 type(lowerDiag_type) ,
intent(in) :: classB
13449 type(transHerm_type) ,
intent(in) :: operationB
13454 PURE module subroutine trmm_EXP_CGMA_ONOA_CLDB_OTHB_CK1(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
13455#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13456 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CGMA_ONOA_CLDB_OTHB_CK1
13459 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
13460 complex(CKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
13461 complex(CKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
13462 complex(CKG) ,
intent(in) :: alpha
13463 type(lowerDiag_type) ,
intent(in) :: classB
13464 type(transHerm_type) ,
intent(in) :: operationB
13471 PURE module subroutine trmm_EXP_CGMA_ONOA_CLDB_OTHB_RK5(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
13472#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13473 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CGMA_ONOA_CLDB_OTHB_RK5
13476 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
13477 real(RKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
13478 real(RKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
13479 real(RKG) ,
intent(in) :: alpha
13480 type(lowerDiag_type) ,
intent(in) :: classB
13481 type(transHerm_type) ,
intent(in) :: operationB
13486 PURE module subroutine trmm_EXP_CGMA_ONOA_CLDB_OTHB_RK4(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
13487#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13488 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CGMA_ONOA_CLDB_OTHB_RK4
13491 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
13492 real(RKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
13493 real(RKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
13494 real(RKG) ,
intent(in) :: alpha
13495 type(lowerDiag_type) ,
intent(in) :: classB
13496 type(transHerm_type) ,
intent(in) :: operationB
13501 PURE module subroutine trmm_EXP_CGMA_ONOA_CLDB_OTHB_RK3(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
13502#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13503 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CGMA_ONOA_CLDB_OTHB_RK3
13506 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
13507 real(RKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
13508 real(RKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
13509 real(RKG) ,
intent(in) :: alpha
13510 type(lowerDiag_type) ,
intent(in) :: classB
13511 type(transHerm_type) ,
intent(in) :: operationB
13516 PURE module subroutine trmm_EXP_CGMA_ONOA_CLDB_OTHB_RK2(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
13517#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13518 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CGMA_ONOA_CLDB_OTHB_RK2
13521 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
13522 real(RKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
13523 real(RKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
13524 real(RKG) ,
intent(in) :: alpha
13525 type(lowerDiag_type) ,
intent(in) :: classB
13526 type(transHerm_type) ,
intent(in) :: operationB
13531 PURE module subroutine trmm_EXP_CGMA_ONOA_CLDB_OTHB_RK1(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
13532#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13533 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CGMA_ONOA_CLDB_OTHB_RK1
13536 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
13537 real(RKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
13538 real(RKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
13539 real(RKG) ,
intent(in) :: alpha
13540 type(lowerDiag_type) ,
intent(in) :: classB
13541 type(transHerm_type) ,
intent(in) :: operationB
13558 PURE module subroutine trmm_EXP_CGMA_ONOA_CUDB_ONOB_CK5(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
13559#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13560 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CGMA_ONOA_CUDB_ONOB_CK5
13563 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
13564 complex(CKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
13565 complex(CKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
13566 complex(CKG) ,
intent(in) :: alpha
13567 type(upperDiag_type) ,
intent(in) :: classB
13568 type(nothing_type) ,
intent(in) :: operationB
13573 PURE module subroutine trmm_EXP_CGMA_ONOA_CUDB_ONOB_CK4(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
13574#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13575 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CGMA_ONOA_CUDB_ONOB_CK4
13578 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
13579 complex(CKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
13580 complex(CKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
13581 complex(CKG) ,
intent(in) :: alpha
13582 type(upperDiag_type) ,
intent(in) :: classB
13583 type(nothing_type) ,
intent(in) :: operationB
13588 PURE module subroutine trmm_EXP_CGMA_ONOA_CUDB_ONOB_CK3(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
13589#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13590 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CGMA_ONOA_CUDB_ONOB_CK3
13593 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
13594 complex(CKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
13595 complex(CKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
13596 complex(CKG) ,
intent(in) :: alpha
13597 type(upperDiag_type) ,
intent(in) :: classB
13598 type(nothing_type) ,
intent(in) :: operationB
13603 PURE module subroutine trmm_EXP_CGMA_ONOA_CUDB_ONOB_CK2(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
13604#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13605 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CGMA_ONOA_CUDB_ONOB_CK2
13608 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
13609 complex(CKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
13610 complex(CKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
13611 complex(CKG) ,
intent(in) :: alpha
13612 type(upperDiag_type) ,
intent(in) :: classB
13613 type(nothing_type) ,
intent(in) :: operationB
13618 PURE module subroutine trmm_EXP_CGMA_ONOA_CUDB_ONOB_CK1(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
13619#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13620 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CGMA_ONOA_CUDB_ONOB_CK1
13623 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
13624 complex(CKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
13625 complex(CKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
13626 complex(CKG) ,
intent(in) :: alpha
13627 type(upperDiag_type) ,
intent(in) :: classB
13628 type(nothing_type) ,
intent(in) :: operationB
13635 PURE module subroutine trmm_EXP_CGMA_ONOA_CUDB_ONOB_RK5(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
13636#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13637 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CGMA_ONOA_CUDB_ONOB_RK5
13640 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
13641 real(RKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
13642 real(RKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
13643 real(RKG) ,
intent(in) :: alpha
13644 type(upperDiag_type) ,
intent(in) :: classB
13645 type(nothing_type) ,
intent(in) :: operationB
13650 PURE module subroutine trmm_EXP_CGMA_ONOA_CUDB_ONOB_RK4(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
13651#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13652 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CGMA_ONOA_CUDB_ONOB_RK4
13655 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
13656 real(RKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
13657 real(RKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
13658 real(RKG) ,
intent(in) :: alpha
13659 type(upperDiag_type) ,
intent(in) :: classB
13660 type(nothing_type) ,
intent(in) :: operationB
13665 PURE module subroutine trmm_EXP_CGMA_ONOA_CUDB_ONOB_RK3(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
13666#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13667 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CGMA_ONOA_CUDB_ONOB_RK3
13670 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
13671 real(RKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
13672 real(RKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
13673 real(RKG) ,
intent(in) :: alpha
13674 type(upperDiag_type) ,
intent(in) :: classB
13675 type(nothing_type) ,
intent(in) :: operationB
13680 PURE module subroutine trmm_EXP_CGMA_ONOA_CUDB_ONOB_RK2(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
13681#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13682 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CGMA_ONOA_CUDB_ONOB_RK2
13685 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
13686 real(RKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
13687 real(RKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
13688 real(RKG) ,
intent(in) :: alpha
13689 type(upperDiag_type) ,
intent(in) :: classB
13690 type(nothing_type) ,
intent(in) :: operationB
13695 PURE module subroutine trmm_EXP_CGMA_ONOA_CUDB_ONOB_RK1(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
13696#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13697 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CGMA_ONOA_CUDB_ONOB_RK1
13700 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
13701 real(RKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
13702 real(RKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
13703 real(RKG) ,
intent(in) :: alpha
13704 type(upperDiag_type) ,
intent(in) :: classB
13705 type(nothing_type) ,
intent(in) :: operationB
13718 PURE module subroutine trmm_EXP_CGMA_ONOA_CUDB_OTSB_CK5(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
13719#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13720 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CGMA_ONOA_CUDB_OTSB_CK5
13723 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
13724 complex(CKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
13725 complex(CKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
13726 complex(CKG) ,
intent(in) :: alpha
13727 type(upperDiag_type) ,
intent(in) :: classB
13728 type(transSymm_type) ,
intent(in) :: operationB
13733 PURE module subroutine trmm_EXP_CGMA_ONOA_CUDB_OTSB_CK4(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
13734#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13735 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CGMA_ONOA_CUDB_OTSB_CK4
13738 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
13739 complex(CKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
13740 complex(CKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
13741 complex(CKG) ,
intent(in) :: alpha
13742 type(upperDiag_type) ,
intent(in) :: classB
13743 type(transSymm_type) ,
intent(in) :: operationB
13748 PURE module subroutine trmm_EXP_CGMA_ONOA_CUDB_OTSB_CK3(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
13749#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13750 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CGMA_ONOA_CUDB_OTSB_CK3
13753 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
13754 complex(CKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
13755 complex(CKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
13756 complex(CKG) ,
intent(in) :: alpha
13757 type(upperDiag_type) ,
intent(in) :: classB
13758 type(transSymm_type) ,
intent(in) :: operationB
13763 PURE module subroutine trmm_EXP_CGMA_ONOA_CUDB_OTSB_CK2(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
13764#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13765 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CGMA_ONOA_CUDB_OTSB_CK2
13768 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
13769 complex(CKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
13770 complex(CKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
13771 complex(CKG) ,
intent(in) :: alpha
13772 type(upperDiag_type) ,
intent(in) :: classB
13773 type(transSymm_type) ,
intent(in) :: operationB
13778 PURE module subroutine trmm_EXP_CGMA_ONOA_CUDB_OTSB_CK1(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
13779#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13780 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CGMA_ONOA_CUDB_OTSB_CK1
13783 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
13784 complex(CKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
13785 complex(CKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
13786 complex(CKG) ,
intent(in) :: alpha
13787 type(upperDiag_type) ,
intent(in) :: classB
13788 type(transSymm_type) ,
intent(in) :: operationB
13795 PURE module subroutine trmm_EXP_CGMA_ONOA_CUDB_OTSB_RK5(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
13796#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13797 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CGMA_ONOA_CUDB_OTSB_RK5
13800 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
13801 real(RKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
13802 real(RKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
13803 real(RKG) ,
intent(in) :: alpha
13804 type(upperDiag_type) ,
intent(in) :: classB
13805 type(transSymm_type) ,
intent(in) :: operationB
13810 PURE module subroutine trmm_EXP_CGMA_ONOA_CUDB_OTSB_RK4(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
13811#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13812 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CGMA_ONOA_CUDB_OTSB_RK4
13815 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
13816 real(RKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
13817 real(RKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
13818 real(RKG) ,
intent(in) :: alpha
13819 type(upperDiag_type) ,
intent(in) :: classB
13820 type(transSymm_type) ,
intent(in) :: operationB
13825 PURE module subroutine trmm_EXP_CGMA_ONOA_CUDB_OTSB_RK3(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
13826#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13827 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CGMA_ONOA_CUDB_OTSB_RK3
13830 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
13831 real(RKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
13832 real(RKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
13833 real(RKG) ,
intent(in) :: alpha
13834 type(upperDiag_type) ,
intent(in) :: classB
13835 type(transSymm_type) ,
intent(in) :: operationB
13840 PURE module subroutine trmm_EXP_CGMA_ONOA_CUDB_OTSB_RK2(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
13841#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13842 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CGMA_ONOA_CUDB_OTSB_RK2
13845 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
13846 real(RKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
13847 real(RKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
13848 real(RKG) ,
intent(in) :: alpha
13849 type(upperDiag_type) ,
intent(in) :: classB
13850 type(transSymm_type) ,
intent(in) :: operationB
13855 PURE module subroutine trmm_EXP_CGMA_ONOA_CUDB_OTSB_RK1(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
13856#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13857 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CGMA_ONOA_CUDB_OTSB_RK1
13860 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
13861 real(RKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
13862 real(RKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
13863 real(RKG) ,
intent(in) :: alpha
13864 type(upperDiag_type) ,
intent(in) :: classB
13865 type(transSymm_type) ,
intent(in) :: operationB
13878 PURE module subroutine trmm_EXP_CGMA_ONOA_CUDB_OTHB_CK5(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
13879#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13880 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CGMA_ONOA_CUDB_OTHB_CK5
13883 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
13884 complex(CKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
13885 complex(CKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
13886 complex(CKG) ,
intent(in) :: alpha
13887 type(upperDiag_type) ,
intent(in) :: classB
13888 type(transHerm_type) ,
intent(in) :: operationB
13893 PURE module subroutine trmm_EXP_CGMA_ONOA_CUDB_OTHB_CK4(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
13894#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13895 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CGMA_ONOA_CUDB_OTHB_CK4
13898 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
13899 complex(CKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
13900 complex(CKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
13901 complex(CKG) ,
intent(in) :: alpha
13902 type(upperDiag_type) ,
intent(in) :: classB
13903 type(transHerm_type) ,
intent(in) :: operationB
13908 PURE module subroutine trmm_EXP_CGMA_ONOA_CUDB_OTHB_CK3(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
13909#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13910 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CGMA_ONOA_CUDB_OTHB_CK3
13913 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
13914 complex(CKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
13915 complex(CKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
13916 complex(CKG) ,
intent(in) :: alpha
13917 type(upperDiag_type) ,
intent(in) :: classB
13918 type(transHerm_type) ,
intent(in) :: operationB
13923 PURE module subroutine trmm_EXP_CGMA_ONOA_CUDB_OTHB_CK2(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
13924#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13925 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CGMA_ONOA_CUDB_OTHB_CK2
13928 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
13929 complex(CKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
13930 complex(CKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
13931 complex(CKG) ,
intent(in) :: alpha
13932 type(upperDiag_type) ,
intent(in) :: classB
13933 type(transHerm_type) ,
intent(in) :: operationB
13938 PURE module subroutine trmm_EXP_CGMA_ONOA_CUDB_OTHB_CK1(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
13939#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13940 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CGMA_ONOA_CUDB_OTHB_CK1
13943 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
13944 complex(CKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
13945 complex(CKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
13946 complex(CKG) ,
intent(in) :: alpha
13947 type(upperDiag_type) ,
intent(in) :: classB
13948 type(transHerm_type) ,
intent(in) :: operationB
13955 PURE module subroutine trmm_EXP_CGMA_ONOA_CUDB_OTHB_RK5(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
13956#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13957 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CGMA_ONOA_CUDB_OTHB_RK5
13960 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
13961 real(RKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
13962 real(RKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
13963 real(RKG) ,
intent(in) :: alpha
13964 type(upperDiag_type) ,
intent(in) :: classB
13965 type(transHerm_type) ,
intent(in) :: operationB
13970 PURE module subroutine trmm_EXP_CGMA_ONOA_CUDB_OTHB_RK4(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
13971#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13972 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CGMA_ONOA_CUDB_OTHB_RK4
13975 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
13976 real(RKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
13977 real(RKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
13978 real(RKG) ,
intent(in) :: alpha
13979 type(upperDiag_type) ,
intent(in) :: classB
13980 type(transHerm_type) ,
intent(in) :: operationB
13985 PURE module subroutine trmm_EXP_CGMA_ONOA_CUDB_OTHB_RK3(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
13986#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13987 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CGMA_ONOA_CUDB_OTHB_RK3
13990 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
13991 real(RKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
13992 real(RKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
13993 real(RKG) ,
intent(in) :: alpha
13994 type(upperDiag_type) ,
intent(in) :: classB
13995 type(transHerm_type) ,
intent(in) :: operationB
14000 PURE module subroutine trmm_EXP_CGMA_ONOA_CUDB_OTHB_RK2(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
14001#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14002 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CGMA_ONOA_CUDB_OTHB_RK2
14005 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
14006 real(RKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
14007 real(RKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
14008 real(RKG) ,
intent(in) :: alpha
14009 type(upperDiag_type) ,
intent(in) :: classB
14010 type(transHerm_type) ,
intent(in) :: operationB
14015 PURE module subroutine trmm_EXP_CGMA_ONOA_CUDB_OTHB_RK1(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
14016#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14017 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CGMA_ONOA_CUDB_OTHB_RK1
14020 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
14021 real(RKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
14022 real(RKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
14023 real(RKG) ,
intent(in) :: alpha
14024 type(upperDiag_type) ,
intent(in) :: classB
14025 type(transHerm_type) ,
intent(in) :: operationB
14042 PURE module subroutine trmm_EXP_CGMA_ONOA_CLUB_ONOB_CK5(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
14043#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14044 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CGMA_ONOA_CLUB_ONOB_CK5
14047 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
14048 complex(CKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
14049 complex(CKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
14050 complex(CKG) ,
intent(in) :: alpha
14051 type(lowerUnit_type) ,
intent(in) :: classB
14052 type(nothing_type) ,
intent(in) :: operationB
14057 PURE module subroutine trmm_EXP_CGMA_ONOA_CLUB_ONOB_CK4(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
14058#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14059 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CGMA_ONOA_CLUB_ONOB_CK4
14062 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
14063 complex(CKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
14064 complex(CKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
14065 complex(CKG) ,
intent(in) :: alpha
14066 type(lowerUnit_type) ,
intent(in) :: classB
14067 type(nothing_type) ,
intent(in) :: operationB
14072 PURE module subroutine trmm_EXP_CGMA_ONOA_CLUB_ONOB_CK3(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
14073#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14074 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CGMA_ONOA_CLUB_ONOB_CK3
14077 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
14078 complex(CKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
14079 complex(CKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
14080 complex(CKG) ,
intent(in) :: alpha
14081 type(lowerUnit_type) ,
intent(in) :: classB
14082 type(nothing_type) ,
intent(in) :: operationB
14087 PURE module subroutine trmm_EXP_CGMA_ONOA_CLUB_ONOB_CK2(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
14088#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14089 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CGMA_ONOA_CLUB_ONOB_CK2
14092 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
14093 complex(CKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
14094 complex(CKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
14095 complex(CKG) ,
intent(in) :: alpha
14096 type(lowerUnit_type) ,
intent(in) :: classB
14097 type(nothing_type) ,
intent(in) :: operationB
14102 PURE module subroutine trmm_EXP_CGMA_ONOA_CLUB_ONOB_CK1(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
14103#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14104 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CGMA_ONOA_CLUB_ONOB_CK1
14107 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
14108 complex(CKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
14109 complex(CKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
14110 complex(CKG) ,
intent(in) :: alpha
14111 type(lowerUnit_type) ,
intent(in) :: classB
14112 type(nothing_type) ,
intent(in) :: operationB
14119 PURE module subroutine trmm_EXP_CGMA_ONOA_CLUB_ONOB_RK5(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
14120#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14121 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CGMA_ONOA_CLUB_ONOB_RK5
14124 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
14125 real(RKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
14126 real(RKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
14127 real(RKG) ,
intent(in) :: alpha
14128 type(lowerUnit_type) ,
intent(in) :: classB
14129 type(nothing_type) ,
intent(in) :: operationB
14134 PURE module subroutine trmm_EXP_CGMA_ONOA_CLUB_ONOB_RK4(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
14135#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14136 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CGMA_ONOA_CLUB_ONOB_RK4
14139 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
14140 real(RKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
14141 real(RKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
14142 real(RKG) ,
intent(in) :: alpha
14143 type(lowerUnit_type) ,
intent(in) :: classB
14144 type(nothing_type) ,
intent(in) :: operationB
14149 PURE module subroutine trmm_EXP_CGMA_ONOA_CLUB_ONOB_RK3(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
14150#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14151 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CGMA_ONOA_CLUB_ONOB_RK3
14154 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
14155 real(RKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
14156 real(RKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
14157 real(RKG) ,
intent(in) :: alpha
14158 type(lowerUnit_type) ,
intent(in) :: classB
14159 type(nothing_type) ,
intent(in) :: operationB
14164 PURE module subroutine trmm_EXP_CGMA_ONOA_CLUB_ONOB_RK2(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
14165#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14166 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CGMA_ONOA_CLUB_ONOB_RK2
14169 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
14170 real(RKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
14171 real(RKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
14172 real(RKG) ,
intent(in) :: alpha
14173 type(lowerUnit_type) ,
intent(in) :: classB
14174 type(nothing_type) ,
intent(in) :: operationB
14179 PURE module subroutine trmm_EXP_CGMA_ONOA_CLUB_ONOB_RK1(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
14180#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14181 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CGMA_ONOA_CLUB_ONOB_RK1
14184 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
14185 real(RKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
14186 real(RKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
14187 real(RKG) ,
intent(in) :: alpha
14188 type(lowerUnit_type) ,
intent(in) :: classB
14189 type(nothing_type) ,
intent(in) :: operationB
14202 PURE module subroutine trmm_EXP_CGMA_ONOA_CLUB_OTSB_CK5(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
14203#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14204 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CGMA_ONOA_CLUB_OTSB_CK5
14207 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
14208 complex(CKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
14209 complex(CKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
14210 complex(CKG) ,
intent(in) :: alpha
14211 type(lowerUnit_type) ,
intent(in) :: classB
14212 type(transSymm_type) ,
intent(in) :: operationB
14217 PURE module subroutine trmm_EXP_CGMA_ONOA_CLUB_OTSB_CK4(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
14218#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14219 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CGMA_ONOA_CLUB_OTSB_CK4
14222 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
14223 complex(CKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
14224 complex(CKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
14225 complex(CKG) ,
intent(in) :: alpha
14226 type(lowerUnit_type) ,
intent(in) :: classB
14227 type(transSymm_type) ,
intent(in) :: operationB
14232 PURE module subroutine trmm_EXP_CGMA_ONOA_CLUB_OTSB_CK3(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
14233#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14234 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CGMA_ONOA_CLUB_OTSB_CK3
14237 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
14238 complex(CKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
14239 complex(CKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
14240 complex(CKG) ,
intent(in) :: alpha
14241 type(lowerUnit_type) ,
intent(in) :: classB
14242 type(transSymm_type) ,
intent(in) :: operationB
14247 PURE module subroutine trmm_EXP_CGMA_ONOA_CLUB_OTSB_CK2(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
14248#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14249 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CGMA_ONOA_CLUB_OTSB_CK2
14252 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
14253 complex(CKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
14254 complex(CKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
14255 complex(CKG) ,
intent(in) :: alpha
14256 type(lowerUnit_type) ,
intent(in) :: classB
14257 type(transSymm_type) ,
intent(in) :: operationB
14262 PURE module subroutine trmm_EXP_CGMA_ONOA_CLUB_OTSB_CK1(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
14263#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14264 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CGMA_ONOA_CLUB_OTSB_CK1
14267 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
14268 complex(CKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
14269 complex(CKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
14270 complex(CKG) ,
intent(in) :: alpha
14271 type(lowerUnit_type) ,
intent(in) :: classB
14272 type(transSymm_type) ,
intent(in) :: operationB
14279 PURE module subroutine trmm_EXP_CGMA_ONOA_CLUB_OTSB_RK5(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
14280#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14281 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CGMA_ONOA_CLUB_OTSB_RK5
14284 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
14285 real(RKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
14286 real(RKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
14287 real(RKG) ,
intent(in) :: alpha
14288 type(lowerUnit_type) ,
intent(in) :: classB
14289 type(transSymm_type) ,
intent(in) :: operationB
14294 PURE module subroutine trmm_EXP_CGMA_ONOA_CLUB_OTSB_RK4(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
14295#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14296 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CGMA_ONOA_CLUB_OTSB_RK4
14299 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
14300 real(RKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
14301 real(RKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
14302 real(RKG) ,
intent(in) :: alpha
14303 type(lowerUnit_type) ,
intent(in) :: classB
14304 type(transSymm_type) ,
intent(in) :: operationB
14309 PURE module subroutine trmm_EXP_CGMA_ONOA_CLUB_OTSB_RK3(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
14310#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14311 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CGMA_ONOA_CLUB_OTSB_RK3
14314 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
14315 real(RKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
14316 real(RKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
14317 real(RKG) ,
intent(in) :: alpha
14318 type(lowerUnit_type) ,
intent(in) :: classB
14319 type(transSymm_type) ,
intent(in) :: operationB
14324 PURE module subroutine trmm_EXP_CGMA_ONOA_CLUB_OTSB_RK2(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
14325#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14326 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CGMA_ONOA_CLUB_OTSB_RK2
14329 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
14330 real(RKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
14331 real(RKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
14332 real(RKG) ,
intent(in) :: alpha
14333 type(lowerUnit_type) ,
intent(in) :: classB
14334 type(transSymm_type) ,
intent(in) :: operationB
14339 PURE module subroutine trmm_EXP_CGMA_ONOA_CLUB_OTSB_RK1(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
14340#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14341 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CGMA_ONOA_CLUB_OTSB_RK1
14344 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
14345 real(RKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
14346 real(RKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
14347 real(RKG) ,
intent(in) :: alpha
14348 type(lowerUnit_type) ,
intent(in) :: classB
14349 type(transSymm_type) ,
intent(in) :: operationB
14362 PURE module subroutine trmm_EXP_CGMA_ONOA_CLUB_OTHB_CK5(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
14363#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14364 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CGMA_ONOA_CLUB_OTHB_CK5
14367 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
14368 complex(CKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
14369 complex(CKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
14370 complex(CKG) ,
intent(in) :: alpha
14371 type(lowerUnit_type) ,
intent(in) :: classB
14372 type(transHerm_type) ,
intent(in) :: operationB
14377 PURE module subroutine trmm_EXP_CGMA_ONOA_CLUB_OTHB_CK4(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
14378#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14379 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CGMA_ONOA_CLUB_OTHB_CK4
14382 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
14383 complex(CKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
14384 complex(CKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
14385 complex(CKG) ,
intent(in) :: alpha
14386 type(lowerUnit_type) ,
intent(in) :: classB
14387 type(transHerm_type) ,
intent(in) :: operationB
14392 PURE module subroutine trmm_EXP_CGMA_ONOA_CLUB_OTHB_CK3(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
14393#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14394 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CGMA_ONOA_CLUB_OTHB_CK3
14397 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
14398 complex(CKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
14399 complex(CKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
14400 complex(CKG) ,
intent(in) :: alpha
14401 type(lowerUnit_type) ,
intent(in) :: classB
14402 type(transHerm_type) ,
intent(in) :: operationB
14407 PURE module subroutine trmm_EXP_CGMA_ONOA_CLUB_OTHB_CK2(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
14408#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14409 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CGMA_ONOA_CLUB_OTHB_CK2
14412 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
14413 complex(CKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
14414 complex(CKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
14415 complex(CKG) ,
intent(in) :: alpha
14416 type(lowerUnit_type) ,
intent(in) :: classB
14417 type(transHerm_type) ,
intent(in) :: operationB
14422 PURE module subroutine trmm_EXP_CGMA_ONOA_CLUB_OTHB_CK1(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
14423#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14424 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CGMA_ONOA_CLUB_OTHB_CK1
14427 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
14428 complex(CKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
14429 complex(CKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
14430 complex(CKG) ,
intent(in) :: alpha
14431 type(lowerUnit_type) ,
intent(in) :: classB
14432 type(transHerm_type) ,
intent(in) :: operationB
14439 PURE module subroutine trmm_EXP_CGMA_ONOA_CLUB_OTHB_RK5(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
14440#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14441 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CGMA_ONOA_CLUB_OTHB_RK5
14444 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
14445 real(RKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
14446 real(RKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
14447 real(RKG) ,
intent(in) :: alpha
14448 type(lowerUnit_type) ,
intent(in) :: classB
14449 type(transHerm_type) ,
intent(in) :: operationB
14454 PURE module subroutine trmm_EXP_CGMA_ONOA_CLUB_OTHB_RK4(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
14455#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14456 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CGMA_ONOA_CLUB_OTHB_RK4
14459 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
14460 real(RKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
14461 real(RKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
14462 real(RKG) ,
intent(in) :: alpha
14463 type(lowerUnit_type) ,
intent(in) :: classB
14464 type(transHerm_type) ,
intent(in) :: operationB
14469 PURE module subroutine trmm_EXP_CGMA_ONOA_CLUB_OTHB_RK3(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
14470#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14471 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CGMA_ONOA_CLUB_OTHB_RK3
14474 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
14475 real(RKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
14476 real(RKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
14477 real(RKG) ,
intent(in) :: alpha
14478 type(lowerUnit_type) ,
intent(in) :: classB
14479 type(transHerm_type) ,
intent(in) :: operationB
14484 PURE module subroutine trmm_EXP_CGMA_ONOA_CLUB_OTHB_RK2(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
14485#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14486 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CGMA_ONOA_CLUB_OTHB_RK2
14489 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
14490 real(RKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
14491 real(RKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
14492 real(RKG) ,
intent(in) :: alpha
14493 type(lowerUnit_type) ,
intent(in) :: classB
14494 type(transHerm_type) ,
intent(in) :: operationB
14499 PURE module subroutine trmm_EXP_CGMA_ONOA_CLUB_OTHB_RK1(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
14500#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14501 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CGMA_ONOA_CLUB_OTHB_RK1
14504 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
14505 real(RKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
14506 real(RKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
14507 real(RKG) ,
intent(in) :: alpha
14508 type(lowerUnit_type) ,
intent(in) :: classB
14509 type(transHerm_type) ,
intent(in) :: operationB
14526 PURE module subroutine trmm_EXP_CGMA_ONOA_CUUB_ONOB_CK5(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
14527#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14528 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CGMA_ONOA_CUUB_ONOB_CK5
14531 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
14532 complex(CKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
14533 complex(CKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
14534 complex(CKG) ,
intent(in) :: alpha
14535 type(upperUnit_type) ,
intent(in) :: classB
14536 type(nothing_type) ,
intent(in) :: operationB
14541 PURE module subroutine trmm_EXP_CGMA_ONOA_CUUB_ONOB_CK4(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
14542#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14543 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CGMA_ONOA_CUUB_ONOB_CK4
14546 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
14547 complex(CKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
14548 complex(CKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
14549 complex(CKG) ,
intent(in) :: alpha
14550 type(upperUnit_type) ,
intent(in) :: classB
14551 type(nothing_type) ,
intent(in) :: operationB
14556 PURE module subroutine trmm_EXP_CGMA_ONOA_CUUB_ONOB_CK3(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
14557#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14558 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CGMA_ONOA_CUUB_ONOB_CK3
14561 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
14562 complex(CKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
14563 complex(CKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
14564 complex(CKG) ,
intent(in) :: alpha
14565 type(upperUnit_type) ,
intent(in) :: classB
14566 type(nothing_type) ,
intent(in) :: operationB
14571 PURE module subroutine trmm_EXP_CGMA_ONOA_CUUB_ONOB_CK2(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
14572#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14573 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CGMA_ONOA_CUUB_ONOB_CK2
14576 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
14577 complex(CKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
14578 complex(CKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
14579 complex(CKG) ,
intent(in) :: alpha
14580 type(upperUnit_type) ,
intent(in) :: classB
14581 type(nothing_type) ,
intent(in) :: operationB
14586 PURE module subroutine trmm_EXP_CGMA_ONOA_CUUB_ONOB_CK1(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
14587#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14588 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CGMA_ONOA_CUUB_ONOB_CK1
14591 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
14592 complex(CKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
14593 complex(CKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
14594 complex(CKG) ,
intent(in) :: alpha
14595 type(upperUnit_type) ,
intent(in) :: classB
14596 type(nothing_type) ,
intent(in) :: operationB
14603 PURE module subroutine trmm_EXP_CGMA_ONOA_CUUB_ONOB_RK5(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
14604#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14605 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CGMA_ONOA_CUUB_ONOB_RK5
14608 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
14609 real(RKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
14610 real(RKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
14611 real(RKG) ,
intent(in) :: alpha
14612 type(upperUnit_type) ,
intent(in) :: classB
14613 type(nothing_type) ,
intent(in) :: operationB
14618 PURE module subroutine trmm_EXP_CGMA_ONOA_CUUB_ONOB_RK4(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
14619#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14620 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CGMA_ONOA_CUUB_ONOB_RK4
14623 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
14624 real(RKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
14625 real(RKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
14626 real(RKG) ,
intent(in) :: alpha
14627 type(upperUnit_type) ,
intent(in) :: classB
14628 type(nothing_type) ,
intent(in) :: operationB
14633 PURE module subroutine trmm_EXP_CGMA_ONOA_CUUB_ONOB_RK3(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
14634#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14635 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CGMA_ONOA_CUUB_ONOB_RK3
14638 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
14639 real(RKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
14640 real(RKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
14641 real(RKG) ,
intent(in) :: alpha
14642 type(upperUnit_type) ,
intent(in) :: classB
14643 type(nothing_type) ,
intent(in) :: operationB
14648 PURE module subroutine trmm_EXP_CGMA_ONOA_CUUB_ONOB_RK2(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
14649#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14650 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CGMA_ONOA_CUUB_ONOB_RK2
14653 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
14654 real(RKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
14655 real(RKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
14656 real(RKG) ,
intent(in) :: alpha
14657 type(upperUnit_type) ,
intent(in) :: classB
14658 type(nothing_type) ,
intent(in) :: operationB
14663 PURE module subroutine trmm_EXP_CGMA_ONOA_CUUB_ONOB_RK1(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
14664#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14665 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CGMA_ONOA_CUUB_ONOB_RK1
14668 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
14669 real(RKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
14670 real(RKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
14671 real(RKG) ,
intent(in) :: alpha
14672 type(upperUnit_type) ,
intent(in) :: classB
14673 type(nothing_type) ,
intent(in) :: operationB
14686 PURE module subroutine trmm_EXP_CGMA_ONOA_CUUB_OTSB_CK5(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
14687#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14688 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CGMA_ONOA_CUUB_OTSB_CK5
14691 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
14692 complex(CKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
14693 complex(CKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
14694 complex(CKG) ,
intent(in) :: alpha
14695 type(upperUnit_type) ,
intent(in) :: classB
14696 type(transSymm_type) ,
intent(in) :: operationB
14701 PURE module subroutine trmm_EXP_CGMA_ONOA_CUUB_OTSB_CK4(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
14702#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14703 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CGMA_ONOA_CUUB_OTSB_CK4
14706 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
14707 complex(CKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
14708 complex(CKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
14709 complex(CKG) ,
intent(in) :: alpha
14710 type(upperUnit_type) ,
intent(in) :: classB
14711 type(transSymm_type) ,
intent(in) :: operationB
14716 PURE module subroutine trmm_EXP_CGMA_ONOA_CUUB_OTSB_CK3(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
14717#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14718 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CGMA_ONOA_CUUB_OTSB_CK3
14721 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
14722 complex(CKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
14723 complex(CKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
14724 complex(CKG) ,
intent(in) :: alpha
14725 type(upperUnit_type) ,
intent(in) :: classB
14726 type(transSymm_type) ,
intent(in) :: operationB
14731 PURE module subroutine trmm_EXP_CGMA_ONOA_CUUB_OTSB_CK2(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
14732#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14733 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CGMA_ONOA_CUUB_OTSB_CK2
14736 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
14737 complex(CKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
14738 complex(CKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
14739 complex(CKG) ,
intent(in) :: alpha
14740 type(upperUnit_type) ,
intent(in) :: classB
14741 type(transSymm_type) ,
intent(in) :: operationB
14746 PURE module subroutine trmm_EXP_CGMA_ONOA_CUUB_OTSB_CK1(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
14747#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14748 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CGMA_ONOA_CUUB_OTSB_CK1
14751 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
14752 complex(CKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
14753 complex(CKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
14754 complex(CKG) ,
intent(in) :: alpha
14755 type(upperUnit_type) ,
intent(in) :: classB
14756 type(transSymm_type) ,
intent(in) :: operationB
14763 PURE module subroutine trmm_EXP_CGMA_ONOA_CUUB_OTSB_RK5(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
14764#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14765 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CGMA_ONOA_CUUB_OTSB_RK5
14768 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
14769 real(RKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
14770 real(RKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
14771 real(RKG) ,
intent(in) :: alpha
14772 type(upperUnit_type) ,
intent(in) :: classB
14773 type(transSymm_type) ,
intent(in) :: operationB
14778 PURE module subroutine trmm_EXP_CGMA_ONOA_CUUB_OTSB_RK4(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
14779#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14780 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CGMA_ONOA_CUUB_OTSB_RK4
14783 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
14784 real(RKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
14785 real(RKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
14786 real(RKG) ,
intent(in) :: alpha
14787 type(upperUnit_type) ,
intent(in) :: classB
14788 type(transSymm_type) ,
intent(in) :: operationB
14793 PURE module subroutine trmm_EXP_CGMA_ONOA_CUUB_OTSB_RK3(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
14794#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14795 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CGMA_ONOA_CUUB_OTSB_RK3
14798 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
14799 real(RKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
14800 real(RKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
14801 real(RKG) ,
intent(in) :: alpha
14802 type(upperUnit_type) ,
intent(in) :: classB
14803 type(transSymm_type) ,
intent(in) :: operationB
14808 PURE module subroutine trmm_EXP_CGMA_ONOA_CUUB_OTSB_RK2(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
14809#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14810 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CGMA_ONOA_CUUB_OTSB_RK2
14813 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
14814 real(RKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
14815 real(RKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
14816 real(RKG) ,
intent(in) :: alpha
14817 type(upperUnit_type) ,
intent(in) :: classB
14818 type(transSymm_type) ,
intent(in) :: operationB
14823 PURE module subroutine trmm_EXP_CGMA_ONOA_CUUB_OTSB_RK1(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
14824#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14825 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CGMA_ONOA_CUUB_OTSB_RK1
14828 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
14829 real(RKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
14830 real(RKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
14831 real(RKG) ,
intent(in) :: alpha
14832 type(upperUnit_type) ,
intent(in) :: classB
14833 type(transSymm_type) ,
intent(in) :: operationB
14846 PURE module subroutine trmm_EXP_CGMA_ONOA_CUUB_OTHB_CK5(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
14847#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14848 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CGMA_ONOA_CUUB_OTHB_CK5
14851 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
14852 complex(CKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
14853 complex(CKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
14854 complex(CKG) ,
intent(in) :: alpha
14855 type(upperUnit_type) ,
intent(in) :: classB
14856 type(transHerm_type) ,
intent(in) :: operationB
14861 PURE module subroutine trmm_EXP_CGMA_ONOA_CUUB_OTHB_CK4(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
14862#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14863 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CGMA_ONOA_CUUB_OTHB_CK4
14866 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
14867 complex(CKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
14868 complex(CKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
14869 complex(CKG) ,
intent(in) :: alpha
14870 type(upperUnit_type) ,
intent(in) :: classB
14871 type(transHerm_type) ,
intent(in) :: operationB
14876 PURE module subroutine trmm_EXP_CGMA_ONOA_CUUB_OTHB_CK3(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
14877#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14878 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CGMA_ONOA_CUUB_OTHB_CK3
14881 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
14882 complex(CKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
14883 complex(CKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
14884 complex(CKG) ,
intent(in) :: alpha
14885 type(upperUnit_type) ,
intent(in) :: classB
14886 type(transHerm_type) ,
intent(in) :: operationB
14891 PURE module subroutine trmm_EXP_CGMA_ONOA_CUUB_OTHB_CK2(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
14892#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14893 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CGMA_ONOA_CUUB_OTHB_CK2
14896 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
14897 complex(CKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
14898 complex(CKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
14899 complex(CKG) ,
intent(in) :: alpha
14900 type(upperUnit_type) ,
intent(in) :: classB
14901 type(transHerm_type) ,
intent(in) :: operationB
14906 PURE module subroutine trmm_EXP_CGMA_ONOA_CUUB_OTHB_CK1(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
14907#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14908 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CGMA_ONOA_CUUB_OTHB_CK1
14911 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
14912 complex(CKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
14913 complex(CKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
14914 complex(CKG) ,
intent(in) :: alpha
14915 type(upperUnit_type) ,
intent(in) :: classB
14916 type(transHerm_type) ,
intent(in) :: operationB
14923 PURE module subroutine trmm_EXP_CGMA_ONOA_CUUB_OTHB_RK5(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
14924#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14925 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CGMA_ONOA_CUUB_OTHB_RK5
14928 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
14929 real(RKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
14930 real(RKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
14931 real(RKG) ,
intent(in) :: alpha
14932 type(upperUnit_type) ,
intent(in) :: classB
14933 type(transHerm_type) ,
intent(in) :: operationB
14938 PURE module subroutine trmm_EXP_CGMA_ONOA_CUUB_OTHB_RK4(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
14939#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14940 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CGMA_ONOA_CUUB_OTHB_RK4
14943 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
14944 real(RKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
14945 real(RKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
14946 real(RKG) ,
intent(in) :: alpha
14947 type(upperUnit_type) ,
intent(in) :: classB
14948 type(transHerm_type) ,
intent(in) :: operationB
14953 PURE module subroutine trmm_EXP_CGMA_ONOA_CUUB_OTHB_RK3(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
14954#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14955 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CGMA_ONOA_CUUB_OTHB_RK3
14958 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
14959 real(RKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
14960 real(RKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
14961 real(RKG) ,
intent(in) :: alpha
14962 type(upperUnit_type) ,
intent(in) :: classB
14963 type(transHerm_type) ,
intent(in) :: operationB
14968 PURE module subroutine trmm_EXP_CGMA_ONOA_CUUB_OTHB_RK2(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
14969#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14970 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CGMA_ONOA_CUUB_OTHB_RK2
14973 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
14974 real(RKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
14975 real(RKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
14976 real(RKG) ,
intent(in) :: alpha
14977 type(upperUnit_type) ,
intent(in) :: classB
14978 type(transHerm_type) ,
intent(in) :: operationB
14983 PURE module subroutine trmm_EXP_CGMA_ONOA_CUUB_OTHB_RK1(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
14984#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14985 !DEC$ ATTRIBUTES DLLEXPORT :: trmm_EXP_CGMA_ONOA_CUUB_OTHB_RK1
14988 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
14989 real(RKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
14990 real(RKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
14991 real(RKG) ,
intent(in) :: alpha
14992 type(upperUnit_type) ,
intent(in) :: classB
14993 type(transHerm_type) ,
intent(in) :: operationB
15036 PURE module subroutine trsm_ASS_CLDA_INVA_CGMB_ONOB_CK5(matA, classA, operationA, matB, alpha)
15037#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15038 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CLDA_INVA_CGMB_ONOB_CK5
15041 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
15042 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:,:)
15043 complex(CKG) ,
intent(in) ,
optional :: alpha
15044 type(lowerDiag_type) ,
intent(in) :: classA
15045 type(inversion_type) ,
intent(in) :: operationA
15050 PURE module subroutine trsm_ASS_CLDA_INVA_CGMB_ONOB_CK4(matA, classA, operationA, matB, alpha)
15051#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15052 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CLDA_INVA_CGMB_ONOB_CK4
15055 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
15056 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:,:)
15057 complex(CKG) ,
intent(in) ,
optional :: alpha
15058 type(lowerDiag_type) ,
intent(in) :: classA
15059 type(inversion_type) ,
intent(in) :: operationA
15064 PURE module subroutine trsm_ASS_CLDA_INVA_CGMB_ONOB_CK3(matA, classA, operationA, matB, alpha)
15065#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15066 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CLDA_INVA_CGMB_ONOB_CK3
15069 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
15070 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:,:)
15071 complex(CKG) ,
intent(in) ,
optional :: alpha
15072 type(lowerDiag_type) ,
intent(in) :: classA
15073 type(inversion_type) ,
intent(in) :: operationA
15078 PURE module subroutine trsm_ASS_CLDA_INVA_CGMB_ONOB_CK2(matA, classA, operationA, matB, alpha)
15079#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15080 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CLDA_INVA_CGMB_ONOB_CK2
15083 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
15084 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:,:)
15085 complex(CKG) ,
intent(in) ,
optional :: alpha
15086 type(lowerDiag_type) ,
intent(in) :: classA
15087 type(inversion_type) ,
intent(in) :: operationA
15092 PURE module subroutine trsm_ASS_CLDA_INVA_CGMB_ONOB_CK1(matA, classA, operationA, matB, alpha)
15093#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15094 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CLDA_INVA_CGMB_ONOB_CK1
15097 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
15098 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:,:)
15099 complex(CKG) ,
intent(in) ,
optional :: alpha
15100 type(lowerDiag_type) ,
intent(in) :: classA
15101 type(inversion_type) ,
intent(in) :: operationA
15108 PURE module subroutine trsm_ASS_CLDA_INVA_CGMB_ONOB_RK5(matA, classA, operationA, matB, alpha)
15109#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15110 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CLDA_INVA_CGMB_ONOB_RK5
15113 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
15114 real(RKG) ,
intent(inout) ,
contiguous :: matB(:,:)
15115 real(RKG) ,
intent(in) ,
optional :: alpha
15116 type(lowerDiag_type) ,
intent(in) :: classA
15117 type(inversion_type) ,
intent(in) :: operationA
15122 PURE module subroutine trsm_ASS_CLDA_INVA_CGMB_ONOB_RK4(matA, classA, operationA, matB, alpha)
15123#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15124 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CLDA_INVA_CGMB_ONOB_RK4
15127 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
15128 real(RKG) ,
intent(inout) ,
contiguous :: matB(:,:)
15129 real(RKG) ,
intent(in) ,
optional :: alpha
15130 type(lowerDiag_type) ,
intent(in) :: classA
15131 type(inversion_type) ,
intent(in) :: operationA
15136 PURE module subroutine trsm_ASS_CLDA_INVA_CGMB_ONOB_RK3(matA, classA, operationA, matB, alpha)
15137#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15138 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CLDA_INVA_CGMB_ONOB_RK3
15141 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
15142 real(RKG) ,
intent(inout) ,
contiguous :: matB(:,:)
15143 real(RKG) ,
intent(in) ,
optional :: alpha
15144 type(lowerDiag_type) ,
intent(in) :: classA
15145 type(inversion_type) ,
intent(in) :: operationA
15150 PURE module subroutine trsm_ASS_CLDA_INVA_CGMB_ONOB_RK2(matA, classA, operationA, matB, alpha)
15151#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15152 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CLDA_INVA_CGMB_ONOB_RK2
15155 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
15156 real(RKG) ,
intent(inout) ,
contiguous :: matB(:,:)
15157 real(RKG) ,
intent(in) ,
optional :: alpha
15158 type(lowerDiag_type) ,
intent(in) :: classA
15159 type(inversion_type) ,
intent(in) :: operationA
15164 PURE module subroutine trsm_ASS_CLDA_INVA_CGMB_ONOB_RK1(matA, classA, operationA, matB, alpha)
15165#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15166 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CLDA_INVA_CGMB_ONOB_RK1
15169 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
15170 real(RKG) ,
intent(inout) ,
contiguous :: matB(:,:)
15171 real(RKG) ,
intent(in) ,
optional :: alpha
15172 type(lowerDiag_type) ,
intent(in) :: classA
15173 type(inversion_type) ,
intent(in) :: operationA
15186 PURE module subroutine trsm_ASS_CLDA_OTOA_CGMB_ONOB_CK5(matA, classA, operationA, matB, alpha)
15187#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15188 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CLDA_OTOA_CGMB_ONOB_CK5
15191 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
15192 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:,:)
15193 complex(CKG) ,
intent(in) ,
optional :: alpha
15194 type(lowerDiag_type) ,
intent(in) :: classA
15195 type(transOrth_type) ,
intent(in) :: operationA
15200 PURE module subroutine trsm_ASS_CLDA_OTOA_CGMB_ONOB_CK4(matA, classA, operationA, matB, alpha)
15201#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15202 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CLDA_OTOA_CGMB_ONOB_CK4
15205 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
15206 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:,:)
15207 complex(CKG) ,
intent(in) ,
optional :: alpha
15208 type(lowerDiag_type) ,
intent(in) :: classA
15209 type(transOrth_type) ,
intent(in) :: operationA
15214 PURE module subroutine trsm_ASS_CLDA_OTOA_CGMB_ONOB_CK3(matA, classA, operationA, matB, alpha)
15215#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15216 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CLDA_OTOA_CGMB_ONOB_CK3
15219 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
15220 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:,:)
15221 complex(CKG) ,
intent(in) ,
optional :: alpha
15222 type(lowerDiag_type) ,
intent(in) :: classA
15223 type(transOrth_type) ,
intent(in) :: operationA
15228 PURE module subroutine trsm_ASS_CLDA_OTOA_CGMB_ONOB_CK2(matA, classA, operationA, matB, alpha)
15229#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15230 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CLDA_OTOA_CGMB_ONOB_CK2
15233 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
15234 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:,:)
15235 complex(CKG) ,
intent(in) ,
optional :: alpha
15236 type(lowerDiag_type) ,
intent(in) :: classA
15237 type(transOrth_type) ,
intent(in) :: operationA
15242 PURE module subroutine trsm_ASS_CLDA_OTOA_CGMB_ONOB_CK1(matA, classA, operationA, matB, alpha)
15243#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15244 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CLDA_OTOA_CGMB_ONOB_CK1
15247 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
15248 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:,:)
15249 complex(CKG) ,
intent(in) ,
optional :: alpha
15250 type(lowerDiag_type) ,
intent(in) :: classA
15251 type(transOrth_type) ,
intent(in) :: operationA
15258 PURE module subroutine trsm_ASS_CLDA_OTOA_CGMB_ONOB_RK5(matA, classA, operationA, matB, alpha)
15259#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15260 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CLDA_OTOA_CGMB_ONOB_RK5
15263 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
15264 real(RKG) ,
intent(inout) ,
contiguous :: matB(:,:)
15265 real(RKG) ,
intent(in) ,
optional :: alpha
15266 type(lowerDiag_type) ,
intent(in) :: classA
15267 type(transOrth_type) ,
intent(in) :: operationA
15272 PURE module subroutine trsm_ASS_CLDA_OTOA_CGMB_ONOB_RK4(matA, classA, operationA, matB, alpha)
15273#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15274 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CLDA_OTOA_CGMB_ONOB_RK4
15277 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
15278 real(RKG) ,
intent(inout) ,
contiguous :: matB(:,:)
15279 real(RKG) ,
intent(in) ,
optional :: alpha
15280 type(lowerDiag_type) ,
intent(in) :: classA
15281 type(transOrth_type) ,
intent(in) :: operationA
15286 PURE module subroutine trsm_ASS_CLDA_OTOA_CGMB_ONOB_RK3(matA, classA, operationA, matB, alpha)
15287#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15288 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CLDA_OTOA_CGMB_ONOB_RK3
15291 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
15292 real(RKG) ,
intent(inout) ,
contiguous :: matB(:,:)
15293 real(RKG) ,
intent(in) ,
optional :: alpha
15294 type(lowerDiag_type) ,
intent(in) :: classA
15295 type(transOrth_type) ,
intent(in) :: operationA
15300 PURE module subroutine trsm_ASS_CLDA_OTOA_CGMB_ONOB_RK2(matA, classA, operationA, matB, alpha)
15301#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15302 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CLDA_OTOA_CGMB_ONOB_RK2
15305 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
15306 real(RKG) ,
intent(inout) ,
contiguous :: matB(:,:)
15307 real(RKG) ,
intent(in) ,
optional :: alpha
15308 type(lowerDiag_type) ,
intent(in) :: classA
15309 type(transOrth_type) ,
intent(in) :: operationA
15314 PURE module subroutine trsm_ASS_CLDA_OTOA_CGMB_ONOB_RK1(matA, classA, operationA, matB, alpha)
15315#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15316 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CLDA_OTOA_CGMB_ONOB_RK1
15319 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
15320 real(RKG) ,
intent(inout) ,
contiguous :: matB(:,:)
15321 real(RKG) ,
intent(in) ,
optional :: alpha
15322 type(lowerDiag_type) ,
intent(in) :: classA
15323 type(transOrth_type) ,
intent(in) :: operationA
15336 PURE module subroutine trsm_ASS_CLDA_OTUA_CGMB_ONOB_CK5(matA, classA, operationA, matB, alpha)
15337#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15338 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CLDA_OTUA_CGMB_ONOB_CK5
15341 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
15342 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:,:)
15343 complex(CKG) ,
intent(in) ,
optional :: alpha
15344 type(lowerDiag_type) ,
intent(in) :: classA
15345 type(transUnit_type) ,
intent(in) :: operationA
15350 PURE module subroutine trsm_ASS_CLDA_OTUA_CGMB_ONOB_CK4(matA, classA, operationA, matB, alpha)
15351#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15352 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CLDA_OTUA_CGMB_ONOB_CK4
15355 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
15356 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:,:)
15357 complex(CKG) ,
intent(in) ,
optional :: alpha
15358 type(lowerDiag_type) ,
intent(in) :: classA
15359 type(transUnit_type) ,
intent(in) :: operationA
15364 PURE module subroutine trsm_ASS_CLDA_OTUA_CGMB_ONOB_CK3(matA, classA, operationA, matB, alpha)
15365#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15366 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CLDA_OTUA_CGMB_ONOB_CK3
15369 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
15370 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:,:)
15371 complex(CKG) ,
intent(in) ,
optional :: alpha
15372 type(lowerDiag_type) ,
intent(in) :: classA
15373 type(transUnit_type) ,
intent(in) :: operationA
15378 PURE module subroutine trsm_ASS_CLDA_OTUA_CGMB_ONOB_CK2(matA, classA, operationA, matB, alpha)
15379#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15380 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CLDA_OTUA_CGMB_ONOB_CK2
15383 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
15384 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:,:)
15385 complex(CKG) ,
intent(in) ,
optional :: alpha
15386 type(lowerDiag_type) ,
intent(in) :: classA
15387 type(transUnit_type) ,
intent(in) :: operationA
15392 PURE module subroutine trsm_ASS_CLDA_OTUA_CGMB_ONOB_CK1(matA, classA, operationA, matB, alpha)
15393#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15394 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CLDA_OTUA_CGMB_ONOB_CK1
15397 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
15398 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:,:)
15399 complex(CKG) ,
intent(in) ,
optional :: alpha
15400 type(lowerDiag_type) ,
intent(in) :: classA
15401 type(transUnit_type) ,
intent(in) :: operationA
15408 PURE module subroutine trsm_ASS_CLDA_OTUA_CGMB_ONOB_RK5(matA, classA, operationA, matB, alpha)
15409#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15410 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CLDA_OTUA_CGMB_ONOB_RK5
15413 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
15414 real(RKG) ,
intent(inout) ,
contiguous :: matB(:,:)
15415 real(RKG) ,
intent(in) ,
optional :: alpha
15416 type(lowerDiag_type) ,
intent(in) :: classA
15417 type(transUnit_type) ,
intent(in) :: operationA
15422 PURE module subroutine trsm_ASS_CLDA_OTUA_CGMB_ONOB_RK4(matA, classA, operationA, matB, alpha)
15423#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15424 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CLDA_OTUA_CGMB_ONOB_RK4
15427 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
15428 real(RKG) ,
intent(inout) ,
contiguous :: matB(:,:)
15429 real(RKG) ,
intent(in) ,
optional :: alpha
15430 type(lowerDiag_type) ,
intent(in) :: classA
15431 type(transUnit_type) ,
intent(in) :: operationA
15436 PURE module subroutine trsm_ASS_CLDA_OTUA_CGMB_ONOB_RK3(matA, classA, operationA, matB, alpha)
15437#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15438 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CLDA_OTUA_CGMB_ONOB_RK3
15441 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
15442 real(RKG) ,
intent(inout) ,
contiguous :: matB(:,:)
15443 real(RKG) ,
intent(in) ,
optional :: alpha
15444 type(lowerDiag_type) ,
intent(in) :: classA
15445 type(transUnit_type) ,
intent(in) :: operationA
15450 PURE module subroutine trsm_ASS_CLDA_OTUA_CGMB_ONOB_RK2(matA, classA, operationA, matB, alpha)
15451#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15452 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CLDA_OTUA_CGMB_ONOB_RK2
15455 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
15456 real(RKG) ,
intent(inout) ,
contiguous :: matB(:,:)
15457 real(RKG) ,
intent(in) ,
optional :: alpha
15458 type(lowerDiag_type) ,
intent(in) :: classA
15459 type(transUnit_type) ,
intent(in) :: operationA
15464 PURE module subroutine trsm_ASS_CLDA_OTUA_CGMB_ONOB_RK1(matA, classA, operationA, matB, alpha)
15465#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15466 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CLDA_OTUA_CGMB_ONOB_RK1
15469 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
15470 real(RKG) ,
intent(inout) ,
contiguous :: matB(:,:)
15471 real(RKG) ,
intent(in) ,
optional :: alpha
15472 type(lowerDiag_type) ,
intent(in) :: classA
15473 type(transUnit_type) ,
intent(in) :: operationA
15490 PURE module subroutine trsm_ASS_CUDA_INVA_CGMB_ONOB_CK5(matA, classA, operationA, matB, alpha)
15491#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15492 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CUDA_INVA_CGMB_ONOB_CK5
15495 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
15496 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:,:)
15497 complex(CKG) ,
intent(in) ,
optional :: alpha
15498 type(upperDiag_type) ,
intent(in) :: classA
15499 type(inversion_type) ,
intent(in) :: operationA
15504 PURE module subroutine trsm_ASS_CUDA_INVA_CGMB_ONOB_CK4(matA, classA, operationA, matB, alpha)
15505#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15506 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CUDA_INVA_CGMB_ONOB_CK4
15509 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
15510 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:,:)
15511 complex(CKG) ,
intent(in) ,
optional :: alpha
15512 type(upperDiag_type) ,
intent(in) :: classA
15513 type(inversion_type) ,
intent(in) :: operationA
15518 PURE module subroutine trsm_ASS_CUDA_INVA_CGMB_ONOB_CK3(matA, classA, operationA, matB, alpha)
15519#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15520 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CUDA_INVA_CGMB_ONOB_CK3
15523 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
15524 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:,:)
15525 complex(CKG) ,
intent(in) ,
optional :: alpha
15526 type(upperDiag_type) ,
intent(in) :: classA
15527 type(inversion_type) ,
intent(in) :: operationA
15532 PURE module subroutine trsm_ASS_CUDA_INVA_CGMB_ONOB_CK2(matA, classA, operationA, matB, alpha)
15533#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15534 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CUDA_INVA_CGMB_ONOB_CK2
15537 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
15538 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:,:)
15539 complex(CKG) ,
intent(in) ,
optional :: alpha
15540 type(upperDiag_type) ,
intent(in) :: classA
15541 type(inversion_type) ,
intent(in) :: operationA
15546 PURE module subroutine trsm_ASS_CUDA_INVA_CGMB_ONOB_CK1(matA, classA, operationA, matB, alpha)
15547#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15548 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CUDA_INVA_CGMB_ONOB_CK1
15551 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
15552 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:,:)
15553 complex(CKG) ,
intent(in) ,
optional :: alpha
15554 type(upperDiag_type) ,
intent(in) :: classA
15555 type(inversion_type) ,
intent(in) :: operationA
15562 PURE module subroutine trsm_ASS_CUDA_INVA_CGMB_ONOB_RK5(matA, classA, operationA, matB, alpha)
15563#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15564 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CUDA_INVA_CGMB_ONOB_RK5
15567 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
15568 real(RKG) ,
intent(inout) ,
contiguous :: matB(:,:)
15569 real(RKG) ,
intent(in) ,
optional :: alpha
15570 type(upperDiag_type) ,
intent(in) :: classA
15571 type(inversion_type) ,
intent(in) :: operationA
15576 PURE module subroutine trsm_ASS_CUDA_INVA_CGMB_ONOB_RK4(matA, classA, operationA, matB, alpha)
15577#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15578 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CUDA_INVA_CGMB_ONOB_RK4
15581 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
15582 real(RKG) ,
intent(inout) ,
contiguous :: matB(:,:)
15583 real(RKG) ,
intent(in) ,
optional :: alpha
15584 type(upperDiag_type) ,
intent(in) :: classA
15585 type(inversion_type) ,
intent(in) :: operationA
15590 PURE module subroutine trsm_ASS_CUDA_INVA_CGMB_ONOB_RK3(matA, classA, operationA, matB, alpha)
15591#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15592 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CUDA_INVA_CGMB_ONOB_RK3
15595 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
15596 real(RKG) ,
intent(inout) ,
contiguous :: matB(:,:)
15597 real(RKG) ,
intent(in) ,
optional :: alpha
15598 type(upperDiag_type) ,
intent(in) :: classA
15599 type(inversion_type) ,
intent(in) :: operationA
15604 PURE module subroutine trsm_ASS_CUDA_INVA_CGMB_ONOB_RK2(matA, classA, operationA, matB, alpha)
15605#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15606 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CUDA_INVA_CGMB_ONOB_RK2
15609 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
15610 real(RKG) ,
intent(inout) ,
contiguous :: matB(:,:)
15611 real(RKG) ,
intent(in) ,
optional :: alpha
15612 type(upperDiag_type) ,
intent(in) :: classA
15613 type(inversion_type) ,
intent(in) :: operationA
15618 PURE module subroutine trsm_ASS_CUDA_INVA_CGMB_ONOB_RK1(matA, classA, operationA, matB, alpha)
15619#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15620 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CUDA_INVA_CGMB_ONOB_RK1
15623 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
15624 real(RKG) ,
intent(inout) ,
contiguous :: matB(:,:)
15625 real(RKG) ,
intent(in) ,
optional :: alpha
15626 type(upperDiag_type) ,
intent(in) :: classA
15627 type(inversion_type) ,
intent(in) :: operationA
15640 PURE module subroutine trsm_ASS_CUDA_OTOA_CGMB_ONOB_CK5(matA, classA, operationA, matB, alpha)
15641#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15642 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CUDA_OTOA_CGMB_ONOB_CK5
15645 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
15646 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:,:)
15647 complex(CKG) ,
intent(in) ,
optional :: alpha
15648 type(upperDiag_type) ,
intent(in) :: classA
15649 type(transOrth_type) ,
intent(in) :: operationA
15654 PURE module subroutine trsm_ASS_CUDA_OTOA_CGMB_ONOB_CK4(matA, classA, operationA, matB, alpha)
15655#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15656 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CUDA_OTOA_CGMB_ONOB_CK4
15659 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
15660 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:,:)
15661 complex(CKG) ,
intent(in) ,
optional :: alpha
15662 type(upperDiag_type) ,
intent(in) :: classA
15663 type(transOrth_type) ,
intent(in) :: operationA
15668 PURE module subroutine trsm_ASS_CUDA_OTOA_CGMB_ONOB_CK3(matA, classA, operationA, matB, alpha)
15669#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15670 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CUDA_OTOA_CGMB_ONOB_CK3
15673 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
15674 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:,:)
15675 complex(CKG) ,
intent(in) ,
optional :: alpha
15676 type(upperDiag_type) ,
intent(in) :: classA
15677 type(transOrth_type) ,
intent(in) :: operationA
15682 PURE module subroutine trsm_ASS_CUDA_OTOA_CGMB_ONOB_CK2(matA, classA, operationA, matB, alpha)
15683#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15684 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CUDA_OTOA_CGMB_ONOB_CK2
15687 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
15688 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:,:)
15689 complex(CKG) ,
intent(in) ,
optional :: alpha
15690 type(upperDiag_type) ,
intent(in) :: classA
15691 type(transOrth_type) ,
intent(in) :: operationA
15696 PURE module subroutine trsm_ASS_CUDA_OTOA_CGMB_ONOB_CK1(matA, classA, operationA, matB, alpha)
15697#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15698 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CUDA_OTOA_CGMB_ONOB_CK1
15701 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
15702 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:,:)
15703 complex(CKG) ,
intent(in) ,
optional :: alpha
15704 type(upperDiag_type) ,
intent(in) :: classA
15705 type(transOrth_type) ,
intent(in) :: operationA
15712 PURE module subroutine trsm_ASS_CUDA_OTOA_CGMB_ONOB_RK5(matA, classA, operationA, matB, alpha)
15713#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15714 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CUDA_OTOA_CGMB_ONOB_RK5
15717 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
15718 real(RKG) ,
intent(inout) ,
contiguous :: matB(:,:)
15719 real(RKG) ,
intent(in) ,
optional :: alpha
15720 type(upperDiag_type) ,
intent(in) :: classA
15721 type(transOrth_type) ,
intent(in) :: operationA
15726 PURE module subroutine trsm_ASS_CUDA_OTOA_CGMB_ONOB_RK4(matA, classA, operationA, matB, alpha)
15727#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15728 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CUDA_OTOA_CGMB_ONOB_RK4
15731 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
15732 real(RKG) ,
intent(inout) ,
contiguous :: matB(:,:)
15733 real(RKG) ,
intent(in) ,
optional :: alpha
15734 type(upperDiag_type) ,
intent(in) :: classA
15735 type(transOrth_type) ,
intent(in) :: operationA
15740 PURE module subroutine trsm_ASS_CUDA_OTOA_CGMB_ONOB_RK3(matA, classA, operationA, matB, alpha)
15741#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15742 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CUDA_OTOA_CGMB_ONOB_RK3
15745 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
15746 real(RKG) ,
intent(inout) ,
contiguous :: matB(:,:)
15747 real(RKG) ,
intent(in) ,
optional :: alpha
15748 type(upperDiag_type) ,
intent(in) :: classA
15749 type(transOrth_type) ,
intent(in) :: operationA
15754 PURE module subroutine trsm_ASS_CUDA_OTOA_CGMB_ONOB_RK2(matA, classA, operationA, matB, alpha)
15755#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15756 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CUDA_OTOA_CGMB_ONOB_RK2
15759 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
15760 real(RKG) ,
intent(inout) ,
contiguous :: matB(:,:)
15761 real(RKG) ,
intent(in) ,
optional :: alpha
15762 type(upperDiag_type) ,
intent(in) :: classA
15763 type(transOrth_type) ,
intent(in) :: operationA
15768 PURE module subroutine trsm_ASS_CUDA_OTOA_CGMB_ONOB_RK1(matA, classA, operationA, matB, alpha)
15769#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15770 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CUDA_OTOA_CGMB_ONOB_RK1
15773 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
15774 real(RKG) ,
intent(inout) ,
contiguous :: matB(:,:)
15775 real(RKG) ,
intent(in) ,
optional :: alpha
15776 type(upperDiag_type) ,
intent(in) :: classA
15777 type(transOrth_type) ,
intent(in) :: operationA
15790 PURE module subroutine trsm_ASS_CUDA_OTUA_CGMB_ONOB_CK5(matA, classA, operationA, matB, alpha)
15791#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15792 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CUDA_OTUA_CGMB_ONOB_CK5
15795 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
15796 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:,:)
15797 complex(CKG) ,
intent(in) ,
optional :: alpha
15798 type(upperDiag_type) ,
intent(in) :: classA
15799 type(transUnit_type) ,
intent(in) :: operationA
15804 PURE module subroutine trsm_ASS_CUDA_OTUA_CGMB_ONOB_CK4(matA, classA, operationA, matB, alpha)
15805#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15806 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CUDA_OTUA_CGMB_ONOB_CK4
15809 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
15810 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:,:)
15811 complex(CKG) ,
intent(in) ,
optional :: alpha
15812 type(upperDiag_type) ,
intent(in) :: classA
15813 type(transUnit_type) ,
intent(in) :: operationA
15818 PURE module subroutine trsm_ASS_CUDA_OTUA_CGMB_ONOB_CK3(matA, classA, operationA, matB, alpha)
15819#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15820 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CUDA_OTUA_CGMB_ONOB_CK3
15823 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
15824 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:,:)
15825 complex(CKG) ,
intent(in) ,
optional :: alpha
15826 type(upperDiag_type) ,
intent(in) :: classA
15827 type(transUnit_type) ,
intent(in) :: operationA
15832 PURE module subroutine trsm_ASS_CUDA_OTUA_CGMB_ONOB_CK2(matA, classA, operationA, matB, alpha)
15833#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15834 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CUDA_OTUA_CGMB_ONOB_CK2
15837 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
15838 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:,:)
15839 complex(CKG) ,
intent(in) ,
optional :: alpha
15840 type(upperDiag_type) ,
intent(in) :: classA
15841 type(transUnit_type) ,
intent(in) :: operationA
15846 PURE module subroutine trsm_ASS_CUDA_OTUA_CGMB_ONOB_CK1(matA, classA, operationA, matB, alpha)
15847#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15848 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CUDA_OTUA_CGMB_ONOB_CK1
15851 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
15852 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:,:)
15853 complex(CKG) ,
intent(in) ,
optional :: alpha
15854 type(upperDiag_type) ,
intent(in) :: classA
15855 type(transUnit_type) ,
intent(in) :: operationA
15862 PURE module subroutine trsm_ASS_CUDA_OTUA_CGMB_ONOB_RK5(matA, classA, operationA, matB, alpha)
15863#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15864 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CUDA_OTUA_CGMB_ONOB_RK5
15867 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
15868 real(RKG) ,
intent(inout) ,
contiguous :: matB(:,:)
15869 real(RKG) ,
intent(in) ,
optional :: alpha
15870 type(upperDiag_type) ,
intent(in) :: classA
15871 type(transUnit_type) ,
intent(in) :: operationA
15876 PURE module subroutine trsm_ASS_CUDA_OTUA_CGMB_ONOB_RK4(matA, classA, operationA, matB, alpha)
15877#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15878 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CUDA_OTUA_CGMB_ONOB_RK4
15881 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
15882 real(RKG) ,
intent(inout) ,
contiguous :: matB(:,:)
15883 real(RKG) ,
intent(in) ,
optional :: alpha
15884 type(upperDiag_type) ,
intent(in) :: classA
15885 type(transUnit_type) ,
intent(in) :: operationA
15890 PURE module subroutine trsm_ASS_CUDA_OTUA_CGMB_ONOB_RK3(matA, classA, operationA, matB, alpha)
15891#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15892 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CUDA_OTUA_CGMB_ONOB_RK3
15895 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
15896 real(RKG) ,
intent(inout) ,
contiguous :: matB(:,:)
15897 real(RKG) ,
intent(in) ,
optional :: alpha
15898 type(upperDiag_type) ,
intent(in) :: classA
15899 type(transUnit_type) ,
intent(in) :: operationA
15904 PURE module subroutine trsm_ASS_CUDA_OTUA_CGMB_ONOB_RK2(matA, classA, operationA, matB, alpha)
15905#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15906 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CUDA_OTUA_CGMB_ONOB_RK2
15909 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
15910 real(RKG) ,
intent(inout) ,
contiguous :: matB(:,:)
15911 real(RKG) ,
intent(in) ,
optional :: alpha
15912 type(upperDiag_type) ,
intent(in) :: classA
15913 type(transUnit_type) ,
intent(in) :: operationA
15918 PURE module subroutine trsm_ASS_CUDA_OTUA_CGMB_ONOB_RK1(matA, classA, operationA, matB, alpha)
15919#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15920 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CUDA_OTUA_CGMB_ONOB_RK1
15923 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
15924 real(RKG) ,
intent(inout) ,
contiguous :: matB(:,:)
15925 real(RKG) ,
intent(in) ,
optional :: alpha
15926 type(upperDiag_type) ,
intent(in) :: classA
15927 type(transUnit_type) ,
intent(in) :: operationA
15944 PURE module subroutine trsm_ASS_CLUA_INVA_CGMB_ONOB_CK5(matA, classA, operationA, matB, alpha)
15945#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15946 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CLUA_INVA_CGMB_ONOB_CK5
15949 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
15950 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:,:)
15951 complex(CKG) ,
intent(in) ,
optional :: alpha
15952 type(lowerUnit_type) ,
intent(in) :: classA
15953 type(inversion_type) ,
intent(in) :: operationA
15958 PURE module subroutine trsm_ASS_CLUA_INVA_CGMB_ONOB_CK4(matA, classA, operationA, matB, alpha)
15959#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15960 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CLUA_INVA_CGMB_ONOB_CK4
15963 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
15964 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:,:)
15965 complex(CKG) ,
intent(in) ,
optional :: alpha
15966 type(lowerUnit_type) ,
intent(in) :: classA
15967 type(inversion_type) ,
intent(in) :: operationA
15972 PURE module subroutine trsm_ASS_CLUA_INVA_CGMB_ONOB_CK3(matA, classA, operationA, matB, alpha)
15973#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15974 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CLUA_INVA_CGMB_ONOB_CK3
15977 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
15978 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:,:)
15979 complex(CKG) ,
intent(in) ,
optional :: alpha
15980 type(lowerUnit_type) ,
intent(in) :: classA
15981 type(inversion_type) ,
intent(in) :: operationA
15986 PURE module subroutine trsm_ASS_CLUA_INVA_CGMB_ONOB_CK2(matA, classA, operationA, matB, alpha)
15987#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15988 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CLUA_INVA_CGMB_ONOB_CK2
15991 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
15992 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:,:)
15993 complex(CKG) ,
intent(in) ,
optional :: alpha
15994 type(lowerUnit_type) ,
intent(in) :: classA
15995 type(inversion_type) ,
intent(in) :: operationA
16000 PURE module subroutine trsm_ASS_CLUA_INVA_CGMB_ONOB_CK1(matA, classA, operationA, matB, alpha)
16001#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16002 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CLUA_INVA_CGMB_ONOB_CK1
16005 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
16006 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:,:)
16007 complex(CKG) ,
intent(in) ,
optional :: alpha
16008 type(lowerUnit_type) ,
intent(in) :: classA
16009 type(inversion_type) ,
intent(in) :: operationA
16016 PURE module subroutine trsm_ASS_CLUA_INVA_CGMB_ONOB_RK5(matA, classA, operationA, matB, alpha)
16017#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16018 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CLUA_INVA_CGMB_ONOB_RK5
16021 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
16022 real(RKG) ,
intent(inout) ,
contiguous :: matB(:,:)
16023 real(RKG) ,
intent(in) ,
optional :: alpha
16024 type(lowerUnit_type) ,
intent(in) :: classA
16025 type(inversion_type) ,
intent(in) :: operationA
16030 PURE module subroutine trsm_ASS_CLUA_INVA_CGMB_ONOB_RK4(matA, classA, operationA, matB, alpha)
16031#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16032 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CLUA_INVA_CGMB_ONOB_RK4
16035 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
16036 real(RKG) ,
intent(inout) ,
contiguous :: matB(:,:)
16037 real(RKG) ,
intent(in) ,
optional :: alpha
16038 type(lowerUnit_type) ,
intent(in) :: classA
16039 type(inversion_type) ,
intent(in) :: operationA
16044 PURE module subroutine trsm_ASS_CLUA_INVA_CGMB_ONOB_RK3(matA, classA, operationA, matB, alpha)
16045#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16046 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CLUA_INVA_CGMB_ONOB_RK3
16049 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
16050 real(RKG) ,
intent(inout) ,
contiguous :: matB(:,:)
16051 real(RKG) ,
intent(in) ,
optional :: alpha
16052 type(lowerUnit_type) ,
intent(in) :: classA
16053 type(inversion_type) ,
intent(in) :: operationA
16058 PURE module subroutine trsm_ASS_CLUA_INVA_CGMB_ONOB_RK2(matA, classA, operationA, matB, alpha)
16059#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16060 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CLUA_INVA_CGMB_ONOB_RK2
16063 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
16064 real(RKG) ,
intent(inout) ,
contiguous :: matB(:,:)
16065 real(RKG) ,
intent(in) ,
optional :: alpha
16066 type(lowerUnit_type) ,
intent(in) :: classA
16067 type(inversion_type) ,
intent(in) :: operationA
16072 PURE module subroutine trsm_ASS_CLUA_INVA_CGMB_ONOB_RK1(matA, classA, operationA, matB, alpha)
16073#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16074 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CLUA_INVA_CGMB_ONOB_RK1
16077 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
16078 real(RKG) ,
intent(inout) ,
contiguous :: matB(:,:)
16079 real(RKG) ,
intent(in) ,
optional :: alpha
16080 type(lowerUnit_type) ,
intent(in) :: classA
16081 type(inversion_type) ,
intent(in) :: operationA
16094 PURE module subroutine trsm_ASS_CLUA_OTOA_CGMB_ONOB_CK5(matA, classA, operationA, matB, alpha)
16095#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16096 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CLUA_OTOA_CGMB_ONOB_CK5
16099 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
16100 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:,:)
16101 complex(CKG) ,
intent(in) ,
optional :: alpha
16102 type(lowerUnit_type) ,
intent(in) :: classA
16103 type(transOrth_type) ,
intent(in) :: operationA
16108 PURE module subroutine trsm_ASS_CLUA_OTOA_CGMB_ONOB_CK4(matA, classA, operationA, matB, alpha)
16109#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16110 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CLUA_OTOA_CGMB_ONOB_CK4
16113 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
16114 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:,:)
16115 complex(CKG) ,
intent(in) ,
optional :: alpha
16116 type(lowerUnit_type) ,
intent(in) :: classA
16117 type(transOrth_type) ,
intent(in) :: operationA
16122 PURE module subroutine trsm_ASS_CLUA_OTOA_CGMB_ONOB_CK3(matA, classA, operationA, matB, alpha)
16123#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16124 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CLUA_OTOA_CGMB_ONOB_CK3
16127 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
16128 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:,:)
16129 complex(CKG) ,
intent(in) ,
optional :: alpha
16130 type(lowerUnit_type) ,
intent(in) :: classA
16131 type(transOrth_type) ,
intent(in) :: operationA
16136 PURE module subroutine trsm_ASS_CLUA_OTOA_CGMB_ONOB_CK2(matA, classA, operationA, matB, alpha)
16137#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16138 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CLUA_OTOA_CGMB_ONOB_CK2
16141 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
16142 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:,:)
16143 complex(CKG) ,
intent(in) ,
optional :: alpha
16144 type(lowerUnit_type) ,
intent(in) :: classA
16145 type(transOrth_type) ,
intent(in) :: operationA
16150 PURE module subroutine trsm_ASS_CLUA_OTOA_CGMB_ONOB_CK1(matA, classA, operationA, matB, alpha)
16151#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16152 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CLUA_OTOA_CGMB_ONOB_CK1
16155 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
16156 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:,:)
16157 complex(CKG) ,
intent(in) ,
optional :: alpha
16158 type(lowerUnit_type) ,
intent(in) :: classA
16159 type(transOrth_type) ,
intent(in) :: operationA
16166 PURE module subroutine trsm_ASS_CLUA_OTOA_CGMB_ONOB_RK5(matA, classA, operationA, matB, alpha)
16167#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16168 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CLUA_OTOA_CGMB_ONOB_RK5
16171 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
16172 real(RKG) ,
intent(inout) ,
contiguous :: matB(:,:)
16173 real(RKG) ,
intent(in) ,
optional :: alpha
16174 type(lowerUnit_type) ,
intent(in) :: classA
16175 type(transOrth_type) ,
intent(in) :: operationA
16180 PURE module subroutine trsm_ASS_CLUA_OTOA_CGMB_ONOB_RK4(matA, classA, operationA, matB, alpha)
16181#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16182 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CLUA_OTOA_CGMB_ONOB_RK4
16185 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
16186 real(RKG) ,
intent(inout) ,
contiguous :: matB(:,:)
16187 real(RKG) ,
intent(in) ,
optional :: alpha
16188 type(lowerUnit_type) ,
intent(in) :: classA
16189 type(transOrth_type) ,
intent(in) :: operationA
16194 PURE module subroutine trsm_ASS_CLUA_OTOA_CGMB_ONOB_RK3(matA, classA, operationA, matB, alpha)
16195#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16196 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CLUA_OTOA_CGMB_ONOB_RK3
16199 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
16200 real(RKG) ,
intent(inout) ,
contiguous :: matB(:,:)
16201 real(RKG) ,
intent(in) ,
optional :: alpha
16202 type(lowerUnit_type) ,
intent(in) :: classA
16203 type(transOrth_type) ,
intent(in) :: operationA
16208 PURE module subroutine trsm_ASS_CLUA_OTOA_CGMB_ONOB_RK2(matA, classA, operationA, matB, alpha)
16209#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16210 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CLUA_OTOA_CGMB_ONOB_RK2
16213 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
16214 real(RKG) ,
intent(inout) ,
contiguous :: matB(:,:)
16215 real(RKG) ,
intent(in) ,
optional :: alpha
16216 type(lowerUnit_type) ,
intent(in) :: classA
16217 type(transOrth_type) ,
intent(in) :: operationA
16222 PURE module subroutine trsm_ASS_CLUA_OTOA_CGMB_ONOB_RK1(matA, classA, operationA, matB, alpha)
16223#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16224 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CLUA_OTOA_CGMB_ONOB_RK1
16227 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
16228 real(RKG) ,
intent(inout) ,
contiguous :: matB(:,:)
16229 real(RKG) ,
intent(in) ,
optional :: alpha
16230 type(lowerUnit_type) ,
intent(in) :: classA
16231 type(transOrth_type) ,
intent(in) :: operationA
16244 PURE module subroutine trsm_ASS_CLUA_OTUA_CGMB_ONOB_CK5(matA, classA, operationA, matB, alpha)
16245#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16246 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CLUA_OTUA_CGMB_ONOB_CK5
16249 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
16250 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:,:)
16251 complex(CKG) ,
intent(in) ,
optional :: alpha
16252 type(lowerUnit_type) ,
intent(in) :: classA
16253 type(transUnit_type) ,
intent(in) :: operationA
16258 PURE module subroutine trsm_ASS_CLUA_OTUA_CGMB_ONOB_CK4(matA, classA, operationA, matB, alpha)
16259#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16260 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CLUA_OTUA_CGMB_ONOB_CK4
16263 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
16264 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:,:)
16265 complex(CKG) ,
intent(in) ,
optional :: alpha
16266 type(lowerUnit_type) ,
intent(in) :: classA
16267 type(transUnit_type) ,
intent(in) :: operationA
16272 PURE module subroutine trsm_ASS_CLUA_OTUA_CGMB_ONOB_CK3(matA, classA, operationA, matB, alpha)
16273#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16274 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CLUA_OTUA_CGMB_ONOB_CK3
16277 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
16278 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:,:)
16279 complex(CKG) ,
intent(in) ,
optional :: alpha
16280 type(lowerUnit_type) ,
intent(in) :: classA
16281 type(transUnit_type) ,
intent(in) :: operationA
16286 PURE module subroutine trsm_ASS_CLUA_OTUA_CGMB_ONOB_CK2(matA, classA, operationA, matB, alpha)
16287#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16288 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CLUA_OTUA_CGMB_ONOB_CK2
16291 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
16292 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:,:)
16293 complex(CKG) ,
intent(in) ,
optional :: alpha
16294 type(lowerUnit_type) ,
intent(in) :: classA
16295 type(transUnit_type) ,
intent(in) :: operationA
16300 PURE module subroutine trsm_ASS_CLUA_OTUA_CGMB_ONOB_CK1(matA, classA, operationA, matB, alpha)
16301#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16302 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CLUA_OTUA_CGMB_ONOB_CK1
16305 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
16306 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:,:)
16307 complex(CKG) ,
intent(in) ,
optional :: alpha
16308 type(lowerUnit_type) ,
intent(in) :: classA
16309 type(transUnit_type) ,
intent(in) :: operationA
16316 PURE module subroutine trsm_ASS_CLUA_OTUA_CGMB_ONOB_RK5(matA, classA, operationA, matB, alpha)
16317#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16318 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CLUA_OTUA_CGMB_ONOB_RK5
16321 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
16322 real(RKG) ,
intent(inout) ,
contiguous :: matB(:,:)
16323 real(RKG) ,
intent(in) ,
optional :: alpha
16324 type(lowerUnit_type) ,
intent(in) :: classA
16325 type(transUnit_type) ,
intent(in) :: operationA
16330 PURE module subroutine trsm_ASS_CLUA_OTUA_CGMB_ONOB_RK4(matA, classA, operationA, matB, alpha)
16331#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16332 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CLUA_OTUA_CGMB_ONOB_RK4
16335 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
16336 real(RKG) ,
intent(inout) ,
contiguous :: matB(:,:)
16337 real(RKG) ,
intent(in) ,
optional :: alpha
16338 type(lowerUnit_type) ,
intent(in) :: classA
16339 type(transUnit_type) ,
intent(in) :: operationA
16344 PURE module subroutine trsm_ASS_CLUA_OTUA_CGMB_ONOB_RK3(matA, classA, operationA, matB, alpha)
16345#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16346 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CLUA_OTUA_CGMB_ONOB_RK3
16349 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
16350 real(RKG) ,
intent(inout) ,
contiguous :: matB(:,:)
16351 real(RKG) ,
intent(in) ,
optional :: alpha
16352 type(lowerUnit_type) ,
intent(in) :: classA
16353 type(transUnit_type) ,
intent(in) :: operationA
16358 PURE module subroutine trsm_ASS_CLUA_OTUA_CGMB_ONOB_RK2(matA, classA, operationA, matB, alpha)
16359#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16360 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CLUA_OTUA_CGMB_ONOB_RK2
16363 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
16364 real(RKG) ,
intent(inout) ,
contiguous :: matB(:,:)
16365 real(RKG) ,
intent(in) ,
optional :: alpha
16366 type(lowerUnit_type) ,
intent(in) :: classA
16367 type(transUnit_type) ,
intent(in) :: operationA
16372 PURE module subroutine trsm_ASS_CLUA_OTUA_CGMB_ONOB_RK1(matA, classA, operationA, matB, alpha)
16373#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16374 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CLUA_OTUA_CGMB_ONOB_RK1
16377 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
16378 real(RKG) ,
intent(inout) ,
contiguous :: matB(:,:)
16379 real(RKG) ,
intent(in) ,
optional :: alpha
16380 type(lowerUnit_type) ,
intent(in) :: classA
16381 type(transUnit_type) ,
intent(in) :: operationA
16398 PURE module subroutine trsm_ASS_CUUA_INVA_CGMB_ONOB_CK5(matA, classA, operationA, matB, alpha)
16399#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16400 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CUUA_INVA_CGMB_ONOB_CK5
16403 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
16404 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:,:)
16405 complex(CKG) ,
intent(in) ,
optional :: alpha
16406 type(upperUnit_type) ,
intent(in) :: classA
16407 type(inversion_type) ,
intent(in) :: operationA
16412 PURE module subroutine trsm_ASS_CUUA_INVA_CGMB_ONOB_CK4(matA, classA, operationA, matB, alpha)
16413#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16414 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CUUA_INVA_CGMB_ONOB_CK4
16417 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
16418 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:,:)
16419 complex(CKG) ,
intent(in) ,
optional :: alpha
16420 type(upperUnit_type) ,
intent(in) :: classA
16421 type(inversion_type) ,
intent(in) :: operationA
16426 PURE module subroutine trsm_ASS_CUUA_INVA_CGMB_ONOB_CK3(matA, classA, operationA, matB, alpha)
16427#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16428 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CUUA_INVA_CGMB_ONOB_CK3
16431 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
16432 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:,:)
16433 complex(CKG) ,
intent(in) ,
optional :: alpha
16434 type(upperUnit_type) ,
intent(in) :: classA
16435 type(inversion_type) ,
intent(in) :: operationA
16440 PURE module subroutine trsm_ASS_CUUA_INVA_CGMB_ONOB_CK2(matA, classA, operationA, matB, alpha)
16441#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16442 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CUUA_INVA_CGMB_ONOB_CK2
16445 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
16446 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:,:)
16447 complex(CKG) ,
intent(in) ,
optional :: alpha
16448 type(upperUnit_type) ,
intent(in) :: classA
16449 type(inversion_type) ,
intent(in) :: operationA
16454 PURE module subroutine trsm_ASS_CUUA_INVA_CGMB_ONOB_CK1(matA, classA, operationA, matB, alpha)
16455#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16456 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CUUA_INVA_CGMB_ONOB_CK1
16459 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
16460 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:,:)
16461 complex(CKG) ,
intent(in) ,
optional :: alpha
16462 type(upperUnit_type) ,
intent(in) :: classA
16463 type(inversion_type) ,
intent(in) :: operationA
16470 PURE module subroutine trsm_ASS_CUUA_INVA_CGMB_ONOB_RK5(matA, classA, operationA, matB, alpha)
16471#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16472 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CUUA_INVA_CGMB_ONOB_RK5
16475 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
16476 real(RKG) ,
intent(inout) ,
contiguous :: matB(:,:)
16477 real(RKG) ,
intent(in) ,
optional :: alpha
16478 type(upperUnit_type) ,
intent(in) :: classA
16479 type(inversion_type) ,
intent(in) :: operationA
16484 PURE module subroutine trsm_ASS_CUUA_INVA_CGMB_ONOB_RK4(matA, classA, operationA, matB, alpha)
16485#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16486 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CUUA_INVA_CGMB_ONOB_RK4
16489 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
16490 real(RKG) ,
intent(inout) ,
contiguous :: matB(:,:)
16491 real(RKG) ,
intent(in) ,
optional :: alpha
16492 type(upperUnit_type) ,
intent(in) :: classA
16493 type(inversion_type) ,
intent(in) :: operationA
16498 PURE module subroutine trsm_ASS_CUUA_INVA_CGMB_ONOB_RK3(matA, classA, operationA, matB, alpha)
16499#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16500 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CUUA_INVA_CGMB_ONOB_RK3
16503 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
16504 real(RKG) ,
intent(inout) ,
contiguous :: matB(:,:)
16505 real(RKG) ,
intent(in) ,
optional :: alpha
16506 type(upperUnit_type) ,
intent(in) :: classA
16507 type(inversion_type) ,
intent(in) :: operationA
16512 PURE module subroutine trsm_ASS_CUUA_INVA_CGMB_ONOB_RK2(matA, classA, operationA, matB, alpha)
16513#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16514 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CUUA_INVA_CGMB_ONOB_RK2
16517 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
16518 real(RKG) ,
intent(inout) ,
contiguous :: matB(:,:)
16519 real(RKG) ,
intent(in) ,
optional :: alpha
16520 type(upperUnit_type) ,
intent(in) :: classA
16521 type(inversion_type) ,
intent(in) :: operationA
16526 PURE module subroutine trsm_ASS_CUUA_INVA_CGMB_ONOB_RK1(matA, classA, operationA, matB, alpha)
16527#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16528 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CUUA_INVA_CGMB_ONOB_RK1
16531 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
16532 real(RKG) ,
intent(inout) ,
contiguous :: matB(:,:)
16533 real(RKG) ,
intent(in) ,
optional :: alpha
16534 type(upperUnit_type) ,
intent(in) :: classA
16535 type(inversion_type) ,
intent(in) :: operationA
16548 PURE module subroutine trsm_ASS_CUUA_OTOA_CGMB_ONOB_CK5(matA, classA, operationA, matB, alpha)
16549#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16550 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CUUA_OTOA_CGMB_ONOB_CK5
16553 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
16554 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:,:)
16555 complex(CKG) ,
intent(in) ,
optional :: alpha
16556 type(upperUnit_type) ,
intent(in) :: classA
16557 type(transOrth_type) ,
intent(in) :: operationA
16562 PURE module subroutine trsm_ASS_CUUA_OTOA_CGMB_ONOB_CK4(matA, classA, operationA, matB, alpha)
16563#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16564 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CUUA_OTOA_CGMB_ONOB_CK4
16567 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
16568 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:,:)
16569 complex(CKG) ,
intent(in) ,
optional :: alpha
16570 type(upperUnit_type) ,
intent(in) :: classA
16571 type(transOrth_type) ,
intent(in) :: operationA
16576 PURE module subroutine trsm_ASS_CUUA_OTOA_CGMB_ONOB_CK3(matA, classA, operationA, matB, alpha)
16577#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16578 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CUUA_OTOA_CGMB_ONOB_CK3
16581 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
16582 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:,:)
16583 complex(CKG) ,
intent(in) ,
optional :: alpha
16584 type(upperUnit_type) ,
intent(in) :: classA
16585 type(transOrth_type) ,
intent(in) :: operationA
16590 PURE module subroutine trsm_ASS_CUUA_OTOA_CGMB_ONOB_CK2(matA, classA, operationA, matB, alpha)
16591#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16592 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CUUA_OTOA_CGMB_ONOB_CK2
16595 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
16596 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:,:)
16597 complex(CKG) ,
intent(in) ,
optional :: alpha
16598 type(upperUnit_type) ,
intent(in) :: classA
16599 type(transOrth_type) ,
intent(in) :: operationA
16604 PURE module subroutine trsm_ASS_CUUA_OTOA_CGMB_ONOB_CK1(matA, classA, operationA, matB, alpha)
16605#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16606 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CUUA_OTOA_CGMB_ONOB_CK1
16609 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
16610 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:,:)
16611 complex(CKG) ,
intent(in) ,
optional :: alpha
16612 type(upperUnit_type) ,
intent(in) :: classA
16613 type(transOrth_type) ,
intent(in) :: operationA
16620 PURE module subroutine trsm_ASS_CUUA_OTOA_CGMB_ONOB_RK5(matA, classA, operationA, matB, alpha)
16621#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16622 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CUUA_OTOA_CGMB_ONOB_RK5
16625 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
16626 real(RKG) ,
intent(inout) ,
contiguous :: matB(:,:)
16627 real(RKG) ,
intent(in) ,
optional :: alpha
16628 type(upperUnit_type) ,
intent(in) :: classA
16629 type(transOrth_type) ,
intent(in) :: operationA
16634 PURE module subroutine trsm_ASS_CUUA_OTOA_CGMB_ONOB_RK4(matA, classA, operationA, matB, alpha)
16635#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16636 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CUUA_OTOA_CGMB_ONOB_RK4
16639 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
16640 real(RKG) ,
intent(inout) ,
contiguous :: matB(:,:)
16641 real(RKG) ,
intent(in) ,
optional :: alpha
16642 type(upperUnit_type) ,
intent(in) :: classA
16643 type(transOrth_type) ,
intent(in) :: operationA
16648 PURE module subroutine trsm_ASS_CUUA_OTOA_CGMB_ONOB_RK3(matA, classA, operationA, matB, alpha)
16649#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16650 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CUUA_OTOA_CGMB_ONOB_RK3
16653 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
16654 real(RKG) ,
intent(inout) ,
contiguous :: matB(:,:)
16655 real(RKG) ,
intent(in) ,
optional :: alpha
16656 type(upperUnit_type) ,
intent(in) :: classA
16657 type(transOrth_type) ,
intent(in) :: operationA
16662 PURE module subroutine trsm_ASS_CUUA_OTOA_CGMB_ONOB_RK2(matA, classA, operationA, matB, alpha)
16663#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16664 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CUUA_OTOA_CGMB_ONOB_RK2
16667 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
16668 real(RKG) ,
intent(inout) ,
contiguous :: matB(:,:)
16669 real(RKG) ,
intent(in) ,
optional :: alpha
16670 type(upperUnit_type) ,
intent(in) :: classA
16671 type(transOrth_type) ,
intent(in) :: operationA
16676 PURE module subroutine trsm_ASS_CUUA_OTOA_CGMB_ONOB_RK1(matA, classA, operationA, matB, alpha)
16677#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16678 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CUUA_OTOA_CGMB_ONOB_RK1
16681 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
16682 real(RKG) ,
intent(inout) ,
contiguous :: matB(:,:)
16683 real(RKG) ,
intent(in) ,
optional :: alpha
16684 type(upperUnit_type) ,
intent(in) :: classA
16685 type(transOrth_type) ,
intent(in) :: operationA
16698 PURE module subroutine trsm_ASS_CUUA_OTUA_CGMB_ONOB_CK5(matA, classA, operationA, matB, alpha)
16699#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16700 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CUUA_OTUA_CGMB_ONOB_CK5
16703 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
16704 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:,:)
16705 complex(CKG) ,
intent(in) ,
optional :: alpha
16706 type(upperUnit_type) ,
intent(in) :: classA
16707 type(transUnit_type) ,
intent(in) :: operationA
16712 PURE module subroutine trsm_ASS_CUUA_OTUA_CGMB_ONOB_CK4(matA, classA, operationA, matB, alpha)
16713#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16714 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CUUA_OTUA_CGMB_ONOB_CK4
16717 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
16718 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:,:)
16719 complex(CKG) ,
intent(in) ,
optional :: alpha
16720 type(upperUnit_type) ,
intent(in) :: classA
16721 type(transUnit_type) ,
intent(in) :: operationA
16726 PURE module subroutine trsm_ASS_CUUA_OTUA_CGMB_ONOB_CK3(matA, classA, operationA, matB, alpha)
16727#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16728 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CUUA_OTUA_CGMB_ONOB_CK3
16731 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
16732 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:,:)
16733 complex(CKG) ,
intent(in) ,
optional :: alpha
16734 type(upperUnit_type) ,
intent(in) :: classA
16735 type(transUnit_type) ,
intent(in) :: operationA
16740 PURE module subroutine trsm_ASS_CUUA_OTUA_CGMB_ONOB_CK2(matA, classA, operationA, matB, alpha)
16741#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16742 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CUUA_OTUA_CGMB_ONOB_CK2
16745 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
16746 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:,:)
16747 complex(CKG) ,
intent(in) ,
optional :: alpha
16748 type(upperUnit_type) ,
intent(in) :: classA
16749 type(transUnit_type) ,
intent(in) :: operationA
16754 PURE module subroutine trsm_ASS_CUUA_OTUA_CGMB_ONOB_CK1(matA, classA, operationA, matB, alpha)
16755#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16756 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CUUA_OTUA_CGMB_ONOB_CK1
16759 complex(CKG) ,
intent(in) ,
contiguous :: matA(:,:)
16760 complex(CKG) ,
intent(inout) ,
contiguous :: matB(:,:)
16761 complex(CKG) ,
intent(in) ,
optional :: alpha
16762 type(upperUnit_type) ,
intent(in) :: classA
16763 type(transUnit_type) ,
intent(in) :: operationA
16770 PURE module subroutine trsm_ASS_CUUA_OTUA_CGMB_ONOB_RK5(matA, classA, operationA, matB, alpha)
16771#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16772 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CUUA_OTUA_CGMB_ONOB_RK5
16775 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
16776 real(RKG) ,
intent(inout) ,
contiguous :: matB(:,:)
16777 real(RKG) ,
intent(in) ,
optional :: alpha
16778 type(upperUnit_type) ,
intent(in) :: classA
16779 type(transUnit_type) ,
intent(in) :: operationA
16784 PURE module subroutine trsm_ASS_CUUA_OTUA_CGMB_ONOB_RK4(matA, classA, operationA, matB, alpha)
16785#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16786 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CUUA_OTUA_CGMB_ONOB_RK4
16789 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
16790 real(RKG) ,
intent(inout) ,
contiguous :: matB(:,:)
16791 real(RKG) ,
intent(in) ,
optional :: alpha
16792 type(upperUnit_type) ,
intent(in) :: classA
16793 type(transUnit_type) ,
intent(in) :: operationA
16798 PURE module subroutine trsm_ASS_CUUA_OTUA_CGMB_ONOB_RK3(matA, classA, operationA, matB, alpha)
16799#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16800 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CUUA_OTUA_CGMB_ONOB_RK3
16803 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
16804 real(RKG) ,
intent(inout) ,
contiguous :: matB(:,:)
16805 real(RKG) ,
intent(in) ,
optional :: alpha
16806 type(upperUnit_type) ,
intent(in) :: classA
16807 type(transUnit_type) ,
intent(in) :: operationA
16812 PURE module subroutine trsm_ASS_CUUA_OTUA_CGMB_ONOB_RK2(matA, classA, operationA, matB, alpha)
16813#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16814 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CUUA_OTUA_CGMB_ONOB_RK2
16817 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
16818 real(RKG) ,
intent(inout) ,
contiguous :: matB(:,:)
16819 real(RKG) ,
intent(in) ,
optional :: alpha
16820 type(upperUnit_type) ,
intent(in) :: classA
16821 type(transUnit_type) ,
intent(in) :: operationA
16826 PURE module subroutine trsm_ASS_CUUA_OTUA_CGMB_ONOB_RK1(matA, classA, operationA, matB, alpha)
16827#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16828 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CUUA_OTUA_CGMB_ONOB_RK1
16831 real(RKG) ,
intent(in) ,
contiguous :: matA(:,:)
16832 real(RKG) ,
intent(inout) ,
contiguous :: matB(:,:)
16833 real(RKG) ,
intent(in) ,
optional :: alpha
16834 type(upperUnit_type) ,
intent(in) :: classA
16835 type(transUnit_type) ,
intent(in) :: operationA
16856 PURE module subroutine trsm_ASS_CGMA_ONOA_CLDB_INVB_CK5(matA, matB, classB, operationB, alpha)
16857#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16858 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CGMA_ONOA_CLDB_INVB_CK5
16861 complex(CKG) ,
intent(inout) ,
contiguous :: matA(:,:)
16862 complex(CKG) ,
intent(in) ,
contiguous :: matB(:,:)
16863 complex(CKG) ,
intent(in) ,
optional :: alpha
16864 type(lowerDiag_type) ,
intent(in) :: classB
16865 type(inversion_type) ,
intent(in) :: operationB
16870 PURE module subroutine trsm_ASS_CGMA_ONOA_CLDB_INVB_CK4(matA, matB, classB, operationB, alpha)
16871#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16872 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CGMA_ONOA_CLDB_INVB_CK4
16875 complex(CKG) ,
intent(inout) ,
contiguous :: matA(:,:)
16876 complex(CKG) ,
intent(in) ,
contiguous :: matB(:,:)
16877 complex(CKG) ,
intent(in) ,
optional :: alpha
16878 type(lowerDiag_type) ,
intent(in) :: classB
16879 type(inversion_type) ,
intent(in) :: operationB
16884 PURE module subroutine trsm_ASS_CGMA_ONOA_CLDB_INVB_CK3(matA, matB, classB, operationB, alpha)
16885#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16886 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CGMA_ONOA_CLDB_INVB_CK3
16889 complex(CKG) ,
intent(inout) ,
contiguous :: matA(:,:)
16890 complex(CKG) ,
intent(in) ,
contiguous :: matB(:,:)
16891 complex(CKG) ,
intent(in) ,
optional :: alpha
16892 type(lowerDiag_type) ,
intent(in) :: classB
16893 type(inversion_type) ,
intent(in) :: operationB
16898 PURE module subroutine trsm_ASS_CGMA_ONOA_CLDB_INVB_CK2(matA, matB, classB, operationB, alpha)
16899#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16900 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CGMA_ONOA_CLDB_INVB_CK2
16903 complex(CKG) ,
intent(inout) ,
contiguous :: matA(:,:)
16904 complex(CKG) ,
intent(in) ,
contiguous :: matB(:,:)
16905 complex(CKG) ,
intent(in) ,
optional :: alpha
16906 type(lowerDiag_type) ,
intent(in) :: classB
16907 type(inversion_type) ,
intent(in) :: operationB
16912 PURE module subroutine trsm_ASS_CGMA_ONOA_CLDB_INVB_CK1(matA, matB, classB, operationB, alpha)
16913#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16914 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CGMA_ONOA_CLDB_INVB_CK1
16917 complex(CKG) ,
intent(inout) ,
contiguous :: matA(:,:)
16918 complex(CKG) ,
intent(in) ,
contiguous :: matB(:,:)
16919 complex(CKG) ,
intent(in) ,
optional :: alpha
16920 type(lowerDiag_type) ,
intent(in) :: classB
16921 type(inversion_type) ,
intent(in) :: operationB
16928 PURE module subroutine trsm_ASS_CGMA_ONOA_CLDB_INVB_RK5(matA, matB, classB, operationB, alpha)
16929#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16930 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CGMA_ONOA_CLDB_INVB_RK5
16933 real(RKG) ,
intent(inout) ,
contiguous :: matA(:,:)
16934 real(RKG) ,
intent(in) ,
contiguous :: matB(:,:)
16935 real(RKG) ,
intent(in) ,
optional :: alpha
16936 type(lowerDiag_type) ,
intent(in) :: classB
16937 type(inversion_type) ,
intent(in) :: operationB
16942 PURE module subroutine trsm_ASS_CGMA_ONOA_CLDB_INVB_RK4(matA, matB, classB, operationB, alpha)
16943#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16944 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CGMA_ONOA_CLDB_INVB_RK4
16947 real(RKG) ,
intent(inout) ,
contiguous :: matA(:,:)
16948 real(RKG) ,
intent(in) ,
contiguous :: matB(:,:)
16949 real(RKG) ,
intent(in) ,
optional :: alpha
16950 type(lowerDiag_type) ,
intent(in) :: classB
16951 type(inversion_type) ,
intent(in) :: operationB
16956 PURE module subroutine trsm_ASS_CGMA_ONOA_CLDB_INVB_RK3(matA, matB, classB, operationB, alpha)
16957#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16958 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CGMA_ONOA_CLDB_INVB_RK3
16961 real(RKG) ,
intent(inout) ,
contiguous :: matA(:,:)
16962 real(RKG) ,
intent(in) ,
contiguous :: matB(:,:)
16963 real(RKG) ,
intent(in) ,
optional :: alpha
16964 type(lowerDiag_type) ,
intent(in) :: classB
16965 type(inversion_type) ,
intent(in) :: operationB
16970 PURE module subroutine trsm_ASS_CGMA_ONOA_CLDB_INVB_RK2(matA, matB, classB, operationB, alpha)
16971#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16972 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CGMA_ONOA_CLDB_INVB_RK2
16975 real(RKG) ,
intent(inout) ,
contiguous :: matA(:,:)
16976 real(RKG) ,
intent(in) ,
contiguous :: matB(:,:)
16977 real(RKG) ,
intent(in) ,
optional :: alpha
16978 type(lowerDiag_type) ,
intent(in) :: classB
16979 type(inversion_type) ,
intent(in) :: operationB
16984 PURE module subroutine trsm_ASS_CGMA_ONOA_CLDB_INVB_RK1(matA, matB, classB, operationB, alpha)
16985#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16986 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CGMA_ONOA_CLDB_INVB_RK1
16989 real(RKG) ,
intent(inout) ,
contiguous :: matA(:,:)
16990 real(RKG) ,
intent(in) ,
contiguous :: matB(:,:)
16991 real(RKG) ,
intent(in) ,
optional :: alpha
16992 type(lowerDiag_type) ,
intent(in) :: classB
16993 type(inversion_type) ,
intent(in) :: operationB
17006 PURE module subroutine trsm_ASS_CGMA_ONOA_CLDB_OTOB_CK5(matA, matB, classB, operationB, alpha)
17007#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
17008 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CGMA_ONOA_CLDB_OTOB_CK5
17011 complex(CKG) ,
intent(inout) ,
contiguous :: matA(:,:)
17012 complex(CKG) ,
intent(in) ,
contiguous :: matB(:,:)
17013 complex(CKG) ,
intent(in) ,
optional :: alpha
17014 type(lowerDiag_type) ,
intent(in) :: classB
17015 type(transOrth_type) ,
intent(in) :: operationB
17020 PURE module subroutine trsm_ASS_CGMA_ONOA_CLDB_OTOB_CK4(matA, matB, classB, operationB, alpha)
17021#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
17022 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CGMA_ONOA_CLDB_OTOB_CK4
17025 complex(CKG) ,
intent(inout) ,
contiguous :: matA(:,:)
17026 complex(CKG) ,
intent(in) ,
contiguous :: matB(:,:)
17027 complex(CKG) ,
intent(in) ,
optional :: alpha
17028 type(lowerDiag_type) ,
intent(in) :: classB
17029 type(transOrth_type) ,
intent(in) :: operationB
17034 PURE module subroutine trsm_ASS_CGMA_ONOA_CLDB_OTOB_CK3(matA, matB, classB, operationB, alpha)
17035#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
17036 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CGMA_ONOA_CLDB_OTOB_CK3
17039 complex(CKG) ,
intent(inout) ,
contiguous :: matA(:,:)
17040 complex(CKG) ,
intent(in) ,
contiguous :: matB(:,:)
17041 complex(CKG) ,
intent(in) ,
optional :: alpha
17042 type(lowerDiag_type) ,
intent(in) :: classB
17043 type(transOrth_type) ,
intent(in) :: operationB
17048 PURE module subroutine trsm_ASS_CGMA_ONOA_CLDB_OTOB_CK2(matA, matB, classB, operationB, alpha)
17049#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
17050 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CGMA_ONOA_CLDB_OTOB_CK2
17053 complex(CKG) ,
intent(inout) ,
contiguous :: matA(:,:)
17054 complex(CKG) ,
intent(in) ,
contiguous :: matB(:,:)
17055 complex(CKG) ,
intent(in) ,
optional :: alpha
17056 type(lowerDiag_type) ,
intent(in) :: classB
17057 type(transOrth_type) ,
intent(in) :: operationB
17062 PURE module subroutine trsm_ASS_CGMA_ONOA_CLDB_OTOB_CK1(matA, matB, classB, operationB, alpha)
17063#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
17064 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CGMA_ONOA_CLDB_OTOB_CK1
17067 complex(CKG) ,
intent(inout) ,
contiguous :: matA(:,:)
17068 complex(CKG) ,
intent(in) ,
contiguous :: matB(:,:)
17069 complex(CKG) ,
intent(in) ,
optional :: alpha
17070 type(lowerDiag_type) ,
intent(in) :: classB
17071 type(transOrth_type) ,
intent(in) :: operationB
17078 PURE module subroutine trsm_ASS_CGMA_ONOA_CLDB_OTOB_RK5(matA, matB, classB, operationB, alpha)
17079#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
17080 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CGMA_ONOA_CLDB_OTOB_RK5
17083 real(RKG) ,
intent(inout) ,
contiguous :: matA(:,:)
17084 real(RKG) ,
intent(in) ,
contiguous :: matB(:,:)
17085 real(RKG) ,
intent(in) ,
optional :: alpha
17086 type(lowerDiag_type) ,
intent(in) :: classB
17087 type(transOrth_type) ,
intent(in) :: operationB
17092 PURE module subroutine trsm_ASS_CGMA_ONOA_CLDB_OTOB_RK4(matA, matB, classB, operationB, alpha)
17093#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
17094 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CGMA_ONOA_CLDB_OTOB_RK4
17097 real(RKG) ,
intent(inout) ,
contiguous :: matA(:,:)
17098 real(RKG) ,
intent(in) ,
contiguous :: matB(:,:)
17099 real(RKG) ,
intent(in) ,
optional :: alpha
17100 type(lowerDiag_type) ,
intent(in) :: classB
17101 type(transOrth_type) ,
intent(in) :: operationB
17106 PURE module subroutine trsm_ASS_CGMA_ONOA_CLDB_OTOB_RK3(matA, matB, classB, operationB, alpha)
17107#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
17108 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CGMA_ONOA_CLDB_OTOB_RK3
17111 real(RKG) ,
intent(inout) ,
contiguous :: matA(:,:)
17112 real(RKG) ,
intent(in) ,
contiguous :: matB(:,:)
17113 real(RKG) ,
intent(in) ,
optional :: alpha
17114 type(lowerDiag_type) ,
intent(in) :: classB
17115 type(transOrth_type) ,
intent(in) :: operationB
17120 PURE module subroutine trsm_ASS_CGMA_ONOA_CLDB_OTOB_RK2(matA, matB, classB, operationB, alpha)
17121#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
17122 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CGMA_ONOA_CLDB_OTOB_RK2
17125 real(RKG) ,
intent(inout) ,
contiguous :: matA(:,:)
17126 real(RKG) ,
intent(in) ,
contiguous :: matB(:,:)
17127 real(RKG) ,
intent(in) ,
optional :: alpha
17128 type(lowerDiag_type) ,
intent(in) :: classB
17129 type(transOrth_type) ,
intent(in) :: operationB
17134 PURE module subroutine trsm_ASS_CGMA_ONOA_CLDB_OTOB_RK1(matA, matB, classB, operationB, alpha)
17135#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
17136 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CGMA_ONOA_CLDB_OTOB_RK1
17139 real(RKG) ,
intent(inout) ,
contiguous :: matA(:,:)
17140 real(RKG) ,
intent(in) ,
contiguous :: matB(:,:)
17141 real(RKG) ,
intent(in) ,
optional :: alpha
17142 type(lowerDiag_type) ,
intent(in) :: classB
17143 type(transOrth_type) ,
intent(in) :: operationB
17156 PURE module subroutine trsm_ASS_CGMA_ONOA_CLDB_OTUB_CK5(matA, matB, classB, operationB, alpha)
17157#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
17158 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CGMA_ONOA_CLDB_OTUB_CK5
17161 complex(CKG) ,
intent(inout) ,
contiguous :: matA(:,:)
17162 complex(CKG) ,
intent(in) ,
contiguous :: matB(:,:)
17163 complex(CKG) ,
intent(in) ,
optional :: alpha
17164 type(lowerDiag_type) ,
intent(in) :: classB
17165 type(transUnit_type) ,
intent(in) :: operationB
17170 PURE module subroutine trsm_ASS_CGMA_ONOA_CLDB_OTUB_CK4(matA, matB, classB, operationB, alpha)
17171#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
17172 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CGMA_ONOA_CLDB_OTUB_CK4
17175 complex(CKG) ,
intent(inout) ,
contiguous :: matA(:,:)
17176 complex(CKG) ,
intent(in) ,
contiguous :: matB(:,:)
17177 complex(CKG) ,
intent(in) ,
optional :: alpha
17178 type(lowerDiag_type) ,
intent(in) :: classB
17179 type(transUnit_type) ,
intent(in) :: operationB
17184 PURE module subroutine trsm_ASS_CGMA_ONOA_CLDB_OTUB_CK3(matA, matB, classB, operationB, alpha)
17185#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
17186 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CGMA_ONOA_CLDB_OTUB_CK3
17189 complex(CKG) ,
intent(inout) ,
contiguous :: matA(:,:)
17190 complex(CKG) ,
intent(in) ,
contiguous :: matB(:,:)
17191 complex(CKG) ,
intent(in) ,
optional :: alpha
17192 type(lowerDiag_type) ,
intent(in) :: classB
17193 type(transUnit_type) ,
intent(in) :: operationB
17198 PURE module subroutine trsm_ASS_CGMA_ONOA_CLDB_OTUB_CK2(matA, matB, classB, operationB, alpha)
17199#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
17200 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CGMA_ONOA_CLDB_OTUB_CK2
17203 complex(CKG) ,
intent(inout) ,
contiguous :: matA(:,:)
17204 complex(CKG) ,
intent(in) ,
contiguous :: matB(:,:)
17205 complex(CKG) ,
intent(in) ,
optional :: alpha
17206 type(lowerDiag_type) ,
intent(in) :: classB
17207 type(transUnit_type) ,
intent(in) :: operationB
17212 PURE module subroutine trsm_ASS_CGMA_ONOA_CLDB_OTUB_CK1(matA, matB, classB, operationB, alpha)
17213#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
17214 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CGMA_ONOA_CLDB_OTUB_CK1
17217 complex(CKG) ,
intent(inout) ,
contiguous :: matA(:,:)
17218 complex(CKG) ,
intent(in) ,
contiguous :: matB(:,:)
17219 complex(CKG) ,
intent(in) ,
optional :: alpha
17220 type(lowerDiag_type) ,
intent(in) :: classB
17221 type(transUnit_type) ,
intent(in) :: operationB
17228 PURE module subroutine trsm_ASS_CGMA_ONOA_CLDB_OTUB_RK5(matA, matB, classB, operationB, alpha)
17229#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
17230 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CGMA_ONOA_CLDB_OTUB_RK5
17233 real(RKG) ,
intent(inout) ,
contiguous :: matA(:,:)
17234 real(RKG) ,
intent(in) ,
contiguous :: matB(:,:)
17235 real(RKG) ,
intent(in) ,
optional :: alpha
17236 type(lowerDiag_type) ,
intent(in) :: classB
17237 type(transUnit_type) ,
intent(in) :: operationB
17242 PURE module subroutine trsm_ASS_CGMA_ONOA_CLDB_OTUB_RK4(matA, matB, classB, operationB, alpha)
17243#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
17244 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CGMA_ONOA_CLDB_OTUB_RK4
17247 real(RKG) ,
intent(inout) ,
contiguous :: matA(:,:)
17248 real(RKG) ,
intent(in) ,
contiguous :: matB(:,:)
17249 real(RKG) ,
intent(in) ,
optional :: alpha
17250 type(lowerDiag_type) ,
intent(in) :: classB
17251 type(transUnit_type) ,
intent(in) :: operationB
17256 PURE module subroutine trsm_ASS_CGMA_ONOA_CLDB_OTUB_RK3(matA, matB, classB, operationB, alpha)
17257#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
17258 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CGMA_ONOA_CLDB_OTUB_RK3
17261 real(RKG) ,
intent(inout) ,
contiguous :: matA(:,:)
17262 real(RKG) ,
intent(in) ,
contiguous :: matB(:,:)
17263 real(RKG) ,
intent(in) ,
optional :: alpha
17264 type(lowerDiag_type) ,
intent(in) :: classB
17265 type(transUnit_type) ,
intent(in) :: operationB
17270 PURE module subroutine trsm_ASS_CGMA_ONOA_CLDB_OTUB_RK2(matA, matB, classB, operationB, alpha)
17271#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
17272 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CGMA_ONOA_CLDB_OTUB_RK2
17275 real(RKG) ,
intent(inout) ,
contiguous :: matA(:,:)
17276 real(RKG) ,
intent(in) ,
contiguous :: matB(:,:)
17277 real(RKG) ,
intent(in) ,
optional :: alpha
17278 type(lowerDiag_type) ,
intent(in) :: classB
17279 type(transUnit_type) ,
intent(in) :: operationB
17284 PURE module subroutine trsm_ASS_CGMA_ONOA_CLDB_OTUB_RK1(matA, matB, classB, operationB, alpha)
17285#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
17286 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CGMA_ONOA_CLDB_OTUB_RK1
17289 real(RKG) ,
intent(inout) ,
contiguous :: matA(:,:)
17290 real(RKG) ,
intent(in) ,
contiguous :: matB(:,:)
17291 real(RKG) ,
intent(in) ,
optional :: alpha
17292 type(lowerDiag_type) ,
intent(in) :: classB
17293 type(transUnit_type) ,
intent(in) :: operationB
17310 PURE module subroutine trsm_ASS_CGMA_ONOA_CUDB_INVB_CK5(matA, matB, classB, operationB, alpha)
17311#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
17312 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CGMA_ONOA_CUDB_INVB_CK5
17315 complex(CKG) ,
intent(inout) ,
contiguous :: matA(:,:)
17316 complex(CKG) ,
intent(in) ,
contiguous :: matB(:,:)
17317 complex(CKG) ,
intent(in) ,
optional :: alpha
17318 type(upperDiag_type) ,
intent(in) :: classB
17319 type(inversion_type) ,
intent(in) :: operationB
17324 PURE module subroutine trsm_ASS_CGMA_ONOA_CUDB_INVB_CK4(matA, matB, classB, operationB, alpha)
17325#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
17326 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CGMA_ONOA_CUDB_INVB_CK4
17329 complex(CKG) ,
intent(inout) ,
contiguous :: matA(:,:)
17330 complex(CKG) ,
intent(in) ,
contiguous :: matB(:,:)
17331 complex(CKG) ,
intent(in) ,
optional :: alpha
17332 type(upperDiag_type) ,
intent(in) :: classB
17333 type(inversion_type) ,
intent(in) :: operationB
17338 PURE module subroutine trsm_ASS_CGMA_ONOA_CUDB_INVB_CK3(matA, matB, classB, operationB, alpha)
17339#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
17340 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CGMA_ONOA_CUDB_INVB_CK3
17343 complex(CKG) ,
intent(inout) ,
contiguous :: matA(:,:)
17344 complex(CKG) ,
intent(in) ,
contiguous :: matB(:,:)
17345 complex(CKG) ,
intent(in) ,
optional :: alpha
17346 type(upperDiag_type) ,
intent(in) :: classB
17347 type(inversion_type) ,
intent(in) :: operationB
17352 PURE module subroutine trsm_ASS_CGMA_ONOA_CUDB_INVB_CK2(matA, matB, classB, operationB, alpha)
17353#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
17354 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CGMA_ONOA_CUDB_INVB_CK2
17357 complex(CKG) ,
intent(inout) ,
contiguous :: matA(:,:)
17358 complex(CKG) ,
intent(in) ,
contiguous :: matB(:,:)
17359 complex(CKG) ,
intent(in) ,
optional :: alpha
17360 type(upperDiag_type) ,
intent(in) :: classB
17361 type(inversion_type) ,
intent(in) :: operationB
17366 PURE module subroutine trsm_ASS_CGMA_ONOA_CUDB_INVB_CK1(matA, matB, classB, operationB, alpha)
17367#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
17368 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CGMA_ONOA_CUDB_INVB_CK1
17371 complex(CKG) ,
intent(inout) ,
contiguous :: matA(:,:)
17372 complex(CKG) ,
intent(in) ,
contiguous :: matB(:,:)
17373 complex(CKG) ,
intent(in) ,
optional :: alpha
17374 type(upperDiag_type) ,
intent(in) :: classB
17375 type(inversion_type) ,
intent(in) :: operationB
17382 PURE module subroutine trsm_ASS_CGMA_ONOA_CUDB_INVB_RK5(matA, matB, classB, operationB, alpha)
17383#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
17384 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CGMA_ONOA_CUDB_INVB_RK5
17387 real(RKG) ,
intent(inout) ,
contiguous :: matA(:,:)
17388 real(RKG) ,
intent(in) ,
contiguous :: matB(:,:)
17389 real(RKG) ,
intent(in) ,
optional :: alpha
17390 type(upperDiag_type) ,
intent(in) :: classB
17391 type(inversion_type) ,
intent(in) :: operationB
17396 PURE module subroutine trsm_ASS_CGMA_ONOA_CUDB_INVB_RK4(matA, matB, classB, operationB, alpha)
17397#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
17398 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CGMA_ONOA_CUDB_INVB_RK4
17401 real(RKG) ,
intent(inout) ,
contiguous :: matA(:,:)
17402 real(RKG) ,
intent(in) ,
contiguous :: matB(:,:)
17403 real(RKG) ,
intent(in) ,
optional :: alpha
17404 type(upperDiag_type) ,
intent(in) :: classB
17405 type(inversion_type) ,
intent(in) :: operationB
17410 PURE module subroutine trsm_ASS_CGMA_ONOA_CUDB_INVB_RK3(matA, matB, classB, operationB, alpha)
17411#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
17412 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CGMA_ONOA_CUDB_INVB_RK3
17415 real(RKG) ,
intent(inout) ,
contiguous :: matA(:,:)
17416 real(RKG) ,
intent(in) ,
contiguous :: matB(:,:)
17417 real(RKG) ,
intent(in) ,
optional :: alpha
17418 type(upperDiag_type) ,
intent(in) :: classB
17419 type(inversion_type) ,
intent(in) :: operationB
17424 PURE module subroutine trsm_ASS_CGMA_ONOA_CUDB_INVB_RK2(matA, matB, classB, operationB, alpha)
17425#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
17426 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CGMA_ONOA_CUDB_INVB_RK2
17429 real(RKG) ,
intent(inout) ,
contiguous :: matA(:,:)
17430 real(RKG) ,
intent(in) ,
contiguous :: matB(:,:)
17431 real(RKG) ,
intent(in) ,
optional :: alpha
17432 type(upperDiag_type) ,
intent(in) :: classB
17433 type(inversion_type) ,
intent(in) :: operationB
17438 PURE module subroutine trsm_ASS_CGMA_ONOA_CUDB_INVB_RK1(matA, matB, classB, operationB, alpha)
17439#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
17440 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CGMA_ONOA_CUDB_INVB_RK1
17443 real(RKG) ,
intent(inout) ,
contiguous :: matA(:,:)
17444 real(RKG) ,
intent(in) ,
contiguous :: matB(:,:)
17445 real(RKG) ,
intent(in) ,
optional :: alpha
17446 type(upperDiag_type) ,
intent(in) :: classB
17447 type(inversion_type) ,
intent(in) :: operationB
17460 PURE module subroutine trsm_ASS_CGMA_ONOA_CUDB_OTOB_CK5(matA, matB, classB, operationB, alpha)
17461#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
17462 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CGMA_ONOA_CUDB_OTOB_CK5
17465 complex(CKG) ,
intent(inout) ,
contiguous :: matA(:,:)
17466 complex(CKG) ,
intent(in) ,
contiguous :: matB(:,:)
17467 complex(CKG) ,
intent(in) ,
optional :: alpha
17468 type(upperDiag_type) ,
intent(in) :: classB
17469 type(transOrth_type) ,
intent(in) :: operationB
17474 PURE module subroutine trsm_ASS_CGMA_ONOA_CUDB_OTOB_CK4(matA, matB, classB, operationB, alpha)
17475#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
17476 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CGMA_ONOA_CUDB_OTOB_CK4
17479 complex(CKG) ,
intent(inout) ,
contiguous :: matA(:,:)
17480 complex(CKG) ,
intent(in) ,
contiguous :: matB(:,:)
17481 complex(CKG) ,
intent(in) ,
optional :: alpha
17482 type(upperDiag_type) ,
intent(in) :: classB
17483 type(transOrth_type) ,
intent(in) :: operationB
17488 PURE module subroutine trsm_ASS_CGMA_ONOA_CUDB_OTOB_CK3(matA, matB, classB, operationB, alpha)
17489#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
17490 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CGMA_ONOA_CUDB_OTOB_CK3
17493 complex(CKG) ,
intent(inout) ,
contiguous :: matA(:,:)
17494 complex(CKG) ,
intent(in) ,
contiguous :: matB(:,:)
17495 complex(CKG) ,
intent(in) ,
optional :: alpha
17496 type(upperDiag_type) ,
intent(in) :: classB
17497 type(transOrth_type) ,
intent(in) :: operationB
17502 PURE module subroutine trsm_ASS_CGMA_ONOA_CUDB_OTOB_CK2(matA, matB, classB, operationB, alpha)
17503#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
17504 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CGMA_ONOA_CUDB_OTOB_CK2
17507 complex(CKG) ,
intent(inout) ,
contiguous :: matA(:,:)
17508 complex(CKG) ,
intent(in) ,
contiguous :: matB(:,:)
17509 complex(CKG) ,
intent(in) ,
optional :: alpha
17510 type(upperDiag_type) ,
intent(in) :: classB
17511 type(transOrth_type) ,
intent(in) :: operationB
17516 PURE module subroutine trsm_ASS_CGMA_ONOA_CUDB_OTOB_CK1(matA, matB, classB, operationB, alpha)
17517#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
17518 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CGMA_ONOA_CUDB_OTOB_CK1
17521 complex(CKG) ,
intent(inout) ,
contiguous :: matA(:,:)
17522 complex(CKG) ,
intent(in) ,
contiguous :: matB(:,:)
17523 complex(CKG) ,
intent(in) ,
optional :: alpha
17524 type(upperDiag_type) ,
intent(in) :: classB
17525 type(transOrth_type) ,
intent(in) :: operationB
17532 PURE module subroutine trsm_ASS_CGMA_ONOA_CUDB_OTOB_RK5(matA, matB, classB, operationB, alpha)
17533#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
17534 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CGMA_ONOA_CUDB_OTOB_RK5
17537 real(RKG) ,
intent(inout) ,
contiguous :: matA(:,:)
17538 real(RKG) ,
intent(in) ,
contiguous :: matB(:,:)
17539 real(RKG) ,
intent(in) ,
optional :: alpha
17540 type(upperDiag_type) ,
intent(in) :: classB
17541 type(transOrth_type) ,
intent(in) :: operationB
17546 PURE module subroutine trsm_ASS_CGMA_ONOA_CUDB_OTOB_RK4(matA, matB, classB, operationB, alpha)
17547#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
17548 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CGMA_ONOA_CUDB_OTOB_RK4
17551 real(RKG) ,
intent(inout) ,
contiguous :: matA(:,:)
17552 real(RKG) ,
intent(in) ,
contiguous :: matB(:,:)
17553 real(RKG) ,
intent(in) ,
optional :: alpha
17554 type(upperDiag_type) ,
intent(in) :: classB
17555 type(transOrth_type) ,
intent(in) :: operationB
17560 PURE module subroutine trsm_ASS_CGMA_ONOA_CUDB_OTOB_RK3(matA, matB, classB, operationB, alpha)
17561#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
17562 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CGMA_ONOA_CUDB_OTOB_RK3
17565 real(RKG) ,
intent(inout) ,
contiguous :: matA(:,:)
17566 real(RKG) ,
intent(in) ,
contiguous :: matB(:,:)
17567 real(RKG) ,
intent(in) ,
optional :: alpha
17568 type(upperDiag_type) ,
intent(in) :: classB
17569 type(transOrth_type) ,
intent(in) :: operationB
17574 PURE module subroutine trsm_ASS_CGMA_ONOA_CUDB_OTOB_RK2(matA, matB, classB, operationB, alpha)
17575#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
17576 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CGMA_ONOA_CUDB_OTOB_RK2
17579 real(RKG) ,
intent(inout) ,
contiguous :: matA(:,:)
17580 real(RKG) ,
intent(in) ,
contiguous :: matB(:,:)
17581 real(RKG) ,
intent(in) ,
optional :: alpha
17582 type(upperDiag_type) ,
intent(in) :: classB
17583 type(transOrth_type) ,
intent(in) :: operationB
17588 PURE module subroutine trsm_ASS_CGMA_ONOA_CUDB_OTOB_RK1(matA, matB, classB, operationB, alpha)
17589#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
17590 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CGMA_ONOA_CUDB_OTOB_RK1
17593 real(RKG) ,
intent(inout) ,
contiguous :: matA(:,:)
17594 real(RKG) ,
intent(in) ,
contiguous :: matB(:,:)
17595 real(RKG) ,
intent(in) ,
optional :: alpha
17596 type(upperDiag_type) ,
intent(in) :: classB
17597 type(transOrth_type) ,
intent(in) :: operationB
17610 PURE module subroutine trsm_ASS_CGMA_ONOA_CUDB_OTUB_CK5(matA, matB, classB, operationB, alpha)
17611#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
17612 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CGMA_ONOA_CUDB_OTUB_CK5
17615 complex(CKG) ,
intent(inout) ,
contiguous :: matA(:,:)
17616 complex(CKG) ,
intent(in) ,
contiguous :: matB(:,:)
17617 complex(CKG) ,
intent(in) ,
optional :: alpha
17618 type(upperDiag_type) ,
intent(in) :: classB
17619 type(transUnit_type) ,
intent(in) :: operationB
17624 PURE module subroutine trsm_ASS_CGMA_ONOA_CUDB_OTUB_CK4(matA, matB, classB, operationB, alpha)
17625#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
17626 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CGMA_ONOA_CUDB_OTUB_CK4
17629 complex(CKG) ,
intent(inout) ,
contiguous :: matA(:,:)
17630 complex(CKG) ,
intent(in) ,
contiguous :: matB(:,:)
17631 complex(CKG) ,
intent(in) ,
optional :: alpha
17632 type(upperDiag_type) ,
intent(in) :: classB
17633 type(transUnit_type) ,
intent(in) :: operationB
17638 PURE module subroutine trsm_ASS_CGMA_ONOA_CUDB_OTUB_CK3(matA, matB, classB, operationB, alpha)
17639#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
17640 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CGMA_ONOA_CUDB_OTUB_CK3
17643 complex(CKG) ,
intent(inout) ,
contiguous :: matA(:,:)
17644 complex(CKG) ,
intent(in) ,
contiguous :: matB(:,:)
17645 complex(CKG) ,
intent(in) ,
optional :: alpha
17646 type(upperDiag_type) ,
intent(in) :: classB
17647 type(transUnit_type) ,
intent(in) :: operationB
17652 PURE module subroutine trsm_ASS_CGMA_ONOA_CUDB_OTUB_CK2(matA, matB, classB, operationB, alpha)
17653#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
17654 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CGMA_ONOA_CUDB_OTUB_CK2
17657 complex(CKG) ,
intent(inout) ,
contiguous :: matA(:,:)
17658 complex(CKG) ,
intent(in) ,
contiguous :: matB(:,:)
17659 complex(CKG) ,
intent(in) ,
optional :: alpha
17660 type(upperDiag_type) ,
intent(in) :: classB
17661 type(transUnit_type) ,
intent(in) :: operationB
17666 PURE module subroutine trsm_ASS_CGMA_ONOA_CUDB_OTUB_CK1(matA, matB, classB, operationB, alpha)
17667#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
17668 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CGMA_ONOA_CUDB_OTUB_CK1
17671 complex(CKG) ,
intent(inout) ,
contiguous :: matA(:,:)
17672 complex(CKG) ,
intent(in) ,
contiguous :: matB(:,:)
17673 complex(CKG) ,
intent(in) ,
optional :: alpha
17674 type(upperDiag_type) ,
intent(in) :: classB
17675 type(transUnit_type) ,
intent(in) :: operationB
17682 PURE module subroutine trsm_ASS_CGMA_ONOA_CUDB_OTUB_RK5(matA, matB, classB, operationB, alpha)
17683#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
17684 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CGMA_ONOA_CUDB_OTUB_RK5
17687 real(RKG) ,
intent(inout) ,
contiguous :: matA(:,:)
17688 real(RKG) ,
intent(in) ,
contiguous :: matB(:,:)
17689 real(RKG) ,
intent(in) ,
optional :: alpha
17690 type(upperDiag_type) ,
intent(in) :: classB
17691 type(transUnit_type) ,
intent(in) :: operationB
17696 PURE module subroutine trsm_ASS_CGMA_ONOA_CUDB_OTUB_RK4(matA, matB, classB, operationB, alpha)
17697#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
17698 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CGMA_ONOA_CUDB_OTUB_RK4
17701 real(RKG) ,
intent(inout) ,
contiguous :: matA(:,:)
17702 real(RKG) ,
intent(in) ,
contiguous :: matB(:,:)
17703 real(RKG) ,
intent(in) ,
optional :: alpha
17704 type(upperDiag_type) ,
intent(in) :: classB
17705 type(transUnit_type) ,
intent(in) :: operationB
17710 PURE module subroutine trsm_ASS_CGMA_ONOA_CUDB_OTUB_RK3(matA, matB, classB, operationB, alpha)
17711#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
17712 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CGMA_ONOA_CUDB_OTUB_RK3
17715 real(RKG) ,
intent(inout) ,
contiguous :: matA(:,:)
17716 real(RKG) ,
intent(in) ,
contiguous :: matB(:,:)
17717 real(RKG) ,
intent(in) ,
optional :: alpha
17718 type(upperDiag_type) ,
intent(in) :: classB
17719 type(transUnit_type) ,
intent(in) :: operationB
17724 PURE module subroutine trsm_ASS_CGMA_ONOA_CUDB_OTUB_RK2(matA, matB, classB, operationB, alpha)
17725#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
17726 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CGMA_ONOA_CUDB_OTUB_RK2
17729 real(RKG) ,
intent(inout) ,
contiguous :: matA(:,:)
17730 real(RKG) ,
intent(in) ,
contiguous :: matB(:,:)
17731 real(RKG) ,
intent(in) ,
optional :: alpha
17732 type(upperDiag_type) ,
intent(in) :: classB
17733 type(transUnit_type) ,
intent(in) :: operationB
17738 PURE module subroutine trsm_ASS_CGMA_ONOA_CUDB_OTUB_RK1(matA, matB, classB, operationB, alpha)
17739#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
17740 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CGMA_ONOA_CUDB_OTUB_RK1
17743 real(RKG) ,
intent(inout) ,
contiguous :: matA(:,:)
17744 real(RKG) ,
intent(in) ,
contiguous :: matB(:,:)
17745 real(RKG) ,
intent(in) ,
optional :: alpha
17746 type(upperDiag_type) ,
intent(in) :: classB
17747 type(transUnit_type) ,
intent(in) :: operationB
17764 PURE module subroutine trsm_ASS_CGMA_ONOA_CLUB_INVB_CK5(matA, matB, classB, operationB, alpha)
17765#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
17766 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CGMA_ONOA_CLUB_INVB_CK5
17769 complex(CKG) ,
intent(inout) ,
contiguous :: matA(:,:)
17770 complex(CKG) ,
intent(in) ,
contiguous :: matB(:,:)
17771 complex(CKG) ,
intent(in) ,
optional :: alpha
17772 type(lowerUnit_type) ,
intent(in) :: classB
17773 type(inversion_type) ,
intent(in) :: operationB
17778 PURE module subroutine trsm_ASS_CGMA_ONOA_CLUB_INVB_CK4(matA, matB, classB, operationB, alpha)
17779#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
17780 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CGMA_ONOA_CLUB_INVB_CK4
17783 complex(CKG) ,
intent(inout) ,
contiguous :: matA(:,:)
17784 complex(CKG) ,
intent(in) ,
contiguous :: matB(:,:)
17785 complex(CKG) ,
intent(in) ,
optional :: alpha
17786 type(lowerUnit_type) ,
intent(in) :: classB
17787 type(inversion_type) ,
intent(in) :: operationB
17792 PURE module subroutine trsm_ASS_CGMA_ONOA_CLUB_INVB_CK3(matA, matB, classB, operationB, alpha)
17793#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
17794 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CGMA_ONOA_CLUB_INVB_CK3
17797 complex(CKG) ,
intent(inout) ,
contiguous :: matA(:,:)
17798 complex(CKG) ,
intent(in) ,
contiguous :: matB(:,:)
17799 complex(CKG) ,
intent(in) ,
optional :: alpha
17800 type(lowerUnit_type) ,
intent(in) :: classB
17801 type(inversion_type) ,
intent(in) :: operationB
17806 PURE module subroutine trsm_ASS_CGMA_ONOA_CLUB_INVB_CK2(matA, matB, classB, operationB, alpha)
17807#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
17808 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CGMA_ONOA_CLUB_INVB_CK2
17811 complex(CKG) ,
intent(inout) ,
contiguous :: matA(:,:)
17812 complex(CKG) ,
intent(in) ,
contiguous :: matB(:,:)
17813 complex(CKG) ,
intent(in) ,
optional :: alpha
17814 type(lowerUnit_type) ,
intent(in) :: classB
17815 type(inversion_type) ,
intent(in) :: operationB
17820 PURE module subroutine trsm_ASS_CGMA_ONOA_CLUB_INVB_CK1(matA, matB, classB, operationB, alpha)
17821#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
17822 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CGMA_ONOA_CLUB_INVB_CK1
17825 complex(CKG) ,
intent(inout) ,
contiguous :: matA(:,:)
17826 complex(CKG) ,
intent(in) ,
contiguous :: matB(:,:)
17827 complex(CKG) ,
intent(in) ,
optional :: alpha
17828 type(lowerUnit_type) ,
intent(in) :: classB
17829 type(inversion_type) ,
intent(in) :: operationB
17836 PURE module subroutine trsm_ASS_CGMA_ONOA_CLUB_INVB_RK5(matA, matB, classB, operationB, alpha)
17837#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
17838 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CGMA_ONOA_CLUB_INVB_RK5
17841 real(RKG) ,
intent(inout) ,
contiguous :: matA(:,:)
17842 real(RKG) ,
intent(in) ,
contiguous :: matB(:,:)
17843 real(RKG) ,
intent(in) ,
optional :: alpha
17844 type(lowerUnit_type) ,
intent(in) :: classB
17845 type(inversion_type) ,
intent(in) :: operationB
17850 PURE module subroutine trsm_ASS_CGMA_ONOA_CLUB_INVB_RK4(matA, matB, classB, operationB, alpha)
17851#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
17852 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CGMA_ONOA_CLUB_INVB_RK4
17855 real(RKG) ,
intent(inout) ,
contiguous :: matA(:,:)
17856 real(RKG) ,
intent(in) ,
contiguous :: matB(:,:)
17857 real(RKG) ,
intent(in) ,
optional :: alpha
17858 type(lowerUnit_type) ,
intent(in) :: classB
17859 type(inversion_type) ,
intent(in) :: operationB
17864 PURE module subroutine trsm_ASS_CGMA_ONOA_CLUB_INVB_RK3(matA, matB, classB, operationB, alpha)
17865#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
17866 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CGMA_ONOA_CLUB_INVB_RK3
17869 real(RKG) ,
intent(inout) ,
contiguous :: matA(:,:)
17870 real(RKG) ,
intent(in) ,
contiguous :: matB(:,:)
17871 real(RKG) ,
intent(in) ,
optional :: alpha
17872 type(lowerUnit_type) ,
intent(in) :: classB
17873 type(inversion_type) ,
intent(in) :: operationB
17878 PURE module subroutine trsm_ASS_CGMA_ONOA_CLUB_INVB_RK2(matA, matB, classB, operationB, alpha)
17879#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
17880 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CGMA_ONOA_CLUB_INVB_RK2
17883 real(RKG) ,
intent(inout) ,
contiguous :: matA(:,:)
17884 real(RKG) ,
intent(in) ,
contiguous :: matB(:,:)
17885 real(RKG) ,
intent(in) ,
optional :: alpha
17886 type(lowerUnit_type) ,
intent(in) :: classB
17887 type(inversion_type) ,
intent(in) :: operationB
17892 PURE module subroutine trsm_ASS_CGMA_ONOA_CLUB_INVB_RK1(matA, matB, classB, operationB, alpha)
17893#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
17894 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CGMA_ONOA_CLUB_INVB_RK1
17897 real(RKG) ,
intent(inout) ,
contiguous :: matA(:,:)
17898 real(RKG) ,
intent(in) ,
contiguous :: matB(:,:)
17899 real(RKG) ,
intent(in) ,
optional :: alpha
17900 type(lowerUnit_type) ,
intent(in) :: classB
17901 type(inversion_type) ,
intent(in) :: operationB
17914 PURE module subroutine trsm_ASS_CGMA_ONOA_CLUB_OTOB_CK5(matA, matB, classB, operationB, alpha)
17915#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
17916 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CGMA_ONOA_CLUB_OTOB_CK5
17919 complex(CKG) ,
intent(inout) ,
contiguous :: matA(:,:)
17920 complex(CKG) ,
intent(in) ,
contiguous :: matB(:,:)
17921 complex(CKG) ,
intent(in) ,
optional :: alpha
17922 type(lowerUnit_type) ,
intent(in) :: classB
17923 type(transOrth_type) ,
intent(in) :: operationB
17928 PURE module subroutine trsm_ASS_CGMA_ONOA_CLUB_OTOB_CK4(matA, matB, classB, operationB, alpha)
17929#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
17930 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CGMA_ONOA_CLUB_OTOB_CK4
17933 complex(CKG) ,
intent(inout) ,
contiguous :: matA(:,:)
17934 complex(CKG) ,
intent(in) ,
contiguous :: matB(:,:)
17935 complex(CKG) ,
intent(in) ,
optional :: alpha
17936 type(lowerUnit_type) ,
intent(in) :: classB
17937 type(transOrth_type) ,
intent(in) :: operationB
17942 PURE module subroutine trsm_ASS_CGMA_ONOA_CLUB_OTOB_CK3(matA, matB, classB, operationB, alpha)
17943#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
17944 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CGMA_ONOA_CLUB_OTOB_CK3
17947 complex(CKG) ,
intent(inout) ,
contiguous :: matA(:,:)
17948 complex(CKG) ,
intent(in) ,
contiguous :: matB(:,:)
17949 complex(CKG) ,
intent(in) ,
optional :: alpha
17950 type(lowerUnit_type) ,
intent(in) :: classB
17951 type(transOrth_type) ,
intent(in) :: operationB
17956 PURE module subroutine trsm_ASS_CGMA_ONOA_CLUB_OTOB_CK2(matA, matB, classB, operationB, alpha)
17957#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
17958 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CGMA_ONOA_CLUB_OTOB_CK2
17961 complex(CKG) ,
intent(inout) ,
contiguous :: matA(:,:)
17962 complex(CKG) ,
intent(in) ,
contiguous :: matB(:,:)
17963 complex(CKG) ,
intent(in) ,
optional :: alpha
17964 type(lowerUnit_type) ,
intent(in) :: classB
17965 type(transOrth_type) ,
intent(in) :: operationB
17970 PURE module subroutine trsm_ASS_CGMA_ONOA_CLUB_OTOB_CK1(matA, matB, classB, operationB, alpha)
17971#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
17972 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CGMA_ONOA_CLUB_OTOB_CK1
17975 complex(CKG) ,
intent(inout) ,
contiguous :: matA(:,:)
17976 complex(CKG) ,
intent(in) ,
contiguous :: matB(:,:)
17977 complex(CKG) ,
intent(in) ,
optional :: alpha
17978 type(lowerUnit_type) ,
intent(in) :: classB
17979 type(transOrth_type) ,
intent(in) :: operationB
17986 PURE module subroutine trsm_ASS_CGMA_ONOA_CLUB_OTOB_RK5(matA, matB, classB, operationB, alpha)
17987#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
17988 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CGMA_ONOA_CLUB_OTOB_RK5
17991 real(RKG) ,
intent(inout) ,
contiguous :: matA(:,:)
17992 real(RKG) ,
intent(in) ,
contiguous :: matB(:,:)
17993 real(RKG) ,
intent(in) ,
optional :: alpha
17994 type(lowerUnit_type) ,
intent(in) :: classB
17995 type(transOrth_type) ,
intent(in) :: operationB
18000 PURE module subroutine trsm_ASS_CGMA_ONOA_CLUB_OTOB_RK4(matA, matB, classB, operationB, alpha)
18001#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
18002 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CGMA_ONOA_CLUB_OTOB_RK4
18005 real(RKG) ,
intent(inout) ,
contiguous :: matA(:,:)
18006 real(RKG) ,
intent(in) ,
contiguous :: matB(:,:)
18007 real(RKG) ,
intent(in) ,
optional :: alpha
18008 type(lowerUnit_type) ,
intent(in) :: classB
18009 type(transOrth_type) ,
intent(in) :: operationB
18014 PURE module subroutine trsm_ASS_CGMA_ONOA_CLUB_OTOB_RK3(matA, matB, classB, operationB, alpha)
18015#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
18016 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CGMA_ONOA_CLUB_OTOB_RK3
18019 real(RKG) ,
intent(inout) ,
contiguous :: matA(:,:)
18020 real(RKG) ,
intent(in) ,
contiguous :: matB(:,:)
18021 real(RKG) ,
intent(in) ,
optional :: alpha
18022 type(lowerUnit_type) ,
intent(in) :: classB
18023 type(transOrth_type) ,
intent(in) :: operationB
18028 PURE module subroutine trsm_ASS_CGMA_ONOA_CLUB_OTOB_RK2(matA, matB, classB, operationB, alpha)
18029#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
18030 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CGMA_ONOA_CLUB_OTOB_RK2
18033 real(RKG) ,
intent(inout) ,
contiguous :: matA(:,:)
18034 real(RKG) ,
intent(in) ,
contiguous :: matB(:,:)
18035 real(RKG) ,
intent(in) ,
optional :: alpha
18036 type(lowerUnit_type) ,
intent(in) :: classB
18037 type(transOrth_type) ,
intent(in) :: operationB
18042 PURE module subroutine trsm_ASS_CGMA_ONOA_CLUB_OTOB_RK1(matA, matB, classB, operationB, alpha)
18043#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
18044 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CGMA_ONOA_CLUB_OTOB_RK1
18047 real(RKG) ,
intent(inout) ,
contiguous :: matA(:,:)
18048 real(RKG) ,
intent(in) ,
contiguous :: matB(:,:)
18049 real(RKG) ,
intent(in) ,
optional :: alpha
18050 type(lowerUnit_type) ,
intent(in) :: classB
18051 type(transOrth_type) ,
intent(in) :: operationB
18064 PURE module subroutine trsm_ASS_CGMA_ONOA_CLUB_OTUB_CK5(matA, matB, classB, operationB, alpha)
18065#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
18066 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CGMA_ONOA_CLUB_OTUB_CK5
18069 complex(CKG) ,
intent(inout) ,
contiguous :: matA(:,:)
18070 complex(CKG) ,
intent(in) ,
contiguous :: matB(:,:)
18071 complex(CKG) ,
intent(in) ,
optional :: alpha
18072 type(lowerUnit_type) ,
intent(in) :: classB
18073 type(transUnit_type) ,
intent(in) :: operationB
18078 PURE module subroutine trsm_ASS_CGMA_ONOA_CLUB_OTUB_CK4(matA, matB, classB, operationB, alpha)
18079#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
18080 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CGMA_ONOA_CLUB_OTUB_CK4
18083 complex(CKG) ,
intent(inout) ,
contiguous :: matA(:,:)
18084 complex(CKG) ,
intent(in) ,
contiguous :: matB(:,:)
18085 complex(CKG) ,
intent(in) ,
optional :: alpha
18086 type(lowerUnit_type) ,
intent(in) :: classB
18087 type(transUnit_type) ,
intent(in) :: operationB
18092 PURE module subroutine trsm_ASS_CGMA_ONOA_CLUB_OTUB_CK3(matA, matB, classB, operationB, alpha)
18093#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
18094 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CGMA_ONOA_CLUB_OTUB_CK3
18097 complex(CKG) ,
intent(inout) ,
contiguous :: matA(:,:)
18098 complex(CKG) ,
intent(in) ,
contiguous :: matB(:,:)
18099 complex(CKG) ,
intent(in) ,
optional :: alpha
18100 type(lowerUnit_type) ,
intent(in) :: classB
18101 type(transUnit_type) ,
intent(in) :: operationB
18106 PURE module subroutine trsm_ASS_CGMA_ONOA_CLUB_OTUB_CK2(matA, matB, classB, operationB, alpha)
18107#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
18108 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CGMA_ONOA_CLUB_OTUB_CK2
18111 complex(CKG) ,
intent(inout) ,
contiguous :: matA(:,:)
18112 complex(CKG) ,
intent(in) ,
contiguous :: matB(:,:)
18113 complex(CKG) ,
intent(in) ,
optional :: alpha
18114 type(lowerUnit_type) ,
intent(in) :: classB
18115 type(transUnit_type) ,
intent(in) :: operationB
18120 PURE module subroutine trsm_ASS_CGMA_ONOA_CLUB_OTUB_CK1(matA, matB, classB, operationB, alpha)
18121#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
18122 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CGMA_ONOA_CLUB_OTUB_CK1
18125 complex(CKG) ,
intent(inout) ,
contiguous :: matA(:,:)
18126 complex(CKG) ,
intent(in) ,
contiguous :: matB(:,:)
18127 complex(CKG) ,
intent(in) ,
optional :: alpha
18128 type(lowerUnit_type) ,
intent(in) :: classB
18129 type(transUnit_type) ,
intent(in) :: operationB
18136 PURE module subroutine trsm_ASS_CGMA_ONOA_CLUB_OTUB_RK5(matA, matB, classB, operationB, alpha)
18137#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
18138 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CGMA_ONOA_CLUB_OTUB_RK5
18141 real(RKG) ,
intent(inout) ,
contiguous :: matA(:,:)
18142 real(RKG) ,
intent(in) ,
contiguous :: matB(:,:)
18143 real(RKG) ,
intent(in) ,
optional :: alpha
18144 type(lowerUnit_type) ,
intent(in) :: classB
18145 type(transUnit_type) ,
intent(in) :: operationB
18150 PURE module subroutine trsm_ASS_CGMA_ONOA_CLUB_OTUB_RK4(matA, matB, classB, operationB, alpha)
18151#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
18152 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CGMA_ONOA_CLUB_OTUB_RK4
18155 real(RKG) ,
intent(inout) ,
contiguous :: matA(:,:)
18156 real(RKG) ,
intent(in) ,
contiguous :: matB(:,:)
18157 real(RKG) ,
intent(in) ,
optional :: alpha
18158 type(lowerUnit_type) ,
intent(in) :: classB
18159 type(transUnit_type) ,
intent(in) :: operationB
18164 PURE module subroutine trsm_ASS_CGMA_ONOA_CLUB_OTUB_RK3(matA, matB, classB, operationB, alpha)
18165#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
18166 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CGMA_ONOA_CLUB_OTUB_RK3
18169 real(RKG) ,
intent(inout) ,
contiguous :: matA(:,:)
18170 real(RKG) ,
intent(in) ,
contiguous :: matB(:,:)
18171 real(RKG) ,
intent(in) ,
optional :: alpha
18172 type(lowerUnit_type) ,
intent(in) :: classB
18173 type(transUnit_type) ,
intent(in) :: operationB
18178 PURE module subroutine trsm_ASS_CGMA_ONOA_CLUB_OTUB_RK2(matA, matB, classB, operationB, alpha)
18179#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
18180 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CGMA_ONOA_CLUB_OTUB_RK2
18183 real(RKG) ,
intent(inout) ,
contiguous :: matA(:,:)
18184 real(RKG) ,
intent(in) ,
contiguous :: matB(:,:)
18185 real(RKG) ,
intent(in) ,
optional :: alpha
18186 type(lowerUnit_type) ,
intent(in) :: classB
18187 type(transUnit_type) ,
intent(in) :: operationB
18192 PURE module subroutine trsm_ASS_CGMA_ONOA_CLUB_OTUB_RK1(matA, matB, classB, operationB, alpha)
18193#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
18194 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CGMA_ONOA_CLUB_OTUB_RK1
18197 real(RKG) ,
intent(inout) ,
contiguous :: matA(:,:)
18198 real(RKG) ,
intent(in) ,
contiguous :: matB(:,:)
18199 real(RKG) ,
intent(in) ,
optional :: alpha
18200 type(lowerUnit_type) ,
intent(in) :: classB
18201 type(transUnit_type) ,
intent(in) :: operationB
18218 PURE module subroutine trsm_ASS_CGMA_ONOA_CUUB_INVB_CK5(matA, matB, classB, operationB, alpha)
18219#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
18220 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CGMA_ONOA_CUUB_INVB_CK5
18223 complex(CKG) ,
intent(inout) ,
contiguous :: matA(:,:)
18224 complex(CKG) ,
intent(in) ,
contiguous :: matB(:,:)
18225 complex(CKG) ,
intent(in) ,
optional :: alpha
18226 type(upperUnit_type) ,
intent(in) :: classB
18227 type(inversion_type) ,
intent(in) :: operationB
18232 PURE module subroutine trsm_ASS_CGMA_ONOA_CUUB_INVB_CK4(matA, matB, classB, operationB, alpha)
18233#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
18234 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CGMA_ONOA_CUUB_INVB_CK4
18237 complex(CKG) ,
intent(inout) ,
contiguous :: matA(:,:)
18238 complex(CKG) ,
intent(in) ,
contiguous :: matB(:,:)
18239 complex(CKG) ,
intent(in) ,
optional :: alpha
18240 type(upperUnit_type) ,
intent(in) :: classB
18241 type(inversion_type) ,
intent(in) :: operationB
18246 PURE module subroutine trsm_ASS_CGMA_ONOA_CUUB_INVB_CK3(matA, matB, classB, operationB, alpha)
18247#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
18248 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CGMA_ONOA_CUUB_INVB_CK3
18251 complex(CKG) ,
intent(inout) ,
contiguous :: matA(:,:)
18252 complex(CKG) ,
intent(in) ,
contiguous :: matB(:,:)
18253 complex(CKG) ,
intent(in) ,
optional :: alpha
18254 type(upperUnit_type) ,
intent(in) :: classB
18255 type(inversion_type) ,
intent(in) :: operationB
18260 PURE module subroutine trsm_ASS_CGMA_ONOA_CUUB_INVB_CK2(matA, matB, classB, operationB, alpha)
18261#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
18262 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CGMA_ONOA_CUUB_INVB_CK2
18265 complex(CKG) ,
intent(inout) ,
contiguous :: matA(:,:)
18266 complex(CKG) ,
intent(in) ,
contiguous :: matB(:,:)
18267 complex(CKG) ,
intent(in) ,
optional :: alpha
18268 type(upperUnit_type) ,
intent(in) :: classB
18269 type(inversion_type) ,
intent(in) :: operationB
18274 PURE module subroutine trsm_ASS_CGMA_ONOA_CUUB_INVB_CK1(matA, matB, classB, operationB, alpha)
18275#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
18276 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CGMA_ONOA_CUUB_INVB_CK1
18279 complex(CKG) ,
intent(inout) ,
contiguous :: matA(:,:)
18280 complex(CKG) ,
intent(in) ,
contiguous :: matB(:,:)
18281 complex(CKG) ,
intent(in) ,
optional :: alpha
18282 type(upperUnit_type) ,
intent(in) :: classB
18283 type(inversion_type) ,
intent(in) :: operationB
18290 PURE module subroutine trsm_ASS_CGMA_ONOA_CUUB_INVB_RK5(matA, matB, classB, operationB, alpha)
18291#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
18292 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CGMA_ONOA_CUUB_INVB_RK5
18295 real(RKG) ,
intent(inout) ,
contiguous :: matA(:,:)
18296 real(RKG) ,
intent(in) ,
contiguous :: matB(:,:)
18297 real(RKG) ,
intent(in) ,
optional :: alpha
18298 type(upperUnit_type) ,
intent(in) :: classB
18299 type(inversion_type) ,
intent(in) :: operationB
18304 PURE module subroutine trsm_ASS_CGMA_ONOA_CUUB_INVB_RK4(matA, matB, classB, operationB, alpha)
18305#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
18306 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CGMA_ONOA_CUUB_INVB_RK4
18309 real(RKG) ,
intent(inout) ,
contiguous :: matA(:,:)
18310 real(RKG) ,
intent(in) ,
contiguous :: matB(:,:)
18311 real(RKG) ,
intent(in) ,
optional :: alpha
18312 type(upperUnit_type) ,
intent(in) :: classB
18313 type(inversion_type) ,
intent(in) :: operationB
18318 PURE module subroutine trsm_ASS_CGMA_ONOA_CUUB_INVB_RK3(matA, matB, classB, operationB, alpha)
18319#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
18320 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CGMA_ONOA_CUUB_INVB_RK3
18323 real(RKG) ,
intent(inout) ,
contiguous :: matA(:,:)
18324 real(RKG) ,
intent(in) ,
contiguous :: matB(:,:)
18325 real(RKG) ,
intent(in) ,
optional :: alpha
18326 type(upperUnit_type) ,
intent(in) :: classB
18327 type(inversion_type) ,
intent(in) :: operationB
18332 PURE module subroutine trsm_ASS_CGMA_ONOA_CUUB_INVB_RK2(matA, matB, classB, operationB, alpha)
18333#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
18334 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CGMA_ONOA_CUUB_INVB_RK2
18337 real(RKG) ,
intent(inout) ,
contiguous :: matA(:,:)
18338 real(RKG) ,
intent(in) ,
contiguous :: matB(:,:)
18339 real(RKG) ,
intent(in) ,
optional :: alpha
18340 type(upperUnit_type) ,
intent(in) :: classB
18341 type(inversion_type) ,
intent(in) :: operationB
18346 PURE module subroutine trsm_ASS_CGMA_ONOA_CUUB_INVB_RK1(matA, matB, classB, operationB, alpha)
18347#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
18348 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CGMA_ONOA_CUUB_INVB_RK1
18351 real(RKG) ,
intent(inout) ,
contiguous :: matA(:,:)
18352 real(RKG) ,
intent(in) ,
contiguous :: matB(:,:)
18353 real(RKG) ,
intent(in) ,
optional :: alpha
18354 type(upperUnit_type) ,
intent(in) :: classB
18355 type(inversion_type) ,
intent(in) :: operationB
18368 PURE module subroutine trsm_ASS_CGMA_ONOA_CUUB_OTOB_CK5(matA, matB, classB, operationB, alpha)
18369#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
18370 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CGMA_ONOA_CUUB_OTOB_CK5
18373 complex(CKG) ,
intent(inout) ,
contiguous :: matA(:,:)
18374 complex(CKG) ,
intent(in) ,
contiguous :: matB(:,:)
18375 complex(CKG) ,
intent(in) ,
optional :: alpha
18376 type(upperUnit_type) ,
intent(in) :: classB
18377 type(transOrth_type) ,
intent(in) :: operationB
18382 PURE module subroutine trsm_ASS_CGMA_ONOA_CUUB_OTOB_CK4(matA, matB, classB, operationB, alpha)
18383#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
18384 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CGMA_ONOA_CUUB_OTOB_CK4
18387 complex(CKG) ,
intent(inout) ,
contiguous :: matA(:,:)
18388 complex(CKG) ,
intent(in) ,
contiguous :: matB(:,:)
18389 complex(CKG) ,
intent(in) ,
optional :: alpha
18390 type(upperUnit_type) ,
intent(in) :: classB
18391 type(transOrth_type) ,
intent(in) :: operationB
18396 PURE module subroutine trsm_ASS_CGMA_ONOA_CUUB_OTOB_CK3(matA, matB, classB, operationB, alpha)
18397#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
18398 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CGMA_ONOA_CUUB_OTOB_CK3
18401 complex(CKG) ,
intent(inout) ,
contiguous :: matA(:,:)
18402 complex(CKG) ,
intent(in) ,
contiguous :: matB(:,:)
18403 complex(CKG) ,
intent(in) ,
optional :: alpha
18404 type(upperUnit_type) ,
intent(in) :: classB
18405 type(transOrth_type) ,
intent(in) :: operationB
18410 PURE module subroutine trsm_ASS_CGMA_ONOA_CUUB_OTOB_CK2(matA, matB, classB, operationB, alpha)
18411#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
18412 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CGMA_ONOA_CUUB_OTOB_CK2
18415 complex(CKG) ,
intent(inout) ,
contiguous :: matA(:,:)
18416 complex(CKG) ,
intent(in) ,
contiguous :: matB(:,:)
18417 complex(CKG) ,
intent(in) ,
optional :: alpha
18418 type(upperUnit_type) ,
intent(in) :: classB
18419 type(transOrth_type) ,
intent(in) :: operationB
18424 PURE module subroutine trsm_ASS_CGMA_ONOA_CUUB_OTOB_CK1(matA, matB, classB, operationB, alpha)
18425#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
18426 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CGMA_ONOA_CUUB_OTOB_CK1
18429 complex(CKG) ,
intent(inout) ,
contiguous :: matA(:,:)
18430 complex(CKG) ,
intent(in) ,
contiguous :: matB(:,:)
18431 complex(CKG) ,
intent(in) ,
optional :: alpha
18432 type(upperUnit_type) ,
intent(in) :: classB
18433 type(transOrth_type) ,
intent(in) :: operationB
18440 PURE module subroutine trsm_ASS_CGMA_ONOA_CUUB_OTOB_RK5(matA, matB, classB, operationB, alpha)
18441#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
18442 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CGMA_ONOA_CUUB_OTOB_RK5
18445 real(RKG) ,
intent(inout) ,
contiguous :: matA(:,:)
18446 real(RKG) ,
intent(in) ,
contiguous :: matB(:,:)
18447 real(RKG) ,
intent(in) ,
optional :: alpha
18448 type(upperUnit_type) ,
intent(in) :: classB
18449 type(transOrth_type) ,
intent(in) :: operationB
18454 PURE module subroutine trsm_ASS_CGMA_ONOA_CUUB_OTOB_RK4(matA, matB, classB, operationB, alpha)
18455#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
18456 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CGMA_ONOA_CUUB_OTOB_RK4
18459 real(RKG) ,
intent(inout) ,
contiguous :: matA(:,:)
18460 real(RKG) ,
intent(in) ,
contiguous :: matB(:,:)
18461 real(RKG) ,
intent(in) ,
optional :: alpha
18462 type(upperUnit_type) ,
intent(in) :: classB
18463 type(transOrth_type) ,
intent(in) :: operationB
18468 PURE module subroutine trsm_ASS_CGMA_ONOA_CUUB_OTOB_RK3(matA, matB, classB, operationB, alpha)
18469#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
18470 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CGMA_ONOA_CUUB_OTOB_RK3
18473 real(RKG) ,
intent(inout) ,
contiguous :: matA(:,:)
18474 real(RKG) ,
intent(in) ,
contiguous :: matB(:,:)
18475 real(RKG) ,
intent(in) ,
optional :: alpha
18476 type(upperUnit_type) ,
intent(in) :: classB
18477 type(transOrth_type) ,
intent(in) :: operationB
18482 PURE module subroutine trsm_ASS_CGMA_ONOA_CUUB_OTOB_RK2(matA, matB, classB, operationB, alpha)
18483#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
18484 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CGMA_ONOA_CUUB_OTOB_RK2
18487 real(RKG) ,
intent(inout) ,
contiguous :: matA(:,:)
18488 real(RKG) ,
intent(in) ,
contiguous :: matB(:,:)
18489 real(RKG) ,
intent(in) ,
optional :: alpha
18490 type(upperUnit_type) ,
intent(in) :: classB
18491 type(transOrth_type) ,
intent(in) :: operationB
18496 PURE module subroutine trsm_ASS_CGMA_ONOA_CUUB_OTOB_RK1(matA, matB, classB, operationB, alpha)
18497#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
18498 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CGMA_ONOA_CUUB_OTOB_RK1
18501 real(RKG) ,
intent(inout) ,
contiguous :: matA(:,:)
18502 real(RKG) ,
intent(in) ,
contiguous :: matB(:,:)
18503 real(RKG) ,
intent(in) ,
optional :: alpha
18504 type(upperUnit_type) ,
intent(in) :: classB
18505 type(transOrth_type) ,
intent(in) :: operationB
18518 PURE module subroutine trsm_ASS_CGMA_ONOA_CUUB_OTUB_CK5(matA, matB, classB, operationB, alpha)
18519#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
18520 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CGMA_ONOA_CUUB_OTUB_CK5
18523 complex(CKG) ,
intent(inout) ,
contiguous :: matA(:,:)
18524 complex(CKG) ,
intent(in) ,
contiguous :: matB(:,:)
18525 complex(CKG) ,
intent(in) ,
optional :: alpha
18526 type(upperUnit_type) ,
intent(in) :: classB
18527 type(transUnit_type) ,
intent(in) :: operationB
18532 PURE module subroutine trsm_ASS_CGMA_ONOA_CUUB_OTUB_CK4(matA, matB, classB, operationB, alpha)
18533#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
18534 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CGMA_ONOA_CUUB_OTUB_CK4
18537 complex(CKG) ,
intent(inout) ,
contiguous :: matA(:,:)
18538 complex(CKG) ,
intent(in) ,
contiguous :: matB(:,:)
18539 complex(CKG) ,
intent(in) ,
optional :: alpha
18540 type(upperUnit_type) ,
intent(in) :: classB
18541 type(transUnit_type) ,
intent(in) :: operationB
18546 PURE module subroutine trsm_ASS_CGMA_ONOA_CUUB_OTUB_CK3(matA, matB, classB, operationB, alpha)
18547#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
18548 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CGMA_ONOA_CUUB_OTUB_CK3
18551 complex(CKG) ,
intent(inout) ,
contiguous :: matA(:,:)
18552 complex(CKG) ,
intent(in) ,
contiguous :: matB(:,:)
18553 complex(CKG) ,
intent(in) ,
optional :: alpha
18554 type(upperUnit_type) ,
intent(in) :: classB
18555 type(transUnit_type) ,
intent(in) :: operationB
18560 PURE module subroutine trsm_ASS_CGMA_ONOA_CUUB_OTUB_CK2(matA, matB, classB, operationB, alpha)
18561#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
18562 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CGMA_ONOA_CUUB_OTUB_CK2
18565 complex(CKG) ,
intent(inout) ,
contiguous :: matA(:,:)
18566 complex(CKG) ,
intent(in) ,
contiguous :: matB(:,:)
18567 complex(CKG) ,
intent(in) ,
optional :: alpha
18568 type(upperUnit_type) ,
intent(in) :: classB
18569 type(transUnit_type) ,
intent(in) :: operationB
18574 PURE module subroutine trsm_ASS_CGMA_ONOA_CUUB_OTUB_CK1(matA, matB, classB, operationB, alpha)
18575#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
18576 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CGMA_ONOA_CUUB_OTUB_CK1
18579 complex(CKG) ,
intent(inout) ,
contiguous :: matA(:,:)
18580 complex(CKG) ,
intent(in) ,
contiguous :: matB(:,:)
18581 complex(CKG) ,
intent(in) ,
optional :: alpha
18582 type(upperUnit_type) ,
intent(in) :: classB
18583 type(transUnit_type) ,
intent(in) :: operationB
18590 PURE module subroutine trsm_ASS_CGMA_ONOA_CUUB_OTUB_RK5(matA, matB, classB, operationB, alpha)
18591#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
18592 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CGMA_ONOA_CUUB_OTUB_RK5
18595 real(RKG) ,
intent(inout) ,
contiguous :: matA(:,:)
18596 real(RKG) ,
intent(in) ,
contiguous :: matB(:,:)
18597 real(RKG) ,
intent(in) ,
optional :: alpha
18598 type(upperUnit_type) ,
intent(in) :: classB
18599 type(transUnit_type) ,
intent(in) :: operationB
18604 PURE module subroutine trsm_ASS_CGMA_ONOA_CUUB_OTUB_RK4(matA, matB, classB, operationB, alpha)
18605#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
18606 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CGMA_ONOA_CUUB_OTUB_RK4
18609 real(RKG) ,
intent(inout) ,
contiguous :: matA(:,:)
18610 real(RKG) ,
intent(in) ,
contiguous :: matB(:,:)
18611 real(RKG) ,
intent(in) ,
optional :: alpha
18612 type(upperUnit_type) ,
intent(in) :: classB
18613 type(transUnit_type) ,
intent(in) :: operationB
18618 PURE module subroutine trsm_ASS_CGMA_ONOA_CUUB_OTUB_RK3(matA, matB, classB, operationB, alpha)
18619#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
18620 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CGMA_ONOA_CUUB_OTUB_RK3
18623 real(RKG) ,
intent(inout) ,
contiguous :: matA(:,:)
18624 real(RKG) ,
intent(in) ,
contiguous :: matB(:,:)
18625 real(RKG) ,
intent(in) ,
optional :: alpha
18626 type(upperUnit_type) ,
intent(in) :: classB
18627 type(transUnit_type) ,
intent(in) :: operationB
18632 PURE module subroutine trsm_ASS_CGMA_ONOA_CUUB_OTUB_RK2(matA, matB, classB, operationB, alpha)
18633#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
18634 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CGMA_ONOA_CUUB_OTUB_RK2
18637 real(RKG) ,
intent(inout) ,
contiguous :: matA(:,:)
18638 real(RKG) ,
intent(in) ,
contiguous :: matB(:,:)
18639 real(RKG) ,
intent(in) ,
optional :: alpha
18640 type(upperUnit_type) ,
intent(in) :: classB
18641 type(transUnit_type) ,
intent(in) :: operationB
18646 PURE module subroutine trsm_ASS_CGMA_ONOA_CUUB_OTUB_RK1(matA, matB, classB, operationB, alpha)
18647#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
18648 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_ASS_CGMA_ONOA_CUUB_OTUB_RK1
18651 real(RKG) ,
intent(inout) ,
contiguous :: matA(:,:)
18652 real(RKG) ,
intent(in) ,
contiguous :: matB(:,:)
18653 real(RKG) ,
intent(in) ,
optional :: alpha
18654 type(upperUnit_type) ,
intent(in) :: classB
18655 type(transUnit_type) ,
intent(in) :: operationB
18676 PURE module subroutine trsm_EXP_CLDA_INVA_CGMB_ONOB_CK5(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
18677#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
18678 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CLDA_INVA_CGMB_ONOB_CK5
18681 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
18682 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
18683 complex(CKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
18684 complex(CKG) ,
intent(in) :: alpha
18685 type(lowerDiag_type) ,
intent(in) :: classA
18686 type(inversion_type) ,
intent(in) :: operationA
18691 PURE module subroutine trsm_EXP_CLDA_INVA_CGMB_ONOB_CK4(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
18692#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
18693 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CLDA_INVA_CGMB_ONOB_CK4
18696 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
18697 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
18698 complex(CKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
18699 complex(CKG) ,
intent(in) :: alpha
18700 type(lowerDiag_type) ,
intent(in) :: classA
18701 type(inversion_type) ,
intent(in) :: operationA
18706 PURE module subroutine trsm_EXP_CLDA_INVA_CGMB_ONOB_CK3(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
18707#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
18708 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CLDA_INVA_CGMB_ONOB_CK3
18711 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
18712 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
18713 complex(CKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
18714 complex(CKG) ,
intent(in) :: alpha
18715 type(lowerDiag_type) ,
intent(in) :: classA
18716 type(inversion_type) ,
intent(in) :: operationA
18721 PURE module subroutine trsm_EXP_CLDA_INVA_CGMB_ONOB_CK2(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
18722#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
18723 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CLDA_INVA_CGMB_ONOB_CK2
18726 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
18727 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
18728 complex(CKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
18729 complex(CKG) ,
intent(in) :: alpha
18730 type(lowerDiag_type) ,
intent(in) :: classA
18731 type(inversion_type) ,
intent(in) :: operationA
18736 PURE module subroutine trsm_EXP_CLDA_INVA_CGMB_ONOB_CK1(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
18737#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
18738 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CLDA_INVA_CGMB_ONOB_CK1
18741 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
18742 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
18743 complex(CKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
18744 complex(CKG) ,
intent(in) :: alpha
18745 type(lowerDiag_type) ,
intent(in) :: classA
18746 type(inversion_type) ,
intent(in) :: operationA
18753 PURE module subroutine trsm_EXP_CLDA_INVA_CGMB_ONOB_RK5(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
18754#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
18755 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CLDA_INVA_CGMB_ONOB_RK5
18758 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
18759 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
18760 real(RKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
18761 real(RKG) ,
intent(in) :: alpha
18762 type(lowerDiag_type) ,
intent(in) :: classA
18763 type(inversion_type) ,
intent(in) :: operationA
18768 PURE module subroutine trsm_EXP_CLDA_INVA_CGMB_ONOB_RK4(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
18769#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
18770 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CLDA_INVA_CGMB_ONOB_RK4
18773 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
18774 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
18775 real(RKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
18776 real(RKG) ,
intent(in) :: alpha
18777 type(lowerDiag_type) ,
intent(in) :: classA
18778 type(inversion_type) ,
intent(in) :: operationA
18783 PURE module subroutine trsm_EXP_CLDA_INVA_CGMB_ONOB_RK3(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
18784#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
18785 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CLDA_INVA_CGMB_ONOB_RK3
18788 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
18789 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
18790 real(RKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
18791 real(RKG) ,
intent(in) :: alpha
18792 type(lowerDiag_type) ,
intent(in) :: classA
18793 type(inversion_type) ,
intent(in) :: operationA
18798 PURE module subroutine trsm_EXP_CLDA_INVA_CGMB_ONOB_RK2(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
18799#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
18800 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CLDA_INVA_CGMB_ONOB_RK2
18803 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
18804 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
18805 real(RKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
18806 real(RKG) ,
intent(in) :: alpha
18807 type(lowerDiag_type) ,
intent(in) :: classA
18808 type(inversion_type) ,
intent(in) :: operationA
18813 PURE module subroutine trsm_EXP_CLDA_INVA_CGMB_ONOB_RK1(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
18814#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
18815 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CLDA_INVA_CGMB_ONOB_RK1
18818 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
18819 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
18820 real(RKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
18821 real(RKG) ,
intent(in) :: alpha
18822 type(lowerDiag_type) ,
intent(in) :: classA
18823 type(inversion_type) ,
intent(in) :: operationA
18836 PURE module subroutine trsm_EXP_CLDA_OTOA_CGMB_ONOB_CK5(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
18837#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
18838 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CLDA_OTOA_CGMB_ONOB_CK5
18841 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
18842 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
18843 complex(CKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
18844 complex(CKG) ,
intent(in) :: alpha
18845 type(lowerDiag_type) ,
intent(in) :: classA
18846 type(transOrth_type) ,
intent(in) :: operationA
18851 PURE module subroutine trsm_EXP_CLDA_OTOA_CGMB_ONOB_CK4(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
18852#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
18853 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CLDA_OTOA_CGMB_ONOB_CK4
18856 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
18857 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
18858 complex(CKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
18859 complex(CKG) ,
intent(in) :: alpha
18860 type(lowerDiag_type) ,
intent(in) :: classA
18861 type(transOrth_type) ,
intent(in) :: operationA
18866 PURE module subroutine trsm_EXP_CLDA_OTOA_CGMB_ONOB_CK3(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
18867#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
18868 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CLDA_OTOA_CGMB_ONOB_CK3
18871 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
18872 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
18873 complex(CKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
18874 complex(CKG) ,
intent(in) :: alpha
18875 type(lowerDiag_type) ,
intent(in) :: classA
18876 type(transOrth_type) ,
intent(in) :: operationA
18881 PURE module subroutine trsm_EXP_CLDA_OTOA_CGMB_ONOB_CK2(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
18882#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
18883 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CLDA_OTOA_CGMB_ONOB_CK2
18886 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
18887 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
18888 complex(CKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
18889 complex(CKG) ,
intent(in) :: alpha
18890 type(lowerDiag_type) ,
intent(in) :: classA
18891 type(transOrth_type) ,
intent(in) :: operationA
18896 PURE module subroutine trsm_EXP_CLDA_OTOA_CGMB_ONOB_CK1(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
18897#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
18898 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CLDA_OTOA_CGMB_ONOB_CK1
18901 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
18902 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
18903 complex(CKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
18904 complex(CKG) ,
intent(in) :: alpha
18905 type(lowerDiag_type) ,
intent(in) :: classA
18906 type(transOrth_type) ,
intent(in) :: operationA
18913 PURE module subroutine trsm_EXP_CLDA_OTOA_CGMB_ONOB_RK5(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
18914#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
18915 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CLDA_OTOA_CGMB_ONOB_RK5
18918 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
18919 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
18920 real(RKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
18921 real(RKG) ,
intent(in) :: alpha
18922 type(lowerDiag_type) ,
intent(in) :: classA
18923 type(transOrth_type) ,
intent(in) :: operationA
18928 PURE module subroutine trsm_EXP_CLDA_OTOA_CGMB_ONOB_RK4(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
18929#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
18930 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CLDA_OTOA_CGMB_ONOB_RK4
18933 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
18934 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
18935 real(RKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
18936 real(RKG) ,
intent(in) :: alpha
18937 type(lowerDiag_type) ,
intent(in) :: classA
18938 type(transOrth_type) ,
intent(in) :: operationA
18943 PURE module subroutine trsm_EXP_CLDA_OTOA_CGMB_ONOB_RK3(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
18944#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
18945 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CLDA_OTOA_CGMB_ONOB_RK3
18948 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
18949 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
18950 real(RKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
18951 real(RKG) ,
intent(in) :: alpha
18952 type(lowerDiag_type) ,
intent(in) :: classA
18953 type(transOrth_type) ,
intent(in) :: operationA
18958 PURE module subroutine trsm_EXP_CLDA_OTOA_CGMB_ONOB_RK2(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
18959#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
18960 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CLDA_OTOA_CGMB_ONOB_RK2
18963 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
18964 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
18965 real(RKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
18966 real(RKG) ,
intent(in) :: alpha
18967 type(lowerDiag_type) ,
intent(in) :: classA
18968 type(transOrth_type) ,
intent(in) :: operationA
18973 PURE module subroutine trsm_EXP_CLDA_OTOA_CGMB_ONOB_RK1(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
18974#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
18975 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CLDA_OTOA_CGMB_ONOB_RK1
18978 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
18979 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
18980 real(RKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
18981 real(RKG) ,
intent(in) :: alpha
18982 type(lowerDiag_type) ,
intent(in) :: classA
18983 type(transOrth_type) ,
intent(in) :: operationA
18996 PURE module subroutine trsm_EXP_CLDA_OTUA_CGMB_ONOB_CK5(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
18997#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
18998 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CLDA_OTUA_CGMB_ONOB_CK5
19001 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
19002 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
19003 complex(CKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
19004 complex(CKG) ,
intent(in) :: alpha
19005 type(lowerDiag_type) ,
intent(in) :: classA
19006 type(transUnit_type) ,
intent(in) :: operationA
19011 PURE module subroutine trsm_EXP_CLDA_OTUA_CGMB_ONOB_CK4(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
19012#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
19013 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CLDA_OTUA_CGMB_ONOB_CK4
19016 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
19017 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
19018 complex(CKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
19019 complex(CKG) ,
intent(in) :: alpha
19020 type(lowerDiag_type) ,
intent(in) :: classA
19021 type(transUnit_type) ,
intent(in) :: operationA
19026 PURE module subroutine trsm_EXP_CLDA_OTUA_CGMB_ONOB_CK3(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
19027#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
19028 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CLDA_OTUA_CGMB_ONOB_CK3
19031 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
19032 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
19033 complex(CKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
19034 complex(CKG) ,
intent(in) :: alpha
19035 type(lowerDiag_type) ,
intent(in) :: classA
19036 type(transUnit_type) ,
intent(in) :: operationA
19041 PURE module subroutine trsm_EXP_CLDA_OTUA_CGMB_ONOB_CK2(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
19042#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
19043 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CLDA_OTUA_CGMB_ONOB_CK2
19046 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
19047 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
19048 complex(CKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
19049 complex(CKG) ,
intent(in) :: alpha
19050 type(lowerDiag_type) ,
intent(in) :: classA
19051 type(transUnit_type) ,
intent(in) :: operationA
19056 PURE module subroutine trsm_EXP_CLDA_OTUA_CGMB_ONOB_CK1(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
19057#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
19058 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CLDA_OTUA_CGMB_ONOB_CK1
19061 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
19062 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
19063 complex(CKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
19064 complex(CKG) ,
intent(in) :: alpha
19065 type(lowerDiag_type) ,
intent(in) :: classA
19066 type(transUnit_type) ,
intent(in) :: operationA
19073 PURE module subroutine trsm_EXP_CLDA_OTUA_CGMB_ONOB_RK5(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
19074#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
19075 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CLDA_OTUA_CGMB_ONOB_RK5
19078 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
19079 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
19080 real(RKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
19081 real(RKG) ,
intent(in) :: alpha
19082 type(lowerDiag_type) ,
intent(in) :: classA
19083 type(transUnit_type) ,
intent(in) :: operationA
19088 PURE module subroutine trsm_EXP_CLDA_OTUA_CGMB_ONOB_RK4(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
19089#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
19090 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CLDA_OTUA_CGMB_ONOB_RK4
19093 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
19094 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
19095 real(RKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
19096 real(RKG) ,
intent(in) :: alpha
19097 type(lowerDiag_type) ,
intent(in) :: classA
19098 type(transUnit_type) ,
intent(in) :: operationA
19103 PURE module subroutine trsm_EXP_CLDA_OTUA_CGMB_ONOB_RK3(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
19104#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
19105 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CLDA_OTUA_CGMB_ONOB_RK3
19108 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
19109 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
19110 real(RKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
19111 real(RKG) ,
intent(in) :: alpha
19112 type(lowerDiag_type) ,
intent(in) :: classA
19113 type(transUnit_type) ,
intent(in) :: operationA
19118 PURE module subroutine trsm_EXP_CLDA_OTUA_CGMB_ONOB_RK2(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
19119#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
19120 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CLDA_OTUA_CGMB_ONOB_RK2
19123 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
19124 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
19125 real(RKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
19126 real(RKG) ,
intent(in) :: alpha
19127 type(lowerDiag_type) ,
intent(in) :: classA
19128 type(transUnit_type) ,
intent(in) :: operationA
19133 PURE module subroutine trsm_EXP_CLDA_OTUA_CGMB_ONOB_RK1(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
19134#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
19135 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CLDA_OTUA_CGMB_ONOB_RK1
19138 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
19139 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
19140 real(RKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
19141 real(RKG) ,
intent(in) :: alpha
19142 type(lowerDiag_type) ,
intent(in) :: classA
19143 type(transUnit_type) ,
intent(in) :: operationA
19160 PURE module subroutine trsm_EXP_CUDA_INVA_CGMB_ONOB_CK5(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
19161#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
19162 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CUDA_INVA_CGMB_ONOB_CK5
19165 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
19166 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
19167 complex(CKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
19168 complex(CKG) ,
intent(in) :: alpha
19169 type(upperDiag_type) ,
intent(in) :: classA
19170 type(inversion_type) ,
intent(in) :: operationA
19175 PURE module subroutine trsm_EXP_CUDA_INVA_CGMB_ONOB_CK4(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
19176#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
19177 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CUDA_INVA_CGMB_ONOB_CK4
19180 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
19181 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
19182 complex(CKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
19183 complex(CKG) ,
intent(in) :: alpha
19184 type(upperDiag_type) ,
intent(in) :: classA
19185 type(inversion_type) ,
intent(in) :: operationA
19190 PURE module subroutine trsm_EXP_CUDA_INVA_CGMB_ONOB_CK3(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
19191#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
19192 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CUDA_INVA_CGMB_ONOB_CK3
19195 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
19196 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
19197 complex(CKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
19198 complex(CKG) ,
intent(in) :: alpha
19199 type(upperDiag_type) ,
intent(in) :: classA
19200 type(inversion_type) ,
intent(in) :: operationA
19205 PURE module subroutine trsm_EXP_CUDA_INVA_CGMB_ONOB_CK2(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
19206#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
19207 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CUDA_INVA_CGMB_ONOB_CK2
19210 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
19211 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
19212 complex(CKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
19213 complex(CKG) ,
intent(in) :: alpha
19214 type(upperDiag_type) ,
intent(in) :: classA
19215 type(inversion_type) ,
intent(in) :: operationA
19220 PURE module subroutine trsm_EXP_CUDA_INVA_CGMB_ONOB_CK1(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
19221#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
19222 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CUDA_INVA_CGMB_ONOB_CK1
19225 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
19226 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
19227 complex(CKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
19228 complex(CKG) ,
intent(in) :: alpha
19229 type(upperDiag_type) ,
intent(in) :: classA
19230 type(inversion_type) ,
intent(in) :: operationA
19237 PURE module subroutine trsm_EXP_CUDA_INVA_CGMB_ONOB_RK5(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
19238#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
19239 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CUDA_INVA_CGMB_ONOB_RK5
19242 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
19243 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
19244 real(RKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
19245 real(RKG) ,
intent(in) :: alpha
19246 type(upperDiag_type) ,
intent(in) :: classA
19247 type(inversion_type) ,
intent(in) :: operationA
19252 PURE module subroutine trsm_EXP_CUDA_INVA_CGMB_ONOB_RK4(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
19253#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
19254 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CUDA_INVA_CGMB_ONOB_RK4
19257 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
19258 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
19259 real(RKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
19260 real(RKG) ,
intent(in) :: alpha
19261 type(upperDiag_type) ,
intent(in) :: classA
19262 type(inversion_type) ,
intent(in) :: operationA
19267 PURE module subroutine trsm_EXP_CUDA_INVA_CGMB_ONOB_RK3(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
19268#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
19269 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CUDA_INVA_CGMB_ONOB_RK3
19272 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
19273 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
19274 real(RKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
19275 real(RKG) ,
intent(in) :: alpha
19276 type(upperDiag_type) ,
intent(in) :: classA
19277 type(inversion_type) ,
intent(in) :: operationA
19282 PURE module subroutine trsm_EXP_CUDA_INVA_CGMB_ONOB_RK2(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
19283#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
19284 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CUDA_INVA_CGMB_ONOB_RK2
19287 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
19288 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
19289 real(RKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
19290 real(RKG) ,
intent(in) :: alpha
19291 type(upperDiag_type) ,
intent(in) :: classA
19292 type(inversion_type) ,
intent(in) :: operationA
19297 PURE module subroutine trsm_EXP_CUDA_INVA_CGMB_ONOB_RK1(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
19298#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
19299 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CUDA_INVA_CGMB_ONOB_RK1
19302 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
19303 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
19304 real(RKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
19305 real(RKG) ,
intent(in) :: alpha
19306 type(upperDiag_type) ,
intent(in) :: classA
19307 type(inversion_type) ,
intent(in) :: operationA
19320 PURE module subroutine trsm_EXP_CUDA_OTOA_CGMB_ONOB_CK5(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
19321#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
19322 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CUDA_OTOA_CGMB_ONOB_CK5
19325 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
19326 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
19327 complex(CKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
19328 complex(CKG) ,
intent(in) :: alpha
19329 type(upperDiag_type) ,
intent(in) :: classA
19330 type(transOrth_type) ,
intent(in) :: operationA
19335 PURE module subroutine trsm_EXP_CUDA_OTOA_CGMB_ONOB_CK4(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
19336#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
19337 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CUDA_OTOA_CGMB_ONOB_CK4
19340 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
19341 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
19342 complex(CKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
19343 complex(CKG) ,
intent(in) :: alpha
19344 type(upperDiag_type) ,
intent(in) :: classA
19345 type(transOrth_type) ,
intent(in) :: operationA
19350 PURE module subroutine trsm_EXP_CUDA_OTOA_CGMB_ONOB_CK3(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
19351#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
19352 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CUDA_OTOA_CGMB_ONOB_CK3
19355 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
19356 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
19357 complex(CKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
19358 complex(CKG) ,
intent(in) :: alpha
19359 type(upperDiag_type) ,
intent(in) :: classA
19360 type(transOrth_type) ,
intent(in) :: operationA
19365 PURE module subroutine trsm_EXP_CUDA_OTOA_CGMB_ONOB_CK2(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
19366#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
19367 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CUDA_OTOA_CGMB_ONOB_CK2
19370 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
19371 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
19372 complex(CKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
19373 complex(CKG) ,
intent(in) :: alpha
19374 type(upperDiag_type) ,
intent(in) :: classA
19375 type(transOrth_type) ,
intent(in) :: operationA
19380 PURE module subroutine trsm_EXP_CUDA_OTOA_CGMB_ONOB_CK1(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
19381#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
19382 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CUDA_OTOA_CGMB_ONOB_CK1
19385 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
19386 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
19387 complex(CKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
19388 complex(CKG) ,
intent(in) :: alpha
19389 type(upperDiag_type) ,
intent(in) :: classA
19390 type(transOrth_type) ,
intent(in) :: operationA
19397 PURE module subroutine trsm_EXP_CUDA_OTOA_CGMB_ONOB_RK5(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
19398#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
19399 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CUDA_OTOA_CGMB_ONOB_RK5
19402 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
19403 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
19404 real(RKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
19405 real(RKG) ,
intent(in) :: alpha
19406 type(upperDiag_type) ,
intent(in) :: classA
19407 type(transOrth_type) ,
intent(in) :: operationA
19412 PURE module subroutine trsm_EXP_CUDA_OTOA_CGMB_ONOB_RK4(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
19413#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
19414 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CUDA_OTOA_CGMB_ONOB_RK4
19417 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
19418 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
19419 real(RKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
19420 real(RKG) ,
intent(in) :: alpha
19421 type(upperDiag_type) ,
intent(in) :: classA
19422 type(transOrth_type) ,
intent(in) :: operationA
19427 PURE module subroutine trsm_EXP_CUDA_OTOA_CGMB_ONOB_RK3(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
19428#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
19429 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CUDA_OTOA_CGMB_ONOB_RK3
19432 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
19433 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
19434 real(RKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
19435 real(RKG) ,
intent(in) :: alpha
19436 type(upperDiag_type) ,
intent(in) :: classA
19437 type(transOrth_type) ,
intent(in) :: operationA
19442 PURE module subroutine trsm_EXP_CUDA_OTOA_CGMB_ONOB_RK2(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
19443#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
19444 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CUDA_OTOA_CGMB_ONOB_RK2
19447 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
19448 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
19449 real(RKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
19450 real(RKG) ,
intent(in) :: alpha
19451 type(upperDiag_type) ,
intent(in) :: classA
19452 type(transOrth_type) ,
intent(in) :: operationA
19457 PURE module subroutine trsm_EXP_CUDA_OTOA_CGMB_ONOB_RK1(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
19458#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
19459 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CUDA_OTOA_CGMB_ONOB_RK1
19462 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
19463 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
19464 real(RKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
19465 real(RKG) ,
intent(in) :: alpha
19466 type(upperDiag_type) ,
intent(in) :: classA
19467 type(transOrth_type) ,
intent(in) :: operationA
19480 PURE module subroutine trsm_EXP_CUDA_OTUA_CGMB_ONOB_CK5(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
19481#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
19482 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CUDA_OTUA_CGMB_ONOB_CK5
19485 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
19486 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
19487 complex(CKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
19488 complex(CKG) ,
intent(in) :: alpha
19489 type(upperDiag_type) ,
intent(in) :: classA
19490 type(transUnit_type) ,
intent(in) :: operationA
19495 PURE module subroutine trsm_EXP_CUDA_OTUA_CGMB_ONOB_CK4(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
19496#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
19497 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CUDA_OTUA_CGMB_ONOB_CK4
19500 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
19501 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
19502 complex(CKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
19503 complex(CKG) ,
intent(in) :: alpha
19504 type(upperDiag_type) ,
intent(in) :: classA
19505 type(transUnit_type) ,
intent(in) :: operationA
19510 PURE module subroutine trsm_EXP_CUDA_OTUA_CGMB_ONOB_CK3(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
19511#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
19512 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CUDA_OTUA_CGMB_ONOB_CK3
19515 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
19516 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
19517 complex(CKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
19518 complex(CKG) ,
intent(in) :: alpha
19519 type(upperDiag_type) ,
intent(in) :: classA
19520 type(transUnit_type) ,
intent(in) :: operationA
19525 PURE module subroutine trsm_EXP_CUDA_OTUA_CGMB_ONOB_CK2(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
19526#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
19527 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CUDA_OTUA_CGMB_ONOB_CK2
19530 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
19531 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
19532 complex(CKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
19533 complex(CKG) ,
intent(in) :: alpha
19534 type(upperDiag_type) ,
intent(in) :: classA
19535 type(transUnit_type) ,
intent(in) :: operationA
19540 PURE module subroutine trsm_EXP_CUDA_OTUA_CGMB_ONOB_CK1(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
19541#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
19542 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CUDA_OTUA_CGMB_ONOB_CK1
19545 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
19546 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
19547 complex(CKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
19548 complex(CKG) ,
intent(in) :: alpha
19549 type(upperDiag_type) ,
intent(in) :: classA
19550 type(transUnit_type) ,
intent(in) :: operationA
19557 PURE module subroutine trsm_EXP_CUDA_OTUA_CGMB_ONOB_RK5(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
19558#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
19559 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CUDA_OTUA_CGMB_ONOB_RK5
19562 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
19563 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
19564 real(RKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
19565 real(RKG) ,
intent(in) :: alpha
19566 type(upperDiag_type) ,
intent(in) :: classA
19567 type(transUnit_type) ,
intent(in) :: operationA
19572 PURE module subroutine trsm_EXP_CUDA_OTUA_CGMB_ONOB_RK4(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
19573#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
19574 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CUDA_OTUA_CGMB_ONOB_RK4
19577 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
19578 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
19579 real(RKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
19580 real(RKG) ,
intent(in) :: alpha
19581 type(upperDiag_type) ,
intent(in) :: classA
19582 type(transUnit_type) ,
intent(in) :: operationA
19587 PURE module subroutine trsm_EXP_CUDA_OTUA_CGMB_ONOB_RK3(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
19588#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
19589 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CUDA_OTUA_CGMB_ONOB_RK3
19592 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
19593 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
19594 real(RKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
19595 real(RKG) ,
intent(in) :: alpha
19596 type(upperDiag_type) ,
intent(in) :: classA
19597 type(transUnit_type) ,
intent(in) :: operationA
19602 PURE module subroutine trsm_EXP_CUDA_OTUA_CGMB_ONOB_RK2(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
19603#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
19604 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CUDA_OTUA_CGMB_ONOB_RK2
19607 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
19608 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
19609 real(RKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
19610 real(RKG) ,
intent(in) :: alpha
19611 type(upperDiag_type) ,
intent(in) :: classA
19612 type(transUnit_type) ,
intent(in) :: operationA
19617 PURE module subroutine trsm_EXP_CUDA_OTUA_CGMB_ONOB_RK1(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
19618#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
19619 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CUDA_OTUA_CGMB_ONOB_RK1
19622 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
19623 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
19624 real(RKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
19625 real(RKG) ,
intent(in) :: alpha
19626 type(upperDiag_type) ,
intent(in) :: classA
19627 type(transUnit_type) ,
intent(in) :: operationA
19644 PURE module subroutine trsm_EXP_CLUA_INVA_CGMB_ONOB_CK5(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
19645#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
19646 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CLUA_INVA_CGMB_ONOB_CK5
19649 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
19650 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
19651 complex(CKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
19652 complex(CKG) ,
intent(in) :: alpha
19653 type(lowerUnit_type) ,
intent(in) :: classA
19654 type(inversion_type) ,
intent(in) :: operationA
19659 PURE module subroutine trsm_EXP_CLUA_INVA_CGMB_ONOB_CK4(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
19660#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
19661 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CLUA_INVA_CGMB_ONOB_CK4
19664 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
19665 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
19666 complex(CKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
19667 complex(CKG) ,
intent(in) :: alpha
19668 type(lowerUnit_type) ,
intent(in) :: classA
19669 type(inversion_type) ,
intent(in) :: operationA
19674 PURE module subroutine trsm_EXP_CLUA_INVA_CGMB_ONOB_CK3(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
19675#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
19676 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CLUA_INVA_CGMB_ONOB_CK3
19679 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
19680 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
19681 complex(CKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
19682 complex(CKG) ,
intent(in) :: alpha
19683 type(lowerUnit_type) ,
intent(in) :: classA
19684 type(inversion_type) ,
intent(in) :: operationA
19689 PURE module subroutine trsm_EXP_CLUA_INVA_CGMB_ONOB_CK2(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
19690#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
19691 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CLUA_INVA_CGMB_ONOB_CK2
19694 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
19695 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
19696 complex(CKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
19697 complex(CKG) ,
intent(in) :: alpha
19698 type(lowerUnit_type) ,
intent(in) :: classA
19699 type(inversion_type) ,
intent(in) :: operationA
19704 PURE module subroutine trsm_EXP_CLUA_INVA_CGMB_ONOB_CK1(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
19705#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
19706 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CLUA_INVA_CGMB_ONOB_CK1
19709 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
19710 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
19711 complex(CKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
19712 complex(CKG) ,
intent(in) :: alpha
19713 type(lowerUnit_type) ,
intent(in) :: classA
19714 type(inversion_type) ,
intent(in) :: operationA
19721 PURE module subroutine trsm_EXP_CLUA_INVA_CGMB_ONOB_RK5(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
19722#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
19723 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CLUA_INVA_CGMB_ONOB_RK5
19726 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
19727 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
19728 real(RKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
19729 real(RKG) ,
intent(in) :: alpha
19730 type(lowerUnit_type) ,
intent(in) :: classA
19731 type(inversion_type) ,
intent(in) :: operationA
19736 PURE module subroutine trsm_EXP_CLUA_INVA_CGMB_ONOB_RK4(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
19737#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
19738 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CLUA_INVA_CGMB_ONOB_RK4
19741 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
19742 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
19743 real(RKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
19744 real(RKG) ,
intent(in) :: alpha
19745 type(lowerUnit_type) ,
intent(in) :: classA
19746 type(inversion_type) ,
intent(in) :: operationA
19751 PURE module subroutine trsm_EXP_CLUA_INVA_CGMB_ONOB_RK3(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
19752#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
19753 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CLUA_INVA_CGMB_ONOB_RK3
19756 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
19757 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
19758 real(RKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
19759 real(RKG) ,
intent(in) :: alpha
19760 type(lowerUnit_type) ,
intent(in) :: classA
19761 type(inversion_type) ,
intent(in) :: operationA
19766 PURE module subroutine trsm_EXP_CLUA_INVA_CGMB_ONOB_RK2(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
19767#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
19768 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CLUA_INVA_CGMB_ONOB_RK2
19771 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
19772 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
19773 real(RKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
19774 real(RKG) ,
intent(in) :: alpha
19775 type(lowerUnit_type) ,
intent(in) :: classA
19776 type(inversion_type) ,
intent(in) :: operationA
19781 PURE module subroutine trsm_EXP_CLUA_INVA_CGMB_ONOB_RK1(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
19782#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
19783 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CLUA_INVA_CGMB_ONOB_RK1
19786 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
19787 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
19788 real(RKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
19789 real(RKG) ,
intent(in) :: alpha
19790 type(lowerUnit_type) ,
intent(in) :: classA
19791 type(inversion_type) ,
intent(in) :: operationA
19804 PURE module subroutine trsm_EXP_CLUA_OTOA_CGMB_ONOB_CK5(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
19805#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
19806 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CLUA_OTOA_CGMB_ONOB_CK5
19809 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
19810 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
19811 complex(CKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
19812 complex(CKG) ,
intent(in) :: alpha
19813 type(lowerUnit_type) ,
intent(in) :: classA
19814 type(transOrth_type) ,
intent(in) :: operationA
19819 PURE module subroutine trsm_EXP_CLUA_OTOA_CGMB_ONOB_CK4(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
19820#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
19821 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CLUA_OTOA_CGMB_ONOB_CK4
19824 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
19825 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
19826 complex(CKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
19827 complex(CKG) ,
intent(in) :: alpha
19828 type(lowerUnit_type) ,
intent(in) :: classA
19829 type(transOrth_type) ,
intent(in) :: operationA
19834 PURE module subroutine trsm_EXP_CLUA_OTOA_CGMB_ONOB_CK3(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
19835#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
19836 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CLUA_OTOA_CGMB_ONOB_CK3
19839 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
19840 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
19841 complex(CKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
19842 complex(CKG) ,
intent(in) :: alpha
19843 type(lowerUnit_type) ,
intent(in) :: classA
19844 type(transOrth_type) ,
intent(in) :: operationA
19849 PURE module subroutine trsm_EXP_CLUA_OTOA_CGMB_ONOB_CK2(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
19850#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
19851 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CLUA_OTOA_CGMB_ONOB_CK2
19854 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
19855 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
19856 complex(CKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
19857 complex(CKG) ,
intent(in) :: alpha
19858 type(lowerUnit_type) ,
intent(in) :: classA
19859 type(transOrth_type) ,
intent(in) :: operationA
19864 PURE module subroutine trsm_EXP_CLUA_OTOA_CGMB_ONOB_CK1(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
19865#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
19866 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CLUA_OTOA_CGMB_ONOB_CK1
19869 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
19870 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
19871 complex(CKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
19872 complex(CKG) ,
intent(in) :: alpha
19873 type(lowerUnit_type) ,
intent(in) :: classA
19874 type(transOrth_type) ,
intent(in) :: operationA
19881 PURE module subroutine trsm_EXP_CLUA_OTOA_CGMB_ONOB_RK5(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
19882#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
19883 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CLUA_OTOA_CGMB_ONOB_RK5
19886 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
19887 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
19888 real(RKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
19889 real(RKG) ,
intent(in) :: alpha
19890 type(lowerUnit_type) ,
intent(in) :: classA
19891 type(transOrth_type) ,
intent(in) :: operationA
19896 PURE module subroutine trsm_EXP_CLUA_OTOA_CGMB_ONOB_RK4(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
19897#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
19898 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CLUA_OTOA_CGMB_ONOB_RK4
19901 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
19902 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
19903 real(RKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
19904 real(RKG) ,
intent(in) :: alpha
19905 type(lowerUnit_type) ,
intent(in) :: classA
19906 type(transOrth_type) ,
intent(in) :: operationA
19911 PURE module subroutine trsm_EXP_CLUA_OTOA_CGMB_ONOB_RK3(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
19912#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
19913 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CLUA_OTOA_CGMB_ONOB_RK3
19916 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
19917 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
19918 real(RKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
19919 real(RKG) ,
intent(in) :: alpha
19920 type(lowerUnit_type) ,
intent(in) :: classA
19921 type(transOrth_type) ,
intent(in) :: operationA
19926 PURE module subroutine trsm_EXP_CLUA_OTOA_CGMB_ONOB_RK2(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
19927#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
19928 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CLUA_OTOA_CGMB_ONOB_RK2
19931 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
19932 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
19933 real(RKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
19934 real(RKG) ,
intent(in) :: alpha
19935 type(lowerUnit_type) ,
intent(in) :: classA
19936 type(transOrth_type) ,
intent(in) :: operationA
19941 PURE module subroutine trsm_EXP_CLUA_OTOA_CGMB_ONOB_RK1(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
19942#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
19943 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CLUA_OTOA_CGMB_ONOB_RK1
19946 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
19947 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
19948 real(RKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
19949 real(RKG) ,
intent(in) :: alpha
19950 type(lowerUnit_type) ,
intent(in) :: classA
19951 type(transOrth_type) ,
intent(in) :: operationA
19964 PURE module subroutine trsm_EXP_CLUA_OTUA_CGMB_ONOB_CK5(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
19965#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
19966 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CLUA_OTUA_CGMB_ONOB_CK5
19969 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
19970 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
19971 complex(CKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
19972 complex(CKG) ,
intent(in) :: alpha
19973 type(lowerUnit_type) ,
intent(in) :: classA
19974 type(transUnit_type) ,
intent(in) :: operationA
19979 PURE module subroutine trsm_EXP_CLUA_OTUA_CGMB_ONOB_CK4(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
19980#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
19981 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CLUA_OTUA_CGMB_ONOB_CK4
19984 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
19985 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
19986 complex(CKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
19987 complex(CKG) ,
intent(in) :: alpha
19988 type(lowerUnit_type) ,
intent(in) :: classA
19989 type(transUnit_type) ,
intent(in) :: operationA
19994 PURE module subroutine trsm_EXP_CLUA_OTUA_CGMB_ONOB_CK3(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
19995#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
19996 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CLUA_OTUA_CGMB_ONOB_CK3
19999 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
20000 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
20001 complex(CKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
20002 complex(CKG) ,
intent(in) :: alpha
20003 type(lowerUnit_type) ,
intent(in) :: classA
20004 type(transUnit_type) ,
intent(in) :: operationA
20009 PURE module subroutine trsm_EXP_CLUA_OTUA_CGMB_ONOB_CK2(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
20010#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
20011 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CLUA_OTUA_CGMB_ONOB_CK2
20014 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
20015 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
20016 complex(CKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
20017 complex(CKG) ,
intent(in) :: alpha
20018 type(lowerUnit_type) ,
intent(in) :: classA
20019 type(transUnit_type) ,
intent(in) :: operationA
20024 PURE module subroutine trsm_EXP_CLUA_OTUA_CGMB_ONOB_CK1(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
20025#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
20026 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CLUA_OTUA_CGMB_ONOB_CK1
20029 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
20030 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
20031 complex(CKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
20032 complex(CKG) ,
intent(in) :: alpha
20033 type(lowerUnit_type) ,
intent(in) :: classA
20034 type(transUnit_type) ,
intent(in) :: operationA
20041 PURE module subroutine trsm_EXP_CLUA_OTUA_CGMB_ONOB_RK5(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
20042#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
20043 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CLUA_OTUA_CGMB_ONOB_RK5
20046 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
20047 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
20048 real(RKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
20049 real(RKG) ,
intent(in) :: alpha
20050 type(lowerUnit_type) ,
intent(in) :: classA
20051 type(transUnit_type) ,
intent(in) :: operationA
20056 PURE module subroutine trsm_EXP_CLUA_OTUA_CGMB_ONOB_RK4(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
20057#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
20058 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CLUA_OTUA_CGMB_ONOB_RK4
20061 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
20062 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
20063 real(RKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
20064 real(RKG) ,
intent(in) :: alpha
20065 type(lowerUnit_type) ,
intent(in) :: classA
20066 type(transUnit_type) ,
intent(in) :: operationA
20071 PURE module subroutine trsm_EXP_CLUA_OTUA_CGMB_ONOB_RK3(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
20072#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
20073 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CLUA_OTUA_CGMB_ONOB_RK3
20076 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
20077 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
20078 real(RKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
20079 real(RKG) ,
intent(in) :: alpha
20080 type(lowerUnit_type) ,
intent(in) :: classA
20081 type(transUnit_type) ,
intent(in) :: operationA
20086 PURE module subroutine trsm_EXP_CLUA_OTUA_CGMB_ONOB_RK2(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
20087#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
20088 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CLUA_OTUA_CGMB_ONOB_RK2
20091 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
20092 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
20093 real(RKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
20094 real(RKG) ,
intent(in) :: alpha
20095 type(lowerUnit_type) ,
intent(in) :: classA
20096 type(transUnit_type) ,
intent(in) :: operationA
20101 PURE module subroutine trsm_EXP_CLUA_OTUA_CGMB_ONOB_RK1(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
20102#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
20103 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CLUA_OTUA_CGMB_ONOB_RK1
20106 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
20107 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
20108 real(RKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
20109 real(RKG) ,
intent(in) :: alpha
20110 type(lowerUnit_type) ,
intent(in) :: classA
20111 type(transUnit_type) ,
intent(in) :: operationA
20128 PURE module subroutine trsm_EXP_CUUA_INVA_CGMB_ONOB_CK5(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
20129#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
20130 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CUUA_INVA_CGMB_ONOB_CK5
20133 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
20134 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
20135 complex(CKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
20136 complex(CKG) ,
intent(in) :: alpha
20137 type(upperUnit_type) ,
intent(in) :: classA
20138 type(inversion_type) ,
intent(in) :: operationA
20143 PURE module subroutine trsm_EXP_CUUA_INVA_CGMB_ONOB_CK4(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
20144#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
20145 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CUUA_INVA_CGMB_ONOB_CK4
20148 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
20149 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
20150 complex(CKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
20151 complex(CKG) ,
intent(in) :: alpha
20152 type(upperUnit_type) ,
intent(in) :: classA
20153 type(inversion_type) ,
intent(in) :: operationA
20158 PURE module subroutine trsm_EXP_CUUA_INVA_CGMB_ONOB_CK3(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
20159#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
20160 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CUUA_INVA_CGMB_ONOB_CK3
20163 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
20164 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
20165 complex(CKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
20166 complex(CKG) ,
intent(in) :: alpha
20167 type(upperUnit_type) ,
intent(in) :: classA
20168 type(inversion_type) ,
intent(in) :: operationA
20173 PURE module subroutine trsm_EXP_CUUA_INVA_CGMB_ONOB_CK2(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
20174#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
20175 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CUUA_INVA_CGMB_ONOB_CK2
20178 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
20179 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
20180 complex(CKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
20181 complex(CKG) ,
intent(in) :: alpha
20182 type(upperUnit_type) ,
intent(in) :: classA
20183 type(inversion_type) ,
intent(in) :: operationA
20188 PURE module subroutine trsm_EXP_CUUA_INVA_CGMB_ONOB_CK1(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
20189#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
20190 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CUUA_INVA_CGMB_ONOB_CK1
20193 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
20194 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
20195 complex(CKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
20196 complex(CKG) ,
intent(in) :: alpha
20197 type(upperUnit_type) ,
intent(in) :: classA
20198 type(inversion_type) ,
intent(in) :: operationA
20205 PURE module subroutine trsm_EXP_CUUA_INVA_CGMB_ONOB_RK5(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
20206#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
20207 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CUUA_INVA_CGMB_ONOB_RK5
20210 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
20211 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
20212 real(RKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
20213 real(RKG) ,
intent(in) :: alpha
20214 type(upperUnit_type) ,
intent(in) :: classA
20215 type(inversion_type) ,
intent(in) :: operationA
20220 PURE module subroutine trsm_EXP_CUUA_INVA_CGMB_ONOB_RK4(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
20221#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
20222 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CUUA_INVA_CGMB_ONOB_RK4
20225 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
20226 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
20227 real(RKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
20228 real(RKG) ,
intent(in) :: alpha
20229 type(upperUnit_type) ,
intent(in) :: classA
20230 type(inversion_type) ,
intent(in) :: operationA
20235 PURE module subroutine trsm_EXP_CUUA_INVA_CGMB_ONOB_RK3(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
20236#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
20237 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CUUA_INVA_CGMB_ONOB_RK3
20240 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
20241 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
20242 real(RKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
20243 real(RKG) ,
intent(in) :: alpha
20244 type(upperUnit_type) ,
intent(in) :: classA
20245 type(inversion_type) ,
intent(in) :: operationA
20250 PURE module subroutine trsm_EXP_CUUA_INVA_CGMB_ONOB_RK2(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
20251#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
20252 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CUUA_INVA_CGMB_ONOB_RK2
20255 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
20256 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
20257 real(RKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
20258 real(RKG) ,
intent(in) :: alpha
20259 type(upperUnit_type) ,
intent(in) :: classA
20260 type(inversion_type) ,
intent(in) :: operationA
20265 PURE module subroutine trsm_EXP_CUUA_INVA_CGMB_ONOB_RK1(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
20266#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
20267 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CUUA_INVA_CGMB_ONOB_RK1
20270 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
20271 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
20272 real(RKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
20273 real(RKG) ,
intent(in) :: alpha
20274 type(upperUnit_type) ,
intent(in) :: classA
20275 type(inversion_type) ,
intent(in) :: operationA
20288 PURE module subroutine trsm_EXP_CUUA_OTOA_CGMB_ONOB_CK5(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
20289#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
20290 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CUUA_OTOA_CGMB_ONOB_CK5
20293 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
20294 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
20295 complex(CKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
20296 complex(CKG) ,
intent(in) :: alpha
20297 type(upperUnit_type) ,
intent(in) :: classA
20298 type(transOrth_type) ,
intent(in) :: operationA
20303 PURE module subroutine trsm_EXP_CUUA_OTOA_CGMB_ONOB_CK4(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
20304#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
20305 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CUUA_OTOA_CGMB_ONOB_CK4
20308 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
20309 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
20310 complex(CKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
20311 complex(CKG) ,
intent(in) :: alpha
20312 type(upperUnit_type) ,
intent(in) :: classA
20313 type(transOrth_type) ,
intent(in) :: operationA
20318 PURE module subroutine trsm_EXP_CUUA_OTOA_CGMB_ONOB_CK3(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
20319#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
20320 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CUUA_OTOA_CGMB_ONOB_CK3
20323 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
20324 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
20325 complex(CKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
20326 complex(CKG) ,
intent(in) :: alpha
20327 type(upperUnit_type) ,
intent(in) :: classA
20328 type(transOrth_type) ,
intent(in) :: operationA
20333 PURE module subroutine trsm_EXP_CUUA_OTOA_CGMB_ONOB_CK2(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
20334#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
20335 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CUUA_OTOA_CGMB_ONOB_CK2
20338 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
20339 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
20340 complex(CKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
20341 complex(CKG) ,
intent(in) :: alpha
20342 type(upperUnit_type) ,
intent(in) :: classA
20343 type(transOrth_type) ,
intent(in) :: operationA
20348 PURE module subroutine trsm_EXP_CUUA_OTOA_CGMB_ONOB_CK1(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
20349#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
20350 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CUUA_OTOA_CGMB_ONOB_CK1
20353 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
20354 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
20355 complex(CKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
20356 complex(CKG) ,
intent(in) :: alpha
20357 type(upperUnit_type) ,
intent(in) :: classA
20358 type(transOrth_type) ,
intent(in) :: operationA
20365 PURE module subroutine trsm_EXP_CUUA_OTOA_CGMB_ONOB_RK5(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
20366#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
20367 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CUUA_OTOA_CGMB_ONOB_RK5
20370 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
20371 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
20372 real(RKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
20373 real(RKG) ,
intent(in) :: alpha
20374 type(upperUnit_type) ,
intent(in) :: classA
20375 type(transOrth_type) ,
intent(in) :: operationA
20380 PURE module subroutine trsm_EXP_CUUA_OTOA_CGMB_ONOB_RK4(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
20381#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
20382 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CUUA_OTOA_CGMB_ONOB_RK4
20385 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
20386 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
20387 real(RKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
20388 real(RKG) ,
intent(in) :: alpha
20389 type(upperUnit_type) ,
intent(in) :: classA
20390 type(transOrth_type) ,
intent(in) :: operationA
20395 PURE module subroutine trsm_EXP_CUUA_OTOA_CGMB_ONOB_RK3(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
20396#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
20397 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CUUA_OTOA_CGMB_ONOB_RK3
20400 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
20401 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
20402 real(RKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
20403 real(RKG) ,
intent(in) :: alpha
20404 type(upperUnit_type) ,
intent(in) :: classA
20405 type(transOrth_type) ,
intent(in) :: operationA
20410 PURE module subroutine trsm_EXP_CUUA_OTOA_CGMB_ONOB_RK2(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
20411#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
20412 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CUUA_OTOA_CGMB_ONOB_RK2
20415 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
20416 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
20417 real(RKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
20418 real(RKG) ,
intent(in) :: alpha
20419 type(upperUnit_type) ,
intent(in) :: classA
20420 type(transOrth_type) ,
intent(in) :: operationA
20425 PURE module subroutine trsm_EXP_CUUA_OTOA_CGMB_ONOB_RK1(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
20426#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
20427 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CUUA_OTOA_CGMB_ONOB_RK1
20430 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
20431 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
20432 real(RKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
20433 real(RKG) ,
intent(in) :: alpha
20434 type(upperUnit_type) ,
intent(in) :: classA
20435 type(transOrth_type) ,
intent(in) :: operationA
20448 PURE module subroutine trsm_EXP_CUUA_OTUA_CGMB_ONOB_CK5(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
20449#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
20450 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CUUA_OTUA_CGMB_ONOB_CK5
20453 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
20454 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
20455 complex(CKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
20456 complex(CKG) ,
intent(in) :: alpha
20457 type(upperUnit_type) ,
intent(in) :: classA
20458 type(transUnit_type) ,
intent(in) :: operationA
20463 PURE module subroutine trsm_EXP_CUUA_OTUA_CGMB_ONOB_CK4(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
20464#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
20465 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CUUA_OTUA_CGMB_ONOB_CK4
20468 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
20469 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
20470 complex(CKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
20471 complex(CKG) ,
intent(in) :: alpha
20472 type(upperUnit_type) ,
intent(in) :: classA
20473 type(transUnit_type) ,
intent(in) :: operationA
20478 PURE module subroutine trsm_EXP_CUUA_OTUA_CGMB_ONOB_CK3(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
20479#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
20480 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CUUA_OTUA_CGMB_ONOB_CK3
20483 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
20484 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
20485 complex(CKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
20486 complex(CKG) ,
intent(in) :: alpha
20487 type(upperUnit_type) ,
intent(in) :: classA
20488 type(transUnit_type) ,
intent(in) :: operationA
20493 PURE module subroutine trsm_EXP_CUUA_OTUA_CGMB_ONOB_CK2(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
20494#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
20495 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CUUA_OTUA_CGMB_ONOB_CK2
20498 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
20499 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
20500 complex(CKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
20501 complex(CKG) ,
intent(in) :: alpha
20502 type(upperUnit_type) ,
intent(in) :: classA
20503 type(transUnit_type) ,
intent(in) :: operationA
20508 PURE module subroutine trsm_EXP_CUUA_OTUA_CGMB_ONOB_CK1(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
20509#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
20510 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CUUA_OTUA_CGMB_ONOB_CK1
20513 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
20514 complex(CKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
20515 complex(CKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
20516 complex(CKG) ,
intent(in) :: alpha
20517 type(upperUnit_type) ,
intent(in) :: classA
20518 type(transUnit_type) ,
intent(in) :: operationA
20525 PURE module subroutine trsm_EXP_CUUA_OTUA_CGMB_ONOB_RK5(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
20526#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
20527 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CUUA_OTUA_CGMB_ONOB_RK5
20530 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
20531 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
20532 real(RKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
20533 real(RKG) ,
intent(in) :: alpha
20534 type(upperUnit_type) ,
intent(in) :: classA
20535 type(transUnit_type) ,
intent(in) :: operationA
20540 PURE module subroutine trsm_EXP_CUUA_OTUA_CGMB_ONOB_RK4(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
20541#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
20542 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CUUA_OTUA_CGMB_ONOB_RK4
20545 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
20546 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
20547 real(RKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
20548 real(RKG) ,
intent(in) :: alpha
20549 type(upperUnit_type) ,
intent(in) :: classA
20550 type(transUnit_type) ,
intent(in) :: operationA
20555 PURE module subroutine trsm_EXP_CUUA_OTUA_CGMB_ONOB_RK3(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
20556#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
20557 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CUUA_OTUA_CGMB_ONOB_RK3
20560 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
20561 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
20562 real(RKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
20563 real(RKG) ,
intent(in) :: alpha
20564 type(upperUnit_type) ,
intent(in) :: classA
20565 type(transUnit_type) ,
intent(in) :: operationA
20570 PURE module subroutine trsm_EXP_CUUA_OTUA_CGMB_ONOB_RK2(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
20571#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
20572 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CUUA_OTUA_CGMB_ONOB_RK2
20575 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
20576 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
20577 real(RKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
20578 real(RKG) ,
intent(in) :: alpha
20579 type(upperUnit_type) ,
intent(in) :: classA
20580 type(transUnit_type) ,
intent(in) :: operationA
20585 PURE module subroutine trsm_EXP_CUUA_OTUA_CGMB_ONOB_RK1(matA, classA, operationA, matB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
20586#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
20587 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CUUA_OTUA_CGMB_ONOB_RK1
20590 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
20591 real(RKG) ,
intent(in) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
20592 real(RKG) ,
intent(inout) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
20593 real(RKG) ,
intent(in) :: alpha
20594 type(upperUnit_type) ,
intent(in) :: classA
20595 type(transUnit_type) ,
intent(in) :: operationA
20616 PURE module subroutine trsm_EXP_CGMA_ONOA_CLDB_INVB_CK5(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
20617#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
20618 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CGMA_ONOA_CLDB_INVB_CK5
20621 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
20622 complex(CKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
20623 complex(CKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
20624 complex(CKG) ,
intent(in) :: alpha
20625 type(lowerDiag_type) ,
intent(in) :: classB
20626 type(inversion_type) ,
intent(in) :: operationB
20631 PURE module subroutine trsm_EXP_CGMA_ONOA_CLDB_INVB_CK4(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
20632#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
20633 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CGMA_ONOA_CLDB_INVB_CK4
20636 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
20637 complex(CKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
20638 complex(CKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
20639 complex(CKG) ,
intent(in) :: alpha
20640 type(lowerDiag_type) ,
intent(in) :: classB
20641 type(inversion_type) ,
intent(in) :: operationB
20646 PURE module subroutine trsm_EXP_CGMA_ONOA_CLDB_INVB_CK3(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
20647#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
20648 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CGMA_ONOA_CLDB_INVB_CK3
20651 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
20652 complex(CKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
20653 complex(CKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
20654 complex(CKG) ,
intent(in) :: alpha
20655 type(lowerDiag_type) ,
intent(in) :: classB
20656 type(inversion_type) ,
intent(in) :: operationB
20661 PURE module subroutine trsm_EXP_CGMA_ONOA_CLDB_INVB_CK2(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
20662#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
20663 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CGMA_ONOA_CLDB_INVB_CK2
20666 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
20667 complex(CKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
20668 complex(CKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
20669 complex(CKG) ,
intent(in) :: alpha
20670 type(lowerDiag_type) ,
intent(in) :: classB
20671 type(inversion_type) ,
intent(in) :: operationB
20676 PURE module subroutine trsm_EXP_CGMA_ONOA_CLDB_INVB_CK1(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
20677#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
20678 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CGMA_ONOA_CLDB_INVB_CK1
20681 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
20682 complex(CKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
20683 complex(CKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
20684 complex(CKG) ,
intent(in) :: alpha
20685 type(lowerDiag_type) ,
intent(in) :: classB
20686 type(inversion_type) ,
intent(in) :: operationB
20693 PURE module subroutine trsm_EXP_CGMA_ONOA_CLDB_INVB_RK5(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
20694#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
20695 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CGMA_ONOA_CLDB_INVB_RK5
20698 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
20699 real(RKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
20700 real(RKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
20701 real(RKG) ,
intent(in) :: alpha
20702 type(lowerDiag_type) ,
intent(in) :: classB
20703 type(inversion_type) ,
intent(in) :: operationB
20708 PURE module subroutine trsm_EXP_CGMA_ONOA_CLDB_INVB_RK4(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
20709#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
20710 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CGMA_ONOA_CLDB_INVB_RK4
20713 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
20714 real(RKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
20715 real(RKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
20716 real(RKG) ,
intent(in) :: alpha
20717 type(lowerDiag_type) ,
intent(in) :: classB
20718 type(inversion_type) ,
intent(in) :: operationB
20723 PURE module subroutine trsm_EXP_CGMA_ONOA_CLDB_INVB_RK3(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
20724#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
20725 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CGMA_ONOA_CLDB_INVB_RK3
20728 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
20729 real(RKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
20730 real(RKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
20731 real(RKG) ,
intent(in) :: alpha
20732 type(lowerDiag_type) ,
intent(in) :: classB
20733 type(inversion_type) ,
intent(in) :: operationB
20738 PURE module subroutine trsm_EXP_CGMA_ONOA_CLDB_INVB_RK2(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
20739#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
20740 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CGMA_ONOA_CLDB_INVB_RK2
20743 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
20744 real(RKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
20745 real(RKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
20746 real(RKG) ,
intent(in) :: alpha
20747 type(lowerDiag_type) ,
intent(in) :: classB
20748 type(inversion_type) ,
intent(in) :: operationB
20753 PURE module subroutine trsm_EXP_CGMA_ONOA_CLDB_INVB_RK1(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
20754#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
20755 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CGMA_ONOA_CLDB_INVB_RK1
20758 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
20759 real(RKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
20760 real(RKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
20761 real(RKG) ,
intent(in) :: alpha
20762 type(lowerDiag_type) ,
intent(in) :: classB
20763 type(inversion_type) ,
intent(in) :: operationB
20776 PURE module subroutine trsm_EXP_CGMA_ONOA_CLDB_OTOB_CK5(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
20777#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
20778 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CGMA_ONOA_CLDB_OTOB_CK5
20781 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
20782 complex(CKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
20783 complex(CKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
20784 complex(CKG) ,
intent(in) :: alpha
20785 type(lowerDiag_type) ,
intent(in) :: classB
20786 type(transOrth_type) ,
intent(in) :: operationB
20791 PURE module subroutine trsm_EXP_CGMA_ONOA_CLDB_OTOB_CK4(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
20792#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
20793 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CGMA_ONOA_CLDB_OTOB_CK4
20796 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
20797 complex(CKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
20798 complex(CKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
20799 complex(CKG) ,
intent(in) :: alpha
20800 type(lowerDiag_type) ,
intent(in) :: classB
20801 type(transOrth_type) ,
intent(in) :: operationB
20806 PURE module subroutine trsm_EXP_CGMA_ONOA_CLDB_OTOB_CK3(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
20807#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
20808 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CGMA_ONOA_CLDB_OTOB_CK3
20811 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
20812 complex(CKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
20813 complex(CKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
20814 complex(CKG) ,
intent(in) :: alpha
20815 type(lowerDiag_type) ,
intent(in) :: classB
20816 type(transOrth_type) ,
intent(in) :: operationB
20821 PURE module subroutine trsm_EXP_CGMA_ONOA_CLDB_OTOB_CK2(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
20822#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
20823 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CGMA_ONOA_CLDB_OTOB_CK2
20826 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
20827 complex(CKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
20828 complex(CKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
20829 complex(CKG) ,
intent(in) :: alpha
20830 type(lowerDiag_type) ,
intent(in) :: classB
20831 type(transOrth_type) ,
intent(in) :: operationB
20836 PURE module subroutine trsm_EXP_CGMA_ONOA_CLDB_OTOB_CK1(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
20837#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
20838 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CGMA_ONOA_CLDB_OTOB_CK1
20841 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
20842 complex(CKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
20843 complex(CKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
20844 complex(CKG) ,
intent(in) :: alpha
20845 type(lowerDiag_type) ,
intent(in) :: classB
20846 type(transOrth_type) ,
intent(in) :: operationB
20853 PURE module subroutine trsm_EXP_CGMA_ONOA_CLDB_OTOB_RK5(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
20854#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
20855 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CGMA_ONOA_CLDB_OTOB_RK5
20858 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
20859 real(RKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
20860 real(RKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
20861 real(RKG) ,
intent(in) :: alpha
20862 type(lowerDiag_type) ,
intent(in) :: classB
20863 type(transOrth_type) ,
intent(in) :: operationB
20868 PURE module subroutine trsm_EXP_CGMA_ONOA_CLDB_OTOB_RK4(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
20869#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
20870 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CGMA_ONOA_CLDB_OTOB_RK4
20873 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
20874 real(RKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
20875 real(RKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
20876 real(RKG) ,
intent(in) :: alpha
20877 type(lowerDiag_type) ,
intent(in) :: classB
20878 type(transOrth_type) ,
intent(in) :: operationB
20883 PURE module subroutine trsm_EXP_CGMA_ONOA_CLDB_OTOB_RK3(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
20884#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
20885 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CGMA_ONOA_CLDB_OTOB_RK3
20888 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
20889 real(RKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
20890 real(RKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
20891 real(RKG) ,
intent(in) :: alpha
20892 type(lowerDiag_type) ,
intent(in) :: classB
20893 type(transOrth_type) ,
intent(in) :: operationB
20898 PURE module subroutine trsm_EXP_CGMA_ONOA_CLDB_OTOB_RK2(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
20899#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
20900 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CGMA_ONOA_CLDB_OTOB_RK2
20903 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
20904 real(RKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
20905 real(RKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
20906 real(RKG) ,
intent(in) :: alpha
20907 type(lowerDiag_type) ,
intent(in) :: classB
20908 type(transOrth_type) ,
intent(in) :: operationB
20913 PURE module subroutine trsm_EXP_CGMA_ONOA_CLDB_OTOB_RK1(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
20914#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
20915 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CGMA_ONOA_CLDB_OTOB_RK1
20918 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
20919 real(RKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
20920 real(RKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
20921 real(RKG) ,
intent(in) :: alpha
20922 type(lowerDiag_type) ,
intent(in) :: classB
20923 type(transOrth_type) ,
intent(in) :: operationB
20936 PURE module subroutine trsm_EXP_CGMA_ONOA_CLDB_OTUB_CK5(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
20937#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
20938 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CGMA_ONOA_CLDB_OTUB_CK5
20941 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
20942 complex(CKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
20943 complex(CKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
20944 complex(CKG) ,
intent(in) :: alpha
20945 type(lowerDiag_type) ,
intent(in) :: classB
20946 type(transUnit_type) ,
intent(in) :: operationB
20951 PURE module subroutine trsm_EXP_CGMA_ONOA_CLDB_OTUB_CK4(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
20952#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
20953 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CGMA_ONOA_CLDB_OTUB_CK4
20956 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
20957 complex(CKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
20958 complex(CKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
20959 complex(CKG) ,
intent(in) :: alpha
20960 type(lowerDiag_type) ,
intent(in) :: classB
20961 type(transUnit_type) ,
intent(in) :: operationB
20966 PURE module subroutine trsm_EXP_CGMA_ONOA_CLDB_OTUB_CK3(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
20967#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
20968 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CGMA_ONOA_CLDB_OTUB_CK3
20971 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
20972 complex(CKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
20973 complex(CKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
20974 complex(CKG) ,
intent(in) :: alpha
20975 type(lowerDiag_type) ,
intent(in) :: classB
20976 type(transUnit_type) ,
intent(in) :: operationB
20981 PURE module subroutine trsm_EXP_CGMA_ONOA_CLDB_OTUB_CK2(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
20982#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
20983 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CGMA_ONOA_CLDB_OTUB_CK2
20986 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
20987 complex(CKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
20988 complex(CKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
20989 complex(CKG) ,
intent(in) :: alpha
20990 type(lowerDiag_type) ,
intent(in) :: classB
20991 type(transUnit_type) ,
intent(in) :: operationB
20996 PURE module subroutine trsm_EXP_CGMA_ONOA_CLDB_OTUB_CK1(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
20997#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
20998 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CGMA_ONOA_CLDB_OTUB_CK1
21001 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
21002 complex(CKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
21003 complex(CKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
21004 complex(CKG) ,
intent(in) :: alpha
21005 type(lowerDiag_type) ,
intent(in) :: classB
21006 type(transUnit_type) ,
intent(in) :: operationB
21013 PURE module subroutine trsm_EXP_CGMA_ONOA_CLDB_OTUB_RK5(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
21014#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
21015 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CGMA_ONOA_CLDB_OTUB_RK5
21018 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
21019 real(RKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
21020 real(RKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
21021 real(RKG) ,
intent(in) :: alpha
21022 type(lowerDiag_type) ,
intent(in) :: classB
21023 type(transUnit_type) ,
intent(in) :: operationB
21028 PURE module subroutine trsm_EXP_CGMA_ONOA_CLDB_OTUB_RK4(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
21029#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
21030 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CGMA_ONOA_CLDB_OTUB_RK4
21033 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
21034 real(RKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
21035 real(RKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
21036 real(RKG) ,
intent(in) :: alpha
21037 type(lowerDiag_type) ,
intent(in) :: classB
21038 type(transUnit_type) ,
intent(in) :: operationB
21043 PURE module subroutine trsm_EXP_CGMA_ONOA_CLDB_OTUB_RK3(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
21044#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
21045 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CGMA_ONOA_CLDB_OTUB_RK3
21048 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
21049 real(RKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
21050 real(RKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
21051 real(RKG) ,
intent(in) :: alpha
21052 type(lowerDiag_type) ,
intent(in) :: classB
21053 type(transUnit_type) ,
intent(in) :: operationB
21058 PURE module subroutine trsm_EXP_CGMA_ONOA_CLDB_OTUB_RK2(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
21059#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
21060 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CGMA_ONOA_CLDB_OTUB_RK2
21063 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
21064 real(RKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
21065 real(RKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
21066 real(RKG) ,
intent(in) :: alpha
21067 type(lowerDiag_type) ,
intent(in) :: classB
21068 type(transUnit_type) ,
intent(in) :: operationB
21073 PURE module subroutine trsm_EXP_CGMA_ONOA_CLDB_OTUB_RK1(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
21074#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
21075 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CGMA_ONOA_CLDB_OTUB_RK1
21078 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
21079 real(RKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
21080 real(RKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
21081 real(RKG) ,
intent(in) :: alpha
21082 type(lowerDiag_type) ,
intent(in) :: classB
21083 type(transUnit_type) ,
intent(in) :: operationB
21100 PURE module subroutine trsm_EXP_CGMA_ONOA_CUDB_INVB_CK5(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
21101#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
21102 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CGMA_ONOA_CUDB_INVB_CK5
21105 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
21106 complex(CKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
21107 complex(CKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
21108 complex(CKG) ,
intent(in) :: alpha
21109 type(upperDiag_type) ,
intent(in) :: classB
21110 type(inversion_type) ,
intent(in) :: operationB
21115 PURE module subroutine trsm_EXP_CGMA_ONOA_CUDB_INVB_CK4(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
21116#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
21117 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CGMA_ONOA_CUDB_INVB_CK4
21120 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
21121 complex(CKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
21122 complex(CKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
21123 complex(CKG) ,
intent(in) :: alpha
21124 type(upperDiag_type) ,
intent(in) :: classB
21125 type(inversion_type) ,
intent(in) :: operationB
21130 PURE module subroutine trsm_EXP_CGMA_ONOA_CUDB_INVB_CK3(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
21131#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
21132 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CGMA_ONOA_CUDB_INVB_CK3
21135 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
21136 complex(CKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
21137 complex(CKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
21138 complex(CKG) ,
intent(in) :: alpha
21139 type(upperDiag_type) ,
intent(in) :: classB
21140 type(inversion_type) ,
intent(in) :: operationB
21145 PURE module subroutine trsm_EXP_CGMA_ONOA_CUDB_INVB_CK2(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
21146#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
21147 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CGMA_ONOA_CUDB_INVB_CK2
21150 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
21151 complex(CKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
21152 complex(CKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
21153 complex(CKG) ,
intent(in) :: alpha
21154 type(upperDiag_type) ,
intent(in) :: classB
21155 type(inversion_type) ,
intent(in) :: operationB
21160 PURE module subroutine trsm_EXP_CGMA_ONOA_CUDB_INVB_CK1(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
21161#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
21162 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CGMA_ONOA_CUDB_INVB_CK1
21165 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
21166 complex(CKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
21167 complex(CKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
21168 complex(CKG) ,
intent(in) :: alpha
21169 type(upperDiag_type) ,
intent(in) :: classB
21170 type(inversion_type) ,
intent(in) :: operationB
21177 PURE module subroutine trsm_EXP_CGMA_ONOA_CUDB_INVB_RK5(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
21178#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
21179 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CGMA_ONOA_CUDB_INVB_RK5
21182 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
21183 real(RKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
21184 real(RKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
21185 real(RKG) ,
intent(in) :: alpha
21186 type(upperDiag_type) ,
intent(in) :: classB
21187 type(inversion_type) ,
intent(in) :: operationB
21192 PURE module subroutine trsm_EXP_CGMA_ONOA_CUDB_INVB_RK4(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
21193#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
21194 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CGMA_ONOA_CUDB_INVB_RK4
21197 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
21198 real(RKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
21199 real(RKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
21200 real(RKG) ,
intent(in) :: alpha
21201 type(upperDiag_type) ,
intent(in) :: classB
21202 type(inversion_type) ,
intent(in) :: operationB
21207 PURE module subroutine trsm_EXP_CGMA_ONOA_CUDB_INVB_RK3(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
21208#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
21209 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CGMA_ONOA_CUDB_INVB_RK3
21212 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
21213 real(RKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
21214 real(RKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
21215 real(RKG) ,
intent(in) :: alpha
21216 type(upperDiag_type) ,
intent(in) :: classB
21217 type(inversion_type) ,
intent(in) :: operationB
21222 PURE module subroutine trsm_EXP_CGMA_ONOA_CUDB_INVB_RK2(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
21223#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
21224 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CGMA_ONOA_CUDB_INVB_RK2
21227 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
21228 real(RKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
21229 real(RKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
21230 real(RKG) ,
intent(in) :: alpha
21231 type(upperDiag_type) ,
intent(in) :: classB
21232 type(inversion_type) ,
intent(in) :: operationB
21237 PURE module subroutine trsm_EXP_CGMA_ONOA_CUDB_INVB_RK1(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
21238#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
21239 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CGMA_ONOA_CUDB_INVB_RK1
21242 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
21243 real(RKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
21244 real(RKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
21245 real(RKG) ,
intent(in) :: alpha
21246 type(upperDiag_type) ,
intent(in) :: classB
21247 type(inversion_type) ,
intent(in) :: operationB
21260 PURE module subroutine trsm_EXP_CGMA_ONOA_CUDB_OTOB_CK5(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
21261#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
21262 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CGMA_ONOA_CUDB_OTOB_CK5
21265 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
21266 complex(CKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
21267 complex(CKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
21268 complex(CKG) ,
intent(in) :: alpha
21269 type(upperDiag_type) ,
intent(in) :: classB
21270 type(transOrth_type) ,
intent(in) :: operationB
21275 PURE module subroutine trsm_EXP_CGMA_ONOA_CUDB_OTOB_CK4(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
21276#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
21277 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CGMA_ONOA_CUDB_OTOB_CK4
21280 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
21281 complex(CKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
21282 complex(CKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
21283 complex(CKG) ,
intent(in) :: alpha
21284 type(upperDiag_type) ,
intent(in) :: classB
21285 type(transOrth_type) ,
intent(in) :: operationB
21290 PURE module subroutine trsm_EXP_CGMA_ONOA_CUDB_OTOB_CK3(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
21291#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
21292 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CGMA_ONOA_CUDB_OTOB_CK3
21295 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
21296 complex(CKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
21297 complex(CKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
21298 complex(CKG) ,
intent(in) :: alpha
21299 type(upperDiag_type) ,
intent(in) :: classB
21300 type(transOrth_type) ,
intent(in) :: operationB
21305 PURE module subroutine trsm_EXP_CGMA_ONOA_CUDB_OTOB_CK2(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
21306#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
21307 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CGMA_ONOA_CUDB_OTOB_CK2
21310 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
21311 complex(CKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
21312 complex(CKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
21313 complex(CKG) ,
intent(in) :: alpha
21314 type(upperDiag_type) ,
intent(in) :: classB
21315 type(transOrth_type) ,
intent(in) :: operationB
21320 PURE module subroutine trsm_EXP_CGMA_ONOA_CUDB_OTOB_CK1(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
21321#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
21322 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CGMA_ONOA_CUDB_OTOB_CK1
21325 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
21326 complex(CKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
21327 complex(CKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
21328 complex(CKG) ,
intent(in) :: alpha
21329 type(upperDiag_type) ,
intent(in) :: classB
21330 type(transOrth_type) ,
intent(in) :: operationB
21337 PURE module subroutine trsm_EXP_CGMA_ONOA_CUDB_OTOB_RK5(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
21338#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
21339 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CGMA_ONOA_CUDB_OTOB_RK5
21342 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
21343 real(RKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
21344 real(RKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
21345 real(RKG) ,
intent(in) :: alpha
21346 type(upperDiag_type) ,
intent(in) :: classB
21347 type(transOrth_type) ,
intent(in) :: operationB
21352 PURE module subroutine trsm_EXP_CGMA_ONOA_CUDB_OTOB_RK4(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
21353#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
21354 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CGMA_ONOA_CUDB_OTOB_RK4
21357 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
21358 real(RKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
21359 real(RKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
21360 real(RKG) ,
intent(in) :: alpha
21361 type(upperDiag_type) ,
intent(in) :: classB
21362 type(transOrth_type) ,
intent(in) :: operationB
21367 PURE module subroutine trsm_EXP_CGMA_ONOA_CUDB_OTOB_RK3(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
21368#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
21369 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CGMA_ONOA_CUDB_OTOB_RK3
21372 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
21373 real(RKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
21374 real(RKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
21375 real(RKG) ,
intent(in) :: alpha
21376 type(upperDiag_type) ,
intent(in) :: classB
21377 type(transOrth_type) ,
intent(in) :: operationB
21382 PURE module subroutine trsm_EXP_CGMA_ONOA_CUDB_OTOB_RK2(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
21383#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
21384 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CGMA_ONOA_CUDB_OTOB_RK2
21387 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
21388 real(RKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
21389 real(RKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
21390 real(RKG) ,
intent(in) :: alpha
21391 type(upperDiag_type) ,
intent(in) :: classB
21392 type(transOrth_type) ,
intent(in) :: operationB
21397 PURE module subroutine trsm_EXP_CGMA_ONOA_CUDB_OTOB_RK1(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
21398#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
21399 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CGMA_ONOA_CUDB_OTOB_RK1
21402 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
21403 real(RKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
21404 real(RKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
21405 real(RKG) ,
intent(in) :: alpha
21406 type(upperDiag_type) ,
intent(in) :: classB
21407 type(transOrth_type) ,
intent(in) :: operationB
21420 PURE module subroutine trsm_EXP_CGMA_ONOA_CUDB_OTUB_CK5(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
21421#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
21422 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CGMA_ONOA_CUDB_OTUB_CK5
21425 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
21426 complex(CKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
21427 complex(CKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
21428 complex(CKG) ,
intent(in) :: alpha
21429 type(upperDiag_type) ,
intent(in) :: classB
21430 type(transUnit_type) ,
intent(in) :: operationB
21435 PURE module subroutine trsm_EXP_CGMA_ONOA_CUDB_OTUB_CK4(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
21436#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
21437 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CGMA_ONOA_CUDB_OTUB_CK4
21440 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
21441 complex(CKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
21442 complex(CKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
21443 complex(CKG) ,
intent(in) :: alpha
21444 type(upperDiag_type) ,
intent(in) :: classB
21445 type(transUnit_type) ,
intent(in) :: operationB
21450 PURE module subroutine trsm_EXP_CGMA_ONOA_CUDB_OTUB_CK3(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
21451#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
21452 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CGMA_ONOA_CUDB_OTUB_CK3
21455 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
21456 complex(CKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
21457 complex(CKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
21458 complex(CKG) ,
intent(in) :: alpha
21459 type(upperDiag_type) ,
intent(in) :: classB
21460 type(transUnit_type) ,
intent(in) :: operationB
21465 PURE module subroutine trsm_EXP_CGMA_ONOA_CUDB_OTUB_CK2(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
21466#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
21467 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CGMA_ONOA_CUDB_OTUB_CK2
21470 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
21471 complex(CKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
21472 complex(CKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
21473 complex(CKG) ,
intent(in) :: alpha
21474 type(upperDiag_type) ,
intent(in) :: classB
21475 type(transUnit_type) ,
intent(in) :: operationB
21480 PURE module subroutine trsm_EXP_CGMA_ONOA_CUDB_OTUB_CK1(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
21481#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
21482 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CGMA_ONOA_CUDB_OTUB_CK1
21485 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
21486 complex(CKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
21487 complex(CKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
21488 complex(CKG) ,
intent(in) :: alpha
21489 type(upperDiag_type) ,
intent(in) :: classB
21490 type(transUnit_type) ,
intent(in) :: operationB
21497 PURE module subroutine trsm_EXP_CGMA_ONOA_CUDB_OTUB_RK5(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
21498#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
21499 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CGMA_ONOA_CUDB_OTUB_RK5
21502 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
21503 real(RKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
21504 real(RKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
21505 real(RKG) ,
intent(in) :: alpha
21506 type(upperDiag_type) ,
intent(in) :: classB
21507 type(transUnit_type) ,
intent(in) :: operationB
21512 PURE module subroutine trsm_EXP_CGMA_ONOA_CUDB_OTUB_RK4(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
21513#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
21514 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CGMA_ONOA_CUDB_OTUB_RK4
21517 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
21518 real(RKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
21519 real(RKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
21520 real(RKG) ,
intent(in) :: alpha
21521 type(upperDiag_type) ,
intent(in) :: classB
21522 type(transUnit_type) ,
intent(in) :: operationB
21527 PURE module subroutine trsm_EXP_CGMA_ONOA_CUDB_OTUB_RK3(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
21528#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
21529 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CGMA_ONOA_CUDB_OTUB_RK3
21532 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
21533 real(RKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
21534 real(RKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
21535 real(RKG) ,
intent(in) :: alpha
21536 type(upperDiag_type) ,
intent(in) :: classB
21537 type(transUnit_type) ,
intent(in) :: operationB
21542 PURE module subroutine trsm_EXP_CGMA_ONOA_CUDB_OTUB_RK2(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
21543#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
21544 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CGMA_ONOA_CUDB_OTUB_RK2
21547 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
21548 real(RKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
21549 real(RKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
21550 real(RKG) ,
intent(in) :: alpha
21551 type(upperDiag_type) ,
intent(in) :: classB
21552 type(transUnit_type) ,
intent(in) :: operationB
21557 PURE module subroutine trsm_EXP_CGMA_ONOA_CUDB_OTUB_RK1(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
21558#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
21559 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CGMA_ONOA_CUDB_OTUB_RK1
21562 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
21563 real(RKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
21564 real(RKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
21565 real(RKG) ,
intent(in) :: alpha
21566 type(upperDiag_type) ,
intent(in) :: classB
21567 type(transUnit_type) ,
intent(in) :: operationB
21584 PURE module subroutine trsm_EXP_CGMA_ONOA_CLUB_INVB_CK5(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
21585#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
21586 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CGMA_ONOA_CLUB_INVB_CK5
21589 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
21590 complex(CKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
21591 complex(CKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
21592 complex(CKG) ,
intent(in) :: alpha
21593 type(lowerUnit_type) ,
intent(in) :: classB
21594 type(inversion_type) ,
intent(in) :: operationB
21599 PURE module subroutine trsm_EXP_CGMA_ONOA_CLUB_INVB_CK4(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
21600#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
21601 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CGMA_ONOA_CLUB_INVB_CK4
21604 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
21605 complex(CKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
21606 complex(CKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
21607 complex(CKG) ,
intent(in) :: alpha
21608 type(lowerUnit_type) ,
intent(in) :: classB
21609 type(inversion_type) ,
intent(in) :: operationB
21614 PURE module subroutine trsm_EXP_CGMA_ONOA_CLUB_INVB_CK3(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
21615#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
21616 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CGMA_ONOA_CLUB_INVB_CK3
21619 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
21620 complex(CKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
21621 complex(CKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
21622 complex(CKG) ,
intent(in) :: alpha
21623 type(lowerUnit_type) ,
intent(in) :: classB
21624 type(inversion_type) ,
intent(in) :: operationB
21629 PURE module subroutine trsm_EXP_CGMA_ONOA_CLUB_INVB_CK2(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
21630#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
21631 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CGMA_ONOA_CLUB_INVB_CK2
21634 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
21635 complex(CKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
21636 complex(CKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
21637 complex(CKG) ,
intent(in) :: alpha
21638 type(lowerUnit_type) ,
intent(in) :: classB
21639 type(inversion_type) ,
intent(in) :: operationB
21644 PURE module subroutine trsm_EXP_CGMA_ONOA_CLUB_INVB_CK1(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
21645#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
21646 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CGMA_ONOA_CLUB_INVB_CK1
21649 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
21650 complex(CKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
21651 complex(CKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
21652 complex(CKG) ,
intent(in) :: alpha
21653 type(lowerUnit_type) ,
intent(in) :: classB
21654 type(inversion_type) ,
intent(in) :: operationB
21661 PURE module subroutine trsm_EXP_CGMA_ONOA_CLUB_INVB_RK5(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
21662#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
21663 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CGMA_ONOA_CLUB_INVB_RK5
21666 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
21667 real(RKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
21668 real(RKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
21669 real(RKG) ,
intent(in) :: alpha
21670 type(lowerUnit_type) ,
intent(in) :: classB
21671 type(inversion_type) ,
intent(in) :: operationB
21676 PURE module subroutine trsm_EXP_CGMA_ONOA_CLUB_INVB_RK4(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
21677#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
21678 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CGMA_ONOA_CLUB_INVB_RK4
21681 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
21682 real(RKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
21683 real(RKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
21684 real(RKG) ,
intent(in) :: alpha
21685 type(lowerUnit_type) ,
intent(in) :: classB
21686 type(inversion_type) ,
intent(in) :: operationB
21691 PURE module subroutine trsm_EXP_CGMA_ONOA_CLUB_INVB_RK3(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
21692#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
21693 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CGMA_ONOA_CLUB_INVB_RK3
21696 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
21697 real(RKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
21698 real(RKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
21699 real(RKG) ,
intent(in) :: alpha
21700 type(lowerUnit_type) ,
intent(in) :: classB
21701 type(inversion_type) ,
intent(in) :: operationB
21706 PURE module subroutine trsm_EXP_CGMA_ONOA_CLUB_INVB_RK2(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
21707#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
21708 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CGMA_ONOA_CLUB_INVB_RK2
21711 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
21712 real(RKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
21713 real(RKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
21714 real(RKG) ,
intent(in) :: alpha
21715 type(lowerUnit_type) ,
intent(in) :: classB
21716 type(inversion_type) ,
intent(in) :: operationB
21721 PURE module subroutine trsm_EXP_CGMA_ONOA_CLUB_INVB_RK1(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
21722#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
21723 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CGMA_ONOA_CLUB_INVB_RK1
21726 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
21727 real(RKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
21728 real(RKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
21729 real(RKG) ,
intent(in) :: alpha
21730 type(lowerUnit_type) ,
intent(in) :: classB
21731 type(inversion_type) ,
intent(in) :: operationB
21744 PURE module subroutine trsm_EXP_CGMA_ONOA_CLUB_OTOB_CK5(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
21745#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
21746 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CGMA_ONOA_CLUB_OTOB_CK5
21749 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
21750 complex(CKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
21751 complex(CKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
21752 complex(CKG) ,
intent(in) :: alpha
21753 type(lowerUnit_type) ,
intent(in) :: classB
21754 type(transOrth_type) ,
intent(in) :: operationB
21759 PURE module subroutine trsm_EXP_CGMA_ONOA_CLUB_OTOB_CK4(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
21760#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
21761 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CGMA_ONOA_CLUB_OTOB_CK4
21764 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
21765 complex(CKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
21766 complex(CKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
21767 complex(CKG) ,
intent(in) :: alpha
21768 type(lowerUnit_type) ,
intent(in) :: classB
21769 type(transOrth_type) ,
intent(in) :: operationB
21774 PURE module subroutine trsm_EXP_CGMA_ONOA_CLUB_OTOB_CK3(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
21775#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
21776 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CGMA_ONOA_CLUB_OTOB_CK3
21779 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
21780 complex(CKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
21781 complex(CKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
21782 complex(CKG) ,
intent(in) :: alpha
21783 type(lowerUnit_type) ,
intent(in) :: classB
21784 type(transOrth_type) ,
intent(in) :: operationB
21789 PURE module subroutine trsm_EXP_CGMA_ONOA_CLUB_OTOB_CK2(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
21790#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
21791 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CGMA_ONOA_CLUB_OTOB_CK2
21794 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
21795 complex(CKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
21796 complex(CKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
21797 complex(CKG) ,
intent(in) :: alpha
21798 type(lowerUnit_type) ,
intent(in) :: classB
21799 type(transOrth_type) ,
intent(in) :: operationB
21804 PURE module subroutine trsm_EXP_CGMA_ONOA_CLUB_OTOB_CK1(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
21805#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
21806 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CGMA_ONOA_CLUB_OTOB_CK1
21809 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
21810 complex(CKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
21811 complex(CKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
21812 complex(CKG) ,
intent(in) :: alpha
21813 type(lowerUnit_type) ,
intent(in) :: classB
21814 type(transOrth_type) ,
intent(in) :: operationB
21821 PURE module subroutine trsm_EXP_CGMA_ONOA_CLUB_OTOB_RK5(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
21822#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
21823 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CGMA_ONOA_CLUB_OTOB_RK5
21826 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
21827 real(RKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
21828 real(RKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
21829 real(RKG) ,
intent(in) :: alpha
21830 type(lowerUnit_type) ,
intent(in) :: classB
21831 type(transOrth_type) ,
intent(in) :: operationB
21836 PURE module subroutine trsm_EXP_CGMA_ONOA_CLUB_OTOB_RK4(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
21837#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
21838 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CGMA_ONOA_CLUB_OTOB_RK4
21841 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
21842 real(RKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
21843 real(RKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
21844 real(RKG) ,
intent(in) :: alpha
21845 type(lowerUnit_type) ,
intent(in) :: classB
21846 type(transOrth_type) ,
intent(in) :: operationB
21851 PURE module subroutine trsm_EXP_CGMA_ONOA_CLUB_OTOB_RK3(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
21852#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
21853 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CGMA_ONOA_CLUB_OTOB_RK3
21856 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
21857 real(RKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
21858 real(RKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
21859 real(RKG) ,
intent(in) :: alpha
21860 type(lowerUnit_type) ,
intent(in) :: classB
21861 type(transOrth_type) ,
intent(in) :: operationB
21866 PURE module subroutine trsm_EXP_CGMA_ONOA_CLUB_OTOB_RK2(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
21867#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
21868 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CGMA_ONOA_CLUB_OTOB_RK2
21871 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
21872 real(RKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
21873 real(RKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
21874 real(RKG) ,
intent(in) :: alpha
21875 type(lowerUnit_type) ,
intent(in) :: classB
21876 type(transOrth_type) ,
intent(in) :: operationB
21881 PURE module subroutine trsm_EXP_CGMA_ONOA_CLUB_OTOB_RK1(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
21882#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
21883 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CGMA_ONOA_CLUB_OTOB_RK1
21886 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
21887 real(RKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
21888 real(RKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
21889 real(RKG) ,
intent(in) :: alpha
21890 type(lowerUnit_type) ,
intent(in) :: classB
21891 type(transOrth_type) ,
intent(in) :: operationB
21904 PURE module subroutine trsm_EXP_CGMA_ONOA_CLUB_OTUB_CK5(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
21905#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
21906 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CGMA_ONOA_CLUB_OTUB_CK5
21909 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
21910 complex(CKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
21911 complex(CKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
21912 complex(CKG) ,
intent(in) :: alpha
21913 type(lowerUnit_type) ,
intent(in) :: classB
21914 type(transUnit_type) ,
intent(in) :: operationB
21919 PURE module subroutine trsm_EXP_CGMA_ONOA_CLUB_OTUB_CK4(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
21920#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
21921 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CGMA_ONOA_CLUB_OTUB_CK4
21924 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
21925 complex(CKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
21926 complex(CKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
21927 complex(CKG) ,
intent(in) :: alpha
21928 type(lowerUnit_type) ,
intent(in) :: classB
21929 type(transUnit_type) ,
intent(in) :: operationB
21934 PURE module subroutine trsm_EXP_CGMA_ONOA_CLUB_OTUB_CK3(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
21935#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
21936 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CGMA_ONOA_CLUB_OTUB_CK3
21939 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
21940 complex(CKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
21941 complex(CKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
21942 complex(CKG) ,
intent(in) :: alpha
21943 type(lowerUnit_type) ,
intent(in) :: classB
21944 type(transUnit_type) ,
intent(in) :: operationB
21949 PURE module subroutine trsm_EXP_CGMA_ONOA_CLUB_OTUB_CK2(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
21950#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
21951 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CGMA_ONOA_CLUB_OTUB_CK2
21954 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
21955 complex(CKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
21956 complex(CKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
21957 complex(CKG) ,
intent(in) :: alpha
21958 type(lowerUnit_type) ,
intent(in) :: classB
21959 type(transUnit_type) ,
intent(in) :: operationB
21964 PURE module subroutine trsm_EXP_CGMA_ONOA_CLUB_OTUB_CK1(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
21965#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
21966 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CGMA_ONOA_CLUB_OTUB_CK1
21969 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
21970 complex(CKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
21971 complex(CKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
21972 complex(CKG) ,
intent(in) :: alpha
21973 type(lowerUnit_type) ,
intent(in) :: classB
21974 type(transUnit_type) ,
intent(in) :: operationB
21981 PURE module subroutine trsm_EXP_CGMA_ONOA_CLUB_OTUB_RK5(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
21982#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
21983 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CGMA_ONOA_CLUB_OTUB_RK5
21986 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
21987 real(RKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
21988 real(RKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
21989 real(RKG) ,
intent(in) :: alpha
21990 type(lowerUnit_type) ,
intent(in) :: classB
21991 type(transUnit_type) ,
intent(in) :: operationB
21996 PURE module subroutine trsm_EXP_CGMA_ONOA_CLUB_OTUB_RK4(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
21997#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
21998 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CGMA_ONOA_CLUB_OTUB_RK4
22001 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
22002 real(RKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
22003 real(RKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
22004 real(RKG) ,
intent(in) :: alpha
22005 type(lowerUnit_type) ,
intent(in) :: classB
22006 type(transUnit_type) ,
intent(in) :: operationB
22011 PURE module subroutine trsm_EXP_CGMA_ONOA_CLUB_OTUB_RK3(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
22012#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
22013 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CGMA_ONOA_CLUB_OTUB_RK3
22016 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
22017 real(RKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
22018 real(RKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
22019 real(RKG) ,
intent(in) :: alpha
22020 type(lowerUnit_type) ,
intent(in) :: classB
22021 type(transUnit_type) ,
intent(in) :: operationB
22026 PURE module subroutine trsm_EXP_CGMA_ONOA_CLUB_OTUB_RK2(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
22027#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
22028 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CGMA_ONOA_CLUB_OTUB_RK2
22031 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
22032 real(RKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
22033 real(RKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
22034 real(RKG) ,
intent(in) :: alpha
22035 type(lowerUnit_type) ,
intent(in) :: classB
22036 type(transUnit_type) ,
intent(in) :: operationB
22041 PURE module subroutine trsm_EXP_CGMA_ONOA_CLUB_OTUB_RK1(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
22042#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
22043 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CGMA_ONOA_CLUB_OTUB_RK1
22046 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
22047 real(RKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
22048 real(RKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
22049 real(RKG) ,
intent(in) :: alpha
22050 type(lowerUnit_type) ,
intent(in) :: classB
22051 type(transUnit_type) ,
intent(in) :: operationB
22068 PURE module subroutine trsm_EXP_CGMA_ONOA_CUUB_INVB_CK5(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
22069#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
22070 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CGMA_ONOA_CUUB_INVB_CK5
22073 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
22074 complex(CKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
22075 complex(CKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
22076 complex(CKG) ,
intent(in) :: alpha
22077 type(upperUnit_type) ,
intent(in) :: classB
22078 type(inversion_type) ,
intent(in) :: operationB
22083 PURE module subroutine trsm_EXP_CGMA_ONOA_CUUB_INVB_CK4(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
22084#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
22085 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CGMA_ONOA_CUUB_INVB_CK4
22088 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
22089 complex(CKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
22090 complex(CKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
22091 complex(CKG) ,
intent(in) :: alpha
22092 type(upperUnit_type) ,
intent(in) :: classB
22093 type(inversion_type) ,
intent(in) :: operationB
22098 PURE module subroutine trsm_EXP_CGMA_ONOA_CUUB_INVB_CK3(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
22099#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
22100 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CGMA_ONOA_CUUB_INVB_CK3
22103 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
22104 complex(CKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
22105 complex(CKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
22106 complex(CKG) ,
intent(in) :: alpha
22107 type(upperUnit_type) ,
intent(in) :: classB
22108 type(inversion_type) ,
intent(in) :: operationB
22113 PURE module subroutine trsm_EXP_CGMA_ONOA_CUUB_INVB_CK2(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
22114#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
22115 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CGMA_ONOA_CUUB_INVB_CK2
22118 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
22119 complex(CKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
22120 complex(CKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
22121 complex(CKG) ,
intent(in) :: alpha
22122 type(upperUnit_type) ,
intent(in) :: classB
22123 type(inversion_type) ,
intent(in) :: operationB
22128 PURE module subroutine trsm_EXP_CGMA_ONOA_CUUB_INVB_CK1(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
22129#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
22130 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CGMA_ONOA_CUUB_INVB_CK1
22133 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
22134 complex(CKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
22135 complex(CKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
22136 complex(CKG) ,
intent(in) :: alpha
22137 type(upperUnit_type) ,
intent(in) :: classB
22138 type(inversion_type) ,
intent(in) :: operationB
22145 PURE module subroutine trsm_EXP_CGMA_ONOA_CUUB_INVB_RK5(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
22146#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
22147 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CGMA_ONOA_CUUB_INVB_RK5
22150 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
22151 real(RKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
22152 real(RKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
22153 real(RKG) ,
intent(in) :: alpha
22154 type(upperUnit_type) ,
intent(in) :: classB
22155 type(inversion_type) ,
intent(in) :: operationB
22160 PURE module subroutine trsm_EXP_CGMA_ONOA_CUUB_INVB_RK4(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
22161#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
22162 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CGMA_ONOA_CUUB_INVB_RK4
22165 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
22166 real(RKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
22167 real(RKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
22168 real(RKG) ,
intent(in) :: alpha
22169 type(upperUnit_type) ,
intent(in) :: classB
22170 type(inversion_type) ,
intent(in) :: operationB
22175 PURE module subroutine trsm_EXP_CGMA_ONOA_CUUB_INVB_RK3(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
22176#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
22177 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CGMA_ONOA_CUUB_INVB_RK3
22180 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
22181 real(RKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
22182 real(RKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
22183 real(RKG) ,
intent(in) :: alpha
22184 type(upperUnit_type) ,
intent(in) :: classB
22185 type(inversion_type) ,
intent(in) :: operationB
22190 PURE module subroutine trsm_EXP_CGMA_ONOA_CUUB_INVB_RK2(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
22191#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
22192 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CGMA_ONOA_CUUB_INVB_RK2
22195 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
22196 real(RKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
22197 real(RKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
22198 real(RKG) ,
intent(in) :: alpha
22199 type(upperUnit_type) ,
intent(in) :: classB
22200 type(inversion_type) ,
intent(in) :: operationB
22205 PURE module subroutine trsm_EXP_CGMA_ONOA_CUUB_INVB_RK1(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
22206#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
22207 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CGMA_ONOA_CUUB_INVB_RK1
22210 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
22211 real(RKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
22212 real(RKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
22213 real(RKG) ,
intent(in) :: alpha
22214 type(upperUnit_type) ,
intent(in) :: classB
22215 type(inversion_type) ,
intent(in) :: operationB
22228 PURE module subroutine trsm_EXP_CGMA_ONOA_CUUB_OTOB_CK5(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
22229#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
22230 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CGMA_ONOA_CUUB_OTOB_CK5
22233 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
22234 complex(CKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
22235 complex(CKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
22236 complex(CKG) ,
intent(in) :: alpha
22237 type(upperUnit_type) ,
intent(in) :: classB
22238 type(transOrth_type) ,
intent(in) :: operationB
22243 PURE module subroutine trsm_EXP_CGMA_ONOA_CUUB_OTOB_CK4(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
22244#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
22245 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CGMA_ONOA_CUUB_OTOB_CK4
22248 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
22249 complex(CKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
22250 complex(CKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
22251 complex(CKG) ,
intent(in) :: alpha
22252 type(upperUnit_type) ,
intent(in) :: classB
22253 type(transOrth_type) ,
intent(in) :: operationB
22258 PURE module subroutine trsm_EXP_CGMA_ONOA_CUUB_OTOB_CK3(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
22259#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
22260 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CGMA_ONOA_CUUB_OTOB_CK3
22263 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
22264 complex(CKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
22265 complex(CKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
22266 complex(CKG) ,
intent(in) :: alpha
22267 type(upperUnit_type) ,
intent(in) :: classB
22268 type(transOrth_type) ,
intent(in) :: operationB
22273 PURE module subroutine trsm_EXP_CGMA_ONOA_CUUB_OTOB_CK2(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
22274#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
22275 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CGMA_ONOA_CUUB_OTOB_CK2
22278 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
22279 complex(CKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
22280 complex(CKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
22281 complex(CKG) ,
intent(in) :: alpha
22282 type(upperUnit_type) ,
intent(in) :: classB
22283 type(transOrth_type) ,
intent(in) :: operationB
22288 PURE module subroutine trsm_EXP_CGMA_ONOA_CUUB_OTOB_CK1(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
22289#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
22290 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CGMA_ONOA_CUUB_OTOB_CK1
22293 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
22294 complex(CKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
22295 complex(CKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
22296 complex(CKG) ,
intent(in) :: alpha
22297 type(upperUnit_type) ,
intent(in) :: classB
22298 type(transOrth_type) ,
intent(in) :: operationB
22305 PURE module subroutine trsm_EXP_CGMA_ONOA_CUUB_OTOB_RK5(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
22306#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
22307 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CGMA_ONOA_CUUB_OTOB_RK5
22310 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
22311 real(RKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
22312 real(RKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
22313 real(RKG) ,
intent(in) :: alpha
22314 type(upperUnit_type) ,
intent(in) :: classB
22315 type(transOrth_type) ,
intent(in) :: operationB
22320 PURE module subroutine trsm_EXP_CGMA_ONOA_CUUB_OTOB_RK4(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
22321#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
22322 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CGMA_ONOA_CUUB_OTOB_RK4
22325 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
22326 real(RKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
22327 real(RKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
22328 real(RKG) ,
intent(in) :: alpha
22329 type(upperUnit_type) ,
intent(in) :: classB
22330 type(transOrth_type) ,
intent(in) :: operationB
22335 PURE module subroutine trsm_EXP_CGMA_ONOA_CUUB_OTOB_RK3(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
22336#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
22337 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CGMA_ONOA_CUUB_OTOB_RK3
22340 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
22341 real(RKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
22342 real(RKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
22343 real(RKG) ,
intent(in) :: alpha
22344 type(upperUnit_type) ,
intent(in) :: classB
22345 type(transOrth_type) ,
intent(in) :: operationB
22350 PURE module subroutine trsm_EXP_CGMA_ONOA_CUUB_OTOB_RK2(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
22351#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
22352 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CGMA_ONOA_CUUB_OTOB_RK2
22355 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
22356 real(RKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
22357 real(RKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
22358 real(RKG) ,
intent(in) :: alpha
22359 type(upperUnit_type) ,
intent(in) :: classB
22360 type(transOrth_type) ,
intent(in) :: operationB
22365 PURE module subroutine trsm_EXP_CGMA_ONOA_CUUB_OTOB_RK1(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
22366#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
22367 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CGMA_ONOA_CUUB_OTOB_RK1
22370 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
22371 real(RKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
22372 real(RKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
22373 real(RKG) ,
intent(in) :: alpha
22374 type(upperUnit_type) ,
intent(in) :: classB
22375 type(transOrth_type) ,
intent(in) :: operationB
22388 PURE module subroutine trsm_EXP_CGMA_ONOA_CUUB_OTUB_CK5(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
22389#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
22390 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CGMA_ONOA_CUUB_OTUB_CK5
22393 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
22394 complex(CKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
22395 complex(CKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
22396 complex(CKG) ,
intent(in) :: alpha
22397 type(upperUnit_type) ,
intent(in) :: classB
22398 type(transUnit_type) ,
intent(in) :: operationB
22403 PURE module subroutine trsm_EXP_CGMA_ONOA_CUUB_OTUB_CK4(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
22404#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
22405 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CGMA_ONOA_CUUB_OTUB_CK4
22408 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
22409 complex(CKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
22410 complex(CKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
22411 complex(CKG) ,
intent(in) :: alpha
22412 type(upperUnit_type) ,
intent(in) :: classB
22413 type(transUnit_type) ,
intent(in) :: operationB
22418 PURE module subroutine trsm_EXP_CGMA_ONOA_CUUB_OTUB_CK3(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
22419#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
22420 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CGMA_ONOA_CUUB_OTUB_CK3
22423 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
22424 complex(CKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
22425 complex(CKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
22426 complex(CKG) ,
intent(in) :: alpha
22427 type(upperUnit_type) ,
intent(in) :: classB
22428 type(transUnit_type) ,
intent(in) :: operationB
22433 PURE module subroutine trsm_EXP_CGMA_ONOA_CUUB_OTUB_CK2(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
22434#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
22435 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CGMA_ONOA_CUUB_OTUB_CK2
22438 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
22439 complex(CKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
22440 complex(CKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
22441 complex(CKG) ,
intent(in) :: alpha
22442 type(upperUnit_type) ,
intent(in) :: classB
22443 type(transUnit_type) ,
intent(in) :: operationB
22448 PURE module subroutine trsm_EXP_CGMA_ONOA_CUUB_OTUB_CK1(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
22449#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
22450 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CGMA_ONOA_CUUB_OTUB_CK1
22453 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
22454 complex(CKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
22455 complex(CKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
22456 complex(CKG) ,
intent(in) :: alpha
22457 type(upperUnit_type) ,
intent(in) :: classB
22458 type(transUnit_type) ,
intent(in) :: operationB
22465 PURE module subroutine trsm_EXP_CGMA_ONOA_CUUB_OTUB_RK5(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
22466#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
22467 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CGMA_ONOA_CUUB_OTUB_RK5
22470 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
22471 real(RKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
22472 real(RKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
22473 real(RKG) ,
intent(in) :: alpha
22474 type(upperUnit_type) ,
intent(in) :: classB
22475 type(transUnit_type) ,
intent(in) :: operationB
22480 PURE module subroutine trsm_EXP_CGMA_ONOA_CUUB_OTUB_RK4(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
22481#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
22482 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CGMA_ONOA_CUUB_OTUB_RK4
22485 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
22486 real(RKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
22487 real(RKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
22488 real(RKG) ,
intent(in) :: alpha
22489 type(upperUnit_type) ,
intent(in) :: classB
22490 type(transUnit_type) ,
intent(in) :: operationB
22495 PURE module subroutine trsm_EXP_CGMA_ONOA_CUUB_OTUB_RK3(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
22496#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
22497 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CGMA_ONOA_CUUB_OTUB_RK3
22500 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
22501 real(RKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
22502 real(RKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
22503 real(RKG) ,
intent(in) :: alpha
22504 type(upperUnit_type) ,
intent(in) :: classB
22505 type(transUnit_type) ,
intent(in) :: operationB
22510 PURE module subroutine trsm_EXP_CGMA_ONOA_CUUB_OTUB_RK2(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
22511#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
22512 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CGMA_ONOA_CUUB_OTUB_RK2
22515 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
22516 real(RKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
22517 real(RKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
22518 real(RKG) ,
intent(in) :: alpha
22519 type(upperUnit_type) ,
intent(in) :: classB
22520 type(transUnit_type) ,
intent(in) :: operationB
22525 PURE module subroutine trsm_EXP_CGMA_ONOA_CUUB_OTUB_RK1(matA, matB, classB, operationB, alpha, nrow, ncol, roffA, coffA, roffB, coffB)
22526#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
22527 !DEC$ ATTRIBUTES DLLEXPORT :: trsm_EXP_CGMA_ONOA_CUUB_OTUB_RK1
22530 integer(IK) ,
intent(in) :: nrow, ncol, roffA, coffA, roffB, coffB
22531 real(RKG) ,
intent(inout) ,
contiguous :: matA(
1 - roffA :,
1 - coffA :)
22532 real(RKG) ,
intent(in) ,
contiguous :: matB(
1 - roffB :,
1 - coffB :)
22533 real(RKG) ,
intent(in) :: alpha
22534 type(upperUnit_type) ,
intent(in) :: classB
22535 type(transUnit_type) ,
intent(in) :: operationB
Return the matrix solution to the system of linear equations with a triangular coefficient matrix .
This module contains abstract and concrete derived types that are required for compile-time resolutio...
character(*, SK), parameter MODULE_NAME
type(nothing_type), parameter nothing
This is a scalar parameter object of type nothing_type that is exclusively used to request no action ...
This module defines the relevant Fortran kind type-parameters frequently used in the ParaMonte librar...
integer, parameter LK
The default logical kind in the ParaMonte library: kind(.true.) in Fortran, kind(....
integer, parameter IK
The default integer kind in the ParaMonte library: int32 in Fortran, c_int32_t in C-Fortran Interoper...
integer, parameter SK
The default character kind in the ParaMonte library: kind("a") in Fortran, c_char in C-Fortran Intero...
This module contains abstract and concrete derived types that are required for compile-time resolutio...
type(lowerUnit_type), parameter lowerUnit
This is a scalar parameter object of type upperUnit_type that is exclusively used to signify the lowe...
type(upperUnit_type), parameter upperUnit
This is a scalar parameter object of type upperUnit_type that is exclusively used to signify the uppe...
type(upperDiag_type), parameter upperDiag
This is a scalar parameter object of type upperDiag_type that is exclusively used to signify the uppe...
type(lowerDiag_type), parameter lowerDiag
This is a scalar parameter object of type lowerDiag_type that is exclusively used to signify the lowe...
This module contains abstract and concrete derived types and procedures related to the inversion of s...
type(inversion_type), parameter inversion
This is a scalar parameter object of type inversion_type that is exclusively used to request no trans...
This module contains the procedures for multiplication of a square triangular matrix in various trans...
This module contains abstract and concrete derived types and procedures related to various common mat...
type(transOrth_type), parameter transOrth
This is a scalar parameter object of type transOrth_type that is exclusively used to request Orthogon...
type(transSymm_type), parameter transSymm
This is a scalar parameter object of type transSymm_type that is exclusively used to request Symmetri...
type(transUnit_type), parameter transUnit
This is a scalar parameter object of type transUnit_type that is exclusively used to request Unitary ...
type(transHerm_type), parameter transHerm
This is a scalar parameter object of type transHerm_type that is exclusively used to request Hermitia...
This is a concrete derived type whose instances are exclusively used to request no action on a given ...
This is a concrete derived type whose instances are exclusively used to signify the lower-diagonal tr...
This is a concrete derived type whose instances are exclusively used to signify the lower-unit-diagon...
This is a concrete derived type whose instances are exclusively used to signify the upper-diagonal tr...
This is a concrete derived type whose instances are exclusively used to signify the upper-unit-diagon...
This is a concrete derived type whose instances are exclusively used to request inversion operation o...
This is a concrete derived type whose instances are exclusively used to request Hermitian (conjugate)...
This is a concrete derived type whose instances are exclusively used to request Orthogonal Transpose ...
This is a concrete derived type whose instances are exclusively used to request Symmetric transpose (...
This is a concrete derived type whose instances are exclusively used to request Unitary Transpose ( )...