118#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
119 !DIR$ ATTRIBUTES DLLEXPORT ::
isort
123#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
124 !DIR$ ATTRIBUTES DLLEXPORT ::
qsorti
127#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
128 !DIR$ ATTRIBUTES DLLEXPORT ::
qsortr
131#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
132 !DIR$ ATTRIBUTES DLLEXPORT ::
qsortrdp
135#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
136 !DIR$ ATTRIBUTES DLLEXPORT ::
bubble
139#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
140 !DIR$ ATTRIBUTES DLLEXPORT ::
heapi
143#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
144 !DIR$ ATTRIBUTES DLLEXPORT ::
heapr
147#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
151#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
155#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
156 !DIR$ ATTRIBUTES DLLEXPORT ::
merger
159#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
163#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
164 !DIR$ ATTRIBUTES DLLEXPORT ::
shell
240 PURE module function isAscendingAllDefCom_D0_SK5(array)
result(ascendingAll)
241#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
242 !DEC$ ATTRIBUTES DLLEXPORT :: isAscendingAllDefCom_D0_SK5
245 character(
*,SKG) ,
intent(in) :: array
246 logical(LK) :: ascendingAll
251 PURE module function isAscendingAllDefCom_D0_SK4(array)
result(ascendingAll)
252#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
253 !DEC$ ATTRIBUTES DLLEXPORT :: isAscendingAllDefCom_D0_SK4
256 character(
*,SKG) ,
intent(in) :: array
257 logical(LK) :: ascendingAll
262 PURE module function isAscendingAllDefCom_D0_SK3(array)
result(ascendingAll)
263#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
264 !DEC$ ATTRIBUTES DLLEXPORT :: isAscendingAllDefCom_D0_SK3
267 character(
*,SKG) ,
intent(in) :: array
268 logical(LK) :: ascendingAll
273 PURE module function isAscendingAllDefCom_D0_SK2(array)
result(ascendingAll)
274#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
275 !DEC$ ATTRIBUTES DLLEXPORT :: isAscendingAllDefCom_D0_SK2
278 character(
*,SKG) ,
intent(in) :: array
279 logical(LK) :: ascendingAll
284 PURE module function isAscendingAllDefCom_D0_SK1(array)
result(ascendingAll)
285#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
286 !DEC$ ATTRIBUTES DLLEXPORT :: isAscendingAllDefCom_D0_SK1
289 character(
*,SKG) ,
intent(in) :: array
290 logical(LK) :: ascendingAll
297 PURE module function isAscendingAllDefCom_D1_SK5(array)
result(ascendingAll)
298#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
299 !DEC$ ATTRIBUTES DLLEXPORT :: isAscendingAllDefCom_D1_SK5
302 character(
*,SKG) ,
intent(in) ,
contiguous :: array(:)
303 logical(LK) :: ascendingAll
308 PURE module function isAscendingAllDefCom_D1_SK4(array)
result(ascendingAll)
309#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
310 !DEC$ ATTRIBUTES DLLEXPORT :: isAscendingAllDefCom_D1_SK4
313 character(
*,SKG) ,
intent(in) ,
contiguous :: array(:)
314 logical(LK) :: ascendingAll
319 PURE module function isAscendingAllDefCom_D1_SK3(array)
result(ascendingAll)
320#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
321 !DEC$ ATTRIBUTES DLLEXPORT :: isAscendingAllDefCom_D1_SK3
324 character(
*,SKG) ,
intent(in) ,
contiguous :: array(:)
325 logical(LK) :: ascendingAll
330 PURE module function isAscendingAllDefCom_D1_SK2(array)
result(ascendingAll)
331#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
332 !DEC$ ATTRIBUTES DLLEXPORT :: isAscendingAllDefCom_D1_SK2
335 character(
*,SKG) ,
intent(in) ,
contiguous :: array(:)
336 logical(LK) :: ascendingAll
341 PURE module function isAscendingAllDefCom_D1_SK1(array)
result(ascendingAll)
342#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
343 !DEC$ ATTRIBUTES DLLEXPORT :: isAscendingAllDefCom_D1_SK1
346 character(
*,SKG) ,
intent(in) ,
contiguous :: array(:)
347 logical(LK) :: ascendingAll
354 PURE module function isAscendingAllDefCom_D1_IK5(array)
result(ascendingAll)
355#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
356 !DEC$ ATTRIBUTES DLLEXPORT :: isAscendingAllDefCom_D1_IK5
359 integer(IKG) ,
intent(in) ,
contiguous :: array(:)
360 logical(LK) :: ascendingAll
365 PURE module function isAscendingAllDefCom_D1_IK4(array)
result(ascendingAll)
366#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
367 !DEC$ ATTRIBUTES DLLEXPORT :: isAscendingAllDefCom_D1_IK4
370 integer(IKG) ,
intent(in) ,
contiguous :: array(:)
371 logical(LK) :: ascendingAll
376 PURE module function isAscendingAllDefCom_D1_IK3(array)
result(ascendingAll)
377#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
378 !DEC$ ATTRIBUTES DLLEXPORT :: isAscendingAllDefCom_D1_IK3
381 integer(IKG) ,
intent(in) ,
contiguous :: array(:)
382 logical(LK) :: ascendingAll
387 PURE module function isAscendingAllDefCom_D1_IK2(array)
result(ascendingAll)
388#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
389 !DEC$ ATTRIBUTES DLLEXPORT :: isAscendingAllDefCom_D1_IK2
392 integer(IKG) ,
intent(in) ,
contiguous :: array(:)
393 logical(LK) :: ascendingAll
398 PURE module function isAscendingAllDefCom_D1_IK1(array)
result(ascendingAll)
399#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
400 !DEC$ ATTRIBUTES DLLEXPORT :: isAscendingAllDefCom_D1_IK1
403 integer(IKG) ,
intent(in) ,
contiguous :: array(:)
404 logical(LK) :: ascendingAll
411 PURE module function isAscendingAllDefCom_D1_LK5(array)
result(ascendingAll)
412#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
413 !DEC$ ATTRIBUTES DLLEXPORT :: isAscendingAllDefCom_D1_LK5
416 logical(LKG) ,
intent(in) ,
contiguous :: array(:)
417 logical(LK) :: ascendingAll
422 PURE module function isAscendingAllDefCom_D1_LK4(array)
result(ascendingAll)
423#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
424 !DEC$ ATTRIBUTES DLLEXPORT :: isAscendingAllDefCom_D1_LK4
427 logical(LKG) ,
intent(in) ,
contiguous :: array(:)
428 logical(LK) :: ascendingAll
433 PURE module function isAscendingAllDefCom_D1_LK3(array)
result(ascendingAll)
434#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
435 !DEC$ ATTRIBUTES DLLEXPORT :: isAscendingAllDefCom_D1_LK3
438 logical(LKG) ,
intent(in) ,
contiguous :: array(:)
439 logical(LK) :: ascendingAll
444 PURE module function isAscendingAllDefCom_D1_LK2(array)
result(ascendingAll)
445#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
446 !DEC$ ATTRIBUTES DLLEXPORT :: isAscendingAllDefCom_D1_LK2
449 logical(LKG) ,
intent(in) ,
contiguous :: array(:)
450 logical(LK) :: ascendingAll
455 PURE module function isAscendingAllDefCom_D1_LK1(array)
result(ascendingAll)
456#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
457 !DEC$ ATTRIBUTES DLLEXPORT :: isAscendingAllDefCom_D1_LK1
460 logical(LKG) ,
intent(in) ,
contiguous :: array(:)
461 logical(LK) :: ascendingAll
468 PURE module function isAscendingAllDefCom_D1_RK5(array)
result(ascendingAll)
469#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
470 !DEC$ ATTRIBUTES DLLEXPORT :: isAscendingAllDefCom_D1_RK5
473 real(RKG) ,
intent(in) ,
contiguous :: array(:)
474 logical(LK) :: ascendingAll
479 PURE module function isAscendingAllDefCom_D1_RK4(array)
result(ascendingAll)
480#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
481 !DEC$ ATTRIBUTES DLLEXPORT :: isAscendingAllDefCom_D1_RK4
484 real(RKG) ,
intent(in) ,
contiguous :: array(:)
485 logical(LK) :: ascendingAll
490 PURE module function isAscendingAllDefCom_D1_RK3(array)
result(ascendingAll)
491#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
492 !DEC$ ATTRIBUTES DLLEXPORT :: isAscendingAllDefCom_D1_RK3
495 real(RKG) ,
intent(in) ,
contiguous :: array(:)
496 logical(LK) :: ascendingAll
501 PURE module function isAscendingAllDefCom_D1_RK2(array)
result(ascendingAll)
502#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
503 !DEC$ ATTRIBUTES DLLEXPORT :: isAscendingAllDefCom_D1_RK2
506 real(RKG) ,
intent(in) ,
contiguous :: array(:)
507 logical(LK) :: ascendingAll
512 PURE module function isAscendingAllDefCom_D1_RK1(array)
result(ascendingAll)
513#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
514 !DEC$ ATTRIBUTES DLLEXPORT :: isAscendingAllDefCom_D1_RK1
517 real(RKG) ,
intent(in) ,
contiguous :: array(:)
518 logical(LK) :: ascendingAll
525 PURE module function isAscendingAllDefCom_D1_CK5(array)
result(ascendingAll)
526#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
527 !DEC$ ATTRIBUTES DLLEXPORT :: isAscendingAllDefCom_D1_CK5
530 complex(CKG) ,
intent(in) ,
contiguous :: array(:)
531 logical(LK) :: ascendingAll
536 PURE module function isAscendingAllDefCom_D1_CK4(array)
result(ascendingAll)
537#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
538 !DEC$ ATTRIBUTES DLLEXPORT :: isAscendingAllDefCom_D1_CK4
541 complex(CKG) ,
intent(in) ,
contiguous :: array(:)
542 logical(LK) :: ascendingAll
547 PURE module function isAscendingAllDefCom_D1_CK3(array)
result(ascendingAll)
548#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
549 !DEC$ ATTRIBUTES DLLEXPORT :: isAscendingAllDefCom_D1_CK3
552 complex(CKG) ,
intent(in) ,
contiguous :: array(:)
553 logical(LK) :: ascendingAll
558 PURE module function isAscendingAllDefCom_D1_CK2(array)
result(ascendingAll)
559#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
560 !DEC$ ATTRIBUTES DLLEXPORT :: isAscendingAllDefCom_D1_CK2
563 complex(CKG) ,
intent(in) ,
contiguous :: array(:)
564 logical(LK) :: ascendingAll
569 PURE module function isAscendingAllDefCom_D1_CK1(array)
result(ascendingAll)
570#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
571 !DEC$ ATTRIBUTES DLLEXPORT :: isAscendingAllDefCom_D1_CK1
574 complex(CKG) ,
intent(in) ,
contiguous :: array(:)
575 logical(LK) :: ascendingAll
584 PURE module function isAscendingAllDefCom_D1_PSSK5(array)
result(ascendingAll)
585#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
586 !DEC$ ATTRIBUTES DLLEXPORT :: isAscendingAllDefCom_D1_PSSK5
590 type(css_pdt(SKG)) ,
intent(in) ,
contiguous :: array(:)
591 logical(LK) :: ascendingAll
596 PURE module function isAscendingAllDefCom_D1_PSSK4(array)
result(ascendingAll)
597#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
598 !DEC$ ATTRIBUTES DLLEXPORT :: isAscendingAllDefCom_D1_PSSK4
602 type(css_pdt(SKG)) ,
intent(in) ,
contiguous :: array(:)
603 logical(LK) :: ascendingAll
608 PURE module function isAscendingAllDefCom_D1_PSSK3(array)
result(ascendingAll)
609#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
610 !DEC$ ATTRIBUTES DLLEXPORT :: isAscendingAllDefCom_D1_PSSK3
614 type(css_pdt(SKG)) ,
intent(in) ,
contiguous :: array(:)
615 logical(LK) :: ascendingAll
620 PURE module function isAscendingAllDefCom_D1_PSSK2(array)
result(ascendingAll)
621#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
622 !DEC$ ATTRIBUTES DLLEXPORT :: isAscendingAllDefCom_D1_PSSK2
626 type(css_pdt(SKG)) ,
intent(in) ,
contiguous :: array(:)
627 logical(LK) :: ascendingAll
632 PURE module function isAscendingAllDefCom_D1_PSSK1(array)
result(ascendingAll)
633#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
634 !DEC$ ATTRIBUTES DLLEXPORT :: isAscendingAllDefCom_D1_PSSK1
638 type(css_pdt(SKG)) ,
intent(in) ,
contiguous :: array(:)
639 logical(LK) :: ascendingAll
648 PURE module function isAscendingAllDefCom_D1_BSSK(array)
result(ascendingAll)
649#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
650 !DEC$ ATTRIBUTES DLLEXPORT :: isAscendingAllDefCom_D1_BSSK
654 type(css_type) ,
intent(in) ,
contiguous :: array(:)
655 logical(LK) :: ascendingAll
739 PURE module function isDescendingAllDefCom_D0_SK5(array)
result(descendingAll)
740#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
741 !DEC$ ATTRIBUTES DLLEXPORT :: isDescendingAllDefCom_D0_SK5
744 character(
*,SKG) ,
intent(in) :: array
745 logical(LK) :: descendingAll
750 PURE module function isDescendingAllDefCom_D0_SK4(array)
result(descendingAll)
751#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
752 !DEC$ ATTRIBUTES DLLEXPORT :: isDescendingAllDefCom_D0_SK4
755 character(
*,SKG) ,
intent(in) :: array
756 logical(LK) :: descendingAll
761 PURE module function isDescendingAllDefCom_D0_SK3(array)
result(descendingAll)
762#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
763 !DEC$ ATTRIBUTES DLLEXPORT :: isDescendingAllDefCom_D0_SK3
766 character(
*,SKG) ,
intent(in) :: array
767 logical(LK) :: descendingAll
772 PURE module function isDescendingAllDefCom_D0_SK2(array)
result(descendingAll)
773#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
774 !DEC$ ATTRIBUTES DLLEXPORT :: isDescendingAllDefCom_D0_SK2
777 character(
*,SKG) ,
intent(in) :: array
778 logical(LK) :: descendingAll
783 PURE module function isDescendingAllDefCom_D0_SK1(array)
result(descendingAll)
784#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
785 !DEC$ ATTRIBUTES DLLEXPORT :: isDescendingAllDefCom_D0_SK1
788 character(
*,SKG) ,
intent(in) :: array
789 logical(LK) :: descendingAll
796 PURE module function isDescendingAllDefCom_D1_SK5(array)
result(descendingAll)
797#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
798 !DEC$ ATTRIBUTES DLLEXPORT :: isDescendingAllDefCom_D1_SK5
801 character(
*,SKG) ,
intent(in) ,
contiguous :: array(:)
802 logical(LK) :: descendingAll
807 PURE module function isDescendingAllDefCom_D1_SK4(array)
result(descendingAll)
808#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
809 !DEC$ ATTRIBUTES DLLEXPORT :: isDescendingAllDefCom_D1_SK4
812 character(
*,SKG) ,
intent(in) ,
contiguous :: array(:)
813 logical(LK) :: descendingAll
818 PURE module function isDescendingAllDefCom_D1_SK3(array)
result(descendingAll)
819#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
820 !DEC$ ATTRIBUTES DLLEXPORT :: isDescendingAllDefCom_D1_SK3
823 character(
*,SKG) ,
intent(in) ,
contiguous :: array(:)
824 logical(LK) :: descendingAll
829 PURE module function isDescendingAllDefCom_D1_SK2(array)
result(descendingAll)
830#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
831 !DEC$ ATTRIBUTES DLLEXPORT :: isDescendingAllDefCom_D1_SK2
834 character(
*,SKG) ,
intent(in) ,
contiguous :: array(:)
835 logical(LK) :: descendingAll
840 PURE module function isDescendingAllDefCom_D1_SK1(array)
result(descendingAll)
841#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
842 !DEC$ ATTRIBUTES DLLEXPORT :: isDescendingAllDefCom_D1_SK1
845 character(
*,SKG) ,
intent(in) ,
contiguous :: array(:)
846 logical(LK) :: descendingAll
853 PURE module function isDescendingAllDefCom_D1_IK5(array)
result(descendingAll)
854#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
855 !DEC$ ATTRIBUTES DLLEXPORT :: isDescendingAllDefCom_D1_IK5
858 integer(IKG) ,
intent(in) ,
contiguous :: array(:)
859 logical(LK) :: descendingAll
864 PURE module function isDescendingAllDefCom_D1_IK4(array)
result(descendingAll)
865#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
866 !DEC$ ATTRIBUTES DLLEXPORT :: isDescendingAllDefCom_D1_IK4
869 integer(IKG) ,
intent(in) ,
contiguous :: array(:)
870 logical(LK) :: descendingAll
875 PURE module function isDescendingAllDefCom_D1_IK3(array)
result(descendingAll)
876#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
877 !DEC$ ATTRIBUTES DLLEXPORT :: isDescendingAllDefCom_D1_IK3
880 integer(IKG) ,
intent(in) ,
contiguous :: array(:)
881 logical(LK) :: descendingAll
886 PURE module function isDescendingAllDefCom_D1_IK2(array)
result(descendingAll)
887#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
888 !DEC$ ATTRIBUTES DLLEXPORT :: isDescendingAllDefCom_D1_IK2
891 integer(IKG) ,
intent(in) ,
contiguous :: array(:)
892 logical(LK) :: descendingAll
897 PURE module function isDescendingAllDefCom_D1_IK1(array)
result(descendingAll)
898#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
899 !DEC$ ATTRIBUTES DLLEXPORT :: isDescendingAllDefCom_D1_IK1
902 integer(IKG) ,
intent(in) ,
contiguous :: array(:)
903 logical(LK) :: descendingAll
910 PURE module function isDescendingAllDefCom_D1_LK5(array)
result(descendingAll)
911#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
912 !DEC$ ATTRIBUTES DLLEXPORT :: isDescendingAllDefCom_D1_LK5
915 logical(LKG) ,
intent(in) ,
contiguous :: array(:)
916 logical(LK) :: descendingAll
921 PURE module function isDescendingAllDefCom_D1_LK4(array)
result(descendingAll)
922#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
923 !DEC$ ATTRIBUTES DLLEXPORT :: isDescendingAllDefCom_D1_LK4
926 logical(LKG) ,
intent(in) ,
contiguous :: array(:)
927 logical(LK) :: descendingAll
932 PURE module function isDescendingAllDefCom_D1_LK3(array)
result(descendingAll)
933#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
934 !DEC$ ATTRIBUTES DLLEXPORT :: isDescendingAllDefCom_D1_LK3
937 logical(LKG) ,
intent(in) ,
contiguous :: array(:)
938 logical(LK) :: descendingAll
943 PURE module function isDescendingAllDefCom_D1_LK2(array)
result(descendingAll)
944#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
945 !DEC$ ATTRIBUTES DLLEXPORT :: isDescendingAllDefCom_D1_LK2
948 logical(LKG) ,
intent(in) ,
contiguous :: array(:)
949 logical(LK) :: descendingAll
954 PURE module function isDescendingAllDefCom_D1_LK1(array)
result(descendingAll)
955#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
956 !DEC$ ATTRIBUTES DLLEXPORT :: isDescendingAllDefCom_D1_LK1
959 logical(LKG) ,
intent(in) ,
contiguous :: array(:)
960 logical(LK) :: descendingAll
967 PURE module function isDescendingAllDefCom_D1_RK5(array)
result(descendingAll)
968#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
969 !DEC$ ATTRIBUTES DLLEXPORT :: isDescendingAllDefCom_D1_RK5
972 real(RKG) ,
intent(in) ,
contiguous :: array(:)
973 logical(LK) :: descendingAll
978 PURE module function isDescendingAllDefCom_D1_RK4(array)
result(descendingAll)
979#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
980 !DEC$ ATTRIBUTES DLLEXPORT :: isDescendingAllDefCom_D1_RK4
983 real(RKG) ,
intent(in) ,
contiguous :: array(:)
984 logical(LK) :: descendingAll
989 PURE module function isDescendingAllDefCom_D1_RK3(array)
result(descendingAll)
990#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
991 !DEC$ ATTRIBUTES DLLEXPORT :: isDescendingAllDefCom_D1_RK3
994 real(RKG) ,
intent(in) ,
contiguous :: array(:)
995 logical(LK) :: descendingAll
1000 PURE module function isDescendingAllDefCom_D1_RK2(array)
result(descendingAll)
1001#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1002 !DEC$ ATTRIBUTES DLLEXPORT :: isDescendingAllDefCom_D1_RK2
1005 real(RKG) ,
intent(in) ,
contiguous :: array(:)
1006 logical(LK) :: descendingAll
1011 PURE module function isDescendingAllDefCom_D1_RK1(array)
result(descendingAll)
1012#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1013 !DEC$ ATTRIBUTES DLLEXPORT :: isDescendingAllDefCom_D1_RK1
1016 real(RKG) ,
intent(in) ,
contiguous :: array(:)
1017 logical(LK) :: descendingAll
1024 PURE module function isDescendingAllDefCom_D1_CK5(array)
result(descendingAll)
1025#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1026 !DEC$ ATTRIBUTES DLLEXPORT :: isDescendingAllDefCom_D1_CK5
1029 complex(CKG) ,
intent(in) ,
contiguous :: array(:)
1030 logical(LK) :: descendingAll
1035 PURE module function isDescendingAllDefCom_D1_CK4(array)
result(descendingAll)
1036#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1037 !DEC$ ATTRIBUTES DLLEXPORT :: isDescendingAllDefCom_D1_CK4
1040 complex(CKG) ,
intent(in) ,
contiguous :: array(:)
1041 logical(LK) :: descendingAll
1046 PURE module function isDescendingAllDefCom_D1_CK3(array)
result(descendingAll)
1047#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1048 !DEC$ ATTRIBUTES DLLEXPORT :: isDescendingAllDefCom_D1_CK3
1051 complex(CKG) ,
intent(in) ,
contiguous :: array(:)
1052 logical(LK) :: descendingAll
1057 PURE module function isDescendingAllDefCom_D1_CK2(array)
result(descendingAll)
1058#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1059 !DEC$ ATTRIBUTES DLLEXPORT :: isDescendingAllDefCom_D1_CK2
1062 complex(CKG) ,
intent(in) ,
contiguous :: array(:)
1063 logical(LK) :: descendingAll
1068 PURE module function isDescendingAllDefCom_D1_CK1(array)
result(descendingAll)
1069#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1070 !DEC$ ATTRIBUTES DLLEXPORT :: isDescendingAllDefCom_D1_CK1
1073 complex(CKG) ,
intent(in) ,
contiguous :: array(:)
1074 logical(LK) :: descendingAll
1083 PURE module function isDescendingAllDefCom_D1_PSSK5(array)
result(descendingAll)
1084#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1085 !DEC$ ATTRIBUTES DLLEXPORT :: isDescendingAllDefCom_D1_PSSK5
1089 type(css_pdt(SKG)) ,
intent(in) ,
contiguous :: array(:)
1090 logical(LK) :: descendingAll
1095 PURE module function isDescendingAllDefCom_D1_PSSK4(array)
result(descendingAll)
1096#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1097 !DEC$ ATTRIBUTES DLLEXPORT :: isDescendingAllDefCom_D1_PSSK4
1101 type(css_pdt(SKG)) ,
intent(in) ,
contiguous :: array(:)
1102 logical(LK) :: descendingAll
1107 PURE module function isDescendingAllDefCom_D1_PSSK3(array)
result(descendingAll)
1108#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1109 !DEC$ ATTRIBUTES DLLEXPORT :: isDescendingAllDefCom_D1_PSSK3
1113 type(css_pdt(SKG)) ,
intent(in) ,
contiguous :: array(:)
1114 logical(LK) :: descendingAll
1119 PURE module function isDescendingAllDefCom_D1_PSSK2(array)
result(descendingAll)
1120#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1121 !DEC$ ATTRIBUTES DLLEXPORT :: isDescendingAllDefCom_D1_PSSK2
1125 type(css_pdt(SKG)) ,
intent(in) ,
contiguous :: array(:)
1126 logical(LK) :: descendingAll
1131 PURE module function isDescendingAllDefCom_D1_PSSK1(array)
result(descendingAll)
1132#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1133 !DEC$ ATTRIBUTES DLLEXPORT :: isDescendingAllDefCom_D1_PSSK1
1137 type(css_pdt(SKG)) ,
intent(in) ,
contiguous :: array(:)
1138 logical(LK) :: descendingAll
1147 PURE module function isDescendingAllDefCom_D1_BSSK(array)
result(descendingAll)
1148#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1149 !DEC$ ATTRIBUTES DLLEXPORT :: isDescendingAllDefCom_D1_BSSK
1153 type(css_type) ,
intent(in) ,
contiguous :: array(:)
1154 logical(LK) :: descendingAll
1238 PURE module function isAscendingDefCom_D0_SK5(array)
result(ascending)
1239#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1240 !DEC$ ATTRIBUTES DLLEXPORT :: isAscendingDefCom_D0_SK5
1243 character(
*,SKG) ,
intent(in) :: array
1244 logical(LK) :: ascending
1249 PURE module function isAscendingDefCom_D0_SK4(array)
result(ascending)
1250#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1251 !DEC$ ATTRIBUTES DLLEXPORT :: isAscendingDefCom_D0_SK4
1254 character(
*,SKG) ,
intent(in) :: array
1255 logical(LK) :: ascending
1260 PURE module function isAscendingDefCom_D0_SK3(array)
result(ascending)
1261#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1262 !DEC$ ATTRIBUTES DLLEXPORT :: isAscendingDefCom_D0_SK3
1265 character(
*,SKG) ,
intent(in) :: array
1266 logical(LK) :: ascending
1271 PURE module function isAscendingDefCom_D0_SK2(array)
result(ascending)
1272#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1273 !DEC$ ATTRIBUTES DLLEXPORT :: isAscendingDefCom_D0_SK2
1276 character(
*,SKG) ,
intent(in) :: array
1277 logical(LK) :: ascending
1282 PURE module function isAscendingDefCom_D0_SK1(array)
result(ascending)
1283#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1284 !DEC$ ATTRIBUTES DLLEXPORT :: isAscendingDefCom_D0_SK1
1287 character(
*,SKG) ,
intent(in) :: array
1288 logical(LK) :: ascending
1295 PURE module function isAscendingDefCom_D1_SK5(array)
result(ascending)
1296#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1297 !DEC$ ATTRIBUTES DLLEXPORT :: isAscendingDefCom_D1_SK5
1300 character(
*,SKG) ,
intent(in) ,
contiguous :: array(:)
1301 logical(LK) :: ascending
1306 PURE module function isAscendingDefCom_D1_SK4(array)
result(ascending)
1307#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1308 !DEC$ ATTRIBUTES DLLEXPORT :: isAscendingDefCom_D1_SK4
1311 character(
*,SKG) ,
intent(in) ,
contiguous :: array(:)
1312 logical(LK) :: ascending
1317 PURE module function isAscendingDefCom_D1_SK3(array)
result(ascending)
1318#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1319 !DEC$ ATTRIBUTES DLLEXPORT :: isAscendingDefCom_D1_SK3
1322 character(
*,SKG) ,
intent(in) ,
contiguous :: array(:)
1323 logical(LK) :: ascending
1328 PURE module function isAscendingDefCom_D1_SK2(array)
result(ascending)
1329#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1330 !DEC$ ATTRIBUTES DLLEXPORT :: isAscendingDefCom_D1_SK2
1333 character(
*,SKG) ,
intent(in) ,
contiguous :: array(:)
1334 logical(LK) :: ascending
1339 PURE module function isAscendingDefCom_D1_SK1(array)
result(ascending)
1340#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1341 !DEC$ ATTRIBUTES DLLEXPORT :: isAscendingDefCom_D1_SK1
1344 character(
*,SKG) ,
intent(in) ,
contiguous :: array(:)
1345 logical(LK) :: ascending
1352 PURE module function isAscendingDefCom_D1_IK5(array)
result(ascending)
1353#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1354 !DEC$ ATTRIBUTES DLLEXPORT :: isAscendingDefCom_D1_IK5
1357 integer(IKG) ,
intent(in) ,
contiguous :: array(:)
1358 logical(LK) :: ascending
1363 PURE module function isAscendingDefCom_D1_IK4(array)
result(ascending)
1364#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1365 !DEC$ ATTRIBUTES DLLEXPORT :: isAscendingDefCom_D1_IK4
1368 integer(IKG) ,
intent(in) ,
contiguous :: array(:)
1369 logical(LK) :: ascending
1374 PURE module function isAscendingDefCom_D1_IK3(array)
result(ascending)
1375#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1376 !DEC$ ATTRIBUTES DLLEXPORT :: isAscendingDefCom_D1_IK3
1379 integer(IKG) ,
intent(in) ,
contiguous :: array(:)
1380 logical(LK) :: ascending
1385 PURE module function isAscendingDefCom_D1_IK2(array)
result(ascending)
1386#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1387 !DEC$ ATTRIBUTES DLLEXPORT :: isAscendingDefCom_D1_IK2
1390 integer(IKG) ,
intent(in) ,
contiguous :: array(:)
1391 logical(LK) :: ascending
1396 PURE module function isAscendingDefCom_D1_IK1(array)
result(ascending)
1397#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1398 !DEC$ ATTRIBUTES DLLEXPORT :: isAscendingDefCom_D1_IK1
1401 integer(IKG) ,
intent(in) ,
contiguous :: array(:)
1402 logical(LK) :: ascending
1409 PURE module function isAscendingDefCom_D1_LK5(array)
result(ascending)
1410#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1411 !DEC$ ATTRIBUTES DLLEXPORT :: isAscendingDefCom_D1_LK5
1414 logical(LKG) ,
intent(in) ,
contiguous :: array(:)
1415 logical(LK) :: ascending
1420 PURE module function isAscendingDefCom_D1_LK4(array)
result(ascending)
1421#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1422 !DEC$ ATTRIBUTES DLLEXPORT :: isAscendingDefCom_D1_LK4
1425 logical(LKG) ,
intent(in) ,
contiguous :: array(:)
1426 logical(LK) :: ascending
1431 PURE module function isAscendingDefCom_D1_LK3(array)
result(ascending)
1432#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1433 !DEC$ ATTRIBUTES DLLEXPORT :: isAscendingDefCom_D1_LK3
1436 logical(LKG) ,
intent(in) ,
contiguous :: array(:)
1437 logical(LK) :: ascending
1442 PURE module function isAscendingDefCom_D1_LK2(array)
result(ascending)
1443#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1444 !DEC$ ATTRIBUTES DLLEXPORT :: isAscendingDefCom_D1_LK2
1447 logical(LKG) ,
intent(in) ,
contiguous :: array(:)
1448 logical(LK) :: ascending
1453 PURE module function isAscendingDefCom_D1_LK1(array)
result(ascending)
1454#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1455 !DEC$ ATTRIBUTES DLLEXPORT :: isAscendingDefCom_D1_LK1
1458 logical(LKG) ,
intent(in) ,
contiguous :: array(:)
1459 logical(LK) :: ascending
1466 PURE module function isAscendingDefCom_D1_RK5(array)
result(ascending)
1467#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1468 !DEC$ ATTRIBUTES DLLEXPORT :: isAscendingDefCom_D1_RK5
1471 real(RKG) ,
intent(in) ,
contiguous :: array(:)
1472 logical(LK) :: ascending
1477 PURE module function isAscendingDefCom_D1_RK4(array)
result(ascending)
1478#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1479 !DEC$ ATTRIBUTES DLLEXPORT :: isAscendingDefCom_D1_RK4
1482 real(RKG) ,
intent(in) ,
contiguous :: array(:)
1483 logical(LK) :: ascending
1488 PURE module function isAscendingDefCom_D1_RK3(array)
result(ascending)
1489#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1490 !DEC$ ATTRIBUTES DLLEXPORT :: isAscendingDefCom_D1_RK3
1493 real(RKG) ,
intent(in) ,
contiguous :: array(:)
1494 logical(LK) :: ascending
1499 PURE module function isAscendingDefCom_D1_RK2(array)
result(ascending)
1500#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1501 !DEC$ ATTRIBUTES DLLEXPORT :: isAscendingDefCom_D1_RK2
1504 real(RKG) ,
intent(in) ,
contiguous :: array(:)
1505 logical(LK) :: ascending
1510 PURE module function isAscendingDefCom_D1_RK1(array)
result(ascending)
1511#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1512 !DEC$ ATTRIBUTES DLLEXPORT :: isAscendingDefCom_D1_RK1
1515 real(RKG) ,
intent(in) ,
contiguous :: array(:)
1516 logical(LK) :: ascending
1523 PURE module function isAscendingDefCom_D1_CK5(array)
result(ascending)
1524#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1525 !DEC$ ATTRIBUTES DLLEXPORT :: isAscendingDefCom_D1_CK5
1528 complex(CKG) ,
intent(in) ,
contiguous :: array(:)
1529 logical(LK) :: ascending
1534 PURE module function isAscendingDefCom_D1_CK4(array)
result(ascending)
1535#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1536 !DEC$ ATTRIBUTES DLLEXPORT :: isAscendingDefCom_D1_CK4
1539 complex(CKG) ,
intent(in) ,
contiguous :: array(:)
1540 logical(LK) :: ascending
1545 PURE module function isAscendingDefCom_D1_CK3(array)
result(ascending)
1546#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1547 !DEC$ ATTRIBUTES DLLEXPORT :: isAscendingDefCom_D1_CK3
1550 complex(CKG) ,
intent(in) ,
contiguous :: array(:)
1551 logical(LK) :: ascending
1556 PURE module function isAscendingDefCom_D1_CK2(array)
result(ascending)
1557#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1558 !DEC$ ATTRIBUTES DLLEXPORT :: isAscendingDefCom_D1_CK2
1561 complex(CKG) ,
intent(in) ,
contiguous :: array(:)
1562 logical(LK) :: ascending
1567 PURE module function isAscendingDefCom_D1_CK1(array)
result(ascending)
1568#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1569 !DEC$ ATTRIBUTES DLLEXPORT :: isAscendingDefCom_D1_CK1
1572 complex(CKG) ,
intent(in) ,
contiguous :: array(:)
1573 logical(LK) :: ascending
1582 PURE module function isAscendingDefCom_D1_PSSK5(array)
result(ascending)
1583#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1584 !DEC$ ATTRIBUTES DLLEXPORT :: isAscendingDefCom_D1_PSSK5
1588 type(css_pdt(SKG)) ,
intent(in) ,
contiguous :: array(:)
1589 logical(LK) :: ascending
1594 PURE module function isAscendingDefCom_D1_PSSK4(array)
result(ascending)
1595#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1596 !DEC$ ATTRIBUTES DLLEXPORT :: isAscendingDefCom_D1_PSSK4
1600 type(css_pdt(SKG)) ,
intent(in) ,
contiguous :: array(:)
1601 logical(LK) :: ascending
1606 PURE module function isAscendingDefCom_D1_PSSK3(array)
result(ascending)
1607#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1608 !DEC$ ATTRIBUTES DLLEXPORT :: isAscendingDefCom_D1_PSSK3
1612 type(css_pdt(SKG)) ,
intent(in) ,
contiguous :: array(:)
1613 logical(LK) :: ascending
1618 PURE module function isAscendingDefCom_D1_PSSK2(array)
result(ascending)
1619#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1620 !DEC$ ATTRIBUTES DLLEXPORT :: isAscendingDefCom_D1_PSSK2
1624 type(css_pdt(SKG)) ,
intent(in) ,
contiguous :: array(:)
1625 logical(LK) :: ascending
1630 PURE module function isAscendingDefCom_D1_PSSK1(array)
result(ascending)
1631#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1632 !DEC$ ATTRIBUTES DLLEXPORT :: isAscendingDefCom_D1_PSSK1
1636 type(css_pdt(SKG)) ,
intent(in) ,
contiguous :: array(:)
1637 logical(LK) :: ascending
1646 PURE module function isAscendingDefCom_D1_BSSK(array)
result(ascending)
1647#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1648 !DEC$ ATTRIBUTES DLLEXPORT :: isAscendingDefCom_D1_BSSK
1652 type(css_type) ,
intent(in) ,
contiguous :: array(:)
1653 logical(LK) :: ascending
1733 PURE module function isDescendingDefCom_D0_SK5(array)
result(descending)
1734#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1735 !DEC$ ATTRIBUTES DLLEXPORT :: isDescendingDefCom_D0_SK5
1738 character(
*,SKG) ,
intent(in) :: array
1739 logical(LK) :: descending
1744 PURE module function isDescendingDefCom_D0_SK4(array)
result(descending)
1745#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1746 !DEC$ ATTRIBUTES DLLEXPORT :: isDescendingDefCom_D0_SK4
1749 character(
*,SKG) ,
intent(in) :: array
1750 logical(LK) :: descending
1755 PURE module function isDescendingDefCom_D0_SK3(array)
result(descending)
1756#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1757 !DEC$ ATTRIBUTES DLLEXPORT :: isDescendingDefCom_D0_SK3
1760 character(
*,SKG) ,
intent(in) :: array
1761 logical(LK) :: descending
1766 PURE module function isDescendingDefCom_D0_SK2(array)
result(descending)
1767#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1768 !DEC$ ATTRIBUTES DLLEXPORT :: isDescendingDefCom_D0_SK2
1771 character(
*,SKG) ,
intent(in) :: array
1772 logical(LK) :: descending
1777 PURE module function isDescendingDefCom_D0_SK1(array)
result(descending)
1778#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1779 !DEC$ ATTRIBUTES DLLEXPORT :: isDescendingDefCom_D0_SK1
1782 character(
*,SKG) ,
intent(in) :: array
1783 logical(LK) :: descending
1790 PURE module function isDescendingDefCom_D1_SK5(array)
result(descending)
1791#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1792 !DEC$ ATTRIBUTES DLLEXPORT :: isDescendingDefCom_D1_SK5
1795 character(
*,SKG) ,
intent(in) ,
contiguous :: array(:)
1796 logical(LK) :: descending
1801 PURE module function isDescendingDefCom_D1_SK4(array)
result(descending)
1802#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1803 !DEC$ ATTRIBUTES DLLEXPORT :: isDescendingDefCom_D1_SK4
1806 character(
*,SKG) ,
intent(in) ,
contiguous :: array(:)
1807 logical(LK) :: descending
1812 PURE module function isDescendingDefCom_D1_SK3(array)
result(descending)
1813#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1814 !DEC$ ATTRIBUTES DLLEXPORT :: isDescendingDefCom_D1_SK3
1817 character(
*,SKG) ,
intent(in) ,
contiguous :: array(:)
1818 logical(LK) :: descending
1823 PURE module function isDescendingDefCom_D1_SK2(array)
result(descending)
1824#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1825 !DEC$ ATTRIBUTES DLLEXPORT :: isDescendingDefCom_D1_SK2
1828 character(
*,SKG) ,
intent(in) ,
contiguous :: array(:)
1829 logical(LK) :: descending
1834 PURE module function isDescendingDefCom_D1_SK1(array)
result(descending)
1835#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1836 !DEC$ ATTRIBUTES DLLEXPORT :: isDescendingDefCom_D1_SK1
1839 character(
*,SKG) ,
intent(in) ,
contiguous :: array(:)
1840 logical(LK) :: descending
1847 PURE module function isDescendingDefCom_D1_IK5(array)
result(descending)
1848#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1849 !DEC$ ATTRIBUTES DLLEXPORT :: isDescendingDefCom_D1_IK5
1852 integer(IKG) ,
intent(in) ,
contiguous :: array(:)
1853 logical(LK) :: descending
1858 PURE module function isDescendingDefCom_D1_IK4(array)
result(descending)
1859#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1860 !DEC$ ATTRIBUTES DLLEXPORT :: isDescendingDefCom_D1_IK4
1863 integer(IKG) ,
intent(in) ,
contiguous :: array(:)
1864 logical(LK) :: descending
1869 PURE module function isDescendingDefCom_D1_IK3(array)
result(descending)
1870#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1871 !DEC$ ATTRIBUTES DLLEXPORT :: isDescendingDefCom_D1_IK3
1874 integer(IKG) ,
intent(in) ,
contiguous :: array(:)
1875 logical(LK) :: descending
1880 PURE module function isDescendingDefCom_D1_IK2(array)
result(descending)
1881#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1882 !DEC$ ATTRIBUTES DLLEXPORT :: isDescendingDefCom_D1_IK2
1885 integer(IKG) ,
intent(in) ,
contiguous :: array(:)
1886 logical(LK) :: descending
1891 PURE module function isDescendingDefCom_D1_IK1(array)
result(descending)
1892#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1893 !DEC$ ATTRIBUTES DLLEXPORT :: isDescendingDefCom_D1_IK1
1896 integer(IKG) ,
intent(in) ,
contiguous :: array(:)
1897 logical(LK) :: descending
1904 PURE module function isDescendingDefCom_D1_LK5(array)
result(descending)
1905#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1906 !DEC$ ATTRIBUTES DLLEXPORT :: isDescendingDefCom_D1_LK5
1909 logical(LKG) ,
intent(in) ,
contiguous :: array(:)
1910 logical(LK) :: descending
1915 PURE module function isDescendingDefCom_D1_LK4(array)
result(descending)
1916#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1917 !DEC$ ATTRIBUTES DLLEXPORT :: isDescendingDefCom_D1_LK4
1920 logical(LKG) ,
intent(in) ,
contiguous :: array(:)
1921 logical(LK) :: descending
1926 PURE module function isDescendingDefCom_D1_LK3(array)
result(descending)
1927#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1928 !DEC$ ATTRIBUTES DLLEXPORT :: isDescendingDefCom_D1_LK3
1931 logical(LKG) ,
intent(in) ,
contiguous :: array(:)
1932 logical(LK) :: descending
1937 PURE module function isDescendingDefCom_D1_LK2(array)
result(descending)
1938#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1939 !DEC$ ATTRIBUTES DLLEXPORT :: isDescendingDefCom_D1_LK2
1942 logical(LKG) ,
intent(in) ,
contiguous :: array(:)
1943 logical(LK) :: descending
1948 PURE module function isDescendingDefCom_D1_LK1(array)
result(descending)
1949#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1950 !DEC$ ATTRIBUTES DLLEXPORT :: isDescendingDefCom_D1_LK1
1953 logical(LKG) ,
intent(in) ,
contiguous :: array(:)
1954 logical(LK) :: descending
1961 PURE module function isDescendingDefCom_D1_RK5(array)
result(descending)
1962#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1963 !DEC$ ATTRIBUTES DLLEXPORT :: isDescendingDefCom_D1_RK5
1966 real(RKG) ,
intent(in) ,
contiguous :: array(:)
1967 logical(LK) :: descending
1972 PURE module function isDescendingDefCom_D1_RK4(array)
result(descending)
1973#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1974 !DEC$ ATTRIBUTES DLLEXPORT :: isDescendingDefCom_D1_RK4
1977 real(RKG) ,
intent(in) ,
contiguous :: array(:)
1978 logical(LK) :: descending
1983 PURE module function isDescendingDefCom_D1_RK3(array)
result(descending)
1984#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1985 !DEC$ ATTRIBUTES DLLEXPORT :: isDescendingDefCom_D1_RK3
1988 real(RKG) ,
intent(in) ,
contiguous :: array(:)
1989 logical(LK) :: descending
1994 PURE module function isDescendingDefCom_D1_RK2(array)
result(descending)
1995#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1996 !DEC$ ATTRIBUTES DLLEXPORT :: isDescendingDefCom_D1_RK2
1999 real(RKG) ,
intent(in) ,
contiguous :: array(:)
2000 logical(LK) :: descending
2005 PURE module function isDescendingDefCom_D1_RK1(array)
result(descending)
2006#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2007 !DEC$ ATTRIBUTES DLLEXPORT :: isDescendingDefCom_D1_RK1
2010 real(RKG) ,
intent(in) ,
contiguous :: array(:)
2011 logical(LK) :: descending
2018 PURE module function isDescendingDefCom_D1_CK5(array)
result(descending)
2019#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2020 !DEC$ ATTRIBUTES DLLEXPORT :: isDescendingDefCom_D1_CK5
2023 complex(CKG) ,
intent(in) ,
contiguous :: array(:)
2024 logical(LK) :: descending
2029 PURE module function isDescendingDefCom_D1_CK4(array)
result(descending)
2030#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2031 !DEC$ ATTRIBUTES DLLEXPORT :: isDescendingDefCom_D1_CK4
2034 complex(CKG) ,
intent(in) ,
contiguous :: array(:)
2035 logical(LK) :: descending
2040 PURE module function isDescendingDefCom_D1_CK3(array)
result(descending)
2041#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2042 !DEC$ ATTRIBUTES DLLEXPORT :: isDescendingDefCom_D1_CK3
2045 complex(CKG) ,
intent(in) ,
contiguous :: array(:)
2046 logical(LK) :: descending
2051 PURE module function isDescendingDefCom_D1_CK2(array)
result(descending)
2052#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2053 !DEC$ ATTRIBUTES DLLEXPORT :: isDescendingDefCom_D1_CK2
2056 complex(CKG) ,
intent(in) ,
contiguous :: array(:)
2057 logical(LK) :: descending
2062 PURE module function isDescendingDefCom_D1_CK1(array)
result(descending)
2063#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2064 !DEC$ ATTRIBUTES DLLEXPORT :: isDescendingDefCom_D1_CK1
2067 complex(CKG) ,
intent(in) ,
contiguous :: array(:)
2068 logical(LK) :: descending
2077 PURE module function isDescendingDefCom_D1_PSSK5(array)
result(descending)
2078#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2079 !DEC$ ATTRIBUTES DLLEXPORT :: isDescendingDefCom_D1_PSSK5
2083 type(css_pdt(SKG)) ,
intent(in) ,
contiguous :: array(:)
2084 logical(LK) :: descending
2089 PURE module function isDescendingDefCom_D1_PSSK4(array)
result(descending)
2090#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2091 !DEC$ ATTRIBUTES DLLEXPORT :: isDescendingDefCom_D1_PSSK4
2095 type(css_pdt(SKG)) ,
intent(in) ,
contiguous :: array(:)
2096 logical(LK) :: descending
2101 PURE module function isDescendingDefCom_D1_PSSK3(array)
result(descending)
2102#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2103 !DEC$ ATTRIBUTES DLLEXPORT :: isDescendingDefCom_D1_PSSK3
2107 type(css_pdt(SKG)) ,
intent(in) ,
contiguous :: array(:)
2108 logical(LK) :: descending
2113 PURE module function isDescendingDefCom_D1_PSSK2(array)
result(descending)
2114#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2115 !DEC$ ATTRIBUTES DLLEXPORT :: isDescendingDefCom_D1_PSSK2
2119 type(css_pdt(SKG)) ,
intent(in) ,
contiguous :: array(:)
2120 logical(LK) :: descending
2125 PURE module function isDescendingDefCom_D1_PSSK1(array)
result(descending)
2126#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2127 !DEC$ ATTRIBUTES DLLEXPORT :: isDescendingDefCom_D1_PSSK1
2131 type(css_pdt(SKG)) ,
intent(in) ,
contiguous :: array(:)
2132 logical(LK) :: descending
2141 PURE module function isDescendingDefCom_D1_BSSK(array)
result(descending)
2142#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2143 !DEC$ ATTRIBUTES DLLEXPORT :: isDescendingDefCom_D1_BSSK
2147 type(css_type) ,
intent(in) ,
contiguous :: array(:)
2148 logical(LK) :: descending
2260 PURE module function isSortedDefCom_D0_SK5(array)
result(sorted)
2261#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2262 !DEC$ ATTRIBUTES DLLEXPORT :: isSortedDefCom_D0_SK5
2265 character(
*,SKG) ,
intent(in) :: array
2266 logical(LK) :: sorted
2271 PURE module function isSortedDefCom_D0_SK4(array)
result(sorted)
2272#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2273 !DEC$ ATTRIBUTES DLLEXPORT :: isSortedDefCom_D0_SK4
2276 character(
*,SKG) ,
intent(in) :: array
2277 logical(LK) :: sorted
2282 PURE module function isSortedDefCom_D0_SK3(array)
result(sorted)
2283#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2284 !DEC$ ATTRIBUTES DLLEXPORT :: isSortedDefCom_D0_SK3
2287 character(
*,SKG) ,
intent(in) :: array
2288 logical(LK) :: sorted
2293 PURE module function isSortedDefCom_D0_SK2(array)
result(sorted)
2294#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2295 !DEC$ ATTRIBUTES DLLEXPORT :: isSortedDefCom_D0_SK2
2298 character(
*,SKG) ,
intent(in) :: array
2299 logical(LK) :: sorted
2304 PURE module function isSortedDefCom_D0_SK1(array)
result(sorted)
2305#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2306 !DEC$ ATTRIBUTES DLLEXPORT :: isSortedDefCom_D0_SK1
2309 character(
*,SKG) ,
intent(in) :: array
2310 logical(LK) :: sorted
2317 PURE module function isSortedDefCom_D1_SK5(array)
result(sorted)
2318#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2319 !DEC$ ATTRIBUTES DLLEXPORT :: isSortedDefCom_D1_SK5
2322 character(
*,SKG) ,
intent(in) ,
contiguous :: array(:)
2323 logical(LK) :: sorted
2328 PURE module function isSortedDefCom_D1_SK4(array)
result(sorted)
2329#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2330 !DEC$ ATTRIBUTES DLLEXPORT :: isSortedDefCom_D1_SK4
2333 character(
*,SKG) ,
intent(in) ,
contiguous :: array(:)
2334 logical(LK) :: sorted
2339 PURE module function isSortedDefCom_D1_SK3(array)
result(sorted)
2340#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2341 !DEC$ ATTRIBUTES DLLEXPORT :: isSortedDefCom_D1_SK3
2344 character(
*,SKG) ,
intent(in) ,
contiguous :: array(:)
2345 logical(LK) :: sorted
2350 PURE module function isSortedDefCom_D1_SK2(array)
result(sorted)
2351#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2352 !DEC$ ATTRIBUTES DLLEXPORT :: isSortedDefCom_D1_SK2
2355 character(
*,SKG) ,
intent(in) ,
contiguous :: array(:)
2356 logical(LK) :: sorted
2361 PURE module function isSortedDefCom_D1_SK1(array)
result(sorted)
2362#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2363 !DEC$ ATTRIBUTES DLLEXPORT :: isSortedDefCom_D1_SK1
2366 character(
*,SKG) ,
intent(in) ,
contiguous :: array(:)
2367 logical(LK) :: sorted
2374 PURE module function isSortedDefCom_D1_IK5(array)
result(sorted)
2375#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2376 !DEC$ ATTRIBUTES DLLEXPORT :: isSortedDefCom_D1_IK5
2379 integer(IKG) ,
intent(in) ,
contiguous :: array(:)
2380 logical(LK) :: sorted
2385 PURE module function isSortedDefCom_D1_IK4(array)
result(sorted)
2386#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2387 !DEC$ ATTRIBUTES DLLEXPORT :: isSortedDefCom_D1_IK4
2390 integer(IKG) ,
intent(in) ,
contiguous :: array(:)
2391 logical(LK) :: sorted
2396 PURE module function isSortedDefCom_D1_IK3(array)
result(sorted)
2397#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2398 !DEC$ ATTRIBUTES DLLEXPORT :: isSortedDefCom_D1_IK3
2401 integer(IKG) ,
intent(in) ,
contiguous :: array(:)
2402 logical(LK) :: sorted
2407 PURE module function isSortedDefCom_D1_IK2(array)
result(sorted)
2408#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2409 !DEC$ ATTRIBUTES DLLEXPORT :: isSortedDefCom_D1_IK2
2412 integer(IKG) ,
intent(in) ,
contiguous :: array(:)
2413 logical(LK) :: sorted
2418 PURE module function isSortedDefCom_D1_IK1(array)
result(sorted)
2419#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2420 !DEC$ ATTRIBUTES DLLEXPORT :: isSortedDefCom_D1_IK1
2423 integer(IKG) ,
intent(in) ,
contiguous :: array(:)
2424 logical(LK) :: sorted
2431 PURE module function isSortedDefCom_D1_LK5(array)
result(sorted)
2432#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2433 !DEC$ ATTRIBUTES DLLEXPORT :: isSortedDefCom_D1_LK5
2436 logical(LKG) ,
intent(in) ,
contiguous :: array(:)
2437 logical(LK) :: sorted
2442 PURE module function isSortedDefCom_D1_LK4(array)
result(sorted)
2443#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2444 !DEC$ ATTRIBUTES DLLEXPORT :: isSortedDefCom_D1_LK4
2447 logical(LKG) ,
intent(in) ,
contiguous :: array(:)
2448 logical(LK) :: sorted
2453 PURE module function isSortedDefCom_D1_LK3(array)
result(sorted)
2454#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2455 !DEC$ ATTRIBUTES DLLEXPORT :: isSortedDefCom_D1_LK3
2458 logical(LKG) ,
intent(in) ,
contiguous :: array(:)
2459 logical(LK) :: sorted
2464 PURE module function isSortedDefCom_D1_LK2(array)
result(sorted)
2465#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2466 !DEC$ ATTRIBUTES DLLEXPORT :: isSortedDefCom_D1_LK2
2469 logical(LKG) ,
intent(in) ,
contiguous :: array(:)
2470 logical(LK) :: sorted
2475 PURE module function isSortedDefCom_D1_LK1(array)
result(sorted)
2476#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2477 !DEC$ ATTRIBUTES DLLEXPORT :: isSortedDefCom_D1_LK1
2480 logical(LKG) ,
intent(in) ,
contiguous :: array(:)
2481 logical(LK) :: sorted
2488 PURE module function isSortedDefCom_D1_RK5(array)
result(sorted)
2489#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2490 !DEC$ ATTRIBUTES DLLEXPORT :: isSortedDefCom_D1_RK5
2493 real(RKG) ,
intent(in) ,
contiguous :: array(:)
2494 logical(LK) :: sorted
2499 PURE module function isSortedDefCom_D1_RK4(array)
result(sorted)
2500#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2501 !DEC$ ATTRIBUTES DLLEXPORT :: isSortedDefCom_D1_RK4
2504 real(RKG) ,
intent(in) ,
contiguous :: array(:)
2505 logical(LK) :: sorted
2510 PURE module function isSortedDefCom_D1_RK3(array)
result(sorted)
2511#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2512 !DEC$ ATTRIBUTES DLLEXPORT :: isSortedDefCom_D1_RK3
2515 real(RKG) ,
intent(in) ,
contiguous :: array(:)
2516 logical(LK) :: sorted
2521 PURE module function isSortedDefCom_D1_RK2(array)
result(sorted)
2522#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2523 !DEC$ ATTRIBUTES DLLEXPORT :: isSortedDefCom_D1_RK2
2526 real(RKG) ,
intent(in) ,
contiguous :: array(:)
2527 logical(LK) :: sorted
2532 PURE module function isSortedDefCom_D1_RK1(array)
result(sorted)
2533#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2534 !DEC$ ATTRIBUTES DLLEXPORT :: isSortedDefCom_D1_RK1
2537 real(RKG) ,
intent(in) ,
contiguous :: array(:)
2538 logical(LK) :: sorted
2545 PURE module function isSortedDefCom_D1_CK5(array)
result(sorted)
2546#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2547 !DEC$ ATTRIBUTES DLLEXPORT :: isSortedDefCom_D1_CK5
2550 complex(CKG) ,
intent(in) ,
contiguous :: array(:)
2551 logical(LK) :: sorted
2556 PURE module function isSortedDefCom_D1_CK4(array)
result(sorted)
2557#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2558 !DEC$ ATTRIBUTES DLLEXPORT :: isSortedDefCom_D1_CK4
2561 complex(CKG) ,
intent(in) ,
contiguous :: array(:)
2562 logical(LK) :: sorted
2567 PURE module function isSortedDefCom_D1_CK3(array)
result(sorted)
2568#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2569 !DEC$ ATTRIBUTES DLLEXPORT :: isSortedDefCom_D1_CK3
2572 complex(CKG) ,
intent(in) ,
contiguous :: array(:)
2573 logical(LK) :: sorted
2578 PURE module function isSortedDefCom_D1_CK2(array)
result(sorted)
2579#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2580 !DEC$ ATTRIBUTES DLLEXPORT :: isSortedDefCom_D1_CK2
2583 complex(CKG) ,
intent(in) ,
contiguous :: array(:)
2584 logical(LK) :: sorted
2589 PURE module function isSortedDefCom_D1_CK1(array)
result(sorted)
2590#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2591 !DEC$ ATTRIBUTES DLLEXPORT :: isSortedDefCom_D1_CK1
2594 complex(CKG) ,
intent(in) ,
contiguous :: array(:)
2595 logical(LK) :: sorted
2604 PURE module function isSortedDefCom_D1_PSSK5(array)
result(sorted)
2605#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2606 !DEC$ ATTRIBUTES DLLEXPORT :: isSortedDefCom_D1_PSSK5
2610 type(css_pdt(SKG)) ,
intent(in) ,
contiguous :: array(:)
2611 logical(LK) :: sorted
2616 PURE module function isSortedDefCom_D1_PSSK4(array)
result(sorted)
2617#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2618 !DEC$ ATTRIBUTES DLLEXPORT :: isSortedDefCom_D1_PSSK4
2622 type(css_pdt(SKG)) ,
intent(in) ,
contiguous :: array(:)
2623 logical(LK) :: sorted
2628 PURE module function isSortedDefCom_D1_PSSK3(array)
result(sorted)
2629#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2630 !DEC$ ATTRIBUTES DLLEXPORT :: isSortedDefCom_D1_PSSK3
2634 type(css_pdt(SKG)) ,
intent(in) ,
contiguous :: array(:)
2635 logical(LK) :: sorted
2640 PURE module function isSortedDefCom_D1_PSSK2(array)
result(sorted)
2641#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2642 !DEC$ ATTRIBUTES DLLEXPORT :: isSortedDefCom_D1_PSSK2
2646 type(css_pdt(SKG)) ,
intent(in) ,
contiguous :: array(:)
2647 logical(LK) :: sorted
2652 PURE module function isSortedDefCom_D1_PSSK1(array)
result(sorted)
2653#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2654 !DEC$ ATTRIBUTES DLLEXPORT :: isSortedDefCom_D1_PSSK1
2658 type(css_pdt(SKG)) ,
intent(in) ,
contiguous :: array(:)
2659 logical(LK) :: sorted
2668 PURE module function isSortedDefCom_D1_BSSK(array)
result(sorted)
2669#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2670 !DEC$ ATTRIBUTES DLLEXPORT :: isSortedDefCom_D1_BSSK
2674 type(css_type) ,
intent(in) ,
contiguous :: array(:)
2675 logical(LK) :: sorted
2687 module function isSortedCusCom_D0_SK5(array, isSorted)
result(sorted)
2688#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2689 !DEC$ ATTRIBUTES DLLEXPORT :: isSortedCusCom_D0_SK5
2692 character(
*,SKG) ,
intent(in) :: array
2693 procedure(
logical(LK)) :: isSorted
2694 logical(LK) :: sorted
2699 module function isSortedCusCom_D0_SK4(array, isSorted)
result(sorted)
2700#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2701 !DEC$ ATTRIBUTES DLLEXPORT :: isSortedCusCom_D0_SK4
2704 character(
*,SKG) ,
intent(in) :: array
2705 procedure(
logical(LK)) :: isSorted
2706 logical(LK) :: sorted
2711 module function isSortedCusCom_D0_SK3(array, isSorted)
result(sorted)
2712#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2713 !DEC$ ATTRIBUTES DLLEXPORT :: isSortedCusCom_D0_SK3
2716 character(
*,SKG) ,
intent(in) :: array
2717 procedure(
logical(LK)) :: isSorted
2718 logical(LK) :: sorted
2723 module function isSortedCusCom_D0_SK2(array, isSorted)
result(sorted)
2724#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2725 !DEC$ ATTRIBUTES DLLEXPORT :: isSortedCusCom_D0_SK2
2728 character(
*,SKG) ,
intent(in) :: array
2729 procedure(
logical(LK)) :: isSorted
2730 logical(LK) :: sorted
2735 module function isSortedCusCom_D0_SK1(array, isSorted)
result(sorted)
2736#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2737 !DEC$ ATTRIBUTES DLLEXPORT :: isSortedCusCom_D0_SK1
2740 character(
*,SKG) ,
intent(in) :: array
2741 procedure(
logical(LK)) :: isSorted
2742 logical(LK) :: sorted
2749 module function isSortedCusCom_D1_SK5(array, isSorted)
result(sorted)
2750#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2751 !DEC$ ATTRIBUTES DLLEXPORT :: isSortedCusCom_D1_SK5
2754 character(
*,SKG) ,
intent(in) ,
contiguous :: array(:)
2755 procedure(
logical(LK)) :: isSorted
2756 logical(LK) :: sorted
2761 module function isSortedCusCom_D1_SK4(array, isSorted)
result(sorted)
2762#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2763 !DEC$ ATTRIBUTES DLLEXPORT :: isSortedCusCom_D1_SK4
2766 character(
*,SKG) ,
intent(in) ,
contiguous :: array(:)
2767 procedure(
logical(LK)) :: isSorted
2768 logical(LK) :: sorted
2773 module function isSortedCusCom_D1_SK3(array, isSorted)
result(sorted)
2774#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2775 !DEC$ ATTRIBUTES DLLEXPORT :: isSortedCusCom_D1_SK3
2778 character(
*,SKG) ,
intent(in) ,
contiguous :: array(:)
2779 procedure(
logical(LK)) :: isSorted
2780 logical(LK) :: sorted
2785 module function isSortedCusCom_D1_SK2(array, isSorted)
result(sorted)
2786#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2787 !DEC$ ATTRIBUTES DLLEXPORT :: isSortedCusCom_D1_SK2
2790 character(
*,SKG) ,
intent(in) ,
contiguous :: array(:)
2791 procedure(
logical(LK)) :: isSorted
2792 logical(LK) :: sorted
2797 module function isSortedCusCom_D1_SK1(array, isSorted)
result(sorted)
2798#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2799 !DEC$ ATTRIBUTES DLLEXPORT :: isSortedCusCom_D1_SK1
2802 character(
*,SKG) ,
intent(in) ,
contiguous :: array(:)
2803 procedure(
logical(LK)) :: isSorted
2804 logical(LK) :: sorted
2811 module function isSortedCusCom_D1_IK5(array, isSorted)
result(sorted)
2812#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2813 !DEC$ ATTRIBUTES DLLEXPORT :: isSortedCusCom_D1_IK5
2816 integer(IKG) ,
intent(in) ,
contiguous :: array(:)
2817 procedure(
logical(LK)) :: isSorted
2818 logical(LK) :: sorted
2823 module function isSortedCusCom_D1_IK4(array, isSorted)
result(sorted)
2824#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2825 !DEC$ ATTRIBUTES DLLEXPORT :: isSortedCusCom_D1_IK4
2828 integer(IKG) ,
intent(in) ,
contiguous :: array(:)
2829 procedure(
logical(LK)) :: isSorted
2830 logical(LK) :: sorted
2835 module function isSortedCusCom_D1_IK3(array, isSorted)
result(sorted)
2836#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2837 !DEC$ ATTRIBUTES DLLEXPORT :: isSortedCusCom_D1_IK3
2840 integer(IKG) ,
intent(in) ,
contiguous :: array(:)
2841 procedure(
logical(LK)) :: isSorted
2842 logical(LK) :: sorted
2847 module function isSortedCusCom_D1_IK2(array, isSorted)
result(sorted)
2848#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2849 !DEC$ ATTRIBUTES DLLEXPORT :: isSortedCusCom_D1_IK2
2852 integer(IKG) ,
intent(in) ,
contiguous :: array(:)
2853 procedure(
logical(LK)) :: isSorted
2854 logical(LK) :: sorted
2859 module function isSortedCusCom_D1_IK1(array, isSorted)
result(sorted)
2860#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2861 !DEC$ ATTRIBUTES DLLEXPORT :: isSortedCusCom_D1_IK1
2864 integer(IKG) ,
intent(in) ,
contiguous :: array(:)
2865 procedure(
logical(LK)) :: isSorted
2866 logical(LK) :: sorted
2873 module function isSortedCusCom_D1_LK5(array, isSorted)
result(sorted)
2874#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2875 !DEC$ ATTRIBUTES DLLEXPORT :: isSortedCusCom_D1_LK5
2878 logical(LKG) ,
intent(in) ,
contiguous :: array(:)
2879 procedure(
logical(LK)) :: isSorted
2880 logical(LK) :: sorted
2885 module function isSortedCusCom_D1_LK4(array, isSorted)
result(sorted)
2886#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2887 !DEC$ ATTRIBUTES DLLEXPORT :: isSortedCusCom_D1_LK4
2890 logical(LKG) ,
intent(in) ,
contiguous :: array(:)
2891 procedure(
logical(LK)) :: isSorted
2892 logical(LK) :: sorted
2897 module function isSortedCusCom_D1_LK3(array, isSorted)
result(sorted)
2898#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2899 !DEC$ ATTRIBUTES DLLEXPORT :: isSortedCusCom_D1_LK3
2902 logical(LKG) ,
intent(in) ,
contiguous :: array(:)
2903 procedure(
logical(LK)) :: isSorted
2904 logical(LK) :: sorted
2909 module function isSortedCusCom_D1_LK2(array, isSorted)
result(sorted)
2910#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2911 !DEC$ ATTRIBUTES DLLEXPORT :: isSortedCusCom_D1_LK2
2914 logical(LKG) ,
intent(in) ,
contiguous :: array(:)
2915 procedure(
logical(LK)) :: isSorted
2916 logical(LK) :: sorted
2921 module function isSortedCusCom_D1_LK1(array, isSorted)
result(sorted)
2922#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2923 !DEC$ ATTRIBUTES DLLEXPORT :: isSortedCusCom_D1_LK1
2926 logical(LKG) ,
intent(in) ,
contiguous :: array(:)
2927 procedure(
logical(LK)) :: isSorted
2928 logical(LK) :: sorted
2935 module function isSortedCusCom_D1_RK5(array, isSorted)
result(sorted)
2936#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2937 !DEC$ ATTRIBUTES DLLEXPORT :: isSortedCusCom_D1_RK5
2940 real(RKG) ,
intent(in) ,
contiguous :: array(:)
2941 procedure(
logical(LK)) :: isSorted
2942 logical(LK) :: sorted
2947 module function isSortedCusCom_D1_RK4(array, isSorted)
result(sorted)
2948#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2949 !DEC$ ATTRIBUTES DLLEXPORT :: isSortedCusCom_D1_RK4
2952 real(RKG) ,
intent(in) ,
contiguous :: array(:)
2953 procedure(
logical(LK)) :: isSorted
2954 logical(LK) :: sorted
2959 module function isSortedCusCom_D1_RK3(array, isSorted)
result(sorted)
2960#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2961 !DEC$ ATTRIBUTES DLLEXPORT :: isSortedCusCom_D1_RK3
2964 real(RKG) ,
intent(in) ,
contiguous :: array(:)
2965 procedure(
logical(LK)) :: isSorted
2966 logical(LK) :: sorted
2971 module function isSortedCusCom_D1_RK2(array, isSorted)
result(sorted)
2972#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2973 !DEC$ ATTRIBUTES DLLEXPORT :: isSortedCusCom_D1_RK2
2976 real(RKG) ,
intent(in) ,
contiguous :: array(:)
2977 procedure(
logical(LK)) :: isSorted
2978 logical(LK) :: sorted
2983 module function isSortedCusCom_D1_RK1(array, isSorted)
result(sorted)
2984#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2985 !DEC$ ATTRIBUTES DLLEXPORT :: isSortedCusCom_D1_RK1
2988 real(RKG) ,
intent(in) ,
contiguous :: array(:)
2989 procedure(
logical(LK)) :: isSorted
2990 logical(LK) :: sorted
2997 module function isSortedCusCom_D1_CK5(array, isSorted)
result(sorted)
2998#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2999 !DEC$ ATTRIBUTES DLLEXPORT :: isSortedCusCom_D1_CK5
3002 complex(CKG) ,
intent(in) ,
contiguous :: array(:)
3003 procedure(
logical(LK)) :: isSorted
3004 logical(LK) :: sorted
3009 module function isSortedCusCom_D1_CK4(array, isSorted)
result(sorted)
3010#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3011 !DEC$ ATTRIBUTES DLLEXPORT :: isSortedCusCom_D1_CK4
3014 complex(CKG) ,
intent(in) ,
contiguous :: array(:)
3015 procedure(
logical(LK)) :: isSorted
3016 logical(LK) :: sorted
3021 module function isSortedCusCom_D1_CK3(array, isSorted)
result(sorted)
3022#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3023 !DEC$ ATTRIBUTES DLLEXPORT :: isSortedCusCom_D1_CK3
3026 complex(CKG) ,
intent(in) ,
contiguous :: array(:)
3027 procedure(
logical(LK)) :: isSorted
3028 logical(LK) :: sorted
3033 module function isSortedCusCom_D1_CK2(array, isSorted)
result(sorted)
3034#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3035 !DEC$ ATTRIBUTES DLLEXPORT :: isSortedCusCom_D1_CK2
3038 complex(CKG) ,
intent(in) ,
contiguous :: array(:)
3039 procedure(
logical(LK)) :: isSorted
3040 logical(LK) :: sorted
3045 module function isSortedCusCom_D1_CK1(array, isSorted)
result(sorted)
3046#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3047 !DEC$ ATTRIBUTES DLLEXPORT :: isSortedCusCom_D1_CK1
3050 complex(CKG) ,
intent(in) ,
contiguous :: array(:)
3051 procedure(
logical(LK)) :: isSorted
3052 logical(LK) :: sorted
3061 module function isSortedCusCom_D1_PSSK5(array, isSorted)
result(sorted)
3062#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3063 !DEC$ ATTRIBUTES DLLEXPORT :: isSortedCusCom_D1_PSSK5
3067 type(css_pdt(SKG)) ,
intent(in) ,
contiguous :: array(:)
3068 procedure(
logical(LK)) :: isSorted
3069 logical(LK) :: sorted
3074 module function isSortedCusCom_D1_PSSK4(array, isSorted)
result(sorted)
3075#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3076 !DEC$ ATTRIBUTES DLLEXPORT :: isSortedCusCom_D1_PSSK4
3080 type(css_pdt(SKG)) ,
intent(in) ,
contiguous :: array(:)
3081 procedure(
logical(LK)) :: isSorted
3082 logical(LK) :: sorted
3087 module function isSortedCusCom_D1_PSSK3(array, isSorted)
result(sorted)
3088#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3089 !DEC$ ATTRIBUTES DLLEXPORT :: isSortedCusCom_D1_PSSK3
3093 type(css_pdt(SKG)) ,
intent(in) ,
contiguous :: array(:)
3094 procedure(
logical(LK)) :: isSorted
3095 logical(LK) :: sorted
3100 module function isSortedCusCom_D1_PSSK2(array, isSorted)
result(sorted)
3101#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3102 !DEC$ ATTRIBUTES DLLEXPORT :: isSortedCusCom_D1_PSSK2
3106 type(css_pdt(SKG)) ,
intent(in) ,
contiguous :: array(:)
3107 procedure(
logical(LK)) :: isSorted
3108 logical(LK) :: sorted
3113 module function isSortedCusCom_D1_PSSK1(array, isSorted)
result(sorted)
3114#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3115 !DEC$ ATTRIBUTES DLLEXPORT :: isSortedCusCom_D1_PSSK1
3119 type(css_pdt(SKG)) ,
intent(in) ,
contiguous :: array(:)
3120 procedure(
logical(LK)) :: isSorted
3121 logical(LK) :: sorted
3130 module function isSortedCusCom_D1_BSSK(array, isSorted)
result(sorted)
3131#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3132 !DEC$ ATTRIBUTES DLLEXPORT :: isSortedCusCom_D1_BSSK
3136 type(css_type) ,
intent(in) ,
contiguous :: array(:)
3137 procedure(
logical(LK)) :: isSorted
3138 logical(LK) :: sorted
3358 module function getSortedIndCusComDef_D0_SK5(array, isSorted, method)
result(sorting)
3359#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3360 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedIndCusComDef_D0_SK5
3363 character(
*,SKG) ,
intent(in) :: array
3364 procedure(
logical(LK)) :: isSorted
3365 integer(IK) :: sorting(
len(array, IK))
3366 type(isort_type) ,
intent(in) :: method
3371 module function getSortedIndCusComDef_D0_SK4(array, isSorted, method)
result(sorting)
3372#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3373 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedIndCusComDef_D0_SK4
3376 character(
*,SKG) ,
intent(in) :: array
3377 procedure(
logical(LK)) :: isSorted
3378 integer(IK) :: sorting(
len(array, IK))
3379 type(isort_type) ,
intent(in) :: method
3384 module function getSortedIndCusComDef_D0_SK3(array, isSorted, method)
result(sorting)
3385#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3386 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedIndCusComDef_D0_SK3
3389 character(
*,SKG) ,
intent(in) :: array
3390 procedure(
logical(LK)) :: isSorted
3391 integer(IK) :: sorting(
len(array, IK))
3392 type(isort_type) ,
intent(in) :: method
3397 module function getSortedIndCusComDef_D0_SK2(array, isSorted, method)
result(sorting)
3398#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3399 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedIndCusComDef_D0_SK2
3402 character(
*,SKG) ,
intent(in) :: array
3403 procedure(
logical(LK)) :: isSorted
3404 integer(IK) :: sorting(
len(array, IK))
3405 type(isort_type) ,
intent(in) :: method
3410 module function getSortedIndCusComDef_D0_SK1(array, isSorted, method)
result(sorting)
3411#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3412 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedIndCusComDef_D0_SK1
3415 character(
*,SKG) ,
intent(in) :: array
3416 procedure(
logical(LK)) :: isSorted
3417 integer(IK) :: sorting(
len(array, IK))
3418 type(isort_type) ,
intent(in) :: method
3425 module function getSortedIndCusComDef_D1_SK5(array, isSorted, method)
result(sorting)
3426#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3427 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedIndCusComDef_D1_SK5
3430 character(
*,SKG) ,
intent(in) ,
contiguous :: array(:)
3431 procedure(
logical(LK)) :: isSorted
3432 integer(IK) :: sorting(
size(array,
1, IK))
3433 type(isort_type) ,
intent(in) :: method
3438 module function getSortedIndCusComDef_D1_SK4(array, isSorted, method)
result(sorting)
3439#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3440 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedIndCusComDef_D1_SK4
3443 character(
*,SKG) ,
intent(in) ,
contiguous :: array(:)
3444 procedure(
logical(LK)) :: isSorted
3445 integer(IK) :: sorting(
size(array,
1, IK))
3446 type(isort_type) ,
intent(in) :: method
3451 module function getSortedIndCusComDef_D1_SK3(array, isSorted, method)
result(sorting)
3452#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3453 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedIndCusComDef_D1_SK3
3456 character(
*,SKG) ,
intent(in) ,
contiguous :: array(:)
3457 procedure(
logical(LK)) :: isSorted
3458 integer(IK) :: sorting(
size(array,
1, IK))
3459 type(isort_type) ,
intent(in) :: method
3464 module function getSortedIndCusComDef_D1_SK2(array, isSorted, method)
result(sorting)
3465#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3466 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedIndCusComDef_D1_SK2
3469 character(
*,SKG) ,
intent(in) ,
contiguous :: array(:)
3470 procedure(
logical(LK)) :: isSorted
3471 integer(IK) :: sorting(
size(array,
1, IK))
3472 type(isort_type) ,
intent(in) :: method
3477 module function getSortedIndCusComDef_D1_SK1(array, isSorted, method)
result(sorting)
3478#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3479 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedIndCusComDef_D1_SK1
3482 character(
*,SKG) ,
intent(in) ,
contiguous :: array(:)
3483 procedure(
logical(LK)) :: isSorted
3484 integer(IK) :: sorting(
size(array,
1, IK))
3485 type(isort_type) ,
intent(in) :: method
3492 module function getSortedIndCusComDef_D1_IK5(array, isSorted, method)
result(sorting)
3493#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3494 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedIndCusComDef_D1_IK5
3497 integer(IKG) ,
intent(in) ,
contiguous :: array(:)
3498 procedure(
logical(LK)) :: isSorted
3499 integer(IK) :: sorting(
size(array,
1, IK))
3500 type(isort_type) ,
intent(in) :: method
3505 module function getSortedIndCusComDef_D1_IK4(array, isSorted, method)
result(sorting)
3506#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3507 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedIndCusComDef_D1_IK4
3510 integer(IKG) ,
intent(in) ,
contiguous :: array(:)
3511 procedure(
logical(LK)) :: isSorted
3512 integer(IK) :: sorting(
size(array,
1, IK))
3513 type(isort_type) ,
intent(in) :: method
3518 module function getSortedIndCusComDef_D1_IK3(array, isSorted, method)
result(sorting)
3519#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3520 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedIndCusComDef_D1_IK3
3523 integer(IKG) ,
intent(in) ,
contiguous :: array(:)
3524 procedure(
logical(LK)) :: isSorted
3525 integer(IK) :: sorting(
size(array,
1, IK))
3526 type(isort_type) ,
intent(in) :: method
3531 module function getSortedIndCusComDef_D1_IK2(array, isSorted, method)
result(sorting)
3532#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3533 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedIndCusComDef_D1_IK2
3536 integer(IKG) ,
intent(in) ,
contiguous :: array(:)
3537 procedure(
logical(LK)) :: isSorted
3538 integer(IK) :: sorting(
size(array,
1, IK))
3539 type(isort_type) ,
intent(in) :: method
3544 module function getSortedIndCusComDef_D1_IK1(array, isSorted, method)
result(sorting)
3545#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3546 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedIndCusComDef_D1_IK1
3549 integer(IKG) ,
intent(in) ,
contiguous :: array(:)
3550 procedure(
logical(LK)) :: isSorted
3551 integer(IK) :: sorting(
size(array,
1, IK))
3552 type(isort_type) ,
intent(in) :: method
3559 module function getSortedIndCusComDef_D1_LK5(array, isSorted, method)
result(sorting)
3560#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3561 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedIndCusComDef_D1_LK5
3564 logical(LKG) ,
intent(in) ,
contiguous :: array(:)
3565 procedure(
logical(LK)) :: isSorted
3566 integer(IK) :: sorting(
size(array,
1, IK))
3567 type(isort_type) ,
intent(in) :: method
3572 module function getSortedIndCusComDef_D1_LK4(array, isSorted, method)
result(sorting)
3573#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3574 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedIndCusComDef_D1_LK4
3577 logical(LKG) ,
intent(in) ,
contiguous :: array(:)
3578 procedure(
logical(LK)) :: isSorted
3579 integer(IK) :: sorting(
size(array,
1, IK))
3580 type(isort_type) ,
intent(in) :: method
3585 module function getSortedIndCusComDef_D1_LK3(array, isSorted, method)
result(sorting)
3586#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3587 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedIndCusComDef_D1_LK3
3590 logical(LKG) ,
intent(in) ,
contiguous :: array(:)
3591 procedure(
logical(LK)) :: isSorted
3592 integer(IK) :: sorting(
size(array,
1, IK))
3593 type(isort_type) ,
intent(in) :: method
3598 module function getSortedIndCusComDef_D1_LK2(array, isSorted, method)
result(sorting)
3599#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3600 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedIndCusComDef_D1_LK2
3603 logical(LKG) ,
intent(in) ,
contiguous :: array(:)
3604 procedure(
logical(LK)) :: isSorted
3605 integer(IK) :: sorting(
size(array,
1, IK))
3606 type(isort_type) ,
intent(in) :: method
3611 module function getSortedIndCusComDef_D1_LK1(array, isSorted, method)
result(sorting)
3612#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3613 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedIndCusComDef_D1_LK1
3616 logical(LKG) ,
intent(in) ,
contiguous :: array(:)
3617 procedure(
logical(LK)) :: isSorted
3618 integer(IK) :: sorting(
size(array,
1, IK))
3619 type(isort_type) ,
intent(in) :: method
3626 module function getSortedIndCusComDef_D1_CK5(array, isSorted, method)
result(sorting)
3627#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3628 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedIndCusComDef_D1_CK5
3631 complex(CKG) ,
intent(in) ,
contiguous :: array(:)
3632 procedure(
logical(LK)) :: isSorted
3633 integer(IK) :: sorting(
size(array,
1, IK))
3634 type(isort_type) ,
intent(in) :: method
3639 module function getSortedIndCusComDef_D1_CK4(array, isSorted, method)
result(sorting)
3640#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3641 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedIndCusComDef_D1_CK4
3644 complex(CKG) ,
intent(in) ,
contiguous :: array(:)
3645 procedure(
logical(LK)) :: isSorted
3646 integer(IK) :: sorting(
size(array,
1, IK))
3647 type(isort_type) ,
intent(in) :: method
3652 module function getSortedIndCusComDef_D1_CK3(array, isSorted, method)
result(sorting)
3653#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3654 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedIndCusComDef_D1_CK3
3657 complex(CKG) ,
intent(in) ,
contiguous :: array(:)
3658 procedure(
logical(LK)) :: isSorted
3659 integer(IK) :: sorting(
size(array,
1, IK))
3660 type(isort_type) ,
intent(in) :: method
3665 module function getSortedIndCusComDef_D1_CK2(array, isSorted, method)
result(sorting)
3666#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3667 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedIndCusComDef_D1_CK2
3670 complex(CKG) ,
intent(in) ,
contiguous :: array(:)
3671 procedure(
logical(LK)) :: isSorted
3672 integer(IK) :: sorting(
size(array,
1, IK))
3673 type(isort_type) ,
intent(in) :: method
3678 module function getSortedIndCusComDef_D1_CK1(array, isSorted, method)
result(sorting)
3679#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3680 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedIndCusComDef_D1_CK1
3683 complex(CKG) ,
intent(in) ,
contiguous :: array(:)
3684 procedure(
logical(LK)) :: isSorted
3685 integer(IK) :: sorting(
size(array,
1, IK))
3686 type(isort_type) ,
intent(in) :: method
3693 module function getSortedIndCusComDef_D1_RK5(array, isSorted, method)
result(sorting)
3694#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3695 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedIndCusComDef_D1_RK5
3698 real(RKG) ,
intent(in) ,
contiguous :: array(:)
3699 procedure(
logical(LK)) :: isSorted
3700 integer(IK) :: sorting(
size(array,
1, IK))
3701 type(isort_type) ,
intent(in) :: method
3706 module function getSortedIndCusComDef_D1_RK4(array, isSorted, method)
result(sorting)
3707#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3708 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedIndCusComDef_D1_RK4
3711 real(RKG) ,
intent(in) ,
contiguous :: array(:)
3712 procedure(
logical(LK)) :: isSorted
3713 integer(IK) :: sorting(
size(array,
1, IK))
3714 type(isort_type) ,
intent(in) :: method
3719 module function getSortedIndCusComDef_D1_RK3(array, isSorted, method)
result(sorting)
3720#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3721 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedIndCusComDef_D1_RK3
3724 real(RKG) ,
intent(in) ,
contiguous :: array(:)
3725 procedure(
logical(LK)) :: isSorted
3726 integer(IK) :: sorting(
size(array,
1, IK))
3727 type(isort_type) ,
intent(in) :: method
3732 module function getSortedIndCusComDef_D1_RK2(array, isSorted, method)
result(sorting)
3733#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3734 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedIndCusComDef_D1_RK2
3737 real(RKG) ,
intent(in) ,
contiguous :: array(:)
3738 procedure(
logical(LK)) :: isSorted
3739 integer(IK) :: sorting(
size(array,
1, IK))
3740 type(isort_type) ,
intent(in) :: method
3745 module function getSortedIndCusComDef_D1_RK1(array, isSorted, method)
result(sorting)
3746#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3747 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedIndCusComDef_D1_RK1
3750 real(RKG) ,
intent(in) ,
contiguous :: array(:)
3751 procedure(
logical(LK)) :: isSorted
3752 integer(IK) :: sorting(
size(array,
1, IK))
3753 type(isort_type) ,
intent(in) :: method
3762 module function getSortedIndCusComDef_D1_PSSK5(array, isSorted, method)
result(sorting)
3763#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3764 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedIndCusComDef_D1_PSSK5
3768 type(css_pdt(SKG)) ,
intent(in) ,
contiguous :: array(:)
3769 procedure(
logical(LK)) :: isSorted
3770 integer(IK) :: sorting(
size(array,
1, IK))
3771 type(isort_type) ,
intent(in) :: method
3776 module function getSortedIndCusComDef_D1_PSSK4(array, isSorted, method)
result(sorting)
3777#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3778 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedIndCusComDef_D1_PSSK4
3782 type(css_pdt(SKG)) ,
intent(in) ,
contiguous :: array(:)
3783 procedure(
logical(LK)) :: isSorted
3784 integer(IK) :: sorting(
size(array,
1, IK))
3785 type(isort_type) ,
intent(in) :: method
3790 module function getSortedIndCusComDef_D1_PSSK3(array, isSorted, method)
result(sorting)
3791#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3792 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedIndCusComDef_D1_PSSK3
3796 type(css_pdt(SKG)) ,
intent(in) ,
contiguous :: array(:)
3797 procedure(
logical(LK)) :: isSorted
3798 integer(IK) :: sorting(
size(array,
1, IK))
3799 type(isort_type) ,
intent(in) :: method
3804 module function getSortedIndCusComDef_D1_PSSK2(array, isSorted, method)
result(sorting)
3805#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3806 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedIndCusComDef_D1_PSSK2
3810 type(css_pdt(SKG)) ,
intent(in) ,
contiguous :: array(:)
3811 procedure(
logical(LK)) :: isSorted
3812 integer(IK) :: sorting(
size(array,
1, IK))
3813 type(isort_type) ,
intent(in) :: method
3818 module function getSortedIndCusComDef_D1_PSSK1(array, isSorted, method)
result(sorting)
3819#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3820 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedIndCusComDef_D1_PSSK1
3824 type(css_pdt(SKG)) ,
intent(in) ,
contiguous :: array(:)
3825 procedure(
logical(LK)) :: isSorted
3826 integer(IK) :: sorting(
size(array,
1, IK))
3827 type(isort_type) ,
intent(in) :: method
3836 module function getSortedIndCusComDef_D1_BSSK(array, isSorted, method)
result(sorting)
3837#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3838 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedIndCusComDef_D1_BSSK
3842 type(css_type) ,
intent(in) ,
contiguous :: array(:)
3843 procedure(
logical(LK)) :: isSorted
3844 integer(IK) :: sorting(
size(array,
1, IK))
3845 type(isort_type) ,
intent(in) :: method
3863 module function getSortedArrCusComDef_D0_SK5(array, isSorted, method)
result(sorting)
3864#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3865 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedArrCusComDef_D0_SK5
3868 character(
*,SKG) ,
intent(in) :: array
3869 character(
len(array, IK),SKG) :: sorting
3870 procedure(
logical(LK)) :: isSorted
3871 class(sort_type) ,
intent(in) ,
optional :: method
3876 module function getSortedArrCusComDef_D0_SK4(array, isSorted, method)
result(sorting)
3877#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3878 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedArrCusComDef_D0_SK4
3881 character(
*,SKG) ,
intent(in) :: array
3882 character(
len(array, IK),SKG) :: sorting
3883 procedure(
logical(LK)) :: isSorted
3884 class(sort_type) ,
intent(in) ,
optional :: method
3889 module function getSortedArrCusComDef_D0_SK3(array, isSorted, method)
result(sorting)
3890#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3891 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedArrCusComDef_D0_SK3
3894 character(
*,SKG) ,
intent(in) :: array
3895 character(
len(array, IK),SKG) :: sorting
3896 procedure(
logical(LK)) :: isSorted
3897 class(sort_type) ,
intent(in) ,
optional :: method
3902 module function getSortedArrCusComDef_D0_SK2(array, isSorted, method)
result(sorting)
3903#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3904 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedArrCusComDef_D0_SK2
3907 character(
*,SKG) ,
intent(in) :: array
3908 character(
len(array, IK),SKG) :: sorting
3909 procedure(
logical(LK)) :: isSorted
3910 class(sort_type) ,
intent(in) ,
optional :: method
3915 module function getSortedArrCusComDef_D0_SK1(array, isSorted, method)
result(sorting)
3916#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3917 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedArrCusComDef_D0_SK1
3920 character(
*,SKG) ,
intent(in) :: array
3921 character(
len(array, IK),SKG) :: sorting
3922 procedure(
logical(LK)) :: isSorted
3923 class(sort_type) ,
intent(in) ,
optional :: method
3930 module function getSortedArrCusComDef_D1_SK5(array, isSorted, method)
result(sorting)
3931#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3932 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedArrCusComDef_D1_SK5
3935 character(
*,SKG) ,
intent(in) ,
contiguous :: array(:)
3936 character(
len(array, IK),SKG) :: sorting(
size(array,
1, IK))
3937 procedure(
logical(LK)) :: isSorted
3938 class(sort_type) ,
intent(in) ,
optional :: method
3943 module function getSortedArrCusComDef_D1_SK4(array, isSorted, method)
result(sorting)
3944#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3945 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedArrCusComDef_D1_SK4
3948 character(
*,SKG) ,
intent(in) ,
contiguous :: array(:)
3949 character(
len(array, IK),SKG) :: sorting(
size(array,
1, IK))
3950 procedure(
logical(LK)) :: isSorted
3951 class(sort_type) ,
intent(in) ,
optional :: method
3956 module function getSortedArrCusComDef_D1_SK3(array, isSorted, method)
result(sorting)
3957#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3958 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedArrCusComDef_D1_SK3
3961 character(
*,SKG) ,
intent(in) ,
contiguous :: array(:)
3962 character(
len(array, IK),SKG) :: sorting(
size(array,
1, IK))
3963 procedure(
logical(LK)) :: isSorted
3964 class(sort_type) ,
intent(in) ,
optional :: method
3969 module function getSortedArrCusComDef_D1_SK2(array, isSorted, method)
result(sorting)
3970#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3971 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedArrCusComDef_D1_SK2
3974 character(
*,SKG) ,
intent(in) ,
contiguous :: array(:)
3975 character(
len(array, IK),SKG) :: sorting(
size(array,
1, IK))
3976 procedure(
logical(LK)) :: isSorted
3977 class(sort_type) ,
intent(in) ,
optional :: method
3982 module function getSortedArrCusComDef_D1_SK1(array, isSorted, method)
result(sorting)
3983#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3984 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedArrCusComDef_D1_SK1
3987 character(
*,SKG) ,
intent(in) ,
contiguous :: array(:)
3988 character(
len(array, IK),SKG) :: sorting(
size(array,
1, IK))
3989 procedure(
logical(LK)) :: isSorted
3990 class(sort_type) ,
intent(in) ,
optional :: method
3997 module function getSortedArrCusComDef_D1_IK5(array, isSorted, method)
result(sorting)
3998#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3999 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedArrCusComDef_D1_IK5
4002 integer(IKG) ,
intent(in) ,
contiguous :: array(:)
4003 integer(IKG) :: sorting(
size(array,
1, IK))
4004 procedure(
logical(LK)) :: isSorted
4005 class(sort_type) ,
intent(in) ,
optional :: method
4010 module function getSortedArrCusComDef_D1_IK4(array, isSorted, method)
result(sorting)
4011#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4012 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedArrCusComDef_D1_IK4
4015 integer(IKG) ,
intent(in) ,
contiguous :: array(:)
4016 integer(IKG) :: sorting(
size(array,
1, IK))
4017 procedure(
logical(LK)) :: isSorted
4018 class(sort_type) ,
intent(in) ,
optional :: method
4023 module function getSortedArrCusComDef_D1_IK3(array, isSorted, method)
result(sorting)
4024#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4025 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedArrCusComDef_D1_IK3
4028 integer(IKG) ,
intent(in) ,
contiguous :: array(:)
4029 integer(IKG) :: sorting(
size(array,
1, IK))
4030 procedure(
logical(LK)) :: isSorted
4031 class(sort_type) ,
intent(in) ,
optional :: method
4036 module function getSortedArrCusComDef_D1_IK2(array, isSorted, method)
result(sorting)
4037#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4038 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedArrCusComDef_D1_IK2
4041 integer(IKG) ,
intent(in) ,
contiguous :: array(:)
4042 integer(IKG) :: sorting(
size(array,
1, IK))
4043 procedure(
logical(LK)) :: isSorted
4044 class(sort_type) ,
intent(in) ,
optional :: method
4049 module function getSortedArrCusComDef_D1_IK1(array, isSorted, method)
result(sorting)
4050#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4051 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedArrCusComDef_D1_IK1
4054 integer(IKG) ,
intent(in) ,
contiguous :: array(:)
4055 integer(IKG) :: sorting(
size(array,
1, IK))
4056 procedure(
logical(LK)) :: isSorted
4057 class(sort_type) ,
intent(in) ,
optional :: method
4064 module function getSortedArrCusComDef_D1_LK5(array, isSorted, method)
result(sorting)
4065#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4066 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedArrCusComDef_D1_LK5
4069 logical(LKG) ,
intent(in) ,
contiguous :: array(:)
4070 logical(LKG) :: sorting(
size(array,
1, IK))
4071 procedure(
logical(LK)) :: isSorted
4072 class(sort_type) ,
intent(in) ,
optional :: method
4077 module function getSortedArrCusComDef_D1_LK4(array, isSorted, method)
result(sorting)
4078#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4079 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedArrCusComDef_D1_LK4
4082 logical(LKG) ,
intent(in) ,
contiguous :: array(:)
4083 logical(LKG) :: sorting(
size(array,
1, IK))
4084 procedure(
logical(LK)) :: isSorted
4085 class(sort_type) ,
intent(in) ,
optional :: method
4090 module function getSortedArrCusComDef_D1_LK3(array, isSorted, method)
result(sorting)
4091#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4092 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedArrCusComDef_D1_LK3
4095 logical(LKG) ,
intent(in) ,
contiguous :: array(:)
4096 logical(LKG) :: sorting(
size(array,
1, IK))
4097 procedure(
logical(LK)) :: isSorted
4098 class(sort_type) ,
intent(in) ,
optional :: method
4103 module function getSortedArrCusComDef_D1_LK2(array, isSorted, method)
result(sorting)
4104#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4105 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedArrCusComDef_D1_LK2
4108 logical(LKG) ,
intent(in) ,
contiguous :: array(:)
4109 logical(LKG) :: sorting(
size(array,
1, IK))
4110 procedure(
logical(LK)) :: isSorted
4111 class(sort_type) ,
intent(in) ,
optional :: method
4116 module function getSortedArrCusComDef_D1_LK1(array, isSorted, method)
result(sorting)
4117#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4118 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedArrCusComDef_D1_LK1
4121 logical(LKG) ,
intent(in) ,
contiguous :: array(:)
4122 logical(LKG) :: sorting(
size(array,
1, IK))
4123 procedure(
logical(LK)) :: isSorted
4124 class(sort_type) ,
intent(in) ,
optional :: method
4131 module function getSortedArrCusComDef_D1_CK5(array, isSorted, method)
result(sorting)
4132#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4133 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedArrCusComDef_D1_CK5
4136 complex(CKG) ,
intent(in) ,
contiguous :: array(:)
4137 complex(CKG) :: sorting(
size(array,
1, IK))
4138 procedure(
logical(LK)) :: isSorted
4139 class(sort_type) ,
intent(in) ,
optional :: method
4144 module function getSortedArrCusComDef_D1_CK4(array, isSorted, method)
result(sorting)
4145#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4146 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedArrCusComDef_D1_CK4
4149 complex(CKG) ,
intent(in) ,
contiguous :: array(:)
4150 complex(CKG) :: sorting(
size(array,
1, IK))
4151 procedure(
logical(LK)) :: isSorted
4152 class(sort_type) ,
intent(in) ,
optional :: method
4157 module function getSortedArrCusComDef_D1_CK3(array, isSorted, method)
result(sorting)
4158#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4159 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedArrCusComDef_D1_CK3
4162 complex(CKG) ,
intent(in) ,
contiguous :: array(:)
4163 complex(CKG) :: sorting(
size(array,
1, IK))
4164 procedure(
logical(LK)) :: isSorted
4165 class(sort_type) ,
intent(in) ,
optional :: method
4170 module function getSortedArrCusComDef_D1_CK2(array, isSorted, method)
result(sorting)
4171#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4172 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedArrCusComDef_D1_CK2
4175 complex(CKG) ,
intent(in) ,
contiguous :: array(:)
4176 complex(CKG) :: sorting(
size(array,
1, IK))
4177 procedure(
logical(LK)) :: isSorted
4178 class(sort_type) ,
intent(in) ,
optional :: method
4183 module function getSortedArrCusComDef_D1_CK1(array, isSorted, method)
result(sorting)
4184#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4185 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedArrCusComDef_D1_CK1
4188 complex(CKG) ,
intent(in) ,
contiguous :: array(:)
4189 complex(CKG) :: sorting(
size(array,
1, IK))
4190 procedure(
logical(LK)) :: isSorted
4191 class(sort_type) ,
intent(in) ,
optional :: method
4198 module function getSortedArrCusComDef_D1_RK5(array, isSorted, method)
result(sorting)
4199#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4200 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedArrCusComDef_D1_RK5
4203 real(RKG) ,
intent(in) ,
contiguous :: array(:)
4204 real(RKG) :: sorting(
size(array,
1, IK))
4205 procedure(
logical(LK)) :: isSorted
4206 class(sort_type) ,
intent(in) ,
optional :: method
4211 module function getSortedArrCusComDef_D1_RK4(array, isSorted, method)
result(sorting)
4212#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4213 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedArrCusComDef_D1_RK4
4216 real(RKG) ,
intent(in) ,
contiguous :: array(:)
4217 real(RKG) :: sorting(
size(array,
1, IK))
4218 procedure(
logical(LK)) :: isSorted
4219 class(sort_type) ,
intent(in) ,
optional :: method
4224 module function getSortedArrCusComDef_D1_RK3(array, isSorted, method)
result(sorting)
4225#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4226 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedArrCusComDef_D1_RK3
4229 real(RKG) ,
intent(in) ,
contiguous :: array(:)
4230 real(RKG) :: sorting(
size(array,
1, IK))
4231 procedure(
logical(LK)) :: isSorted
4232 class(sort_type) ,
intent(in) ,
optional :: method
4237 module function getSortedArrCusComDef_D1_RK2(array, isSorted, method)
result(sorting)
4238#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4239 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedArrCusComDef_D1_RK2
4242 real(RKG) ,
intent(in) ,
contiguous :: array(:)
4243 real(RKG) :: sorting(
size(array,
1, IK))
4244 procedure(
logical(LK)) :: isSorted
4245 class(sort_type) ,
intent(in) ,
optional :: method
4250 module function getSortedArrCusComDef_D1_RK1(array, isSorted, method)
result(sorting)
4251#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4252 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedArrCusComDef_D1_RK1
4255 real(RKG) ,
intent(in) ,
contiguous :: array(:)
4256 real(RKG) :: sorting(
size(array,
1, IK))
4257 procedure(
logical(LK)) :: isSorted
4258 class(sort_type) ,
intent(in) ,
optional :: method
4267 module function getSortedArrCusComDef_D1_PSSK5(array, isSorted, method)
result(sorting)
4268#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4269 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedArrCusComDef_D1_PSSK5
4273 type(css_pdt(SKG)) ,
intent(in) ,
contiguous :: array(:)
4274 type(css_pdt(SKG)) :: sorting(
size(array,
1, IK))
4275 procedure(
logical(LK)) :: isSorted
4276 class(sort_type) ,
intent(in) ,
optional :: method
4281 module function getSortedArrCusComDef_D1_PSSK4(array, isSorted, method)
result(sorting)
4282#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4283 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedArrCusComDef_D1_PSSK4
4287 type(css_pdt(SKG)) ,
intent(in) ,
contiguous :: array(:)
4288 type(css_pdt(SKG)) :: sorting(
size(array,
1, IK))
4289 procedure(
logical(LK)) :: isSorted
4290 class(sort_type) ,
intent(in) ,
optional :: method
4295 module function getSortedArrCusComDef_D1_PSSK3(array, isSorted, method)
result(sorting)
4296#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4297 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedArrCusComDef_D1_PSSK3
4301 type(css_pdt(SKG)) ,
intent(in) ,
contiguous :: array(:)
4302 type(css_pdt(SKG)) :: sorting(
size(array,
1, IK))
4303 procedure(
logical(LK)) :: isSorted
4304 class(sort_type) ,
intent(in) ,
optional :: method
4309 module function getSortedArrCusComDef_D1_PSSK2(array, isSorted, method)
result(sorting)
4310#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4311 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedArrCusComDef_D1_PSSK2
4315 type(css_pdt(SKG)) ,
intent(in) ,
contiguous :: array(:)
4316 type(css_pdt(SKG)) :: sorting(
size(array,
1, IK))
4317 procedure(
logical(LK)) :: isSorted
4318 class(sort_type) ,
intent(in) ,
optional :: method
4323 module function getSortedArrCusComDef_D1_PSSK1(array, isSorted, method)
result(sorting)
4324#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4325 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedArrCusComDef_D1_PSSK1
4329 type(css_pdt(SKG)) ,
intent(in) ,
contiguous :: array(:)
4330 type(css_pdt(SKG)) :: sorting(
size(array,
1, IK))
4331 procedure(
logical(LK)) :: isSorted
4332 class(sort_type) ,
intent(in) ,
optional :: method
4341 module function getSortedArrCusComDef_D1_BSSK(array, isSorted, method)
result(sorting)
4342#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4343 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedArrCusComDef_D1_BSSK
4347 type(css_type) ,
intent(in) ,
contiguous :: array(:)
4348 type(css_type) :: sorting(
size(array,
1, IK))
4349 procedure(
logical(LK)) :: isSorted
4350 class(sort_type) ,
intent(in) ,
optional :: method
4372 module function getSortedIndDefComDef_D0_SK5(array, method)
result(sorting)
4373#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4374 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedIndDefComDef_D0_SK5
4377 character(
*,SKG) ,
intent(in) :: array
4378 integer(IK) :: sorting(
len(array, IK))
4379 type(isort_type) ,
intent(in) :: method
4384 module function getSortedIndDefComDef_D0_SK4(array, method)
result(sorting)
4385#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4386 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedIndDefComDef_D0_SK4
4389 character(
*,SKG) ,
intent(in) :: array
4390 integer(IK) :: sorting(
len(array, IK))
4391 type(isort_type) ,
intent(in) :: method
4396 module function getSortedIndDefComDef_D0_SK3(array, method)
result(sorting)
4397#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4398 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedIndDefComDef_D0_SK3
4401 character(
*,SKG) ,
intent(in) :: array
4402 integer(IK) :: sorting(
len(array, IK))
4403 type(isort_type) ,
intent(in) :: method
4408 module function getSortedIndDefComDef_D0_SK2(array, method)
result(sorting)
4409#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4410 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedIndDefComDef_D0_SK2
4413 character(
*,SKG) ,
intent(in) :: array
4414 integer(IK) :: sorting(
len(array, IK))
4415 type(isort_type) ,
intent(in) :: method
4420 module function getSortedIndDefComDef_D0_SK1(array, method)
result(sorting)
4421#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4422 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedIndDefComDef_D0_SK1
4425 character(
*,SKG) ,
intent(in) :: array
4426 integer(IK) :: sorting(
len(array, IK))
4427 type(isort_type) ,
intent(in) :: method
4434 module function getSortedIndDefComDef_D1_SK5(array, method)
result(sorting)
4435#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4436 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedIndDefComDef_D1_SK5
4439 character(
*,SKG) ,
intent(in) ,
contiguous :: array(:)
4440 integer(IK) :: sorting(
size(array,
1, IK))
4441 type(isort_type) ,
intent(in) :: method
4446 module function getSortedIndDefComDef_D1_SK4(array, method)
result(sorting)
4447#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4448 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedIndDefComDef_D1_SK4
4451 character(
*,SKG) ,
intent(in) ,
contiguous :: array(:)
4452 integer(IK) :: sorting(
size(array,
1, IK))
4453 type(isort_type) ,
intent(in) :: method
4458 module function getSortedIndDefComDef_D1_SK3(array, method)
result(sorting)
4459#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4460 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedIndDefComDef_D1_SK3
4463 character(
*,SKG) ,
intent(in) ,
contiguous :: array(:)
4464 integer(IK) :: sorting(
size(array,
1, IK))
4465 type(isort_type) ,
intent(in) :: method
4470 module function getSortedIndDefComDef_D1_SK2(array, method)
result(sorting)
4471#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4472 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedIndDefComDef_D1_SK2
4475 character(
*,SKG) ,
intent(in) ,
contiguous :: array(:)
4476 integer(IK) :: sorting(
size(array,
1, IK))
4477 type(isort_type) ,
intent(in) :: method
4482 module function getSortedIndDefComDef_D1_SK1(array, method)
result(sorting)
4483#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4484 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedIndDefComDef_D1_SK1
4487 character(
*,SKG) ,
intent(in) ,
contiguous :: array(:)
4488 integer(IK) :: sorting(
size(array,
1, IK))
4489 type(isort_type) ,
intent(in) :: method
4496 module function getSortedIndDefComDef_D1_IK5(array, method)
result(sorting)
4497#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4498 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedIndDefComDef_D1_IK5
4501 integer(IKG) ,
intent(in) ,
contiguous :: array(:)
4502 integer(IK) :: sorting(
size(array,
1, IK))
4503 type(isort_type) ,
intent(in) :: method
4508 module function getSortedIndDefComDef_D1_IK4(array, method)
result(sorting)
4509#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4510 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedIndDefComDef_D1_IK4
4513 integer(IKG) ,
intent(in) ,
contiguous :: array(:)
4514 integer(IK) :: sorting(
size(array,
1, IK))
4515 type(isort_type) ,
intent(in) :: method
4520 module function getSortedIndDefComDef_D1_IK3(array, method)
result(sorting)
4521#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4522 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedIndDefComDef_D1_IK3
4525 integer(IKG) ,
intent(in) ,
contiguous :: array(:)
4526 integer(IK) :: sorting(
size(array,
1, IK))
4527 type(isort_type) ,
intent(in) :: method
4532 module function getSortedIndDefComDef_D1_IK2(array, method)
result(sorting)
4533#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4534 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedIndDefComDef_D1_IK2
4537 integer(IKG) ,
intent(in) ,
contiguous :: array(:)
4538 integer(IK) :: sorting(
size(array,
1, IK))
4539 type(isort_type) ,
intent(in) :: method
4544 module function getSortedIndDefComDef_D1_IK1(array, method)
result(sorting)
4545#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4546 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedIndDefComDef_D1_IK1
4549 integer(IKG) ,
intent(in) ,
contiguous :: array(:)
4550 integer(IK) :: sorting(
size(array,
1, IK))
4551 type(isort_type) ,
intent(in) :: method
4558 module function getSortedIndDefComDef_D1_LK5(array, method)
result(sorting)
4559#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4560 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedIndDefComDef_D1_LK5
4563 logical(LKG) ,
intent(in) ,
contiguous :: array(:)
4564 integer(IK) :: sorting(
size(array,
1, IK))
4565 type(isort_type) ,
intent(in) :: method
4570 module function getSortedIndDefComDef_D1_LK4(array, method)
result(sorting)
4571#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4572 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedIndDefComDef_D1_LK4
4575 logical(LKG) ,
intent(in) ,
contiguous :: array(:)
4576 integer(IK) :: sorting(
size(array,
1, IK))
4577 type(isort_type) ,
intent(in) :: method
4582 module function getSortedIndDefComDef_D1_LK3(array, method)
result(sorting)
4583#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4584 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedIndDefComDef_D1_LK3
4587 logical(LKG) ,
intent(in) ,
contiguous :: array(:)
4588 integer(IK) :: sorting(
size(array,
1, IK))
4589 type(isort_type) ,
intent(in) :: method
4594 module function getSortedIndDefComDef_D1_LK2(array, method)
result(sorting)
4595#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4596 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedIndDefComDef_D1_LK2
4599 logical(LKG) ,
intent(in) ,
contiguous :: array(:)
4600 integer(IK) :: sorting(
size(array,
1, IK))
4601 type(isort_type) ,
intent(in) :: method
4606 module function getSortedIndDefComDef_D1_LK1(array, method)
result(sorting)
4607#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4608 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedIndDefComDef_D1_LK1
4611 logical(LKG) ,
intent(in) ,
contiguous :: array(:)
4612 integer(IK) :: sorting(
size(array,
1, IK))
4613 type(isort_type) ,
intent(in) :: method
4620 module function getSortedIndDefComDef_D1_CK5(array, method)
result(sorting)
4621#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4622 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedIndDefComDef_D1_CK5
4625 complex(CKG) ,
intent(in) ,
contiguous :: array(:)
4626 integer(IK) :: sorting(
size(array,
1, IK))
4627 type(isort_type) ,
intent(in) :: method
4632 module function getSortedIndDefComDef_D1_CK4(array, method)
result(sorting)
4633#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4634 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedIndDefComDef_D1_CK4
4637 complex(CKG) ,
intent(in) ,
contiguous :: array(:)
4638 integer(IK) :: sorting(
size(array,
1, IK))
4639 type(isort_type) ,
intent(in) :: method
4644 module function getSortedIndDefComDef_D1_CK3(array, method)
result(sorting)
4645#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4646 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedIndDefComDef_D1_CK3
4649 complex(CKG) ,
intent(in) ,
contiguous :: array(:)
4650 integer(IK) :: sorting(
size(array,
1, IK))
4651 type(isort_type) ,
intent(in) :: method
4656 module function getSortedIndDefComDef_D1_CK2(array, method)
result(sorting)
4657#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4658 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedIndDefComDef_D1_CK2
4661 complex(CKG) ,
intent(in) ,
contiguous :: array(:)
4662 integer(IK) :: sorting(
size(array,
1, IK))
4663 type(isort_type) ,
intent(in) :: method
4668 module function getSortedIndDefComDef_D1_CK1(array, method)
result(sorting)
4669#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4670 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedIndDefComDef_D1_CK1
4673 complex(CKG) ,
intent(in) ,
contiguous :: array(:)
4674 integer(IK) :: sorting(
size(array,
1, IK))
4675 type(isort_type) ,
intent(in) :: method
4682 module function getSortedIndDefComDef_D1_RK5(array, method)
result(sorting)
4683#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4684 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedIndDefComDef_D1_RK5
4687 real(RKG) ,
intent(in) ,
contiguous :: array(:)
4688 integer(IK) :: sorting(
size(array,
1, IK))
4689 type(isort_type) ,
intent(in) :: method
4694 module function getSortedIndDefComDef_D1_RK4(array, method)
result(sorting)
4695#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4696 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedIndDefComDef_D1_RK4
4699 real(RKG) ,
intent(in) ,
contiguous :: array(:)
4700 integer(IK) :: sorting(
size(array,
1, IK))
4701 type(isort_type) ,
intent(in) :: method
4706 module function getSortedIndDefComDef_D1_RK3(array, method)
result(sorting)
4707#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4708 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedIndDefComDef_D1_RK3
4711 real(RKG) ,
intent(in) ,
contiguous :: array(:)
4712 integer(IK) :: sorting(
size(array,
1, IK))
4713 type(isort_type) ,
intent(in) :: method
4718 module function getSortedIndDefComDef_D1_RK2(array, method)
result(sorting)
4719#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4720 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedIndDefComDef_D1_RK2
4723 real(RKG) ,
intent(in) ,
contiguous :: array(:)
4724 integer(IK) :: sorting(
size(array,
1, IK))
4725 type(isort_type) ,
intent(in) :: method
4730 module function getSortedIndDefComDef_D1_RK1(array, method)
result(sorting)
4731#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4732 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedIndDefComDef_D1_RK1
4735 real(RKG) ,
intent(in) ,
contiguous :: array(:)
4736 integer(IK) :: sorting(
size(array,
1, IK))
4737 type(isort_type) ,
intent(in) :: method
4746 module function getSortedIndDefComDef_D1_PSSK5(array, method)
result(sorting)
4747#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4748 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedIndDefComDef_D1_PSSK5
4752 type(css_pdt(SKG)) ,
intent(in) ,
contiguous :: array(:)
4753 integer(IK) :: sorting(
size(array,
1, IK))
4754 type(isort_type) ,
intent(in) :: method
4759 module function getSortedIndDefComDef_D1_PSSK4(array, method)
result(sorting)
4760#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4761 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedIndDefComDef_D1_PSSK4
4765 type(css_pdt(SKG)) ,
intent(in) ,
contiguous :: array(:)
4766 integer(IK) :: sorting(
size(array,
1, IK))
4767 type(isort_type) ,
intent(in) :: method
4772 module function getSortedIndDefComDef_D1_PSSK3(array, method)
result(sorting)
4773#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4774 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedIndDefComDef_D1_PSSK3
4778 type(css_pdt(SKG)) ,
intent(in) ,
contiguous :: array(:)
4779 integer(IK) :: sorting(
size(array,
1, IK))
4780 type(isort_type) ,
intent(in) :: method
4785 module function getSortedIndDefComDef_D1_PSSK2(array, method)
result(sorting)
4786#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4787 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedIndDefComDef_D1_PSSK2
4791 type(css_pdt(SKG)) ,
intent(in) ,
contiguous :: array(:)
4792 integer(IK) :: sorting(
size(array,
1, IK))
4793 type(isort_type) ,
intent(in) :: method
4798 module function getSortedIndDefComDef_D1_PSSK1(array, method)
result(sorting)
4799#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4800 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedIndDefComDef_D1_PSSK1
4804 type(css_pdt(SKG)) ,
intent(in) ,
contiguous :: array(:)
4805 integer(IK) :: sorting(
size(array,
1, IK))
4806 type(isort_type) ,
intent(in) :: method
4815 module function getSortedIndDefComDef_D1_BSSK(array, method)
result(sorting)
4816#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4817 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedIndDefComDef_D1_BSSK
4821 type(css_type) ,
intent(in) ,
contiguous :: array(:)
4822 integer(IK) :: sorting(
size(array,
1, IK))
4823 type(isort_type) ,
intent(in) :: method
4841 module function getSortedArrDefComDef_D0_SK5(array, method)
result(sorting)
4842#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4843 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedArrDefComDef_D0_SK5
4846 character(
*,SKG) ,
intent(in) :: array
4847 character(
len(array, IK),SKG) :: sorting
4848 class(sort_type) ,
intent(in) ,
optional :: method
4853 module function getSortedArrDefComDef_D0_SK4(array, method)
result(sorting)
4854#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4855 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedArrDefComDef_D0_SK4
4858 character(
*,SKG) ,
intent(in) :: array
4859 character(
len(array, IK),SKG) :: sorting
4860 class(sort_type) ,
intent(in) ,
optional :: method
4865 module function getSortedArrDefComDef_D0_SK3(array, method)
result(sorting)
4866#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4867 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedArrDefComDef_D0_SK3
4870 character(
*,SKG) ,
intent(in) :: array
4871 character(
len(array, IK),SKG) :: sorting
4872 class(sort_type) ,
intent(in) ,
optional :: method
4877 module function getSortedArrDefComDef_D0_SK2(array, method)
result(sorting)
4878#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4879 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedArrDefComDef_D0_SK2
4882 character(
*,SKG) ,
intent(in) :: array
4883 character(
len(array, IK),SKG) :: sorting
4884 class(sort_type) ,
intent(in) ,
optional :: method
4889 module function getSortedArrDefComDef_D0_SK1(array, method)
result(sorting)
4890#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4891 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedArrDefComDef_D0_SK1
4894 character(
*,SKG) ,
intent(in) :: array
4895 character(
len(array, IK),SKG) :: sorting
4896 class(sort_type) ,
intent(in) ,
optional :: method
4903 module function getSortedArrDefComDef_D1_SK5(array, method)
result(sorting)
4904#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4905 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedArrDefComDef_D1_SK5
4908 character(
*,SKG) ,
intent(in) ,
contiguous :: array(:)
4909 character(
len(array, IK),SKG) :: sorting(
size(array,
1, IK))
4910 class(sort_type) ,
intent(in) ,
optional :: method
4915 module function getSortedArrDefComDef_D1_SK4(array, method)
result(sorting)
4916#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4917 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedArrDefComDef_D1_SK4
4920 character(
*,SKG) ,
intent(in) ,
contiguous :: array(:)
4921 character(
len(array, IK),SKG) :: sorting(
size(array,
1, IK))
4922 class(sort_type) ,
intent(in) ,
optional :: method
4927 module function getSortedArrDefComDef_D1_SK3(array, method)
result(sorting)
4928#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4929 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedArrDefComDef_D1_SK3
4932 character(
*,SKG) ,
intent(in) ,
contiguous :: array(:)
4933 character(
len(array, IK),SKG) :: sorting(
size(array,
1, IK))
4934 class(sort_type) ,
intent(in) ,
optional :: method
4939 module function getSortedArrDefComDef_D1_SK2(array, method)
result(sorting)
4940#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4941 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedArrDefComDef_D1_SK2
4944 character(
*,SKG) ,
intent(in) ,
contiguous :: array(:)
4945 character(
len(array, IK),SKG) :: sorting(
size(array,
1, IK))
4946 class(sort_type) ,
intent(in) ,
optional :: method
4951 module function getSortedArrDefComDef_D1_SK1(array, method)
result(sorting)
4952#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4953 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedArrDefComDef_D1_SK1
4956 character(
*,SKG) ,
intent(in) ,
contiguous :: array(:)
4957 character(
len(array, IK),SKG) :: sorting(
size(array,
1, IK))
4958 class(sort_type) ,
intent(in) ,
optional :: method
4965 module function getSortedArrDefComDef_D1_IK5(array, method)
result(sorting)
4966#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4967 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedArrDefComDef_D1_IK5
4970 integer(IKG) ,
intent(in) ,
contiguous :: array(:)
4971 integer(IKG) :: sorting(
size(array,
1, IK))
4972 class(sort_type) ,
intent(in) ,
optional :: method
4977 module function getSortedArrDefComDef_D1_IK4(array, method)
result(sorting)
4978#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4979 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedArrDefComDef_D1_IK4
4982 integer(IKG) ,
intent(in) ,
contiguous :: array(:)
4983 integer(IKG) :: sorting(
size(array,
1, IK))
4984 class(sort_type) ,
intent(in) ,
optional :: method
4989 module function getSortedArrDefComDef_D1_IK3(array, method)
result(sorting)
4990#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4991 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedArrDefComDef_D1_IK3
4994 integer(IKG) ,
intent(in) ,
contiguous :: array(:)
4995 integer(IKG) :: sorting(
size(array,
1, IK))
4996 class(sort_type) ,
intent(in) ,
optional :: method
5001 module function getSortedArrDefComDef_D1_IK2(array, method)
result(sorting)
5002#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5003 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedArrDefComDef_D1_IK2
5006 integer(IKG) ,
intent(in) ,
contiguous :: array(:)
5007 integer(IKG) :: sorting(
size(array,
1, IK))
5008 class(sort_type) ,
intent(in) ,
optional :: method
5013 module function getSortedArrDefComDef_D1_IK1(array, method)
result(sorting)
5014#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5015 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedArrDefComDef_D1_IK1
5018 integer(IKG) ,
intent(in) ,
contiguous :: array(:)
5019 integer(IKG) :: sorting(
size(array,
1, IK))
5020 class(sort_type) ,
intent(in) ,
optional :: method
5027 module function getSortedArrDefComDef_D1_LK5(array, method)
result(sorting)
5028#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5029 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedArrDefComDef_D1_LK5
5032 logical(LKG) ,
intent(in) ,
contiguous :: array(:)
5033 logical(LKG) :: sorting(
size(array,
1, IK))
5034 class(sort_type) ,
intent(in) ,
optional :: method
5039 module function getSortedArrDefComDef_D1_LK4(array, method)
result(sorting)
5040#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5041 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedArrDefComDef_D1_LK4
5044 logical(LKG) ,
intent(in) ,
contiguous :: array(:)
5045 logical(LKG) :: sorting(
size(array,
1, IK))
5046 class(sort_type) ,
intent(in) ,
optional :: method
5051 module function getSortedArrDefComDef_D1_LK3(array, method)
result(sorting)
5052#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5053 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedArrDefComDef_D1_LK3
5056 logical(LKG) ,
intent(in) ,
contiguous :: array(:)
5057 logical(LKG) :: sorting(
size(array,
1, IK))
5058 class(sort_type) ,
intent(in) ,
optional :: method
5063 module function getSortedArrDefComDef_D1_LK2(array, method)
result(sorting)
5064#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5065 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedArrDefComDef_D1_LK2
5068 logical(LKG) ,
intent(in) ,
contiguous :: array(:)
5069 logical(LKG) :: sorting(
size(array,
1, IK))
5070 class(sort_type) ,
intent(in) ,
optional :: method
5075 module function getSortedArrDefComDef_D1_LK1(array, method)
result(sorting)
5076#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5077 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedArrDefComDef_D1_LK1
5080 logical(LKG) ,
intent(in) ,
contiguous :: array(:)
5081 logical(LKG) :: sorting(
size(array,
1, IK))
5082 class(sort_type) ,
intent(in) ,
optional :: method
5089 module function getSortedArrDefComDef_D1_CK5(array, method)
result(sorting)
5090#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5091 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedArrDefComDef_D1_CK5
5094 complex(CKG) ,
intent(in) ,
contiguous :: array(:)
5095 complex(CKG) :: sorting(
size(array,
1, IK))
5096 class(sort_type) ,
intent(in) ,
optional :: method
5101 module function getSortedArrDefComDef_D1_CK4(array, method)
result(sorting)
5102#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5103 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedArrDefComDef_D1_CK4
5106 complex(CKG) ,
intent(in) ,
contiguous :: array(:)
5107 complex(CKG) :: sorting(
size(array,
1, IK))
5108 class(sort_type) ,
intent(in) ,
optional :: method
5113 module function getSortedArrDefComDef_D1_CK3(array, method)
result(sorting)
5114#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5115 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedArrDefComDef_D1_CK3
5118 complex(CKG) ,
intent(in) ,
contiguous :: array(:)
5119 complex(CKG) :: sorting(
size(array,
1, IK))
5120 class(sort_type) ,
intent(in) ,
optional :: method
5125 module function getSortedArrDefComDef_D1_CK2(array, method)
result(sorting)
5126#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5127 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedArrDefComDef_D1_CK2
5130 complex(CKG) ,
intent(in) ,
contiguous :: array(:)
5131 complex(CKG) :: sorting(
size(array,
1, IK))
5132 class(sort_type) ,
intent(in) ,
optional :: method
5137 module function getSortedArrDefComDef_D1_CK1(array, method)
result(sorting)
5138#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5139 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedArrDefComDef_D1_CK1
5142 complex(CKG) ,
intent(in) ,
contiguous :: array(:)
5143 complex(CKG) :: sorting(
size(array,
1, IK))
5144 class(sort_type) ,
intent(in) ,
optional :: method
5151 module function getSortedArrDefComDef_D1_RK5(array, method)
result(sorting)
5152#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5153 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedArrDefComDef_D1_RK5
5156 real(RKG) ,
intent(in) ,
contiguous :: array(:)
5157 real(RKG) :: sorting(
size(array,
1, IK))
5158 class(sort_type) ,
intent(in) ,
optional :: method
5163 module function getSortedArrDefComDef_D1_RK4(array, method)
result(sorting)
5164#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5165 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedArrDefComDef_D1_RK4
5168 real(RKG) ,
intent(in) ,
contiguous :: array(:)
5169 real(RKG) :: sorting(
size(array,
1, IK))
5170 class(sort_type) ,
intent(in) ,
optional :: method
5175 module function getSortedArrDefComDef_D1_RK3(array, method)
result(sorting)
5176#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5177 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedArrDefComDef_D1_RK3
5180 real(RKG) ,
intent(in) ,
contiguous :: array(:)
5181 real(RKG) :: sorting(
size(array,
1, IK))
5182 class(sort_type) ,
intent(in) ,
optional :: method
5187 module function getSortedArrDefComDef_D1_RK2(array, method)
result(sorting)
5188#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5189 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedArrDefComDef_D1_RK2
5192 real(RKG) ,
intent(in) ,
contiguous :: array(:)
5193 real(RKG) :: sorting(
size(array,
1, IK))
5194 class(sort_type) ,
intent(in) ,
optional :: method
5199 module function getSortedArrDefComDef_D1_RK1(array, method)
result(sorting)
5200#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5201 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedArrDefComDef_D1_RK1
5204 real(RKG) ,
intent(in) ,
contiguous :: array(:)
5205 real(RKG) :: sorting(
size(array,
1, IK))
5206 class(sort_type) ,
intent(in) ,
optional :: method
5215 module function getSortedArrDefComDef_D1_PSSK5(array, method)
result(sorting)
5216#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5217 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedArrDefComDef_D1_PSSK5
5221 type(css_pdt(SKG)) ,
intent(in) ,
contiguous :: array(:)
5222 type(css_pdt(SKG)) :: sorting(
size(array,
1, IK))
5223 class(sort_type) ,
intent(in) ,
optional :: method
5228 module function getSortedArrDefComDef_D1_PSSK4(array, method)
result(sorting)
5229#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5230 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedArrDefComDef_D1_PSSK4
5234 type(css_pdt(SKG)) ,
intent(in) ,
contiguous :: array(:)
5235 type(css_pdt(SKG)) :: sorting(
size(array,
1, IK))
5236 class(sort_type) ,
intent(in) ,
optional :: method
5241 module function getSortedArrDefComDef_D1_PSSK3(array, method)
result(sorting)
5242#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5243 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedArrDefComDef_D1_PSSK3
5247 type(css_pdt(SKG)) ,
intent(in) ,
contiguous :: array(:)
5248 type(css_pdt(SKG)) :: sorting(
size(array,
1, IK))
5249 class(sort_type) ,
intent(in) ,
optional :: method
5254 module function getSortedArrDefComDef_D1_PSSK2(array, method)
result(sorting)
5255#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5256 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedArrDefComDef_D1_PSSK2
5260 type(css_pdt(SKG)) ,
intent(in) ,
contiguous :: array(:)
5261 type(css_pdt(SKG)) :: sorting(
size(array,
1, IK))
5262 class(sort_type) ,
intent(in) ,
optional :: method
5267 module function getSortedArrDefComDef_D1_PSSK1(array, method)
result(sorting)
5268#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5269 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedArrDefComDef_D1_PSSK1
5273 type(css_pdt(SKG)) ,
intent(in) ,
contiguous :: array(:)
5274 type(css_pdt(SKG)) :: sorting(
size(array,
1, IK))
5275 class(sort_type) ,
intent(in) ,
optional :: method
5284 module function getSortedArrDefComDef_D1_BSSK(array, method)
result(sorting)
5285#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5286 !DEC$ ATTRIBUTES DLLEXPORT :: getSortedArrDefComDef_D1_BSSK
5290 type(css_type) ,
intent(in) ,
contiguous :: array(:)
5291 type(css_type) :: sorting(
size(array,
1, IK))
5292 class(sort_type) ,
intent(in) ,
optional :: method
5549 PURE module subroutine setSortedIndDefComDef_D0_SK5(array, index)
5550#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5551 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedIndDefComDef_D0_SK5
5554 character(
*,SKG) ,
intent(in) :: array
5555 integer(IK) ,
intent(out) ,
contiguous ::
index(:)
5560 PURE module subroutine setSortedIndDefComDef_D0_SK4(array, index)
5561#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5562 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedIndDefComDef_D0_SK4
5565 character(
*,SKG) ,
intent(in) :: array
5566 integer(IK) ,
intent(out) ,
contiguous ::
index(:)
5571 PURE module subroutine setSortedIndDefComDef_D0_SK3(array, index)
5572#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5573 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedIndDefComDef_D0_SK3
5576 character(
*,SKG) ,
intent(in) :: array
5577 integer(IK) ,
intent(out) ,
contiguous ::
index(:)
5582 PURE module subroutine setSortedIndDefComDef_D0_SK2(array, index)
5583#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5584 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedIndDefComDef_D0_SK2
5587 character(
*,SKG) ,
intent(in) :: array
5588 integer(IK) ,
intent(out) ,
contiguous ::
index(:)
5593 PURE module subroutine setSortedIndDefComDef_D0_SK1(array, index)
5594#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5595 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedIndDefComDef_D0_SK1
5598 character(
*,SKG) ,
intent(in) :: array
5599 integer(IK) ,
intent(out) ,
contiguous ::
index(:)
5606 PURE module subroutine setSortedIndDefComDef_D1_SK5(array, index)
5607#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5608 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedIndDefComDef_D1_SK5
5611 character(
*,SKG) ,
intent(in) ,
contiguous :: array(:)
5612 integer(IK) ,
intent(out) ,
contiguous ::
index(:)
5617 PURE module subroutine setSortedIndDefComDef_D1_SK4(array, index)
5618#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5619 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedIndDefComDef_D1_SK4
5622 character(
*,SKG) ,
intent(in) ,
contiguous :: array(:)
5623 integer(IK) ,
intent(out) ,
contiguous ::
index(:)
5628 PURE module subroutine setSortedIndDefComDef_D1_SK3(array, index)
5629#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5630 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedIndDefComDef_D1_SK3
5633 character(
*,SKG) ,
intent(in) ,
contiguous :: array(:)
5634 integer(IK) ,
intent(out) ,
contiguous ::
index(:)
5639 PURE module subroutine setSortedIndDefComDef_D1_SK2(array, index)
5640#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5641 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedIndDefComDef_D1_SK2
5644 character(
*,SKG) ,
intent(in) ,
contiguous :: array(:)
5645 integer(IK) ,
intent(out) ,
contiguous ::
index(:)
5650 PURE module subroutine setSortedIndDefComDef_D1_SK1(array, index)
5651#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5652 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedIndDefComDef_D1_SK1
5655 character(
*,SKG) ,
intent(in) ,
contiguous :: array(:)
5656 integer(IK) ,
intent(out) ,
contiguous ::
index(:)
5663 PURE module subroutine setSortedIndDefComDef_D1_IK5(array, index)
5664#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5665 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedIndDefComDef_D1_IK5
5668 integer(IKG) ,
intent(in) ,
contiguous :: array(:)
5669 integer(IK) ,
intent(out) ,
contiguous ::
index(:)
5674 PURE module subroutine setSortedIndDefComDef_D1_IK4(array, index)
5675#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5676 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedIndDefComDef_D1_IK4
5679 integer(IKG) ,
intent(in) ,
contiguous :: array(:)
5680 integer(IK) ,
intent(out) ,
contiguous ::
index(:)
5685 PURE module subroutine setSortedIndDefComDef_D1_IK3(array, index)
5686#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5687 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedIndDefComDef_D1_IK3
5690 integer(IKG) ,
intent(in) ,
contiguous :: array(:)
5691 integer(IK) ,
intent(out) ,
contiguous ::
index(:)
5696 PURE module subroutine setSortedIndDefComDef_D1_IK2(array, index)
5697#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5698 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedIndDefComDef_D1_IK2
5701 integer(IKG) ,
intent(in) ,
contiguous :: array(:)
5702 integer(IK) ,
intent(out) ,
contiguous ::
index(:)
5707 PURE module subroutine setSortedIndDefComDef_D1_IK1(array, index)
5708#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5709 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedIndDefComDef_D1_IK1
5712 integer(IKG) ,
intent(in) ,
contiguous :: array(:)
5713 integer(IK) ,
intent(out) ,
contiguous ::
index(:)
5720 PURE module subroutine setSortedIndDefComDef_D1_LK5(array, index)
5721#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5722 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedIndDefComDef_D1_LK5
5725 logical(LKG) ,
intent(in) ,
contiguous :: array(:)
5726 integer(IK) ,
intent(out) ,
contiguous ::
index(:)
5731 PURE module subroutine setSortedIndDefComDef_D1_LK4(array, index)
5732#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5733 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedIndDefComDef_D1_LK4
5736 logical(LKG) ,
intent(in) ,
contiguous :: array(:)
5737 integer(IK) ,
intent(out) ,
contiguous ::
index(:)
5742 PURE module subroutine setSortedIndDefComDef_D1_LK3(array, index)
5743#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5744 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedIndDefComDef_D1_LK3
5747 logical(LKG) ,
intent(in) ,
contiguous :: array(:)
5748 integer(IK) ,
intent(out) ,
contiguous ::
index(:)
5753 PURE module subroutine setSortedIndDefComDef_D1_LK2(array, index)
5754#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5755 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedIndDefComDef_D1_LK2
5758 logical(LKG) ,
intent(in) ,
contiguous :: array(:)
5759 integer(IK) ,
intent(out) ,
contiguous ::
index(:)
5764 PURE module subroutine setSortedIndDefComDef_D1_LK1(array, index)
5765#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5766 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedIndDefComDef_D1_LK1
5769 logical(LKG) ,
intent(in) ,
contiguous :: array(:)
5770 integer(IK) ,
intent(out) ,
contiguous ::
index(:)
5777 PURE module subroutine setSortedIndDefComDef_D1_CK5(array, index)
5778#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5779 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedIndDefComDef_D1_CK5
5782 complex(CKG) ,
intent(in) ,
contiguous :: array(:)
5783 integer(IK) ,
intent(out) ,
contiguous ::
index(:)
5788 PURE module subroutine setSortedIndDefComDef_D1_CK4(array, index)
5789#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5790 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedIndDefComDef_D1_CK4
5793 complex(CKG) ,
intent(in) ,
contiguous :: array(:)
5794 integer(IK) ,
intent(out) ,
contiguous ::
index(:)
5799 PURE module subroutine setSortedIndDefComDef_D1_CK3(array, index)
5800#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5801 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedIndDefComDef_D1_CK3
5804 complex(CKG) ,
intent(in) ,
contiguous :: array(:)
5805 integer(IK) ,
intent(out) ,
contiguous ::
index(:)
5810 PURE module subroutine setSortedIndDefComDef_D1_CK2(array, index)
5811#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5812 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedIndDefComDef_D1_CK2
5815 complex(CKG) ,
intent(in) ,
contiguous :: array(:)
5816 integer(IK) ,
intent(out) ,
contiguous ::
index(:)
5821 PURE module subroutine setSortedIndDefComDef_D1_CK1(array, index)
5822#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5823 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedIndDefComDef_D1_CK1
5826 complex(CKG) ,
intent(in) ,
contiguous :: array(:)
5827 integer(IK) ,
intent(out) ,
contiguous ::
index(:)
5834 PURE module subroutine setSortedIndDefComDef_D1_RK5(array, index)
5835#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5836 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedIndDefComDef_D1_RK5
5839 real(RKG) ,
intent(in) ,
contiguous :: array(:)
5840 integer(IK) ,
intent(out) ,
contiguous ::
index(:)
5845 PURE module subroutine setSortedIndDefComDef_D1_RK4(array, index)
5846#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5847 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedIndDefComDef_D1_RK4
5850 real(RKG) ,
intent(in) ,
contiguous :: array(:)
5851 integer(IK) ,
intent(out) ,
contiguous ::
index(:)
5856 PURE module subroutine setSortedIndDefComDef_D1_RK3(array, index)
5857#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5858 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedIndDefComDef_D1_RK3
5861 real(RKG) ,
intent(in) ,
contiguous :: array(:)
5862 integer(IK) ,
intent(out) ,
contiguous ::
index(:)
5867 PURE module subroutine setSortedIndDefComDef_D1_RK2(array, index)
5868#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5869 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedIndDefComDef_D1_RK2
5872 real(RKG) ,
intent(in) ,
contiguous :: array(:)
5873 integer(IK) ,
intent(out) ,
contiguous ::
index(:)
5878 PURE module subroutine setSortedIndDefComDef_D1_RK1(array, index)
5879#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5880 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedIndDefComDef_D1_RK1
5883 real(RKG) ,
intent(in) ,
contiguous :: array(:)
5884 integer(IK) ,
intent(out) ,
contiguous ::
index(:)
5893 PURE module subroutine setSortedIndDefComDef_D1_PSSK5(array, index)
5894#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5895 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedIndDefComDef_D1_PSSK5
5899 type(css_pdt(SKG)) ,
intent(in) ,
contiguous :: array(:)
5900 integer(IK) ,
intent(out) ,
contiguous ::
index(:)
5905 PURE module subroutine setSortedIndDefComDef_D1_PSSK4(array, index)
5906#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5907 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedIndDefComDef_D1_PSSK4
5911 type(css_pdt(SKG)) ,
intent(in) ,
contiguous :: array(:)
5912 integer(IK) ,
intent(out) ,
contiguous ::
index(:)
5917 PURE module subroutine setSortedIndDefComDef_D1_PSSK3(array, index)
5918#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5919 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedIndDefComDef_D1_PSSK3
5923 type(css_pdt(SKG)) ,
intent(in) ,
contiguous :: array(:)
5924 integer(IK) ,
intent(out) ,
contiguous ::
index(:)
5929 PURE module subroutine setSortedIndDefComDef_D1_PSSK2(array, index)
5930#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5931 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedIndDefComDef_D1_PSSK2
5935 type(css_pdt(SKG)) ,
intent(in) ,
contiguous :: array(:)
5936 integer(IK) ,
intent(out) ,
contiguous ::
index(:)
5941 PURE module subroutine setSortedIndDefComDef_D1_PSSK1(array, index)
5942#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5943 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedIndDefComDef_D1_PSSK1
5947 type(css_pdt(SKG)) ,
intent(in) ,
contiguous :: array(:)
5948 integer(IK) ,
intent(out) ,
contiguous ::
index(:)
5957 PURE module subroutine setSortedIndDefComDef_D1_BSSK(array, index)
5958#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5959 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedIndDefComDef_D1_BSSK
5963 type(css_type) ,
intent(in) ,
contiguous :: array(:)
5964 integer(IK) ,
intent(out) ,
contiguous ::
index(:)
5986 module subroutine setSortedIndCusComDef_D0_SK5(array, index, isSorted)
5987#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5988 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedIndCusComDef_D0_SK5
5991 character(
*,SKG) ,
intent(in) :: array
5992 integer(IK) ,
intent(out) ,
contiguous ::
index(:)
5993 procedure(
logical(LK)) :: isSorted
5998 module subroutine setSortedIndCusComDef_D0_SK4(array, index, isSorted)
5999#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6000 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedIndCusComDef_D0_SK4
6003 character(
*,SKG) ,
intent(in) :: array
6004 integer(IK) ,
intent(out) ,
contiguous ::
index(:)
6005 procedure(
logical(LK)) :: isSorted
6010 module subroutine setSortedIndCusComDef_D0_SK3(array, index, isSorted)
6011#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6012 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedIndCusComDef_D0_SK3
6015 character(
*,SKG) ,
intent(in) :: array
6016 integer(IK) ,
intent(out) ,
contiguous ::
index(:)
6017 procedure(
logical(LK)) :: isSorted
6022 module subroutine setSortedIndCusComDef_D0_SK2(array, index, isSorted)
6023#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6024 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedIndCusComDef_D0_SK2
6027 character(
*,SKG) ,
intent(in) :: array
6028 integer(IK) ,
intent(out) ,
contiguous ::
index(:)
6029 procedure(
logical(LK)) :: isSorted
6034 module subroutine setSortedIndCusComDef_D0_SK1(array, index, isSorted)
6035#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6036 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedIndCusComDef_D0_SK1
6039 character(
*,SKG) ,
intent(in) :: array
6040 integer(IK) ,
intent(out) ,
contiguous ::
index(:)
6041 procedure(
logical(LK)) :: isSorted
6048 module subroutine setSortedIndCusComDef_D1_SK5(array, index, isSorted)
6049#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6050 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedIndCusComDef_D1_SK5
6053 character(
*,SKG) ,
intent(in) ,
contiguous :: array(:)
6054 integer(IK) ,
intent(out) ,
contiguous ::
index(:)
6055 procedure(
logical(LK)) :: isSorted
6060 module subroutine setSortedIndCusComDef_D1_SK4(array, index, isSorted)
6061#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6062 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedIndCusComDef_D1_SK4
6065 character(
*,SKG) ,
intent(in) ,
contiguous :: array(:)
6066 integer(IK) ,
intent(out) ,
contiguous ::
index(:)
6067 procedure(
logical(LK)) :: isSorted
6072 module subroutine setSortedIndCusComDef_D1_SK3(array, index, isSorted)
6073#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6074 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedIndCusComDef_D1_SK3
6077 character(
*,SKG) ,
intent(in) ,
contiguous :: array(:)
6078 integer(IK) ,
intent(out) ,
contiguous ::
index(:)
6079 procedure(
logical(LK)) :: isSorted
6084 module subroutine setSortedIndCusComDef_D1_SK2(array, index, isSorted)
6085#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6086 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedIndCusComDef_D1_SK2
6089 character(
*,SKG) ,
intent(in) ,
contiguous :: array(:)
6090 integer(IK) ,
intent(out) ,
contiguous ::
index(:)
6091 procedure(
logical(LK)) :: isSorted
6096 module subroutine setSortedIndCusComDef_D1_SK1(array, index, isSorted)
6097#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6098 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedIndCusComDef_D1_SK1
6101 character(
*,SKG) ,
intent(in) ,
contiguous :: array(:)
6102 integer(IK) ,
intent(out) ,
contiguous ::
index(:)
6103 procedure(
logical(LK)) :: isSorted
6110 module subroutine setSortedIndCusComDef_D1_IK5(array, index, isSorted)
6111#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6112 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedIndCusComDef_D1_IK5
6115 integer(IKG) ,
intent(in) ,
contiguous :: array(:)
6116 integer(IK) ,
intent(out) ,
contiguous ::
index(:)
6117 procedure(
logical(LK)) :: isSorted
6122 module subroutine setSortedIndCusComDef_D1_IK4(array, index, isSorted)
6123#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6124 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedIndCusComDef_D1_IK4
6127 integer(IKG) ,
intent(in) ,
contiguous :: array(:)
6128 integer(IK) ,
intent(out) ,
contiguous ::
index(:)
6129 procedure(
logical(LK)) :: isSorted
6134 module subroutine setSortedIndCusComDef_D1_IK3(array, index, isSorted)
6135#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6136 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedIndCusComDef_D1_IK3
6139 integer(IKG) ,
intent(in) ,
contiguous :: array(:)
6140 integer(IK) ,
intent(out) ,
contiguous ::
index(:)
6141 procedure(
logical(LK)) :: isSorted
6146 module subroutine setSortedIndCusComDef_D1_IK2(array, index, isSorted)
6147#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6148 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedIndCusComDef_D1_IK2
6151 integer(IKG) ,
intent(in) ,
contiguous :: array(:)
6152 integer(IK) ,
intent(out) ,
contiguous ::
index(:)
6153 procedure(
logical(LK)) :: isSorted
6158 module subroutine setSortedIndCusComDef_D1_IK1(array, index, isSorted)
6159#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6160 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedIndCusComDef_D1_IK1
6163 integer(IKG) ,
intent(in) ,
contiguous :: array(:)
6164 integer(IK) ,
intent(out) ,
contiguous ::
index(:)
6165 procedure(
logical(LK)) :: isSorted
6172 module subroutine setSortedIndCusComDef_D1_LK5(array, index, isSorted)
6173#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6174 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedIndCusComDef_D1_LK5
6177 logical(LKG) ,
intent(in) ,
contiguous :: array(:)
6178 integer(IK) ,
intent(out) ,
contiguous ::
index(:)
6179 procedure(
logical(LK)) :: isSorted
6184 module subroutine setSortedIndCusComDef_D1_LK4(array, index, isSorted)
6185#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6186 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedIndCusComDef_D1_LK4
6189 logical(LKG) ,
intent(in) ,
contiguous :: array(:)
6190 integer(IK) ,
intent(out) ,
contiguous ::
index(:)
6191 procedure(
logical(LK)) :: isSorted
6196 module subroutine setSortedIndCusComDef_D1_LK3(array, index, isSorted)
6197#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6198 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedIndCusComDef_D1_LK3
6201 logical(LKG) ,
intent(in) ,
contiguous :: array(:)
6202 integer(IK) ,
intent(out) ,
contiguous ::
index(:)
6203 procedure(
logical(LK)) :: isSorted
6208 module subroutine setSortedIndCusComDef_D1_LK2(array, index, isSorted)
6209#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6210 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedIndCusComDef_D1_LK2
6213 logical(LKG) ,
intent(in) ,
contiguous :: array(:)
6214 integer(IK) ,
intent(out) ,
contiguous ::
index(:)
6215 procedure(
logical(LK)) :: isSorted
6220 module subroutine setSortedIndCusComDef_D1_LK1(array, index, isSorted)
6221#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6222 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedIndCusComDef_D1_LK1
6225 logical(LKG) ,
intent(in) ,
contiguous :: array(:)
6226 integer(IK) ,
intent(out) ,
contiguous ::
index(:)
6227 procedure(
logical(LK)) :: isSorted
6234 module subroutine setSortedIndCusComDef_D1_CK5(array, index, isSorted)
6235#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6236 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedIndCusComDef_D1_CK5
6239 complex(CKG) ,
intent(in) ,
contiguous :: array(:)
6240 integer(IK) ,
intent(out) ,
contiguous ::
index(:)
6241 procedure(
logical(LK)) :: isSorted
6246 module subroutine setSortedIndCusComDef_D1_CK4(array, index, isSorted)
6247#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6248 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedIndCusComDef_D1_CK4
6251 complex(CKG) ,
intent(in) ,
contiguous :: array(:)
6252 integer(IK) ,
intent(out) ,
contiguous ::
index(:)
6253 procedure(
logical(LK)) :: isSorted
6258 module subroutine setSortedIndCusComDef_D1_CK3(array, index, isSorted)
6259#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6260 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedIndCusComDef_D1_CK3
6263 complex(CKG) ,
intent(in) ,
contiguous :: array(:)
6264 integer(IK) ,
intent(out) ,
contiguous ::
index(:)
6265 procedure(
logical(LK)) :: isSorted
6270 module subroutine setSortedIndCusComDef_D1_CK2(array, index, isSorted)
6271#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6272 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedIndCusComDef_D1_CK2
6275 complex(CKG) ,
intent(in) ,
contiguous :: array(:)
6276 integer(IK) ,
intent(out) ,
contiguous ::
index(:)
6277 procedure(
logical(LK)) :: isSorted
6282 module subroutine setSortedIndCusComDef_D1_CK1(array, index, isSorted)
6283#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6284 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedIndCusComDef_D1_CK1
6287 complex(CKG) ,
intent(in) ,
contiguous :: array(:)
6288 integer(IK) ,
intent(out) ,
contiguous ::
index(:)
6289 procedure(
logical(LK)) :: isSorted
6296 module subroutine setSortedIndCusComDef_D1_RK5(array, index, isSorted)
6297#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6298 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedIndCusComDef_D1_RK5
6301 real(RKG) ,
intent(in) ,
contiguous :: array(:)
6302 integer(IK) ,
intent(out) ,
contiguous ::
index(:)
6303 procedure(
logical(LK)) :: isSorted
6308 module subroutine setSortedIndCusComDef_D1_RK4(array, index, isSorted)
6309#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6310 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedIndCusComDef_D1_RK4
6313 real(RKG) ,
intent(in) ,
contiguous :: array(:)
6314 integer(IK) ,
intent(out) ,
contiguous ::
index(:)
6315 procedure(
logical(LK)) :: isSorted
6320 module subroutine setSortedIndCusComDef_D1_RK3(array, index, isSorted)
6321#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6322 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedIndCusComDef_D1_RK3
6325 real(RKG) ,
intent(in) ,
contiguous :: array(:)
6326 integer(IK) ,
intent(out) ,
contiguous ::
index(:)
6327 procedure(
logical(LK)) :: isSorted
6332 module subroutine setSortedIndCusComDef_D1_RK2(array, index, isSorted)
6333#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6334 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedIndCusComDef_D1_RK2
6337 real(RKG) ,
intent(in) ,
contiguous :: array(:)
6338 integer(IK) ,
intent(out) ,
contiguous ::
index(:)
6339 procedure(
logical(LK)) :: isSorted
6344 module subroutine setSortedIndCusComDef_D1_RK1(array, index, isSorted)
6345#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6346 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedIndCusComDef_D1_RK1
6349 real(RKG) ,
intent(in) ,
contiguous :: array(:)
6350 integer(IK) ,
intent(out) ,
contiguous ::
index(:)
6351 procedure(
logical(LK)) :: isSorted
6360 module subroutine setSortedIndCusComDef_D1_PSSK5(array, index, isSorted)
6361#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6362 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedIndCusComDef_D1_PSSK5
6366 type(css_pdt(SKG)) ,
intent(in) ,
contiguous :: array(:)
6367 integer(IK) ,
intent(out) ,
contiguous ::
index(:)
6368 procedure(
logical(LK)) :: isSorted
6373 module subroutine setSortedIndCusComDef_D1_PSSK4(array, index, isSorted)
6374#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6375 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedIndCusComDef_D1_PSSK4
6379 type(css_pdt(SKG)) ,
intent(in) ,
contiguous :: array(:)
6380 integer(IK) ,
intent(out) ,
contiguous ::
index(:)
6381 procedure(
logical(LK)) :: isSorted
6386 module subroutine setSortedIndCusComDef_D1_PSSK3(array, index, isSorted)
6387#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6388 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedIndCusComDef_D1_PSSK3
6392 type(css_pdt(SKG)) ,
intent(in) ,
contiguous :: array(:)
6393 integer(IK) ,
intent(out) ,
contiguous ::
index(:)
6394 procedure(
logical(LK)) :: isSorted
6399 module subroutine setSortedIndCusComDef_D1_PSSK2(array, index, isSorted)
6400#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6401 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedIndCusComDef_D1_PSSK2
6405 type(css_pdt(SKG)) ,
intent(in) ,
contiguous :: array(:)
6406 integer(IK) ,
intent(out) ,
contiguous ::
index(:)
6407 procedure(
logical(LK)) :: isSorted
6412 module subroutine setSortedIndCusComDef_D1_PSSK1(array, index, isSorted)
6413#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6414 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedIndCusComDef_D1_PSSK1
6418 type(css_pdt(SKG)) ,
intent(in) ,
contiguous :: array(:)
6419 integer(IK) ,
intent(out) ,
contiguous ::
index(:)
6420 procedure(
logical(LK)) :: isSorted
6429 module subroutine setSortedIndCusComDef_D1_BSSK(array, index, isSorted)
6430#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6431 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedIndCusComDef_D1_BSSK
6435 type(css_type) ,
intent(in) ,
contiguous :: array(:)
6436 integer(IK) ,
intent(out) ,
contiguous ::
index(:)
6437 procedure(
logical(LK)) :: isSorted
6457 module subroutine setSortedArrCusComDef_D0_SK5(array, isSorted)
6458#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6459 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComDef_D0_SK5
6462 character(
*,SKG) ,
intent(inout) :: array
6463 procedure(
logical(LK)) :: isSorted
6468 module subroutine setSortedArrCusComDef_D0_SK4(array, isSorted)
6469#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6470 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComDef_D0_SK4
6473 character(
*,SKG) ,
intent(inout) :: array
6474 procedure(
logical(LK)) :: isSorted
6479 module subroutine setSortedArrCusComDef_D0_SK3(array, isSorted)
6480#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6481 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComDef_D0_SK3
6484 character(
*,SKG) ,
intent(inout) :: array
6485 procedure(
logical(LK)) :: isSorted
6490 module subroutine setSortedArrCusComDef_D0_SK2(array, isSorted)
6491#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6492 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComDef_D0_SK2
6495 character(
*,SKG) ,
intent(inout) :: array
6496 procedure(
logical(LK)) :: isSorted
6501 module subroutine setSortedArrCusComDef_D0_SK1(array, isSorted)
6502#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6503 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComDef_D0_SK1
6506 character(
*,SKG) ,
intent(inout) :: array
6507 procedure(
logical(LK)) :: isSorted
6514 module subroutine setSortedArrCusComDef_D1_SK5(array, isSorted)
6515#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6516 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComDef_D1_SK5
6519 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
6520 procedure(
logical(LK)) :: isSorted
6525 module subroutine setSortedArrCusComDef_D1_SK4(array, isSorted)
6526#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6527 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComDef_D1_SK4
6530 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
6531 procedure(
logical(LK)) :: isSorted
6536 module subroutine setSortedArrCusComDef_D1_SK3(array, isSorted)
6537#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6538 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComDef_D1_SK3
6541 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
6542 procedure(
logical(LK)) :: isSorted
6547 module subroutine setSortedArrCusComDef_D1_SK2(array, isSorted)
6548#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6549 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComDef_D1_SK2
6552 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
6553 procedure(
logical(LK)) :: isSorted
6558 module subroutine setSortedArrCusComDef_D1_SK1(array, isSorted)
6559#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6560 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComDef_D1_SK1
6563 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
6564 procedure(
logical(LK)) :: isSorted
6571 module subroutine setSortedArrCusComDef_D1_IK5(array, isSorted)
6572#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6573 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComDef_D1_IK5
6576 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
6577 procedure(
logical(LK)) :: isSorted
6582 module subroutine setSortedArrCusComDef_D1_IK4(array, isSorted)
6583#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6584 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComDef_D1_IK4
6587 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
6588 procedure(
logical(LK)) :: isSorted
6593 module subroutine setSortedArrCusComDef_D1_IK3(array, isSorted)
6594#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6595 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComDef_D1_IK3
6598 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
6599 procedure(
logical(LK)) :: isSorted
6604 module subroutine setSortedArrCusComDef_D1_IK2(array, isSorted)
6605#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6606 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComDef_D1_IK2
6609 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
6610 procedure(
logical(LK)) :: isSorted
6615 module subroutine setSortedArrCusComDef_D1_IK1(array, isSorted)
6616#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6617 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComDef_D1_IK1
6620 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
6621 procedure(
logical(LK)) :: isSorted
6628 module subroutine setSortedArrCusComDef_D1_LK5(array, isSorted)
6629#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6630 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComDef_D1_LK5
6633 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
6634 procedure(
logical(LK)) :: isSorted
6639 module subroutine setSortedArrCusComDef_D1_LK4(array, isSorted)
6640#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6641 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComDef_D1_LK4
6644 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
6645 procedure(
logical(LK)) :: isSorted
6650 module subroutine setSortedArrCusComDef_D1_LK3(array, isSorted)
6651#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6652 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComDef_D1_LK3
6655 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
6656 procedure(
logical(LK)) :: isSorted
6661 module subroutine setSortedArrCusComDef_D1_LK2(array, isSorted)
6662#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6663 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComDef_D1_LK2
6666 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
6667 procedure(
logical(LK)) :: isSorted
6672 module subroutine setSortedArrCusComDef_D1_LK1(array, isSorted)
6673#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6674 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComDef_D1_LK1
6677 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
6678 procedure(
logical(LK)) :: isSorted
6685 module subroutine setSortedArrCusComDef_D1_CK5(array, isSorted)
6686#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6687 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComDef_D1_CK5
6690 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
6691 procedure(
logical(LK)) :: isSorted
6696 module subroutine setSortedArrCusComDef_D1_CK4(array, isSorted)
6697#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6698 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComDef_D1_CK4
6701 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
6702 procedure(
logical(LK)) :: isSorted
6707 module subroutine setSortedArrCusComDef_D1_CK3(array, isSorted)
6708#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6709 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComDef_D1_CK3
6712 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
6713 procedure(
logical(LK)) :: isSorted
6718 module subroutine setSortedArrCusComDef_D1_CK2(array, isSorted)
6719#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6720 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComDef_D1_CK2
6723 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
6724 procedure(
logical(LK)) :: isSorted
6729 module subroutine setSortedArrCusComDef_D1_CK1(array, isSorted)
6730#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6731 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComDef_D1_CK1
6734 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
6735 procedure(
logical(LK)) :: isSorted
6742 module subroutine setSortedArrCusComDef_D1_RK5(array, isSorted)
6743#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6744 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComDef_D1_RK5
6747 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
6748 procedure(
logical(LK)) :: isSorted
6753 module subroutine setSortedArrCusComDef_D1_RK4(array, isSorted)
6754#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6755 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComDef_D1_RK4
6758 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
6759 procedure(
logical(LK)) :: isSorted
6764 module subroutine setSortedArrCusComDef_D1_RK3(array, isSorted)
6765#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6766 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComDef_D1_RK3
6769 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
6770 procedure(
logical(LK)) :: isSorted
6775 module subroutine setSortedArrCusComDef_D1_RK2(array, isSorted)
6776#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6777 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComDef_D1_RK2
6780 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
6781 procedure(
logical(LK)) :: isSorted
6786 module subroutine setSortedArrCusComDef_D1_RK1(array, isSorted)
6787#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6788 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComDef_D1_RK1
6791 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
6792 procedure(
logical(LK)) :: isSorted
6801 module subroutine setSortedArrCusComDef_D1_PSSK5(array, isSorted)
6802#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6803 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComDef_D1_PSSK5
6807 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
6808 procedure(
logical(LK)) :: isSorted
6813 module subroutine setSortedArrCusComDef_D1_PSSK4(array, isSorted)
6814#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6815 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComDef_D1_PSSK4
6819 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
6820 procedure(
logical(LK)) :: isSorted
6825 module subroutine setSortedArrCusComDef_D1_PSSK3(array, isSorted)
6826#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6827 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComDef_D1_PSSK3
6831 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
6832 procedure(
logical(LK)) :: isSorted
6837 module subroutine setSortedArrCusComDef_D1_PSSK2(array, isSorted)
6838#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6839 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComDef_D1_PSSK2
6843 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
6844 procedure(
logical(LK)) :: isSorted
6849 module subroutine setSortedArrCusComDef_D1_PSSK1(array, isSorted)
6850#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6851 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComDef_D1_PSSK1
6855 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
6856 procedure(
logical(LK)) :: isSorted
6865 module subroutine setSortedArrCusComDef_D1_BSSK(array, isSorted)
6866#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6867 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComDef_D1_BSSK
6871 type(css_type) ,
intent(inout) ,
contiguous :: array(:)
6872 procedure(
logical(LK)) :: isSorted
6894 module subroutine setSortedArrCusComQsorti_D0_SK5(array, isSorted, method)
6895#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6896 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComQsorti_D0_SK5
6899 character(
*,SKG) ,
intent(inout) :: array
6900 procedure(
logical(LK)) :: isSorted
6901 type(qsorti_type) ,
intent(in) :: method
6906 module subroutine setSortedArrCusComQsorti_D0_SK4(array, isSorted, method)
6907#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6908 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComQsorti_D0_SK4
6911 character(
*,SKG) ,
intent(inout) :: array
6912 procedure(
logical(LK)) :: isSorted
6913 type(qsorti_type) ,
intent(in) :: method
6918 module subroutine setSortedArrCusComQsorti_D0_SK3(array, isSorted, method)
6919#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6920 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComQsorti_D0_SK3
6923 character(
*,SKG) ,
intent(inout) :: array
6924 procedure(
logical(LK)) :: isSorted
6925 type(qsorti_type) ,
intent(in) :: method
6930 module subroutine setSortedArrCusComQsorti_D0_SK2(array, isSorted, method)
6931#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6932 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComQsorti_D0_SK2
6935 character(
*,SKG) ,
intent(inout) :: array
6936 procedure(
logical(LK)) :: isSorted
6937 type(qsorti_type) ,
intent(in) :: method
6942 module subroutine setSortedArrCusComQsorti_D0_SK1(array, isSorted, method)
6943#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6944 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComQsorti_D0_SK1
6947 character(
*,SKG) ,
intent(inout) :: array
6948 procedure(
logical(LK)) :: isSorted
6949 type(qsorti_type) ,
intent(in) :: method
6956 module subroutine setSortedArrCusComQsorti_D1_SK5(array, isSorted, method)
6957#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6958 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComQsorti_D1_SK5
6961 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
6962 procedure(
logical(LK)) :: isSorted
6963 type(qsorti_type) ,
intent(in) :: method
6968 module subroutine setSortedArrCusComQsorti_D1_SK4(array, isSorted, method)
6969#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6970 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComQsorti_D1_SK4
6973 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
6974 procedure(
logical(LK)) :: isSorted
6975 type(qsorti_type) ,
intent(in) :: method
6980 module subroutine setSortedArrCusComQsorti_D1_SK3(array, isSorted, method)
6981#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6982 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComQsorti_D1_SK3
6985 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
6986 procedure(
logical(LK)) :: isSorted
6987 type(qsorti_type) ,
intent(in) :: method
6992 module subroutine setSortedArrCusComQsorti_D1_SK2(array, isSorted, method)
6993#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
6994 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComQsorti_D1_SK2
6997 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
6998 procedure(
logical(LK)) :: isSorted
6999 type(qsorti_type) ,
intent(in) :: method
7004 module subroutine setSortedArrCusComQsorti_D1_SK1(array, isSorted, method)
7005#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7006 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComQsorti_D1_SK1
7009 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
7010 procedure(
logical(LK)) :: isSorted
7011 type(qsorti_type) ,
intent(in) :: method
7018 module subroutine setSortedArrCusComQsorti_D1_IK5(array, isSorted, method)
7019#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7020 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComQsorti_D1_IK5
7023 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
7024 procedure(
logical(LK)) :: isSorted
7025 type(qsorti_type) ,
intent(in) :: method
7030 module subroutine setSortedArrCusComQsorti_D1_IK4(array, isSorted, method)
7031#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7032 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComQsorti_D1_IK4
7035 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
7036 procedure(
logical(LK)) :: isSorted
7037 type(qsorti_type) ,
intent(in) :: method
7042 module subroutine setSortedArrCusComQsorti_D1_IK3(array, isSorted, method)
7043#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7044 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComQsorti_D1_IK3
7047 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
7048 procedure(
logical(LK)) :: isSorted
7049 type(qsorti_type) ,
intent(in) :: method
7054 module subroutine setSortedArrCusComQsorti_D1_IK2(array, isSorted, method)
7055#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7056 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComQsorti_D1_IK2
7059 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
7060 procedure(
logical(LK)) :: isSorted
7061 type(qsorti_type) ,
intent(in) :: method
7066 module subroutine setSortedArrCusComQsorti_D1_IK1(array, isSorted, method)
7067#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7068 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComQsorti_D1_IK1
7071 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
7072 procedure(
logical(LK)) :: isSorted
7073 type(qsorti_type) ,
intent(in) :: method
7080 module subroutine setSortedArrCusComQsorti_D1_LK5(array, isSorted, method)
7081#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7082 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComQsorti_D1_LK5
7085 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
7086 procedure(
logical(LK)) :: isSorted
7087 type(qsorti_type) ,
intent(in) :: method
7092 module subroutine setSortedArrCusComQsorti_D1_LK4(array, isSorted, method)
7093#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7094 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComQsorti_D1_LK4
7097 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
7098 procedure(
logical(LK)) :: isSorted
7099 type(qsorti_type) ,
intent(in) :: method
7104 module subroutine setSortedArrCusComQsorti_D1_LK3(array, isSorted, method)
7105#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7106 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComQsorti_D1_LK3
7109 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
7110 procedure(
logical(LK)) :: isSorted
7111 type(qsorti_type) ,
intent(in) :: method
7116 module subroutine setSortedArrCusComQsorti_D1_LK2(array, isSorted, method)
7117#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7118 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComQsorti_D1_LK2
7121 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
7122 procedure(
logical(LK)) :: isSorted
7123 type(qsorti_type) ,
intent(in) :: method
7128 module subroutine setSortedArrCusComQsorti_D1_LK1(array, isSorted, method)
7129#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7130 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComQsorti_D1_LK1
7133 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
7134 procedure(
logical(LK)) :: isSorted
7135 type(qsorti_type) ,
intent(in) :: method
7142 module subroutine setSortedArrCusComQsorti_D1_CK5(array, isSorted, method)
7143#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7144 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComQsorti_D1_CK5
7147 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
7148 procedure(
logical(LK)) :: isSorted
7149 type(qsorti_type) ,
intent(in) :: method
7154 module subroutine setSortedArrCusComQsorti_D1_CK4(array, isSorted, method)
7155#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7156 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComQsorti_D1_CK4
7159 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
7160 procedure(
logical(LK)) :: isSorted
7161 type(qsorti_type) ,
intent(in) :: method
7166 module subroutine setSortedArrCusComQsorti_D1_CK3(array, isSorted, method)
7167#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7168 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComQsorti_D1_CK3
7171 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
7172 procedure(
logical(LK)) :: isSorted
7173 type(qsorti_type) ,
intent(in) :: method
7178 module subroutine setSortedArrCusComQsorti_D1_CK2(array, isSorted, method)
7179#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7180 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComQsorti_D1_CK2
7183 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
7184 procedure(
logical(LK)) :: isSorted
7185 type(qsorti_type) ,
intent(in) :: method
7190 module subroutine setSortedArrCusComQsorti_D1_CK1(array, isSorted, method)
7191#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7192 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComQsorti_D1_CK1
7195 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
7196 procedure(
logical(LK)) :: isSorted
7197 type(qsorti_type) ,
intent(in) :: method
7204 module subroutine setSortedArrCusComQsorti_D1_RK5(array, isSorted, method)
7205#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7206 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComQsorti_D1_RK5
7209 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
7210 procedure(
logical(LK)) :: isSorted
7211 type(qsorti_type) ,
intent(in) :: method
7216 module subroutine setSortedArrCusComQsorti_D1_RK4(array, isSorted, method)
7217#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7218 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComQsorti_D1_RK4
7221 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
7222 procedure(
logical(LK)) :: isSorted
7223 type(qsorti_type) ,
intent(in) :: method
7228 module subroutine setSortedArrCusComQsorti_D1_RK3(array, isSorted, method)
7229#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7230 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComQsorti_D1_RK3
7233 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
7234 procedure(
logical(LK)) :: isSorted
7235 type(qsorti_type) ,
intent(in) :: method
7240 module subroutine setSortedArrCusComQsorti_D1_RK2(array, isSorted, method)
7241#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7242 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComQsorti_D1_RK2
7245 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
7246 procedure(
logical(LK)) :: isSorted
7247 type(qsorti_type) ,
intent(in) :: method
7252 module subroutine setSortedArrCusComQsorti_D1_RK1(array, isSorted, method)
7253#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7254 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComQsorti_D1_RK1
7257 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
7258 procedure(
logical(LK)) :: isSorted
7259 type(qsorti_type) ,
intent(in) :: method
7268 module subroutine setSortedArrCusComQsorti_D1_PSSK5(array, isSorted, method)
7269#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7270 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComQsorti_D1_PSSK5
7274 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
7275 procedure(
logical(LK)) :: isSorted
7276 type(qsorti_type) ,
intent(in) :: method
7281 module subroutine setSortedArrCusComQsorti_D1_PSSK4(array, isSorted, method)
7282#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7283 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComQsorti_D1_PSSK4
7287 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
7288 procedure(
logical(LK)) :: isSorted
7289 type(qsorti_type) ,
intent(in) :: method
7294 module subroutine setSortedArrCusComQsorti_D1_PSSK3(array, isSorted, method)
7295#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7296 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComQsorti_D1_PSSK3
7300 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
7301 procedure(
logical(LK)) :: isSorted
7302 type(qsorti_type) ,
intent(in) :: method
7307 module subroutine setSortedArrCusComQsorti_D1_PSSK2(array, isSorted, method)
7308#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7309 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComQsorti_D1_PSSK2
7313 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
7314 procedure(
logical(LK)) :: isSorted
7315 type(qsorti_type) ,
intent(in) :: method
7320 module subroutine setSortedArrCusComQsorti_D1_PSSK1(array, isSorted, method)
7321#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7322 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComQsorti_D1_PSSK1
7326 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
7327 procedure(
logical(LK)) :: isSorted
7328 type(qsorti_type) ,
intent(in) :: method
7337 module subroutine setSortedArrCusComQsorti_D1_BSSK(array, isSorted, method)
7338#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7339 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComQsorti_D1_BSSK
7343 type(css_type) ,
intent(inout) ,
contiguous :: array(:)
7344 procedure(
logical(LK)) :: isSorted
7345 type(qsorti_type) ,
intent(in) :: method
7367 recursive module subroutine setSortedArrCusComQsortr_D0_SK5(array, isSorted, method)
7368#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7369 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComQsortr_D0_SK5
7372 character(
*,SKG) ,
intent(inout) :: array
7373 procedure(
logical(LK)) :: isSorted
7374 type(qsortr_type) ,
intent(in) :: method
7379 recursive module subroutine setSortedArrCusComQsortr_D0_SK4(array, isSorted, method)
7380#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7381 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComQsortr_D0_SK4
7384 character(
*,SKG) ,
intent(inout) :: array
7385 procedure(
logical(LK)) :: isSorted
7386 type(qsortr_type) ,
intent(in) :: method
7391 recursive module subroutine setSortedArrCusComQsortr_D0_SK3(array, isSorted, method)
7392#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7393 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComQsortr_D0_SK3
7396 character(
*,SKG) ,
intent(inout) :: array
7397 procedure(
logical(LK)) :: isSorted
7398 type(qsortr_type) ,
intent(in) :: method
7403 recursive module subroutine setSortedArrCusComQsortr_D0_SK2(array, isSorted, method)
7404#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7405 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComQsortr_D0_SK2
7408 character(
*,SKG) ,
intent(inout) :: array
7409 procedure(
logical(LK)) :: isSorted
7410 type(qsortr_type) ,
intent(in) :: method
7415 recursive module subroutine setSortedArrCusComQsortr_D0_SK1(array, isSorted, method)
7416#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7417 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComQsortr_D0_SK1
7420 character(
*,SKG) ,
intent(inout) :: array
7421 procedure(
logical(LK)) :: isSorted
7422 type(qsortr_type) ,
intent(in) :: method
7429 recursive module subroutine setSortedArrCusComQsortr_D1_SK5(array, isSorted, method)
7430#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7431 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComQsortr_D1_SK5
7434 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
7435 procedure(
logical(LK)) :: isSorted
7436 type(qsortr_type) ,
intent(in) :: method
7441 recursive module subroutine setSortedArrCusComQsortr_D1_SK4(array, isSorted, method)
7442#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7443 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComQsortr_D1_SK4
7446 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
7447 procedure(
logical(LK)) :: isSorted
7448 type(qsortr_type) ,
intent(in) :: method
7453 recursive module subroutine setSortedArrCusComQsortr_D1_SK3(array, isSorted, method)
7454#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7455 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComQsortr_D1_SK3
7458 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
7459 procedure(
logical(LK)) :: isSorted
7460 type(qsortr_type) ,
intent(in) :: method
7465 recursive module subroutine setSortedArrCusComQsortr_D1_SK2(array, isSorted, method)
7466#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7467 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComQsortr_D1_SK2
7470 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
7471 procedure(
logical(LK)) :: isSorted
7472 type(qsortr_type) ,
intent(in) :: method
7477 recursive module subroutine setSortedArrCusComQsortr_D1_SK1(array, isSorted, method)
7478#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7479 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComQsortr_D1_SK1
7482 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
7483 procedure(
logical(LK)) :: isSorted
7484 type(qsortr_type) ,
intent(in) :: method
7491 recursive module subroutine setSortedArrCusComQsortr_D1_IK5(array, isSorted, method)
7492#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7493 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComQsortr_D1_IK5
7496 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
7497 procedure(
logical(LK)) :: isSorted
7498 type(qsortr_type) ,
intent(in) :: method
7503 recursive module subroutine setSortedArrCusComQsortr_D1_IK4(array, isSorted, method)
7504#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7505 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComQsortr_D1_IK4
7508 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
7509 procedure(
logical(LK)) :: isSorted
7510 type(qsortr_type) ,
intent(in) :: method
7515 recursive module subroutine setSortedArrCusComQsortr_D1_IK3(array, isSorted, method)
7516#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7517 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComQsortr_D1_IK3
7520 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
7521 procedure(
logical(LK)) :: isSorted
7522 type(qsortr_type) ,
intent(in) :: method
7527 recursive module subroutine setSortedArrCusComQsortr_D1_IK2(array, isSorted, method)
7528#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7529 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComQsortr_D1_IK2
7532 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
7533 procedure(
logical(LK)) :: isSorted
7534 type(qsortr_type) ,
intent(in) :: method
7539 recursive module subroutine setSortedArrCusComQsortr_D1_IK1(array, isSorted, method)
7540#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7541 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComQsortr_D1_IK1
7544 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
7545 procedure(
logical(LK)) :: isSorted
7546 type(qsortr_type) ,
intent(in) :: method
7553 recursive module subroutine setSortedArrCusComQsortr_D1_LK5(array, isSorted, method)
7554#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7555 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComQsortr_D1_LK5
7558 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
7559 procedure(
logical(LK)) :: isSorted
7560 type(qsortr_type) ,
intent(in) :: method
7565 recursive module subroutine setSortedArrCusComQsortr_D1_LK4(array, isSorted, method)
7566#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7567 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComQsortr_D1_LK4
7570 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
7571 procedure(
logical(LK)) :: isSorted
7572 type(qsortr_type) ,
intent(in) :: method
7577 recursive module subroutine setSortedArrCusComQsortr_D1_LK3(array, isSorted, method)
7578#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7579 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComQsortr_D1_LK3
7582 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
7583 procedure(
logical(LK)) :: isSorted
7584 type(qsortr_type) ,
intent(in) :: method
7589 recursive module subroutine setSortedArrCusComQsortr_D1_LK2(array, isSorted, method)
7590#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7591 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComQsortr_D1_LK2
7594 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
7595 procedure(
logical(LK)) :: isSorted
7596 type(qsortr_type) ,
intent(in) :: method
7601 recursive module subroutine setSortedArrCusComQsortr_D1_LK1(array, isSorted, method)
7602#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7603 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComQsortr_D1_LK1
7606 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
7607 procedure(
logical(LK)) :: isSorted
7608 type(qsortr_type) ,
intent(in) :: method
7615 recursive module subroutine setSortedArrCusComQsortr_D1_CK5(array, isSorted, method)
7616#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7617 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComQsortr_D1_CK5
7620 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
7621 procedure(
logical(LK)) :: isSorted
7622 type(qsortr_type) ,
intent(in) :: method
7627 recursive module subroutine setSortedArrCusComQsortr_D1_CK4(array, isSorted, method)
7628#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7629 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComQsortr_D1_CK4
7632 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
7633 procedure(
logical(LK)) :: isSorted
7634 type(qsortr_type) ,
intent(in) :: method
7639 recursive module subroutine setSortedArrCusComQsortr_D1_CK3(array, isSorted, method)
7640#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7641 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComQsortr_D1_CK3
7644 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
7645 procedure(
logical(LK)) :: isSorted
7646 type(qsortr_type) ,
intent(in) :: method
7651 recursive module subroutine setSortedArrCusComQsortr_D1_CK2(array, isSorted, method)
7652#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7653 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComQsortr_D1_CK2
7656 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
7657 procedure(
logical(LK)) :: isSorted
7658 type(qsortr_type) ,
intent(in) :: method
7663 recursive module subroutine setSortedArrCusComQsortr_D1_CK1(array, isSorted, method)
7664#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7665 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComQsortr_D1_CK1
7668 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
7669 procedure(
logical(LK)) :: isSorted
7670 type(qsortr_type) ,
intent(in) :: method
7677 recursive module subroutine setSortedArrCusComQsortr_D1_RK5(array, isSorted, method)
7678#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7679 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComQsortr_D1_RK5
7682 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
7683 procedure(
logical(LK)) :: isSorted
7684 type(qsortr_type) ,
intent(in) :: method
7689 recursive module subroutine setSortedArrCusComQsortr_D1_RK4(array, isSorted, method)
7690#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7691 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComQsortr_D1_RK4
7694 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
7695 procedure(
logical(LK)) :: isSorted
7696 type(qsortr_type) ,
intent(in) :: method
7701 recursive module subroutine setSortedArrCusComQsortr_D1_RK3(array, isSorted, method)
7702#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7703 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComQsortr_D1_RK3
7706 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
7707 procedure(
logical(LK)) :: isSorted
7708 type(qsortr_type) ,
intent(in) :: method
7713 recursive module subroutine setSortedArrCusComQsortr_D1_RK2(array, isSorted, method)
7714#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7715 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComQsortr_D1_RK2
7718 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
7719 procedure(
logical(LK)) :: isSorted
7720 type(qsortr_type) ,
intent(in) :: method
7725 recursive module subroutine setSortedArrCusComQsortr_D1_RK1(array, isSorted, method)
7726#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7727 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComQsortr_D1_RK1
7730 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
7731 procedure(
logical(LK)) :: isSorted
7732 type(qsortr_type) ,
intent(in) :: method
7741 recursive module subroutine setSortedArrCusComQsortr_D1_PSSK5(array, isSorted, method)
7742#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7743 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComQsortr_D1_PSSK5
7747 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
7748 procedure(
logical(LK)) :: isSorted
7749 type(qsortr_type) ,
intent(in) :: method
7754 recursive module subroutine setSortedArrCusComQsortr_D1_PSSK4(array, isSorted, method)
7755#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7756 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComQsortr_D1_PSSK4
7760 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
7761 procedure(
logical(LK)) :: isSorted
7762 type(qsortr_type) ,
intent(in) :: method
7767 recursive module subroutine setSortedArrCusComQsortr_D1_PSSK3(array, isSorted, method)
7768#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7769 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComQsortr_D1_PSSK3
7773 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
7774 procedure(
logical(LK)) :: isSorted
7775 type(qsortr_type) ,
intent(in) :: method
7780 recursive module subroutine setSortedArrCusComQsortr_D1_PSSK2(array, isSorted, method)
7781#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7782 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComQsortr_D1_PSSK2
7786 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
7787 procedure(
logical(LK)) :: isSorted
7788 type(qsortr_type) ,
intent(in) :: method
7793 recursive module subroutine setSortedArrCusComQsortr_D1_PSSK1(array, isSorted, method)
7794#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7795 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComQsortr_D1_PSSK1
7799 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
7800 procedure(
logical(LK)) :: isSorted
7801 type(qsortr_type) ,
intent(in) :: method
7810 recursive module subroutine setSortedArrCusComQsortr_D1_BSSK(array, isSorted, method)
7811#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7812 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComQsortr_D1_BSSK
7816 type(css_type) ,
intent(inout) ,
contiguous :: array(:)
7817 procedure(
logical(LK)) :: isSorted
7818 type(qsortr_type) ,
intent(in) :: method
7840 recursive module subroutine setSortedArrCusComQsortrdp_D0_SK5(array, isSorted, method)
7841#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7842 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComQsortrdp_D0_SK5
7845 character(
*,SKG) ,
intent(inout) :: array
7846 procedure(
logical(LK)) :: isSorted
7847 type(qsortrdp_type) ,
intent(in) :: method
7852 recursive module subroutine setSortedArrCusComQsortrdp_D0_SK4(array, isSorted, method)
7853#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7854 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComQsortrdp_D0_SK4
7857 character(
*,SKG) ,
intent(inout) :: array
7858 procedure(
logical(LK)) :: isSorted
7859 type(qsortrdp_type) ,
intent(in) :: method
7864 recursive module subroutine setSortedArrCusComQsortrdp_D0_SK3(array, isSorted, method)
7865#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7866 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComQsortrdp_D0_SK3
7869 character(
*,SKG) ,
intent(inout) :: array
7870 procedure(
logical(LK)) :: isSorted
7871 type(qsortrdp_type) ,
intent(in) :: method
7876 recursive module subroutine setSortedArrCusComQsortrdp_D0_SK2(array, isSorted, method)
7877#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7878 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComQsortrdp_D0_SK2
7881 character(
*,SKG) ,
intent(inout) :: array
7882 procedure(
logical(LK)) :: isSorted
7883 type(qsortrdp_type) ,
intent(in) :: method
7888 recursive module subroutine setSortedArrCusComQsortrdp_D0_SK1(array, isSorted, method)
7889#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7890 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComQsortrdp_D0_SK1
7893 character(
*,SKG) ,
intent(inout) :: array
7894 procedure(
logical(LK)) :: isSorted
7895 type(qsortrdp_type) ,
intent(in) :: method
7902 recursive module subroutine setSortedArrCusComQsortrdp_D1_SK5(array, isSorted, method)
7903#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7904 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComQsortrdp_D1_SK5
7907 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
7908 procedure(
logical(LK)) :: isSorted
7909 type(qsortrdp_type) ,
intent(in) :: method
7914 recursive module subroutine setSortedArrCusComQsortrdp_D1_SK4(array, isSorted, method)
7915#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7916 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComQsortrdp_D1_SK4
7919 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
7920 procedure(
logical(LK)) :: isSorted
7921 type(qsortrdp_type) ,
intent(in) :: method
7926 recursive module subroutine setSortedArrCusComQsortrdp_D1_SK3(array, isSorted, method)
7927#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7928 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComQsortrdp_D1_SK3
7931 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
7932 procedure(
logical(LK)) :: isSorted
7933 type(qsortrdp_type) ,
intent(in) :: method
7938 recursive module subroutine setSortedArrCusComQsortrdp_D1_SK2(array, isSorted, method)
7939#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7940 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComQsortrdp_D1_SK2
7943 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
7944 procedure(
logical(LK)) :: isSorted
7945 type(qsortrdp_type) ,
intent(in) :: method
7950 recursive module subroutine setSortedArrCusComQsortrdp_D1_SK1(array, isSorted, method)
7951#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7952 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComQsortrdp_D1_SK1
7955 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
7956 procedure(
logical(LK)) :: isSorted
7957 type(qsortrdp_type) ,
intent(in) :: method
7964 recursive module subroutine setSortedArrCusComQsortrdp_D1_IK5(array, isSorted, method)
7965#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7966 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComQsortrdp_D1_IK5
7969 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
7970 procedure(
logical(LK)) :: isSorted
7971 type(qsortrdp_type) ,
intent(in) :: method
7976 recursive module subroutine setSortedArrCusComQsortrdp_D1_IK4(array, isSorted, method)
7977#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7978 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComQsortrdp_D1_IK4
7981 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
7982 procedure(
logical(LK)) :: isSorted
7983 type(qsortrdp_type) ,
intent(in) :: method
7988 recursive module subroutine setSortedArrCusComQsortrdp_D1_IK3(array, isSorted, method)
7989#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
7990 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComQsortrdp_D1_IK3
7993 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
7994 procedure(
logical(LK)) :: isSorted
7995 type(qsortrdp_type) ,
intent(in) :: method
8000 recursive module subroutine setSortedArrCusComQsortrdp_D1_IK2(array, isSorted, method)
8001#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8002 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComQsortrdp_D1_IK2
8005 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
8006 procedure(
logical(LK)) :: isSorted
8007 type(qsortrdp_type) ,
intent(in) :: method
8012 recursive module subroutine setSortedArrCusComQsortrdp_D1_IK1(array, isSorted, method)
8013#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8014 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComQsortrdp_D1_IK1
8017 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
8018 procedure(
logical(LK)) :: isSorted
8019 type(qsortrdp_type) ,
intent(in) :: method
8026 recursive module subroutine setSortedArrCusComQsortrdp_D1_LK5(array, isSorted, method)
8027#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8028 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComQsortrdp_D1_LK5
8031 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
8032 procedure(
logical(LK)) :: isSorted
8033 type(qsortrdp_type) ,
intent(in) :: method
8038 recursive module subroutine setSortedArrCusComQsortrdp_D1_LK4(array, isSorted, method)
8039#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8040 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComQsortrdp_D1_LK4
8043 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
8044 procedure(
logical(LK)) :: isSorted
8045 type(qsortrdp_type) ,
intent(in) :: method
8050 recursive module subroutine setSortedArrCusComQsortrdp_D1_LK3(array, isSorted, method)
8051#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8052 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComQsortrdp_D1_LK3
8055 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
8056 procedure(
logical(LK)) :: isSorted
8057 type(qsortrdp_type) ,
intent(in) :: method
8062 recursive module subroutine setSortedArrCusComQsortrdp_D1_LK2(array, isSorted, method)
8063#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8064 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComQsortrdp_D1_LK2
8067 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
8068 procedure(
logical(LK)) :: isSorted
8069 type(qsortrdp_type) ,
intent(in) :: method
8074 recursive module subroutine setSortedArrCusComQsortrdp_D1_LK1(array, isSorted, method)
8075#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8076 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComQsortrdp_D1_LK1
8079 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
8080 procedure(
logical(LK)) :: isSorted
8081 type(qsortrdp_type) ,
intent(in) :: method
8088 recursive module subroutine setSortedArrCusComQsortrdp_D1_CK5(array, isSorted, method)
8089#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8090 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComQsortrdp_D1_CK5
8093 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
8094 procedure(
logical(LK)) :: isSorted
8095 type(qsortrdp_type) ,
intent(in) :: method
8100 recursive module subroutine setSortedArrCusComQsortrdp_D1_CK4(array, isSorted, method)
8101#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8102 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComQsortrdp_D1_CK4
8105 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
8106 procedure(
logical(LK)) :: isSorted
8107 type(qsortrdp_type) ,
intent(in) :: method
8112 recursive module subroutine setSortedArrCusComQsortrdp_D1_CK3(array, isSorted, method)
8113#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8114 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComQsortrdp_D1_CK3
8117 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
8118 procedure(
logical(LK)) :: isSorted
8119 type(qsortrdp_type) ,
intent(in) :: method
8124 recursive module subroutine setSortedArrCusComQsortrdp_D1_CK2(array, isSorted, method)
8125#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8126 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComQsortrdp_D1_CK2
8129 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
8130 procedure(
logical(LK)) :: isSorted
8131 type(qsortrdp_type) ,
intent(in) :: method
8136 recursive module subroutine setSortedArrCusComQsortrdp_D1_CK1(array, isSorted, method)
8137#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8138 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComQsortrdp_D1_CK1
8141 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
8142 procedure(
logical(LK)) :: isSorted
8143 type(qsortrdp_type) ,
intent(in) :: method
8150 recursive module subroutine setSortedArrCusComQsortrdp_D1_RK5(array, isSorted, method)
8151#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8152 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComQsortrdp_D1_RK5
8155 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
8156 procedure(
logical(LK)) :: isSorted
8157 type(qsortrdp_type) ,
intent(in) :: method
8162 recursive module subroutine setSortedArrCusComQsortrdp_D1_RK4(array, isSorted, method)
8163#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8164 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComQsortrdp_D1_RK4
8167 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
8168 procedure(
logical(LK)) :: isSorted
8169 type(qsortrdp_type) ,
intent(in) :: method
8174 recursive module subroutine setSortedArrCusComQsortrdp_D1_RK3(array, isSorted, method)
8175#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8176 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComQsortrdp_D1_RK3
8179 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
8180 procedure(
logical(LK)) :: isSorted
8181 type(qsortrdp_type) ,
intent(in) :: method
8186 recursive module subroutine setSortedArrCusComQsortrdp_D1_RK2(array, isSorted, method)
8187#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8188 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComQsortrdp_D1_RK2
8191 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
8192 procedure(
logical(LK)) :: isSorted
8193 type(qsortrdp_type) ,
intent(in) :: method
8198 recursive module subroutine setSortedArrCusComQsortrdp_D1_RK1(array, isSorted, method)
8199#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8200 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComQsortrdp_D1_RK1
8203 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
8204 procedure(
logical(LK)) :: isSorted
8205 type(qsortrdp_type) ,
intent(in) :: method
8214 recursive module subroutine setSortedArrCusComQsortrdp_D1_PSSK5(array, isSorted, method)
8215#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8216 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComQsortrdp_D1_PSSK5
8220 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
8221 procedure(
logical(LK)) :: isSorted
8222 type(qsortrdp_type) ,
intent(in) :: method
8227 recursive module subroutine setSortedArrCusComQsortrdp_D1_PSSK4(array, isSorted, method)
8228#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8229 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComQsortrdp_D1_PSSK4
8233 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
8234 procedure(
logical(LK)) :: isSorted
8235 type(qsortrdp_type) ,
intent(in) :: method
8240 recursive module subroutine setSortedArrCusComQsortrdp_D1_PSSK3(array, isSorted, method)
8241#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8242 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComQsortrdp_D1_PSSK3
8246 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
8247 procedure(
logical(LK)) :: isSorted
8248 type(qsortrdp_type) ,
intent(in) :: method
8253 recursive module subroutine setSortedArrCusComQsortrdp_D1_PSSK2(array, isSorted, method)
8254#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8255 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComQsortrdp_D1_PSSK2
8259 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
8260 procedure(
logical(LK)) :: isSorted
8261 type(qsortrdp_type) ,
intent(in) :: method
8266 recursive module subroutine setSortedArrCusComQsortrdp_D1_PSSK1(array, isSorted, method)
8267#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8268 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComQsortrdp_D1_PSSK1
8272 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
8273 procedure(
logical(LK)) :: isSorted
8274 type(qsortrdp_type) ,
intent(in) :: method
8283 recursive module subroutine setSortedArrCusComQsortrdp_D1_BSSK(array, isSorted, method)
8284#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8285 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComQsortrdp_D1_BSSK
8289 type(css_type) ,
intent(inout) ,
contiguous :: array(:)
8290 procedure(
logical(LK)) :: isSorted
8291 type(qsortrdp_type) ,
intent(in) :: method
8313 module subroutine setSortedArrCusComBubble_D0_SK5(array, isSorted, method)
8314#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8315 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComBubble_D0_SK5
8318 character(
*,SKG) ,
intent(inout) :: array
8319 procedure(
logical(LK)) :: isSorted
8320 type(bubble_type) ,
intent(in) :: method
8325 module subroutine setSortedArrCusComBubble_D0_SK4(array, isSorted, method)
8326#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8327 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComBubble_D0_SK4
8330 character(
*,SKG) ,
intent(inout) :: array
8331 procedure(
logical(LK)) :: isSorted
8332 type(bubble_type) ,
intent(in) :: method
8337 module subroutine setSortedArrCusComBubble_D0_SK3(array, isSorted, method)
8338#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8339 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComBubble_D0_SK3
8342 character(
*,SKG) ,
intent(inout) :: array
8343 procedure(
logical(LK)) :: isSorted
8344 type(bubble_type) ,
intent(in) :: method
8349 module subroutine setSortedArrCusComBubble_D0_SK2(array, isSorted, method)
8350#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8351 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComBubble_D0_SK2
8354 character(
*,SKG) ,
intent(inout) :: array
8355 procedure(
logical(LK)) :: isSorted
8356 type(bubble_type) ,
intent(in) :: method
8361 module subroutine setSortedArrCusComBubble_D0_SK1(array, isSorted, method)
8362#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8363 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComBubble_D0_SK1
8366 character(
*,SKG) ,
intent(inout) :: array
8367 procedure(
logical(LK)) :: isSorted
8368 type(bubble_type) ,
intent(in) :: method
8375 module subroutine setSortedArrCusComBubble_D1_SK5(array, isSorted, method)
8376#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8377 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComBubble_D1_SK5
8380 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
8381 procedure(
logical(LK)) :: isSorted
8382 type(bubble_type) ,
intent(in) :: method
8387 module subroutine setSortedArrCusComBubble_D1_SK4(array, isSorted, method)
8388#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8389 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComBubble_D1_SK4
8392 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
8393 procedure(
logical(LK)) :: isSorted
8394 type(bubble_type) ,
intent(in) :: method
8399 module subroutine setSortedArrCusComBubble_D1_SK3(array, isSorted, method)
8400#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8401 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComBubble_D1_SK3
8404 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
8405 procedure(
logical(LK)) :: isSorted
8406 type(bubble_type) ,
intent(in) :: method
8411 module subroutine setSortedArrCusComBubble_D1_SK2(array, isSorted, method)
8412#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8413 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComBubble_D1_SK2
8416 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
8417 procedure(
logical(LK)) :: isSorted
8418 type(bubble_type) ,
intent(in) :: method
8423 module subroutine setSortedArrCusComBubble_D1_SK1(array, isSorted, method)
8424#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8425 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComBubble_D1_SK1
8428 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
8429 procedure(
logical(LK)) :: isSorted
8430 type(bubble_type) ,
intent(in) :: method
8437 module subroutine setSortedArrCusComBubble_D1_IK5(array, isSorted, method)
8438#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8439 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComBubble_D1_IK5
8442 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
8443 procedure(
logical(LK)) :: isSorted
8444 type(bubble_type) ,
intent(in) :: method
8449 module subroutine setSortedArrCusComBubble_D1_IK4(array, isSorted, method)
8450#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8451 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComBubble_D1_IK4
8454 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
8455 procedure(
logical(LK)) :: isSorted
8456 type(bubble_type) ,
intent(in) :: method
8461 module subroutine setSortedArrCusComBubble_D1_IK3(array, isSorted, method)
8462#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8463 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComBubble_D1_IK3
8466 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
8467 procedure(
logical(LK)) :: isSorted
8468 type(bubble_type) ,
intent(in) :: method
8473 module subroutine setSortedArrCusComBubble_D1_IK2(array, isSorted, method)
8474#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8475 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComBubble_D1_IK2
8478 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
8479 procedure(
logical(LK)) :: isSorted
8480 type(bubble_type) ,
intent(in) :: method
8485 module subroutine setSortedArrCusComBubble_D1_IK1(array, isSorted, method)
8486#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8487 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComBubble_D1_IK1
8490 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
8491 procedure(
logical(LK)) :: isSorted
8492 type(bubble_type) ,
intent(in) :: method
8499 module subroutine setSortedArrCusComBubble_D1_LK5(array, isSorted, method)
8500#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8501 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComBubble_D1_LK5
8504 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
8505 procedure(
logical(LK)) :: isSorted
8506 type(bubble_type) ,
intent(in) :: method
8511 module subroutine setSortedArrCusComBubble_D1_LK4(array, isSorted, method)
8512#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8513 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComBubble_D1_LK4
8516 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
8517 procedure(
logical(LK)) :: isSorted
8518 type(bubble_type) ,
intent(in) :: method
8523 module subroutine setSortedArrCusComBubble_D1_LK3(array, isSorted, method)
8524#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8525 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComBubble_D1_LK3
8528 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
8529 procedure(
logical(LK)) :: isSorted
8530 type(bubble_type) ,
intent(in) :: method
8535 module subroutine setSortedArrCusComBubble_D1_LK2(array, isSorted, method)
8536#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8537 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComBubble_D1_LK2
8540 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
8541 procedure(
logical(LK)) :: isSorted
8542 type(bubble_type) ,
intent(in) :: method
8547 module subroutine setSortedArrCusComBubble_D1_LK1(array, isSorted, method)
8548#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8549 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComBubble_D1_LK1
8552 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
8553 procedure(
logical(LK)) :: isSorted
8554 type(bubble_type) ,
intent(in) :: method
8561 module subroutine setSortedArrCusComBubble_D1_CK5(array, isSorted, method)
8562#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8563 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComBubble_D1_CK5
8566 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
8567 procedure(
logical(LK)) :: isSorted
8568 type(bubble_type) ,
intent(in) :: method
8573 module subroutine setSortedArrCusComBubble_D1_CK4(array, isSorted, method)
8574#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8575 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComBubble_D1_CK4
8578 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
8579 procedure(
logical(LK)) :: isSorted
8580 type(bubble_type) ,
intent(in) :: method
8585 module subroutine setSortedArrCusComBubble_D1_CK3(array, isSorted, method)
8586#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8587 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComBubble_D1_CK3
8590 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
8591 procedure(
logical(LK)) :: isSorted
8592 type(bubble_type) ,
intent(in) :: method
8597 module subroutine setSortedArrCusComBubble_D1_CK2(array, isSorted, method)
8598#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8599 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComBubble_D1_CK2
8602 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
8603 procedure(
logical(LK)) :: isSorted
8604 type(bubble_type) ,
intent(in) :: method
8609 module subroutine setSortedArrCusComBubble_D1_CK1(array, isSorted, method)
8610#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8611 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComBubble_D1_CK1
8614 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
8615 procedure(
logical(LK)) :: isSorted
8616 type(bubble_type) ,
intent(in) :: method
8623 module subroutine setSortedArrCusComBubble_D1_RK5(array, isSorted, method)
8624#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8625 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComBubble_D1_RK5
8628 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
8629 procedure(
logical(LK)) :: isSorted
8630 type(bubble_type) ,
intent(in) :: method
8635 module subroutine setSortedArrCusComBubble_D1_RK4(array, isSorted, method)
8636#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8637 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComBubble_D1_RK4
8640 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
8641 procedure(
logical(LK)) :: isSorted
8642 type(bubble_type) ,
intent(in) :: method
8647 module subroutine setSortedArrCusComBubble_D1_RK3(array, isSorted, method)
8648#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8649 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComBubble_D1_RK3
8652 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
8653 procedure(
logical(LK)) :: isSorted
8654 type(bubble_type) ,
intent(in) :: method
8659 module subroutine setSortedArrCusComBubble_D1_RK2(array, isSorted, method)
8660#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8661 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComBubble_D1_RK2
8664 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
8665 procedure(
logical(LK)) :: isSorted
8666 type(bubble_type) ,
intent(in) :: method
8671 module subroutine setSortedArrCusComBubble_D1_RK1(array, isSorted, method)
8672#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8673 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComBubble_D1_RK1
8676 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
8677 procedure(
logical(LK)) :: isSorted
8678 type(bubble_type) ,
intent(in) :: method
8687 module subroutine setSortedArrCusComBubble_D1_PSSK5(array, isSorted, method)
8688#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8689 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComBubble_D1_PSSK5
8693 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
8694 procedure(
logical(LK)) :: isSorted
8695 type(bubble_type) ,
intent(in) :: method
8700 module subroutine setSortedArrCusComBubble_D1_PSSK4(array, isSorted, method)
8701#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8702 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComBubble_D1_PSSK4
8706 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
8707 procedure(
logical(LK)) :: isSorted
8708 type(bubble_type) ,
intent(in) :: method
8713 module subroutine setSortedArrCusComBubble_D1_PSSK3(array, isSorted, method)
8714#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8715 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComBubble_D1_PSSK3
8719 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
8720 procedure(
logical(LK)) :: isSorted
8721 type(bubble_type) ,
intent(in) :: method
8726 module subroutine setSortedArrCusComBubble_D1_PSSK2(array, isSorted, method)
8727#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8728 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComBubble_D1_PSSK2
8732 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
8733 procedure(
logical(LK)) :: isSorted
8734 type(bubble_type) ,
intent(in) :: method
8739 module subroutine setSortedArrCusComBubble_D1_PSSK1(array, isSorted, method)
8740#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8741 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComBubble_D1_PSSK1
8745 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
8746 procedure(
logical(LK)) :: isSorted
8747 type(bubble_type) ,
intent(in) :: method
8756 module subroutine setSortedArrCusComBubble_D1_BSSK(array, isSorted, method)
8757#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8758 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComBubble_D1_BSSK
8762 type(css_type) ,
intent(inout) ,
contiguous :: array(:)
8763 procedure(
logical(LK)) :: isSorted
8764 type(bubble_type) ,
intent(in) :: method
8786 module subroutine setSortedArrCusComHeapi_D0_SK5(array, isSorted, method)
8787#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8788 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComHeapi_D0_SK5
8791 character(
*,SKG) ,
intent(inout) :: array
8792 procedure(
logical(LK)) :: isSorted
8793 type(heapi_type) ,
intent(in) :: method
8798 module subroutine setSortedArrCusComHeapi_D0_SK4(array, isSorted, method)
8799#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8800 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComHeapi_D0_SK4
8803 character(
*,SKG) ,
intent(inout) :: array
8804 procedure(
logical(LK)) :: isSorted
8805 type(heapi_type) ,
intent(in) :: method
8810 module subroutine setSortedArrCusComHeapi_D0_SK3(array, isSorted, method)
8811#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8812 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComHeapi_D0_SK3
8815 character(
*,SKG) ,
intent(inout) :: array
8816 procedure(
logical(LK)) :: isSorted
8817 type(heapi_type) ,
intent(in) :: method
8822 module subroutine setSortedArrCusComHeapi_D0_SK2(array, isSorted, method)
8823#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8824 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComHeapi_D0_SK2
8827 character(
*,SKG) ,
intent(inout) :: array
8828 procedure(
logical(LK)) :: isSorted
8829 type(heapi_type) ,
intent(in) :: method
8834 module subroutine setSortedArrCusComHeapi_D0_SK1(array, isSorted, method)
8835#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8836 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComHeapi_D0_SK1
8839 character(
*,SKG) ,
intent(inout) :: array
8840 procedure(
logical(LK)) :: isSorted
8841 type(heapi_type) ,
intent(in) :: method
8848 module subroutine setSortedArrCusComHeapi_D1_SK5(array, isSorted, method)
8849#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8850 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComHeapi_D1_SK5
8853 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
8854 procedure(
logical(LK)) :: isSorted
8855 type(heapi_type) ,
intent(in) :: method
8860 module subroutine setSortedArrCusComHeapi_D1_SK4(array, isSorted, method)
8861#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8862 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComHeapi_D1_SK4
8865 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
8866 procedure(
logical(LK)) :: isSorted
8867 type(heapi_type) ,
intent(in) :: method
8872 module subroutine setSortedArrCusComHeapi_D1_SK3(array, isSorted, method)
8873#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8874 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComHeapi_D1_SK3
8877 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
8878 procedure(
logical(LK)) :: isSorted
8879 type(heapi_type) ,
intent(in) :: method
8884 module subroutine setSortedArrCusComHeapi_D1_SK2(array, isSorted, method)
8885#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8886 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComHeapi_D1_SK2
8889 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
8890 procedure(
logical(LK)) :: isSorted
8891 type(heapi_type) ,
intent(in) :: method
8896 module subroutine setSortedArrCusComHeapi_D1_SK1(array, isSorted, method)
8897#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8898 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComHeapi_D1_SK1
8901 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
8902 procedure(
logical(LK)) :: isSorted
8903 type(heapi_type) ,
intent(in) :: method
8910 module subroutine setSortedArrCusComHeapi_D1_IK5(array, isSorted, method)
8911#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8912 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComHeapi_D1_IK5
8915 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
8916 procedure(
logical(LK)) :: isSorted
8917 type(heapi_type) ,
intent(in) :: method
8922 module subroutine setSortedArrCusComHeapi_D1_IK4(array, isSorted, method)
8923#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8924 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComHeapi_D1_IK4
8927 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
8928 procedure(
logical(LK)) :: isSorted
8929 type(heapi_type) ,
intent(in) :: method
8934 module subroutine setSortedArrCusComHeapi_D1_IK3(array, isSorted, method)
8935#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8936 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComHeapi_D1_IK3
8939 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
8940 procedure(
logical(LK)) :: isSorted
8941 type(heapi_type) ,
intent(in) :: method
8946 module subroutine setSortedArrCusComHeapi_D1_IK2(array, isSorted, method)
8947#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8948 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComHeapi_D1_IK2
8951 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
8952 procedure(
logical(LK)) :: isSorted
8953 type(heapi_type) ,
intent(in) :: method
8958 module subroutine setSortedArrCusComHeapi_D1_IK1(array, isSorted, method)
8959#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8960 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComHeapi_D1_IK1
8963 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
8964 procedure(
logical(LK)) :: isSorted
8965 type(heapi_type) ,
intent(in) :: method
8972 module subroutine setSortedArrCusComHeapi_D1_LK5(array, isSorted, method)
8973#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8974 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComHeapi_D1_LK5
8977 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
8978 procedure(
logical(LK)) :: isSorted
8979 type(heapi_type) ,
intent(in) :: method
8984 module subroutine setSortedArrCusComHeapi_D1_LK4(array, isSorted, method)
8985#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8986 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComHeapi_D1_LK4
8989 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
8990 procedure(
logical(LK)) :: isSorted
8991 type(heapi_type) ,
intent(in) :: method
8996 module subroutine setSortedArrCusComHeapi_D1_LK3(array, isSorted, method)
8997#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
8998 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComHeapi_D1_LK3
9001 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
9002 procedure(
logical(LK)) :: isSorted
9003 type(heapi_type) ,
intent(in) :: method
9008 module subroutine setSortedArrCusComHeapi_D1_LK2(array, isSorted, method)
9009#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9010 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComHeapi_D1_LK2
9013 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
9014 procedure(
logical(LK)) :: isSorted
9015 type(heapi_type) ,
intent(in) :: method
9020 module subroutine setSortedArrCusComHeapi_D1_LK1(array, isSorted, method)
9021#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9022 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComHeapi_D1_LK1
9025 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
9026 procedure(
logical(LK)) :: isSorted
9027 type(heapi_type) ,
intent(in) :: method
9034 module subroutine setSortedArrCusComHeapi_D1_CK5(array, isSorted, method)
9035#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9036 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComHeapi_D1_CK5
9039 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
9040 procedure(
logical(LK)) :: isSorted
9041 type(heapi_type) ,
intent(in) :: method
9046 module subroutine setSortedArrCusComHeapi_D1_CK4(array, isSorted, method)
9047#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9048 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComHeapi_D1_CK4
9051 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
9052 procedure(
logical(LK)) :: isSorted
9053 type(heapi_type) ,
intent(in) :: method
9058 module subroutine setSortedArrCusComHeapi_D1_CK3(array, isSorted, method)
9059#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9060 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComHeapi_D1_CK3
9063 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
9064 procedure(
logical(LK)) :: isSorted
9065 type(heapi_type) ,
intent(in) :: method
9070 module subroutine setSortedArrCusComHeapi_D1_CK2(array, isSorted, method)
9071#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9072 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComHeapi_D1_CK2
9075 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
9076 procedure(
logical(LK)) :: isSorted
9077 type(heapi_type) ,
intent(in) :: method
9082 module subroutine setSortedArrCusComHeapi_D1_CK1(array, isSorted, method)
9083#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9084 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComHeapi_D1_CK1
9087 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
9088 procedure(
logical(LK)) :: isSorted
9089 type(heapi_type) ,
intent(in) :: method
9096 module subroutine setSortedArrCusComHeapi_D1_RK5(array, isSorted, method)
9097#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9098 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComHeapi_D1_RK5
9101 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
9102 procedure(
logical(LK)) :: isSorted
9103 type(heapi_type) ,
intent(in) :: method
9108 module subroutine setSortedArrCusComHeapi_D1_RK4(array, isSorted, method)
9109#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9110 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComHeapi_D1_RK4
9113 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
9114 procedure(
logical(LK)) :: isSorted
9115 type(heapi_type) ,
intent(in) :: method
9120 module subroutine setSortedArrCusComHeapi_D1_RK3(array, isSorted, method)
9121#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9122 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComHeapi_D1_RK3
9125 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
9126 procedure(
logical(LK)) :: isSorted
9127 type(heapi_type) ,
intent(in) :: method
9132 module subroutine setSortedArrCusComHeapi_D1_RK2(array, isSorted, method)
9133#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9134 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComHeapi_D1_RK2
9137 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
9138 procedure(
logical(LK)) :: isSorted
9139 type(heapi_type) ,
intent(in) :: method
9144 module subroutine setSortedArrCusComHeapi_D1_RK1(array, isSorted, method)
9145#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9146 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComHeapi_D1_RK1
9149 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
9150 procedure(
logical(LK)) :: isSorted
9151 type(heapi_type) ,
intent(in) :: method
9160 module subroutine setSortedArrCusComHeapi_D1_PSSK5(array, isSorted, method)
9161#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9162 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComHeapi_D1_PSSK5
9166 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
9167 procedure(
logical(LK)) :: isSorted
9168 type(heapi_type) ,
intent(in) :: method
9173 module subroutine setSortedArrCusComHeapi_D1_PSSK4(array, isSorted, method)
9174#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9175 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComHeapi_D1_PSSK4
9179 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
9180 procedure(
logical(LK)) :: isSorted
9181 type(heapi_type) ,
intent(in) :: method
9186 module subroutine setSortedArrCusComHeapi_D1_PSSK3(array, isSorted, method)
9187#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9188 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComHeapi_D1_PSSK3
9192 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
9193 procedure(
logical(LK)) :: isSorted
9194 type(heapi_type) ,
intent(in) :: method
9199 module subroutine setSortedArrCusComHeapi_D1_PSSK2(array, isSorted, method)
9200#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9201 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComHeapi_D1_PSSK2
9205 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
9206 procedure(
logical(LK)) :: isSorted
9207 type(heapi_type) ,
intent(in) :: method
9212 module subroutine setSortedArrCusComHeapi_D1_PSSK1(array, isSorted, method)
9213#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9214 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComHeapi_D1_PSSK1
9218 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
9219 procedure(
logical(LK)) :: isSorted
9220 type(heapi_type) ,
intent(in) :: method
9229 module subroutine setSortedArrCusComHeapi_D1_BSSK(array, isSorted, method)
9230#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9231 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComHeapi_D1_BSSK
9235 type(css_type) ,
intent(inout) ,
contiguous :: array(:)
9236 procedure(
logical(LK)) :: isSorted
9237 type(heapi_type) ,
intent(in) :: method
9259 module subroutine setSortedArrCusComHeapr_D0_SK5(array, isSorted, method)
9260#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9261 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComHeapr_D0_SK5
9264 character(
*,SKG) ,
intent(inout) :: array
9265 procedure(
logical(LK)) :: isSorted
9266 type(heapr_type) ,
intent(in) :: method
9271 module subroutine setSortedArrCusComHeapr_D0_SK4(array, isSorted, method)
9272#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9273 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComHeapr_D0_SK4
9276 character(
*,SKG) ,
intent(inout) :: array
9277 procedure(
logical(LK)) :: isSorted
9278 type(heapr_type) ,
intent(in) :: method
9283 module subroutine setSortedArrCusComHeapr_D0_SK3(array, isSorted, method)
9284#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9285 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComHeapr_D0_SK3
9288 character(
*,SKG) ,
intent(inout) :: array
9289 procedure(
logical(LK)) :: isSorted
9290 type(heapr_type) ,
intent(in) :: method
9295 module subroutine setSortedArrCusComHeapr_D0_SK2(array, isSorted, method)
9296#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9297 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComHeapr_D0_SK2
9300 character(
*,SKG) ,
intent(inout) :: array
9301 procedure(
logical(LK)) :: isSorted
9302 type(heapr_type) ,
intent(in) :: method
9307 module subroutine setSortedArrCusComHeapr_D0_SK1(array, isSorted, method)
9308#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9309 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComHeapr_D0_SK1
9312 character(
*,SKG) ,
intent(inout) :: array
9313 procedure(
logical(LK)) :: isSorted
9314 type(heapr_type) ,
intent(in) :: method
9321 module subroutine setSortedArrCusComHeapr_D1_SK5(array, isSorted, method)
9322#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9323 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComHeapr_D1_SK5
9326 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
9327 procedure(
logical(LK)) :: isSorted
9328 type(heapr_type) ,
intent(in) :: method
9333 module subroutine setSortedArrCusComHeapr_D1_SK4(array, isSorted, method)
9334#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9335 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComHeapr_D1_SK4
9338 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
9339 procedure(
logical(LK)) :: isSorted
9340 type(heapr_type) ,
intent(in) :: method
9345 module subroutine setSortedArrCusComHeapr_D1_SK3(array, isSorted, method)
9346#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9347 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComHeapr_D1_SK3
9350 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
9351 procedure(
logical(LK)) :: isSorted
9352 type(heapr_type) ,
intent(in) :: method
9357 module subroutine setSortedArrCusComHeapr_D1_SK2(array, isSorted, method)
9358#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9359 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComHeapr_D1_SK2
9362 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
9363 procedure(
logical(LK)) :: isSorted
9364 type(heapr_type) ,
intent(in) :: method
9369 module subroutine setSortedArrCusComHeapr_D1_SK1(array, isSorted, method)
9370#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9371 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComHeapr_D1_SK1
9374 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
9375 procedure(
logical(LK)) :: isSorted
9376 type(heapr_type) ,
intent(in) :: method
9383 module subroutine setSortedArrCusComHeapr_D1_IK5(array, isSorted, method)
9384#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9385 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComHeapr_D1_IK5
9388 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
9389 procedure(
logical(LK)) :: isSorted
9390 type(heapr_type) ,
intent(in) :: method
9395 module subroutine setSortedArrCusComHeapr_D1_IK4(array, isSorted, method)
9396#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9397 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComHeapr_D1_IK4
9400 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
9401 procedure(
logical(LK)) :: isSorted
9402 type(heapr_type) ,
intent(in) :: method
9407 module subroutine setSortedArrCusComHeapr_D1_IK3(array, isSorted, method)
9408#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9409 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComHeapr_D1_IK3
9412 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
9413 procedure(
logical(LK)) :: isSorted
9414 type(heapr_type) ,
intent(in) :: method
9419 module subroutine setSortedArrCusComHeapr_D1_IK2(array, isSorted, method)
9420#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9421 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComHeapr_D1_IK2
9424 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
9425 procedure(
logical(LK)) :: isSorted
9426 type(heapr_type) ,
intent(in) :: method
9431 module subroutine setSortedArrCusComHeapr_D1_IK1(array, isSorted, method)
9432#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9433 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComHeapr_D1_IK1
9436 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
9437 procedure(
logical(LK)) :: isSorted
9438 type(heapr_type) ,
intent(in) :: method
9445 module subroutine setSortedArrCusComHeapr_D1_LK5(array, isSorted, method)
9446#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9447 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComHeapr_D1_LK5
9450 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
9451 procedure(
logical(LK)) :: isSorted
9452 type(heapr_type) ,
intent(in) :: method
9457 module subroutine setSortedArrCusComHeapr_D1_LK4(array, isSorted, method)
9458#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9459 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComHeapr_D1_LK4
9462 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
9463 procedure(
logical(LK)) :: isSorted
9464 type(heapr_type) ,
intent(in) :: method
9469 module subroutine setSortedArrCusComHeapr_D1_LK3(array, isSorted, method)
9470#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9471 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComHeapr_D1_LK3
9474 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
9475 procedure(
logical(LK)) :: isSorted
9476 type(heapr_type) ,
intent(in) :: method
9481 module subroutine setSortedArrCusComHeapr_D1_LK2(array, isSorted, method)
9482#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9483 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComHeapr_D1_LK2
9486 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
9487 procedure(
logical(LK)) :: isSorted
9488 type(heapr_type) ,
intent(in) :: method
9493 module subroutine setSortedArrCusComHeapr_D1_LK1(array, isSorted, method)
9494#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9495 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComHeapr_D1_LK1
9498 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
9499 procedure(
logical(LK)) :: isSorted
9500 type(heapr_type) ,
intent(in) :: method
9507 module subroutine setSortedArrCusComHeapr_D1_CK5(array, isSorted, method)
9508#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9509 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComHeapr_D1_CK5
9512 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
9513 procedure(
logical(LK)) :: isSorted
9514 type(heapr_type) ,
intent(in) :: method
9519 module subroutine setSortedArrCusComHeapr_D1_CK4(array, isSorted, method)
9520#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9521 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComHeapr_D1_CK4
9524 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
9525 procedure(
logical(LK)) :: isSorted
9526 type(heapr_type) ,
intent(in) :: method
9531 module subroutine setSortedArrCusComHeapr_D1_CK3(array, isSorted, method)
9532#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9533 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComHeapr_D1_CK3
9536 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
9537 procedure(
logical(LK)) :: isSorted
9538 type(heapr_type) ,
intent(in) :: method
9543 module subroutine setSortedArrCusComHeapr_D1_CK2(array, isSorted, method)
9544#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9545 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComHeapr_D1_CK2
9548 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
9549 procedure(
logical(LK)) :: isSorted
9550 type(heapr_type) ,
intent(in) :: method
9555 module subroutine setSortedArrCusComHeapr_D1_CK1(array, isSorted, method)
9556#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9557 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComHeapr_D1_CK1
9560 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
9561 procedure(
logical(LK)) :: isSorted
9562 type(heapr_type) ,
intent(in) :: method
9569 module subroutine setSortedArrCusComHeapr_D1_RK5(array, isSorted, method)
9570#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9571 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComHeapr_D1_RK5
9574 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
9575 procedure(
logical(LK)) :: isSorted
9576 type(heapr_type) ,
intent(in) :: method
9581 module subroutine setSortedArrCusComHeapr_D1_RK4(array, isSorted, method)
9582#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9583 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComHeapr_D1_RK4
9586 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
9587 procedure(
logical(LK)) :: isSorted
9588 type(heapr_type) ,
intent(in) :: method
9593 module subroutine setSortedArrCusComHeapr_D1_RK3(array, isSorted, method)
9594#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9595 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComHeapr_D1_RK3
9598 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
9599 procedure(
logical(LK)) :: isSorted
9600 type(heapr_type) ,
intent(in) :: method
9605 module subroutine setSortedArrCusComHeapr_D1_RK2(array, isSorted, method)
9606#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9607 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComHeapr_D1_RK2
9610 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
9611 procedure(
logical(LK)) :: isSorted
9612 type(heapr_type) ,
intent(in) :: method
9617 module subroutine setSortedArrCusComHeapr_D1_RK1(array, isSorted, method)
9618#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9619 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComHeapr_D1_RK1
9622 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
9623 procedure(
logical(LK)) :: isSorted
9624 type(heapr_type) ,
intent(in) :: method
9633 module subroutine setSortedArrCusComHeapr_D1_PSSK5(array, isSorted, method)
9634#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9635 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComHeapr_D1_PSSK5
9639 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
9640 procedure(
logical(LK)) :: isSorted
9641 type(heapr_type) ,
intent(in) :: method
9646 module subroutine setSortedArrCusComHeapr_D1_PSSK4(array, isSorted, method)
9647#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9648 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComHeapr_D1_PSSK4
9652 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
9653 procedure(
logical(LK)) :: isSorted
9654 type(heapr_type) ,
intent(in) :: method
9659 module subroutine setSortedArrCusComHeapr_D1_PSSK3(array, isSorted, method)
9660#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9661 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComHeapr_D1_PSSK3
9665 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
9666 procedure(
logical(LK)) :: isSorted
9667 type(heapr_type) ,
intent(in) :: method
9672 module subroutine setSortedArrCusComHeapr_D1_PSSK2(array, isSorted, method)
9673#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9674 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComHeapr_D1_PSSK2
9678 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
9679 procedure(
logical(LK)) :: isSorted
9680 type(heapr_type) ,
intent(in) :: method
9685 module subroutine setSortedArrCusComHeapr_D1_PSSK1(array, isSorted, method)
9686#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9687 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComHeapr_D1_PSSK1
9691 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
9692 procedure(
logical(LK)) :: isSorted
9693 type(heapr_type) ,
intent(in) :: method
9702 module subroutine setSortedArrCusComHeapr_D1_BSSK(array, isSorted, method)
9703#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9704 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComHeapr_D1_BSSK
9708 type(css_type) ,
intent(inout) ,
contiguous :: array(:)
9709 procedure(
logical(LK)) :: isSorted
9710 type(heapr_type) ,
intent(in) :: method
9732 module subroutine setSortedArrCusComInsertionl_D0_SK5(array, isSorted, method)
9733#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9734 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComInsertionl_D0_SK5
9737 character(
*,SKG) ,
intent(inout) :: array
9738 procedure(
logical(LK)) :: isSorted
9739 type(insertionl_type) ,
intent(in) :: method
9744 module subroutine setSortedArrCusComInsertionl_D0_SK4(array, isSorted, method)
9745#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9746 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComInsertionl_D0_SK4
9749 character(
*,SKG) ,
intent(inout) :: array
9750 procedure(
logical(LK)) :: isSorted
9751 type(insertionl_type) ,
intent(in) :: method
9756 module subroutine setSortedArrCusComInsertionl_D0_SK3(array, isSorted, method)
9757#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9758 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComInsertionl_D0_SK3
9761 character(
*,SKG) ,
intent(inout) :: array
9762 procedure(
logical(LK)) :: isSorted
9763 type(insertionl_type) ,
intent(in) :: method
9768 module subroutine setSortedArrCusComInsertionl_D0_SK2(array, isSorted, method)
9769#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9770 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComInsertionl_D0_SK2
9773 character(
*,SKG) ,
intent(inout) :: array
9774 procedure(
logical(LK)) :: isSorted
9775 type(insertionl_type) ,
intent(in) :: method
9780 module subroutine setSortedArrCusComInsertionl_D0_SK1(array, isSorted, method)
9781#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9782 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComInsertionl_D0_SK1
9785 character(
*,SKG) ,
intent(inout) :: array
9786 procedure(
logical(LK)) :: isSorted
9787 type(insertionl_type) ,
intent(in) :: method
9794 module subroutine setSortedArrCusComInsertionl_D1_SK5(array, isSorted, method)
9795#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9796 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComInsertionl_D1_SK5
9799 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
9800 procedure(
logical(LK)) :: isSorted
9801 type(insertionl_type) ,
intent(in) :: method
9806 module subroutine setSortedArrCusComInsertionl_D1_SK4(array, isSorted, method)
9807#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9808 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComInsertionl_D1_SK4
9811 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
9812 procedure(
logical(LK)) :: isSorted
9813 type(insertionl_type) ,
intent(in) :: method
9818 module subroutine setSortedArrCusComInsertionl_D1_SK3(array, isSorted, method)
9819#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9820 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComInsertionl_D1_SK3
9823 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
9824 procedure(
logical(LK)) :: isSorted
9825 type(insertionl_type) ,
intent(in) :: method
9830 module subroutine setSortedArrCusComInsertionl_D1_SK2(array, isSorted, method)
9831#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9832 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComInsertionl_D1_SK2
9835 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
9836 procedure(
logical(LK)) :: isSorted
9837 type(insertionl_type) ,
intent(in) :: method
9842 module subroutine setSortedArrCusComInsertionl_D1_SK1(array, isSorted, method)
9843#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9844 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComInsertionl_D1_SK1
9847 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
9848 procedure(
logical(LK)) :: isSorted
9849 type(insertionl_type) ,
intent(in) :: method
9856 module subroutine setSortedArrCusComInsertionl_D1_IK5(array, isSorted, method)
9857#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9858 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComInsertionl_D1_IK5
9861 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
9862 procedure(
logical(LK)) :: isSorted
9863 type(insertionl_type) ,
intent(in) :: method
9868 module subroutine setSortedArrCusComInsertionl_D1_IK4(array, isSorted, method)
9869#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9870 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComInsertionl_D1_IK4
9873 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
9874 procedure(
logical(LK)) :: isSorted
9875 type(insertionl_type) ,
intent(in) :: method
9880 module subroutine setSortedArrCusComInsertionl_D1_IK3(array, isSorted, method)
9881#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9882 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComInsertionl_D1_IK3
9885 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
9886 procedure(
logical(LK)) :: isSorted
9887 type(insertionl_type) ,
intent(in) :: method
9892 module subroutine setSortedArrCusComInsertionl_D1_IK2(array, isSorted, method)
9893#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9894 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComInsertionl_D1_IK2
9897 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
9898 procedure(
logical(LK)) :: isSorted
9899 type(insertionl_type) ,
intent(in) :: method
9904 module subroutine setSortedArrCusComInsertionl_D1_IK1(array, isSorted, method)
9905#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9906 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComInsertionl_D1_IK1
9909 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
9910 procedure(
logical(LK)) :: isSorted
9911 type(insertionl_type) ,
intent(in) :: method
9918 module subroutine setSortedArrCusComInsertionl_D1_LK5(array, isSorted, method)
9919#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9920 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComInsertionl_D1_LK5
9923 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
9924 procedure(
logical(LK)) :: isSorted
9925 type(insertionl_type) ,
intent(in) :: method
9930 module subroutine setSortedArrCusComInsertionl_D1_LK4(array, isSorted, method)
9931#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9932 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComInsertionl_D1_LK4
9935 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
9936 procedure(
logical(LK)) :: isSorted
9937 type(insertionl_type) ,
intent(in) :: method
9942 module subroutine setSortedArrCusComInsertionl_D1_LK3(array, isSorted, method)
9943#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9944 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComInsertionl_D1_LK3
9947 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
9948 procedure(
logical(LK)) :: isSorted
9949 type(insertionl_type) ,
intent(in) :: method
9954 module subroutine setSortedArrCusComInsertionl_D1_LK2(array, isSorted, method)
9955#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9956 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComInsertionl_D1_LK2
9959 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
9960 procedure(
logical(LK)) :: isSorted
9961 type(insertionl_type) ,
intent(in) :: method
9966 module subroutine setSortedArrCusComInsertionl_D1_LK1(array, isSorted, method)
9967#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9968 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComInsertionl_D1_LK1
9971 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
9972 procedure(
logical(LK)) :: isSorted
9973 type(insertionl_type) ,
intent(in) :: method
9980 module subroutine setSortedArrCusComInsertionl_D1_CK5(array, isSorted, method)
9981#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9982 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComInsertionl_D1_CK5
9985 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
9986 procedure(
logical(LK)) :: isSorted
9987 type(insertionl_type) ,
intent(in) :: method
9992 module subroutine setSortedArrCusComInsertionl_D1_CK4(array, isSorted, method)
9993#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
9994 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComInsertionl_D1_CK4
9997 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
9998 procedure(
logical(LK)) :: isSorted
9999 type(insertionl_type) ,
intent(in) :: method
10004 module subroutine setSortedArrCusComInsertionl_D1_CK3(array, isSorted, method)
10005#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10006 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComInsertionl_D1_CK3
10009 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
10010 procedure(
logical(LK)) :: isSorted
10011 type(insertionl_type) ,
intent(in) :: method
10016 module subroutine setSortedArrCusComInsertionl_D1_CK2(array, isSorted, method)
10017#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10018 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComInsertionl_D1_CK2
10021 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
10022 procedure(
logical(LK)) :: isSorted
10023 type(insertionl_type) ,
intent(in) :: method
10028 module subroutine setSortedArrCusComInsertionl_D1_CK1(array, isSorted, method)
10029#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10030 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComInsertionl_D1_CK1
10033 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
10034 procedure(
logical(LK)) :: isSorted
10035 type(insertionl_type) ,
intent(in) :: method
10042 module subroutine setSortedArrCusComInsertionl_D1_RK5(array, isSorted, method)
10043#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10044 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComInsertionl_D1_RK5
10047 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
10048 procedure(
logical(LK)) :: isSorted
10049 type(insertionl_type) ,
intent(in) :: method
10054 module subroutine setSortedArrCusComInsertionl_D1_RK4(array, isSorted, method)
10055#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10056 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComInsertionl_D1_RK4
10059 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
10060 procedure(
logical(LK)) :: isSorted
10061 type(insertionl_type) ,
intent(in) :: method
10066 module subroutine setSortedArrCusComInsertionl_D1_RK3(array, isSorted, method)
10067#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10068 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComInsertionl_D1_RK3
10071 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
10072 procedure(
logical(LK)) :: isSorted
10073 type(insertionl_type) ,
intent(in) :: method
10078 module subroutine setSortedArrCusComInsertionl_D1_RK2(array, isSorted, method)
10079#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10080 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComInsertionl_D1_RK2
10083 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
10084 procedure(
logical(LK)) :: isSorted
10085 type(insertionl_type) ,
intent(in) :: method
10090 module subroutine setSortedArrCusComInsertionl_D1_RK1(array, isSorted, method)
10091#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10092 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComInsertionl_D1_RK1
10095 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
10096 procedure(
logical(LK)) :: isSorted
10097 type(insertionl_type) ,
intent(in) :: method
10106 module subroutine setSortedArrCusComInsertionl_D1_PSSK5(array, isSorted, method)
10107#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10108 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComInsertionl_D1_PSSK5
10112 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
10113 procedure(
logical(LK)) :: isSorted
10114 type(insertionl_type) ,
intent(in) :: method
10119 module subroutine setSortedArrCusComInsertionl_D1_PSSK4(array, isSorted, method)
10120#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10121 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComInsertionl_D1_PSSK4
10125 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
10126 procedure(
logical(LK)) :: isSorted
10127 type(insertionl_type) ,
intent(in) :: method
10132 module subroutine setSortedArrCusComInsertionl_D1_PSSK3(array, isSorted, method)
10133#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10134 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComInsertionl_D1_PSSK3
10138 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
10139 procedure(
logical(LK)) :: isSorted
10140 type(insertionl_type) ,
intent(in) :: method
10145 module subroutine setSortedArrCusComInsertionl_D1_PSSK2(array, isSorted, method)
10146#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10147 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComInsertionl_D1_PSSK2
10151 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
10152 procedure(
logical(LK)) :: isSorted
10153 type(insertionl_type) ,
intent(in) :: method
10158 module subroutine setSortedArrCusComInsertionl_D1_PSSK1(array, isSorted, method)
10159#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10160 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComInsertionl_D1_PSSK1
10164 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
10165 procedure(
logical(LK)) :: isSorted
10166 type(insertionl_type) ,
intent(in) :: method
10175 module subroutine setSortedArrCusComInsertionl_D1_BSSK(array, isSorted, method)
10176#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10177 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComInsertionl_D1_BSSK
10181 type(css_type) ,
intent(inout) ,
contiguous :: array(:)
10182 procedure(
logical(LK)) :: isSorted
10183 type(insertionl_type) ,
intent(in) :: method
10205 module subroutine setSortedArrCusComInsertionb_D0_SK5(array, isSorted, method)
10206#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10207 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComInsertionb_D0_SK5
10210 character(
*,SKG) ,
intent(inout) :: array
10211 procedure(
logical(LK)) :: isSorted
10212 type(insertionb_type) ,
intent(in) :: method
10217 module subroutine setSortedArrCusComInsertionb_D0_SK4(array, isSorted, method)
10218#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10219 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComInsertionb_D0_SK4
10222 character(
*,SKG) ,
intent(inout) :: array
10223 procedure(
logical(LK)) :: isSorted
10224 type(insertionb_type) ,
intent(in) :: method
10229 module subroutine setSortedArrCusComInsertionb_D0_SK3(array, isSorted, method)
10230#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10231 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComInsertionb_D0_SK3
10234 character(
*,SKG) ,
intent(inout) :: array
10235 procedure(
logical(LK)) :: isSorted
10236 type(insertionb_type) ,
intent(in) :: method
10241 module subroutine setSortedArrCusComInsertionb_D0_SK2(array, isSorted, method)
10242#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10243 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComInsertionb_D0_SK2
10246 character(
*,SKG) ,
intent(inout) :: array
10247 procedure(
logical(LK)) :: isSorted
10248 type(insertionb_type) ,
intent(in) :: method
10253 module subroutine setSortedArrCusComInsertionb_D0_SK1(array, isSorted, method)
10254#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10255 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComInsertionb_D0_SK1
10258 character(
*,SKG) ,
intent(inout) :: array
10259 procedure(
logical(LK)) :: isSorted
10260 type(insertionb_type) ,
intent(in) :: method
10267 module subroutine setSortedArrCusComInsertionb_D1_SK5(array, isSorted, method)
10268#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10269 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComInsertionb_D1_SK5
10272 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
10273 procedure(
logical(LK)) :: isSorted
10274 type(insertionb_type) ,
intent(in) :: method
10279 module subroutine setSortedArrCusComInsertionb_D1_SK4(array, isSorted, method)
10280#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10281 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComInsertionb_D1_SK4
10284 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
10285 procedure(
logical(LK)) :: isSorted
10286 type(insertionb_type) ,
intent(in) :: method
10291 module subroutine setSortedArrCusComInsertionb_D1_SK3(array, isSorted, method)
10292#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10293 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComInsertionb_D1_SK3
10296 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
10297 procedure(
logical(LK)) :: isSorted
10298 type(insertionb_type) ,
intent(in) :: method
10303 module subroutine setSortedArrCusComInsertionb_D1_SK2(array, isSorted, method)
10304#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10305 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComInsertionb_D1_SK2
10308 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
10309 procedure(
logical(LK)) :: isSorted
10310 type(insertionb_type) ,
intent(in) :: method
10315 module subroutine setSortedArrCusComInsertionb_D1_SK1(array, isSorted, method)
10316#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10317 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComInsertionb_D1_SK1
10320 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
10321 procedure(
logical(LK)) :: isSorted
10322 type(insertionb_type) ,
intent(in) :: method
10329 module subroutine setSortedArrCusComInsertionb_D1_IK5(array, isSorted, method)
10330#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10331 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComInsertionb_D1_IK5
10334 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
10335 procedure(
logical(LK)) :: isSorted
10336 type(insertionb_type) ,
intent(in) :: method
10341 module subroutine setSortedArrCusComInsertionb_D1_IK4(array, isSorted, method)
10342#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10343 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComInsertionb_D1_IK4
10346 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
10347 procedure(
logical(LK)) :: isSorted
10348 type(insertionb_type) ,
intent(in) :: method
10353 module subroutine setSortedArrCusComInsertionb_D1_IK3(array, isSorted, method)
10354#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10355 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComInsertionb_D1_IK3
10358 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
10359 procedure(
logical(LK)) :: isSorted
10360 type(insertionb_type) ,
intent(in) :: method
10365 module subroutine setSortedArrCusComInsertionb_D1_IK2(array, isSorted, method)
10366#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10367 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComInsertionb_D1_IK2
10370 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
10371 procedure(
logical(LK)) :: isSorted
10372 type(insertionb_type) ,
intent(in) :: method
10377 module subroutine setSortedArrCusComInsertionb_D1_IK1(array, isSorted, method)
10378#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10379 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComInsertionb_D1_IK1
10382 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
10383 procedure(
logical(LK)) :: isSorted
10384 type(insertionb_type) ,
intent(in) :: method
10391 module subroutine setSortedArrCusComInsertionb_D1_LK5(array, isSorted, method)
10392#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10393 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComInsertionb_D1_LK5
10396 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
10397 procedure(
logical(LK)) :: isSorted
10398 type(insertionb_type) ,
intent(in) :: method
10403 module subroutine setSortedArrCusComInsertionb_D1_LK4(array, isSorted, method)
10404#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10405 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComInsertionb_D1_LK4
10408 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
10409 procedure(
logical(LK)) :: isSorted
10410 type(insertionb_type) ,
intent(in) :: method
10415 module subroutine setSortedArrCusComInsertionb_D1_LK3(array, isSorted, method)
10416#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10417 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComInsertionb_D1_LK3
10420 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
10421 procedure(
logical(LK)) :: isSorted
10422 type(insertionb_type) ,
intent(in) :: method
10427 module subroutine setSortedArrCusComInsertionb_D1_LK2(array, isSorted, method)
10428#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10429 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComInsertionb_D1_LK2
10432 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
10433 procedure(
logical(LK)) :: isSorted
10434 type(insertionb_type) ,
intent(in) :: method
10439 module subroutine setSortedArrCusComInsertionb_D1_LK1(array, isSorted, method)
10440#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10441 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComInsertionb_D1_LK1
10444 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
10445 procedure(
logical(LK)) :: isSorted
10446 type(insertionb_type) ,
intent(in) :: method
10453 module subroutine setSortedArrCusComInsertionb_D1_CK5(array, isSorted, method)
10454#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10455 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComInsertionb_D1_CK5
10458 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
10459 procedure(
logical(LK)) :: isSorted
10460 type(insertionb_type) ,
intent(in) :: method
10465 module subroutine setSortedArrCusComInsertionb_D1_CK4(array, isSorted, method)
10466#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10467 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComInsertionb_D1_CK4
10470 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
10471 procedure(
logical(LK)) :: isSorted
10472 type(insertionb_type) ,
intent(in) :: method
10477 module subroutine setSortedArrCusComInsertionb_D1_CK3(array, isSorted, method)
10478#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10479 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComInsertionb_D1_CK3
10482 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
10483 procedure(
logical(LK)) :: isSorted
10484 type(insertionb_type) ,
intent(in) :: method
10489 module subroutine setSortedArrCusComInsertionb_D1_CK2(array, isSorted, method)
10490#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10491 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComInsertionb_D1_CK2
10494 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
10495 procedure(
logical(LK)) :: isSorted
10496 type(insertionb_type) ,
intent(in) :: method
10501 module subroutine setSortedArrCusComInsertionb_D1_CK1(array, isSorted, method)
10502#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10503 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComInsertionb_D1_CK1
10506 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
10507 procedure(
logical(LK)) :: isSorted
10508 type(insertionb_type) ,
intent(in) :: method
10515 module subroutine setSortedArrCusComInsertionb_D1_RK5(array, isSorted, method)
10516#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10517 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComInsertionb_D1_RK5
10520 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
10521 procedure(
logical(LK)) :: isSorted
10522 type(insertionb_type) ,
intent(in) :: method
10527 module subroutine setSortedArrCusComInsertionb_D1_RK4(array, isSorted, method)
10528#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10529 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComInsertionb_D1_RK4
10532 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
10533 procedure(
logical(LK)) :: isSorted
10534 type(insertionb_type) ,
intent(in) :: method
10539 module subroutine setSortedArrCusComInsertionb_D1_RK3(array, isSorted, method)
10540#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10541 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComInsertionb_D1_RK3
10544 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
10545 procedure(
logical(LK)) :: isSorted
10546 type(insertionb_type) ,
intent(in) :: method
10551 module subroutine setSortedArrCusComInsertionb_D1_RK2(array, isSorted, method)
10552#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10553 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComInsertionb_D1_RK2
10556 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
10557 procedure(
logical(LK)) :: isSorted
10558 type(insertionb_type) ,
intent(in) :: method
10563 module subroutine setSortedArrCusComInsertionb_D1_RK1(array, isSorted, method)
10564#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10565 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComInsertionb_D1_RK1
10568 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
10569 procedure(
logical(LK)) :: isSorted
10570 type(insertionb_type) ,
intent(in) :: method
10579 module subroutine setSortedArrCusComInsertionb_D1_PSSK5(array, isSorted, method)
10580#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10581 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComInsertionb_D1_PSSK5
10585 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
10586 procedure(
logical(LK)) :: isSorted
10587 type(insertionb_type) ,
intent(in) :: method
10592 module subroutine setSortedArrCusComInsertionb_D1_PSSK4(array, isSorted, method)
10593#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10594 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComInsertionb_D1_PSSK4
10598 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
10599 procedure(
logical(LK)) :: isSorted
10600 type(insertionb_type) ,
intent(in) :: method
10605 module subroutine setSortedArrCusComInsertionb_D1_PSSK3(array, isSorted, method)
10606#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10607 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComInsertionb_D1_PSSK3
10611 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
10612 procedure(
logical(LK)) :: isSorted
10613 type(insertionb_type) ,
intent(in) :: method
10618 module subroutine setSortedArrCusComInsertionb_D1_PSSK2(array, isSorted, method)
10619#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10620 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComInsertionb_D1_PSSK2
10624 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
10625 procedure(
logical(LK)) :: isSorted
10626 type(insertionb_type) ,
intent(in) :: method
10631 module subroutine setSortedArrCusComInsertionb_D1_PSSK1(array, isSorted, method)
10632#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10633 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComInsertionb_D1_PSSK1
10637 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
10638 procedure(
logical(LK)) :: isSorted
10639 type(insertionb_type) ,
intent(in) :: method
10648 module subroutine setSortedArrCusComInsertionb_D1_BSSK(array, isSorted, method)
10649#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10650 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComInsertionb_D1_BSSK
10654 type(css_type) ,
intent(inout) ,
contiguous :: array(:)
10655 procedure(
logical(LK)) :: isSorted
10656 type(insertionb_type) ,
intent(in) :: method
10678 recursive module subroutine setSortedArrCusComMerger_D0_SK5(array, isSorted, method)
10679#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10680 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComMerger_D0_SK5
10683 character(
*,SKG) ,
intent(inout) :: array
10684 procedure(
logical(LK)) :: isSorted
10685 type(merger_type) ,
intent(in) :: method
10690 recursive module subroutine setSortedArrCusComMerger_D0_SK4(array, isSorted, method)
10691#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10692 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComMerger_D0_SK4
10695 character(
*,SKG) ,
intent(inout) :: array
10696 procedure(
logical(LK)) :: isSorted
10697 type(merger_type) ,
intent(in) :: method
10702 recursive module subroutine setSortedArrCusComMerger_D0_SK3(array, isSorted, method)
10703#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10704 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComMerger_D0_SK3
10707 character(
*,SKG) ,
intent(inout) :: array
10708 procedure(
logical(LK)) :: isSorted
10709 type(merger_type) ,
intent(in) :: method
10714 recursive module subroutine setSortedArrCusComMerger_D0_SK2(array, isSorted, method)
10715#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10716 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComMerger_D0_SK2
10719 character(
*,SKG) ,
intent(inout) :: array
10720 procedure(
logical(LK)) :: isSorted
10721 type(merger_type) ,
intent(in) :: method
10726 recursive module subroutine setSortedArrCusComMerger_D0_SK1(array, isSorted, method)
10727#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10728 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComMerger_D0_SK1
10731 character(
*,SKG) ,
intent(inout) :: array
10732 procedure(
logical(LK)) :: isSorted
10733 type(merger_type) ,
intent(in) :: method
10740 recursive module subroutine setSortedArrCusComMerger_D1_SK5(array, isSorted, method)
10741#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10742 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComMerger_D1_SK5
10745 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
10746 procedure(
logical(LK)) :: isSorted
10747 type(merger_type) ,
intent(in) :: method
10752 recursive module subroutine setSortedArrCusComMerger_D1_SK4(array, isSorted, method)
10753#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10754 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComMerger_D1_SK4
10757 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
10758 procedure(
logical(LK)) :: isSorted
10759 type(merger_type) ,
intent(in) :: method
10764 recursive module subroutine setSortedArrCusComMerger_D1_SK3(array, isSorted, method)
10765#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10766 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComMerger_D1_SK3
10769 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
10770 procedure(
logical(LK)) :: isSorted
10771 type(merger_type) ,
intent(in) :: method
10776 recursive module subroutine setSortedArrCusComMerger_D1_SK2(array, isSorted, method)
10777#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10778 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComMerger_D1_SK2
10781 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
10782 procedure(
logical(LK)) :: isSorted
10783 type(merger_type) ,
intent(in) :: method
10788 recursive module subroutine setSortedArrCusComMerger_D1_SK1(array, isSorted, method)
10789#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10790 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComMerger_D1_SK1
10793 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
10794 procedure(
logical(LK)) :: isSorted
10795 type(merger_type) ,
intent(in) :: method
10802 recursive module subroutine setSortedArrCusComMerger_D1_IK5(array, isSorted, method)
10803#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10804 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComMerger_D1_IK5
10807 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
10808 procedure(
logical(LK)) :: isSorted
10809 type(merger_type) ,
intent(in) :: method
10814 recursive module subroutine setSortedArrCusComMerger_D1_IK4(array, isSorted, method)
10815#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10816 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComMerger_D1_IK4
10819 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
10820 procedure(
logical(LK)) :: isSorted
10821 type(merger_type) ,
intent(in) :: method
10826 recursive module subroutine setSortedArrCusComMerger_D1_IK3(array, isSorted, method)
10827#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10828 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComMerger_D1_IK3
10831 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
10832 procedure(
logical(LK)) :: isSorted
10833 type(merger_type) ,
intent(in) :: method
10838 recursive module subroutine setSortedArrCusComMerger_D1_IK2(array, isSorted, method)
10839#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10840 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComMerger_D1_IK2
10843 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
10844 procedure(
logical(LK)) :: isSorted
10845 type(merger_type) ,
intent(in) :: method
10850 recursive module subroutine setSortedArrCusComMerger_D1_IK1(array, isSorted, method)
10851#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10852 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComMerger_D1_IK1
10855 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
10856 procedure(
logical(LK)) :: isSorted
10857 type(merger_type) ,
intent(in) :: method
10864 recursive module subroutine setSortedArrCusComMerger_D1_LK5(array, isSorted, method)
10865#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10866 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComMerger_D1_LK5
10869 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
10870 procedure(
logical(LK)) :: isSorted
10871 type(merger_type) ,
intent(in) :: method
10876 recursive module subroutine setSortedArrCusComMerger_D1_LK4(array, isSorted, method)
10877#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10878 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComMerger_D1_LK4
10881 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
10882 procedure(
logical(LK)) :: isSorted
10883 type(merger_type) ,
intent(in) :: method
10888 recursive module subroutine setSortedArrCusComMerger_D1_LK3(array, isSorted, method)
10889#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10890 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComMerger_D1_LK3
10893 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
10894 procedure(
logical(LK)) :: isSorted
10895 type(merger_type) ,
intent(in) :: method
10900 recursive module subroutine setSortedArrCusComMerger_D1_LK2(array, isSorted, method)
10901#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10902 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComMerger_D1_LK2
10905 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
10906 procedure(
logical(LK)) :: isSorted
10907 type(merger_type) ,
intent(in) :: method
10912 recursive module subroutine setSortedArrCusComMerger_D1_LK1(array, isSorted, method)
10913#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10914 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComMerger_D1_LK1
10917 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
10918 procedure(
logical(LK)) :: isSorted
10919 type(merger_type) ,
intent(in) :: method
10926 recursive module subroutine setSortedArrCusComMerger_D1_CK5(array, isSorted, method)
10927#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10928 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComMerger_D1_CK5
10931 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
10932 procedure(
logical(LK)) :: isSorted
10933 type(merger_type) ,
intent(in) :: method
10938 recursive module subroutine setSortedArrCusComMerger_D1_CK4(array, isSorted, method)
10939#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10940 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComMerger_D1_CK4
10943 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
10944 procedure(
logical(LK)) :: isSorted
10945 type(merger_type) ,
intent(in) :: method
10950 recursive module subroutine setSortedArrCusComMerger_D1_CK3(array, isSorted, method)
10951#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10952 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComMerger_D1_CK3
10955 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
10956 procedure(
logical(LK)) :: isSorted
10957 type(merger_type) ,
intent(in) :: method
10962 recursive module subroutine setSortedArrCusComMerger_D1_CK2(array, isSorted, method)
10963#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10964 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComMerger_D1_CK2
10967 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
10968 procedure(
logical(LK)) :: isSorted
10969 type(merger_type) ,
intent(in) :: method
10974 recursive module subroutine setSortedArrCusComMerger_D1_CK1(array, isSorted, method)
10975#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10976 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComMerger_D1_CK1
10979 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
10980 procedure(
logical(LK)) :: isSorted
10981 type(merger_type) ,
intent(in) :: method
10988 recursive module subroutine setSortedArrCusComMerger_D1_RK5(array, isSorted, method)
10989#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
10990 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComMerger_D1_RK5
10993 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
10994 procedure(
logical(LK)) :: isSorted
10995 type(merger_type) ,
intent(in) :: method
11000 recursive module subroutine setSortedArrCusComMerger_D1_RK4(array, isSorted, method)
11001#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11002 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComMerger_D1_RK4
11005 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
11006 procedure(
logical(LK)) :: isSorted
11007 type(merger_type) ,
intent(in) :: method
11012 recursive module subroutine setSortedArrCusComMerger_D1_RK3(array, isSorted, method)
11013#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11014 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComMerger_D1_RK3
11017 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
11018 procedure(
logical(LK)) :: isSorted
11019 type(merger_type) ,
intent(in) :: method
11024 recursive module subroutine setSortedArrCusComMerger_D1_RK2(array, isSorted, method)
11025#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11026 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComMerger_D1_RK2
11029 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
11030 procedure(
logical(LK)) :: isSorted
11031 type(merger_type) ,
intent(in) :: method
11036 recursive module subroutine setSortedArrCusComMerger_D1_RK1(array, isSorted, method)
11037#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11038 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComMerger_D1_RK1
11041 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
11042 procedure(
logical(LK)) :: isSorted
11043 type(merger_type) ,
intent(in) :: method
11052 recursive module subroutine setSortedArrCusComMerger_D1_PSSK5(array, isSorted, method)
11053#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11054 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComMerger_D1_PSSK5
11058 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
11059 procedure(
logical(LK)) :: isSorted
11060 type(merger_type) ,
intent(in) :: method
11065 recursive module subroutine setSortedArrCusComMerger_D1_PSSK4(array, isSorted, method)
11066#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11067 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComMerger_D1_PSSK4
11071 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
11072 procedure(
logical(LK)) :: isSorted
11073 type(merger_type) ,
intent(in) :: method
11078 recursive module subroutine setSortedArrCusComMerger_D1_PSSK3(array, isSorted, method)
11079#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11080 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComMerger_D1_PSSK3
11084 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
11085 procedure(
logical(LK)) :: isSorted
11086 type(merger_type) ,
intent(in) :: method
11091 recursive module subroutine setSortedArrCusComMerger_D1_PSSK2(array, isSorted, method)
11092#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11093 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComMerger_D1_PSSK2
11097 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
11098 procedure(
logical(LK)) :: isSorted
11099 type(merger_type) ,
intent(in) :: method
11104 recursive module subroutine setSortedArrCusComMerger_D1_PSSK1(array, isSorted, method)
11105#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11106 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComMerger_D1_PSSK1
11110 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
11111 procedure(
logical(LK)) :: isSorted
11112 type(merger_type) ,
intent(in) :: method
11121 recursive module subroutine setSortedArrCusComMerger_D1_BSSK(array, isSorted, method)
11122#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11123 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComMerger_D1_BSSK
11127 type(css_type) ,
intent(inout) ,
contiguous :: array(:)
11128 procedure(
logical(LK)) :: isSorted
11129 type(merger_type) ,
intent(in) :: method
11151 module subroutine setSortedArrCusComSelection_D0_SK5(array, isSorted, method)
11152#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11153 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComSelection_D0_SK5
11156 character(
*,SKG) ,
intent(inout) :: array
11157 procedure(
logical(LK)) :: isSorted
11158 type(selection_type) ,
intent(in) :: method
11163 module subroutine setSortedArrCusComSelection_D0_SK4(array, isSorted, method)
11164#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11165 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComSelection_D0_SK4
11168 character(
*,SKG) ,
intent(inout) :: array
11169 procedure(
logical(LK)) :: isSorted
11170 type(selection_type) ,
intent(in) :: method
11175 module subroutine setSortedArrCusComSelection_D0_SK3(array, isSorted, method)
11176#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11177 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComSelection_D0_SK3
11180 character(
*,SKG) ,
intent(inout) :: array
11181 procedure(
logical(LK)) :: isSorted
11182 type(selection_type) ,
intent(in) :: method
11187 module subroutine setSortedArrCusComSelection_D0_SK2(array, isSorted, method)
11188#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11189 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComSelection_D0_SK2
11192 character(
*,SKG) ,
intent(inout) :: array
11193 procedure(
logical(LK)) :: isSorted
11194 type(selection_type) ,
intent(in) :: method
11199 module subroutine setSortedArrCusComSelection_D0_SK1(array, isSorted, method)
11200#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11201 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComSelection_D0_SK1
11204 character(
*,SKG) ,
intent(inout) :: array
11205 procedure(
logical(LK)) :: isSorted
11206 type(selection_type) ,
intent(in) :: method
11213 module subroutine setSortedArrCusComSelection_D1_SK5(array, isSorted, method)
11214#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11215 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComSelection_D1_SK5
11218 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
11219 procedure(
logical(LK)) :: isSorted
11220 type(selection_type) ,
intent(in) :: method
11225 module subroutine setSortedArrCusComSelection_D1_SK4(array, isSorted, method)
11226#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11227 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComSelection_D1_SK4
11230 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
11231 procedure(
logical(LK)) :: isSorted
11232 type(selection_type) ,
intent(in) :: method
11237 module subroutine setSortedArrCusComSelection_D1_SK3(array, isSorted, method)
11238#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11239 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComSelection_D1_SK3
11242 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
11243 procedure(
logical(LK)) :: isSorted
11244 type(selection_type) ,
intent(in) :: method
11249 module subroutine setSortedArrCusComSelection_D1_SK2(array, isSorted, method)
11250#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11251 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComSelection_D1_SK2
11254 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
11255 procedure(
logical(LK)) :: isSorted
11256 type(selection_type) ,
intent(in) :: method
11261 module subroutine setSortedArrCusComSelection_D1_SK1(array, isSorted, method)
11262#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11263 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComSelection_D1_SK1
11266 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
11267 procedure(
logical(LK)) :: isSorted
11268 type(selection_type) ,
intent(in) :: method
11275 module subroutine setSortedArrCusComSelection_D1_IK5(array, isSorted, method)
11276#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11277 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComSelection_D1_IK5
11280 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
11281 procedure(
logical(LK)) :: isSorted
11282 type(selection_type) ,
intent(in) :: method
11287 module subroutine setSortedArrCusComSelection_D1_IK4(array, isSorted, method)
11288#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11289 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComSelection_D1_IK4
11292 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
11293 procedure(
logical(LK)) :: isSorted
11294 type(selection_type) ,
intent(in) :: method
11299 module subroutine setSortedArrCusComSelection_D1_IK3(array, isSorted, method)
11300#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11301 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComSelection_D1_IK3
11304 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
11305 procedure(
logical(LK)) :: isSorted
11306 type(selection_type) ,
intent(in) :: method
11311 module subroutine setSortedArrCusComSelection_D1_IK2(array, isSorted, method)
11312#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11313 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComSelection_D1_IK2
11316 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
11317 procedure(
logical(LK)) :: isSorted
11318 type(selection_type) ,
intent(in) :: method
11323 module subroutine setSortedArrCusComSelection_D1_IK1(array, isSorted, method)
11324#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11325 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComSelection_D1_IK1
11328 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
11329 procedure(
logical(LK)) :: isSorted
11330 type(selection_type) ,
intent(in) :: method
11337 module subroutine setSortedArrCusComSelection_D1_LK5(array, isSorted, method)
11338#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11339 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComSelection_D1_LK5
11342 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
11343 procedure(
logical(LK)) :: isSorted
11344 type(selection_type) ,
intent(in) :: method
11349 module subroutine setSortedArrCusComSelection_D1_LK4(array, isSorted, method)
11350#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11351 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComSelection_D1_LK4
11354 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
11355 procedure(
logical(LK)) :: isSorted
11356 type(selection_type) ,
intent(in) :: method
11361 module subroutine setSortedArrCusComSelection_D1_LK3(array, isSorted, method)
11362#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11363 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComSelection_D1_LK3
11366 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
11367 procedure(
logical(LK)) :: isSorted
11368 type(selection_type) ,
intent(in) :: method
11373 module subroutine setSortedArrCusComSelection_D1_LK2(array, isSorted, method)
11374#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11375 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComSelection_D1_LK2
11378 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
11379 procedure(
logical(LK)) :: isSorted
11380 type(selection_type) ,
intent(in) :: method
11385 module subroutine setSortedArrCusComSelection_D1_LK1(array, isSorted, method)
11386#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11387 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComSelection_D1_LK1
11390 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
11391 procedure(
logical(LK)) :: isSorted
11392 type(selection_type) ,
intent(in) :: method
11399 module subroutine setSortedArrCusComSelection_D1_CK5(array, isSorted, method)
11400#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11401 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComSelection_D1_CK5
11404 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
11405 procedure(
logical(LK)) :: isSorted
11406 type(selection_type) ,
intent(in) :: method
11411 module subroutine setSortedArrCusComSelection_D1_CK4(array, isSorted, method)
11412#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11413 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComSelection_D1_CK4
11416 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
11417 procedure(
logical(LK)) :: isSorted
11418 type(selection_type) ,
intent(in) :: method
11423 module subroutine setSortedArrCusComSelection_D1_CK3(array, isSorted, method)
11424#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11425 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComSelection_D1_CK3
11428 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
11429 procedure(
logical(LK)) :: isSorted
11430 type(selection_type) ,
intent(in) :: method
11435 module subroutine setSortedArrCusComSelection_D1_CK2(array, isSorted, method)
11436#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11437 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComSelection_D1_CK2
11440 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
11441 procedure(
logical(LK)) :: isSorted
11442 type(selection_type) ,
intent(in) :: method
11447 module subroutine setSortedArrCusComSelection_D1_CK1(array, isSorted, method)
11448#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11449 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComSelection_D1_CK1
11452 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
11453 procedure(
logical(LK)) :: isSorted
11454 type(selection_type) ,
intent(in) :: method
11461 module subroutine setSortedArrCusComSelection_D1_RK5(array, isSorted, method)
11462#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11463 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComSelection_D1_RK5
11466 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
11467 procedure(
logical(LK)) :: isSorted
11468 type(selection_type) ,
intent(in) :: method
11473 module subroutine setSortedArrCusComSelection_D1_RK4(array, isSorted, method)
11474#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11475 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComSelection_D1_RK4
11478 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
11479 procedure(
logical(LK)) :: isSorted
11480 type(selection_type) ,
intent(in) :: method
11485 module subroutine setSortedArrCusComSelection_D1_RK3(array, isSorted, method)
11486#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11487 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComSelection_D1_RK3
11490 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
11491 procedure(
logical(LK)) :: isSorted
11492 type(selection_type) ,
intent(in) :: method
11497 module subroutine setSortedArrCusComSelection_D1_RK2(array, isSorted, method)
11498#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11499 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComSelection_D1_RK2
11502 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
11503 procedure(
logical(LK)) :: isSorted
11504 type(selection_type) ,
intent(in) :: method
11509 module subroutine setSortedArrCusComSelection_D1_RK1(array, isSorted, method)
11510#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11511 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComSelection_D1_RK1
11514 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
11515 procedure(
logical(LK)) :: isSorted
11516 type(selection_type) ,
intent(in) :: method
11525 module subroutine setSortedArrCusComSelection_D1_PSSK5(array, isSorted, method)
11526#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11527 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComSelection_D1_PSSK5
11531 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
11532 procedure(
logical(LK)) :: isSorted
11533 type(selection_type) ,
intent(in) :: method
11538 module subroutine setSortedArrCusComSelection_D1_PSSK4(array, isSorted, method)
11539#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11540 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComSelection_D1_PSSK4
11544 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
11545 procedure(
logical(LK)) :: isSorted
11546 type(selection_type) ,
intent(in) :: method
11551 module subroutine setSortedArrCusComSelection_D1_PSSK3(array, isSorted, method)
11552#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11553 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComSelection_D1_PSSK3
11557 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
11558 procedure(
logical(LK)) :: isSorted
11559 type(selection_type) ,
intent(in) :: method
11564 module subroutine setSortedArrCusComSelection_D1_PSSK2(array, isSorted, method)
11565#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11566 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComSelection_D1_PSSK2
11570 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
11571 procedure(
logical(LK)) :: isSorted
11572 type(selection_type) ,
intent(in) :: method
11577 module subroutine setSortedArrCusComSelection_D1_PSSK1(array, isSorted, method)
11578#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11579 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComSelection_D1_PSSK1
11583 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
11584 procedure(
logical(LK)) :: isSorted
11585 type(selection_type) ,
intent(in) :: method
11594 module subroutine setSortedArrCusComSelection_D1_BSSK(array, isSorted, method)
11595#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11596 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComSelection_D1_BSSK
11600 type(css_type) ,
intent(inout) ,
contiguous :: array(:)
11601 procedure(
logical(LK)) :: isSorted
11602 type(selection_type) ,
intent(in) :: method
11624 module subroutine setSortedArrCusComShell_D0_SK5(array, isSorted, method)
11625#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11626 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComShell_D0_SK5
11629 character(
*,SKG) ,
intent(inout) :: array
11630 procedure(
logical(LK)) :: isSorted
11631 type(shell_type) ,
intent(in) :: method
11636 module subroutine setSortedArrCusComShell_D0_SK4(array, isSorted, method)
11637#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11638 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComShell_D0_SK4
11641 character(
*,SKG) ,
intent(inout) :: array
11642 procedure(
logical(LK)) :: isSorted
11643 type(shell_type) ,
intent(in) :: method
11648 module subroutine setSortedArrCusComShell_D0_SK3(array, isSorted, method)
11649#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11650 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComShell_D0_SK3
11653 character(
*,SKG) ,
intent(inout) :: array
11654 procedure(
logical(LK)) :: isSorted
11655 type(shell_type) ,
intent(in) :: method
11660 module subroutine setSortedArrCusComShell_D0_SK2(array, isSorted, method)
11661#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11662 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComShell_D0_SK2
11665 character(
*,SKG) ,
intent(inout) :: array
11666 procedure(
logical(LK)) :: isSorted
11667 type(shell_type) ,
intent(in) :: method
11672 module subroutine setSortedArrCusComShell_D0_SK1(array, isSorted, method)
11673#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11674 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComShell_D0_SK1
11677 character(
*,SKG) ,
intent(inout) :: array
11678 procedure(
logical(LK)) :: isSorted
11679 type(shell_type) ,
intent(in) :: method
11686 module subroutine setSortedArrCusComShell_D1_SK5(array, isSorted, method)
11687#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11688 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComShell_D1_SK5
11691 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
11692 procedure(
logical(LK)) :: isSorted
11693 type(shell_type) ,
intent(in) :: method
11698 module subroutine setSortedArrCusComShell_D1_SK4(array, isSorted, method)
11699#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11700 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComShell_D1_SK4
11703 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
11704 procedure(
logical(LK)) :: isSorted
11705 type(shell_type) ,
intent(in) :: method
11710 module subroutine setSortedArrCusComShell_D1_SK3(array, isSorted, method)
11711#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11712 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComShell_D1_SK3
11715 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
11716 procedure(
logical(LK)) :: isSorted
11717 type(shell_type) ,
intent(in) :: method
11722 module subroutine setSortedArrCusComShell_D1_SK2(array, isSorted, method)
11723#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11724 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComShell_D1_SK2
11727 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
11728 procedure(
logical(LK)) :: isSorted
11729 type(shell_type) ,
intent(in) :: method
11734 module subroutine setSortedArrCusComShell_D1_SK1(array, isSorted, method)
11735#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11736 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComShell_D1_SK1
11739 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
11740 procedure(
logical(LK)) :: isSorted
11741 type(shell_type) ,
intent(in) :: method
11748 module subroutine setSortedArrCusComShell_D1_IK5(array, isSorted, method)
11749#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11750 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComShell_D1_IK5
11753 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
11754 procedure(
logical(LK)) :: isSorted
11755 type(shell_type) ,
intent(in) :: method
11760 module subroutine setSortedArrCusComShell_D1_IK4(array, isSorted, method)
11761#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11762 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComShell_D1_IK4
11765 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
11766 procedure(
logical(LK)) :: isSorted
11767 type(shell_type) ,
intent(in) :: method
11772 module subroutine setSortedArrCusComShell_D1_IK3(array, isSorted, method)
11773#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11774 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComShell_D1_IK3
11777 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
11778 procedure(
logical(LK)) :: isSorted
11779 type(shell_type) ,
intent(in) :: method
11784 module subroutine setSortedArrCusComShell_D1_IK2(array, isSorted, method)
11785#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11786 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComShell_D1_IK2
11789 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
11790 procedure(
logical(LK)) :: isSorted
11791 type(shell_type) ,
intent(in) :: method
11796 module subroutine setSortedArrCusComShell_D1_IK1(array, isSorted, method)
11797#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11798 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComShell_D1_IK1
11801 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
11802 procedure(
logical(LK)) :: isSorted
11803 type(shell_type) ,
intent(in) :: method
11810 module subroutine setSortedArrCusComShell_D1_LK5(array, isSorted, method)
11811#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11812 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComShell_D1_LK5
11815 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
11816 procedure(
logical(LK)) :: isSorted
11817 type(shell_type) ,
intent(in) :: method
11822 module subroutine setSortedArrCusComShell_D1_LK4(array, isSorted, method)
11823#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11824 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComShell_D1_LK4
11827 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
11828 procedure(
logical(LK)) :: isSorted
11829 type(shell_type) ,
intent(in) :: method
11834 module subroutine setSortedArrCusComShell_D1_LK3(array, isSorted, method)
11835#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11836 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComShell_D1_LK3
11839 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
11840 procedure(
logical(LK)) :: isSorted
11841 type(shell_type) ,
intent(in) :: method
11846 module subroutine setSortedArrCusComShell_D1_LK2(array, isSorted, method)
11847#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11848 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComShell_D1_LK2
11851 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
11852 procedure(
logical(LK)) :: isSorted
11853 type(shell_type) ,
intent(in) :: method
11858 module subroutine setSortedArrCusComShell_D1_LK1(array, isSorted, method)
11859#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11860 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComShell_D1_LK1
11863 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
11864 procedure(
logical(LK)) :: isSorted
11865 type(shell_type) ,
intent(in) :: method
11872 module subroutine setSortedArrCusComShell_D1_CK5(array, isSorted, method)
11873#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11874 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComShell_D1_CK5
11877 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
11878 procedure(
logical(LK)) :: isSorted
11879 type(shell_type) ,
intent(in) :: method
11884 module subroutine setSortedArrCusComShell_D1_CK4(array, isSorted, method)
11885#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11886 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComShell_D1_CK4
11889 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
11890 procedure(
logical(LK)) :: isSorted
11891 type(shell_type) ,
intent(in) :: method
11896 module subroutine setSortedArrCusComShell_D1_CK3(array, isSorted, method)
11897#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11898 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComShell_D1_CK3
11901 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
11902 procedure(
logical(LK)) :: isSorted
11903 type(shell_type) ,
intent(in) :: method
11908 module subroutine setSortedArrCusComShell_D1_CK2(array, isSorted, method)
11909#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11910 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComShell_D1_CK2
11913 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
11914 procedure(
logical(LK)) :: isSorted
11915 type(shell_type) ,
intent(in) :: method
11920 module subroutine setSortedArrCusComShell_D1_CK1(array, isSorted, method)
11921#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11922 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComShell_D1_CK1
11925 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
11926 procedure(
logical(LK)) :: isSorted
11927 type(shell_type) ,
intent(in) :: method
11934 module subroutine setSortedArrCusComShell_D1_RK5(array, isSorted, method)
11935#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11936 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComShell_D1_RK5
11939 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
11940 procedure(
logical(LK)) :: isSorted
11941 type(shell_type) ,
intent(in) :: method
11946 module subroutine setSortedArrCusComShell_D1_RK4(array, isSorted, method)
11947#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11948 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComShell_D1_RK4
11951 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
11952 procedure(
logical(LK)) :: isSorted
11953 type(shell_type) ,
intent(in) :: method
11958 module subroutine setSortedArrCusComShell_D1_RK3(array, isSorted, method)
11959#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11960 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComShell_D1_RK3
11963 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
11964 procedure(
logical(LK)) :: isSorted
11965 type(shell_type) ,
intent(in) :: method
11970 module subroutine setSortedArrCusComShell_D1_RK2(array, isSorted, method)
11971#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11972 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComShell_D1_RK2
11975 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
11976 procedure(
logical(LK)) :: isSorted
11977 type(shell_type) ,
intent(in) :: method
11982 module subroutine setSortedArrCusComShell_D1_RK1(array, isSorted, method)
11983#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
11984 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComShell_D1_RK1
11987 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
11988 procedure(
logical(LK)) :: isSorted
11989 type(shell_type) ,
intent(in) :: method
11998 module subroutine setSortedArrCusComShell_D1_PSSK5(array, isSorted, method)
11999#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12000 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComShell_D1_PSSK5
12004 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
12005 procedure(
logical(LK)) :: isSorted
12006 type(shell_type) ,
intent(in) :: method
12011 module subroutine setSortedArrCusComShell_D1_PSSK4(array, isSorted, method)
12012#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12013 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComShell_D1_PSSK4
12017 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
12018 procedure(
logical(LK)) :: isSorted
12019 type(shell_type) ,
intent(in) :: method
12024 module subroutine setSortedArrCusComShell_D1_PSSK3(array, isSorted, method)
12025#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12026 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComShell_D1_PSSK3
12030 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
12031 procedure(
logical(LK)) :: isSorted
12032 type(shell_type) ,
intent(in) :: method
12037 module subroutine setSortedArrCusComShell_D1_PSSK2(array, isSorted, method)
12038#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12039 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComShell_D1_PSSK2
12043 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
12044 procedure(
logical(LK)) :: isSorted
12045 type(shell_type) ,
intent(in) :: method
12050 module subroutine setSortedArrCusComShell_D1_PSSK1(array, isSorted, method)
12051#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12052 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComShell_D1_PSSK1
12056 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
12057 procedure(
logical(LK)) :: isSorted
12058 type(shell_type) ,
intent(in) :: method
12067 module subroutine setSortedArrCusComShell_D1_BSSK(array, isSorted, method)
12068#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12069 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrCusComShell_D1_BSSK
12073 type(css_type) ,
intent(inout) ,
contiguous :: array(:)
12074 procedure(
logical(LK)) :: isSorted
12075 type(shell_type) ,
intent(in) :: method
12099 pure module subroutine setSortedArrDefComDef_D0_SK5(array)
12100#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12101 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComDef_D0_SK5
12104 character(
*,SKG) ,
intent(inout) :: array
12109 pure module subroutine setSortedArrDefComDef_D0_SK4(array)
12110#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12111 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComDef_D0_SK4
12114 character(
*,SKG) ,
intent(inout) :: array
12119 pure module subroutine setSortedArrDefComDef_D0_SK3(array)
12120#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12121 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComDef_D0_SK3
12124 character(
*,SKG) ,
intent(inout) :: array
12129 pure module subroutine setSortedArrDefComDef_D0_SK2(array)
12130#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12131 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComDef_D0_SK2
12134 character(
*,SKG) ,
intent(inout) :: array
12139 pure module subroutine setSortedArrDefComDef_D0_SK1(array)
12140#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12141 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComDef_D0_SK1
12144 character(
*,SKG) ,
intent(inout) :: array
12151 pure module subroutine setSortedArrDefComDef_D1_SK5(array)
12152#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12153 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComDef_D1_SK5
12156 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
12161 pure module subroutine setSortedArrDefComDef_D1_SK4(array)
12162#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12163 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComDef_D1_SK4
12166 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
12171 pure module subroutine setSortedArrDefComDef_D1_SK3(array)
12172#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12173 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComDef_D1_SK3
12176 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
12181 pure module subroutine setSortedArrDefComDef_D1_SK2(array)
12182#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12183 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComDef_D1_SK2
12186 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
12191 pure module subroutine setSortedArrDefComDef_D1_SK1(array)
12192#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12193 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComDef_D1_SK1
12196 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
12203 pure module subroutine setSortedArrDefComDef_D1_IK5(array)
12204#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12205 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComDef_D1_IK5
12208 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
12213 pure module subroutine setSortedArrDefComDef_D1_IK4(array)
12214#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12215 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComDef_D1_IK4
12218 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
12223 pure module subroutine setSortedArrDefComDef_D1_IK3(array)
12224#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12225 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComDef_D1_IK3
12228 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
12233 pure module subroutine setSortedArrDefComDef_D1_IK2(array)
12234#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12235 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComDef_D1_IK2
12238 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
12243 pure module subroutine setSortedArrDefComDef_D1_IK1(array)
12244#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12245 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComDef_D1_IK1
12248 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
12255 pure module subroutine setSortedArrDefComDef_D1_LK5(array)
12256#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12257 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComDef_D1_LK5
12260 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
12265 pure module subroutine setSortedArrDefComDef_D1_LK4(array)
12266#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12267 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComDef_D1_LK4
12270 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
12275 pure module subroutine setSortedArrDefComDef_D1_LK3(array)
12276#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12277 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComDef_D1_LK3
12280 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
12285 pure module subroutine setSortedArrDefComDef_D1_LK2(array)
12286#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12287 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComDef_D1_LK2
12290 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
12295 pure module subroutine setSortedArrDefComDef_D1_LK1(array)
12296#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12297 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComDef_D1_LK1
12300 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
12307 pure module subroutine setSortedArrDefComDef_D1_CK5(array)
12308#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12309 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComDef_D1_CK5
12312 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
12317 pure module subroutine setSortedArrDefComDef_D1_CK4(array)
12318#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12319 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComDef_D1_CK4
12322 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
12327 pure module subroutine setSortedArrDefComDef_D1_CK3(array)
12328#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12329 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComDef_D1_CK3
12332 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
12337 pure module subroutine setSortedArrDefComDef_D1_CK2(array)
12338#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12339 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComDef_D1_CK2
12342 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
12347 pure module subroutine setSortedArrDefComDef_D1_CK1(array)
12348#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12349 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComDef_D1_CK1
12352 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
12359 pure module subroutine setSortedArrDefComDef_D1_RK5(array)
12360#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12361 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComDef_D1_RK5
12364 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
12369 pure module subroutine setSortedArrDefComDef_D1_RK4(array)
12370#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12371 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComDef_D1_RK4
12374 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
12379 pure module subroutine setSortedArrDefComDef_D1_RK3(array)
12380#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12381 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComDef_D1_RK3
12384 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
12389 pure module subroutine setSortedArrDefComDef_D1_RK2(array)
12390#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12391 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComDef_D1_RK2
12394 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
12399 pure module subroutine setSortedArrDefComDef_D1_RK1(array)
12400#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12401 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComDef_D1_RK1
12404 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
12413 pure module subroutine setSortedArrDefComDef_D1_PSSK5(array)
12414#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12415 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComDef_D1_PSSK5
12419 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
12424 pure module subroutine setSortedArrDefComDef_D1_PSSK4(array)
12425#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12426 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComDef_D1_PSSK4
12430 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
12435 pure module subroutine setSortedArrDefComDef_D1_PSSK3(array)
12436#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12437 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComDef_D1_PSSK3
12441 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
12446 pure module subroutine setSortedArrDefComDef_D1_PSSK2(array)
12447#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12448 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComDef_D1_PSSK2
12452 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
12457 pure module subroutine setSortedArrDefComDef_D1_PSSK1(array)
12458#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12459 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComDef_D1_PSSK1
12463 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
12472 pure module subroutine setSortedArrDefComDef_D1_BSSK(array)
12473#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12474 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComDef_D1_BSSK
12478 type(css_type) ,
intent(inout) ,
contiguous :: array(:)
12500 pure module subroutine setSortedArrDefComQsorti_D0_SK5(array, method)
12501#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12502 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComQsorti_D0_SK5
12505 character(
*,SKG) ,
intent(inout) :: array
12506 type(qsorti_type) ,
intent(in) :: method
12511 pure module subroutine setSortedArrDefComQsorti_D0_SK4(array, method)
12512#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12513 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComQsorti_D0_SK4
12516 character(
*,SKG) ,
intent(inout) :: array
12517 type(qsorti_type) ,
intent(in) :: method
12522 pure module subroutine setSortedArrDefComQsorti_D0_SK3(array, method)
12523#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12524 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComQsorti_D0_SK3
12527 character(
*,SKG) ,
intent(inout) :: array
12528 type(qsorti_type) ,
intent(in) :: method
12533 pure module subroutine setSortedArrDefComQsorti_D0_SK2(array, method)
12534#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12535 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComQsorti_D0_SK2
12538 character(
*,SKG) ,
intent(inout) :: array
12539 type(qsorti_type) ,
intent(in) :: method
12544 pure module subroutine setSortedArrDefComQsorti_D0_SK1(array, method)
12545#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12546 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComQsorti_D0_SK1
12549 character(
*,SKG) ,
intent(inout) :: array
12550 type(qsorti_type) ,
intent(in) :: method
12557 pure module subroutine setSortedArrDefComQsorti_D1_SK5(array, method)
12558#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12559 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComQsorti_D1_SK5
12562 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
12563 type(qsorti_type) ,
intent(in) :: method
12568 pure module subroutine setSortedArrDefComQsorti_D1_SK4(array, method)
12569#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12570 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComQsorti_D1_SK4
12573 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
12574 type(qsorti_type) ,
intent(in) :: method
12579 pure module subroutine setSortedArrDefComQsorti_D1_SK3(array, method)
12580#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12581 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComQsorti_D1_SK3
12584 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
12585 type(qsorti_type) ,
intent(in) :: method
12590 pure module subroutine setSortedArrDefComQsorti_D1_SK2(array, method)
12591#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12592 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComQsorti_D1_SK2
12595 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
12596 type(qsorti_type) ,
intent(in) :: method
12601 pure module subroutine setSortedArrDefComQsorti_D1_SK1(array, method)
12602#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12603 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComQsorti_D1_SK1
12606 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
12607 type(qsorti_type) ,
intent(in) :: method
12614 pure module subroutine setSortedArrDefComQsorti_D1_IK5(array, method)
12615#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12616 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComQsorti_D1_IK5
12619 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
12620 type(qsorti_type) ,
intent(in) :: method
12625 pure module subroutine setSortedArrDefComQsorti_D1_IK4(array, method)
12626#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12627 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComQsorti_D1_IK4
12630 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
12631 type(qsorti_type) ,
intent(in) :: method
12636 pure module subroutine setSortedArrDefComQsorti_D1_IK3(array, method)
12637#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12638 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComQsorti_D1_IK3
12641 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
12642 type(qsorti_type) ,
intent(in) :: method
12647 pure module subroutine setSortedArrDefComQsorti_D1_IK2(array, method)
12648#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12649 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComQsorti_D1_IK2
12652 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
12653 type(qsorti_type) ,
intent(in) :: method
12658 pure module subroutine setSortedArrDefComQsorti_D1_IK1(array, method)
12659#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12660 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComQsorti_D1_IK1
12663 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
12664 type(qsorti_type) ,
intent(in) :: method
12671 pure module subroutine setSortedArrDefComQsorti_D1_LK5(array, method)
12672#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12673 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComQsorti_D1_LK5
12676 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
12677 type(qsorti_type) ,
intent(in) :: method
12682 pure module subroutine setSortedArrDefComQsorti_D1_LK4(array, method)
12683#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12684 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComQsorti_D1_LK4
12687 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
12688 type(qsorti_type) ,
intent(in) :: method
12693 pure module subroutine setSortedArrDefComQsorti_D1_LK3(array, method)
12694#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12695 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComQsorti_D1_LK3
12698 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
12699 type(qsorti_type) ,
intent(in) :: method
12704 pure module subroutine setSortedArrDefComQsorti_D1_LK2(array, method)
12705#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12706 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComQsorti_D1_LK2
12709 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
12710 type(qsorti_type) ,
intent(in) :: method
12715 pure module subroutine setSortedArrDefComQsorti_D1_LK1(array, method)
12716#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12717 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComQsorti_D1_LK1
12720 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
12721 type(qsorti_type) ,
intent(in) :: method
12728 pure module subroutine setSortedArrDefComQsorti_D1_CK5(array, method)
12729#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12730 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComQsorti_D1_CK5
12733 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
12734 type(qsorti_type) ,
intent(in) :: method
12739 pure module subroutine setSortedArrDefComQsorti_D1_CK4(array, method)
12740#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12741 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComQsorti_D1_CK4
12744 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
12745 type(qsorti_type) ,
intent(in) :: method
12750 pure module subroutine setSortedArrDefComQsorti_D1_CK3(array, method)
12751#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12752 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComQsorti_D1_CK3
12755 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
12756 type(qsorti_type) ,
intent(in) :: method
12761 pure module subroutine setSortedArrDefComQsorti_D1_CK2(array, method)
12762#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12763 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComQsorti_D1_CK2
12766 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
12767 type(qsorti_type) ,
intent(in) :: method
12772 pure module subroutine setSortedArrDefComQsorti_D1_CK1(array, method)
12773#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12774 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComQsorti_D1_CK1
12777 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
12778 type(qsorti_type) ,
intent(in) :: method
12785 pure module subroutine setSortedArrDefComQsorti_D1_RK5(array, method)
12786#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12787 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComQsorti_D1_RK5
12790 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
12791 type(qsorti_type) ,
intent(in) :: method
12796 pure module subroutine setSortedArrDefComQsorti_D1_RK4(array, method)
12797#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12798 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComQsorti_D1_RK4
12801 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
12802 type(qsorti_type) ,
intent(in) :: method
12807 pure module subroutine setSortedArrDefComQsorti_D1_RK3(array, method)
12808#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12809 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComQsorti_D1_RK3
12812 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
12813 type(qsorti_type) ,
intent(in) :: method
12818 pure module subroutine setSortedArrDefComQsorti_D1_RK2(array, method)
12819#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12820 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComQsorti_D1_RK2
12823 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
12824 type(qsorti_type) ,
intent(in) :: method
12829 pure module subroutine setSortedArrDefComQsorti_D1_RK1(array, method)
12830#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12831 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComQsorti_D1_RK1
12834 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
12835 type(qsorti_type) ,
intent(in) :: method
12844 pure module subroutine setSortedArrDefComQsorti_D1_PSSK5(array, method)
12845#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12846 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComQsorti_D1_PSSK5
12850 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
12851 type(qsorti_type) ,
intent(in) :: method
12856 pure module subroutine setSortedArrDefComQsorti_D1_PSSK4(array, method)
12857#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12858 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComQsorti_D1_PSSK4
12862 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
12863 type(qsorti_type) ,
intent(in) :: method
12868 pure module subroutine setSortedArrDefComQsorti_D1_PSSK3(array, method)
12869#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12870 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComQsorti_D1_PSSK3
12874 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
12875 type(qsorti_type) ,
intent(in) :: method
12880 pure module subroutine setSortedArrDefComQsorti_D1_PSSK2(array, method)
12881#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12882 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComQsorti_D1_PSSK2
12886 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
12887 type(qsorti_type) ,
intent(in) :: method
12892 pure module subroutine setSortedArrDefComQsorti_D1_PSSK1(array, method)
12893#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12894 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComQsorti_D1_PSSK1
12898 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
12899 type(qsorti_type) ,
intent(in) :: method
12908 pure module subroutine setSortedArrDefComQsorti_D1_BSSK(array, method)
12909#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12910 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComQsorti_D1_BSSK
12914 type(css_type) ,
intent(inout) ,
contiguous :: array(:)
12915 type(qsorti_type) ,
intent(in) :: method
12937 pure recursive module subroutine setSortedArrDefComQsortr_D0_SK5(array, method)
12938#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12939 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComQsortr_D0_SK5
12942 character(
*,SKG) ,
intent(inout) :: array
12943 type(qsortr_type) ,
intent(in) :: method
12948 pure recursive module subroutine setSortedArrDefComQsortr_D0_SK4(array, method)
12949#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12950 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComQsortr_D0_SK4
12953 character(
*,SKG) ,
intent(inout) :: array
12954 type(qsortr_type) ,
intent(in) :: method
12959 pure recursive module subroutine setSortedArrDefComQsortr_D0_SK3(array, method)
12960#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12961 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComQsortr_D0_SK3
12964 character(
*,SKG) ,
intent(inout) :: array
12965 type(qsortr_type) ,
intent(in) :: method
12970 pure recursive module subroutine setSortedArrDefComQsortr_D0_SK2(array, method)
12971#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12972 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComQsortr_D0_SK2
12975 character(
*,SKG) ,
intent(inout) :: array
12976 type(qsortr_type) ,
intent(in) :: method
12981 pure recursive module subroutine setSortedArrDefComQsortr_D0_SK1(array, method)
12982#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12983 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComQsortr_D0_SK1
12986 character(
*,SKG) ,
intent(inout) :: array
12987 type(qsortr_type) ,
intent(in) :: method
12994 pure recursive module subroutine setSortedArrDefComQsortr_D1_SK5(array, method)
12995#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
12996 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComQsortr_D1_SK5
12999 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
13000 type(qsortr_type) ,
intent(in) :: method
13005 pure recursive module subroutine setSortedArrDefComQsortr_D1_SK4(array, method)
13006#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13007 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComQsortr_D1_SK4
13010 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
13011 type(qsortr_type) ,
intent(in) :: method
13016 pure recursive module subroutine setSortedArrDefComQsortr_D1_SK3(array, method)
13017#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13018 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComQsortr_D1_SK3
13021 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
13022 type(qsortr_type) ,
intent(in) :: method
13027 pure recursive module subroutine setSortedArrDefComQsortr_D1_SK2(array, method)
13028#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13029 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComQsortr_D1_SK2
13032 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
13033 type(qsortr_type) ,
intent(in) :: method
13038 pure recursive module subroutine setSortedArrDefComQsortr_D1_SK1(array, method)
13039#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13040 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComQsortr_D1_SK1
13043 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
13044 type(qsortr_type) ,
intent(in) :: method
13051 pure recursive module subroutine setSortedArrDefComQsortr_D1_IK5(array, method)
13052#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13053 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComQsortr_D1_IK5
13056 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
13057 type(qsortr_type) ,
intent(in) :: method
13062 pure recursive module subroutine setSortedArrDefComQsortr_D1_IK4(array, method)
13063#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13064 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComQsortr_D1_IK4
13067 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
13068 type(qsortr_type) ,
intent(in) :: method
13073 pure recursive module subroutine setSortedArrDefComQsortr_D1_IK3(array, method)
13074#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13075 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComQsortr_D1_IK3
13078 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
13079 type(qsortr_type) ,
intent(in) :: method
13084 pure recursive module subroutine setSortedArrDefComQsortr_D1_IK2(array, method)
13085#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13086 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComQsortr_D1_IK2
13089 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
13090 type(qsortr_type) ,
intent(in) :: method
13095 pure recursive module subroutine setSortedArrDefComQsortr_D1_IK1(array, method)
13096#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13097 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComQsortr_D1_IK1
13100 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
13101 type(qsortr_type) ,
intent(in) :: method
13108 pure recursive module subroutine setSortedArrDefComQsortr_D1_LK5(array, method)
13109#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13110 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComQsortr_D1_LK5
13113 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
13114 type(qsortr_type) ,
intent(in) :: method
13119 pure recursive module subroutine setSortedArrDefComQsortr_D1_LK4(array, method)
13120#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13121 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComQsortr_D1_LK4
13124 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
13125 type(qsortr_type) ,
intent(in) :: method
13130 pure recursive module subroutine setSortedArrDefComQsortr_D1_LK3(array, method)
13131#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13132 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComQsortr_D1_LK3
13135 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
13136 type(qsortr_type) ,
intent(in) :: method
13141 pure recursive module subroutine setSortedArrDefComQsortr_D1_LK2(array, method)
13142#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13143 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComQsortr_D1_LK2
13146 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
13147 type(qsortr_type) ,
intent(in) :: method
13152 pure recursive module subroutine setSortedArrDefComQsortr_D1_LK1(array, method)
13153#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13154 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComQsortr_D1_LK1
13157 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
13158 type(qsortr_type) ,
intent(in) :: method
13165 pure recursive module subroutine setSortedArrDefComQsortr_D1_CK5(array, method)
13166#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13167 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComQsortr_D1_CK5
13170 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
13171 type(qsortr_type) ,
intent(in) :: method
13176 pure recursive module subroutine setSortedArrDefComQsortr_D1_CK4(array, method)
13177#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13178 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComQsortr_D1_CK4
13181 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
13182 type(qsortr_type) ,
intent(in) :: method
13187 pure recursive module subroutine setSortedArrDefComQsortr_D1_CK3(array, method)
13188#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13189 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComQsortr_D1_CK3
13192 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
13193 type(qsortr_type) ,
intent(in) :: method
13198 pure recursive module subroutine setSortedArrDefComQsortr_D1_CK2(array, method)
13199#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13200 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComQsortr_D1_CK2
13203 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
13204 type(qsortr_type) ,
intent(in) :: method
13209 pure recursive module subroutine setSortedArrDefComQsortr_D1_CK1(array, method)
13210#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13211 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComQsortr_D1_CK1
13214 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
13215 type(qsortr_type) ,
intent(in) :: method
13222 pure recursive module subroutine setSortedArrDefComQsortr_D1_RK5(array, method)
13223#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13224 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComQsortr_D1_RK5
13227 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
13228 type(qsortr_type) ,
intent(in) :: method
13233 pure recursive module subroutine setSortedArrDefComQsortr_D1_RK4(array, method)
13234#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13235 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComQsortr_D1_RK4
13238 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
13239 type(qsortr_type) ,
intent(in) :: method
13244 pure recursive module subroutine setSortedArrDefComQsortr_D1_RK3(array, method)
13245#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13246 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComQsortr_D1_RK3
13249 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
13250 type(qsortr_type) ,
intent(in) :: method
13255 pure recursive module subroutine setSortedArrDefComQsortr_D1_RK2(array, method)
13256#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13257 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComQsortr_D1_RK2
13260 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
13261 type(qsortr_type) ,
intent(in) :: method
13266 pure recursive module subroutine setSortedArrDefComQsortr_D1_RK1(array, method)
13267#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13268 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComQsortr_D1_RK1
13271 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
13272 type(qsortr_type) ,
intent(in) :: method
13281 pure recursive module subroutine setSortedArrDefComQsortr_D1_PSSK5(array, method)
13282#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13283 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComQsortr_D1_PSSK5
13287 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
13288 type(qsortr_type) ,
intent(in) :: method
13293 pure recursive module subroutine setSortedArrDefComQsortr_D1_PSSK4(array, method)
13294#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13295 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComQsortr_D1_PSSK4
13299 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
13300 type(qsortr_type) ,
intent(in) :: method
13305 pure recursive module subroutine setSortedArrDefComQsortr_D1_PSSK3(array, method)
13306#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13307 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComQsortr_D1_PSSK3
13311 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
13312 type(qsortr_type) ,
intent(in) :: method
13317 pure recursive module subroutine setSortedArrDefComQsortr_D1_PSSK2(array, method)
13318#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13319 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComQsortr_D1_PSSK2
13323 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
13324 type(qsortr_type) ,
intent(in) :: method
13329 pure recursive module subroutine setSortedArrDefComQsortr_D1_PSSK1(array, method)
13330#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13331 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComQsortr_D1_PSSK1
13335 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
13336 type(qsortr_type) ,
intent(in) :: method
13345 pure recursive module subroutine setSortedArrDefComQsortr_D1_BSSK(array, method)
13346#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13347 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComQsortr_D1_BSSK
13351 type(css_type) ,
intent(inout) ,
contiguous :: array(:)
13352 type(qsortr_type) ,
intent(in) :: method
13374 pure recursive module subroutine setSortedArrDefComQsortrdp_D0_SK5(array, method)
13375#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13376 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComQsortrdp_D0_SK5
13379 character(
*,SKG) ,
intent(inout) :: array
13380 type(qsortrdp_type) ,
intent(in) :: method
13385 pure recursive module subroutine setSortedArrDefComQsortrdp_D0_SK4(array, method)
13386#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13387 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComQsortrdp_D0_SK4
13390 character(
*,SKG) ,
intent(inout) :: array
13391 type(qsortrdp_type) ,
intent(in) :: method
13396 pure recursive module subroutine setSortedArrDefComQsortrdp_D0_SK3(array, method)
13397#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13398 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComQsortrdp_D0_SK3
13401 character(
*,SKG) ,
intent(inout) :: array
13402 type(qsortrdp_type) ,
intent(in) :: method
13407 pure recursive module subroutine setSortedArrDefComQsortrdp_D0_SK2(array, method)
13408#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13409 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComQsortrdp_D0_SK2
13412 character(
*,SKG) ,
intent(inout) :: array
13413 type(qsortrdp_type) ,
intent(in) :: method
13418 pure recursive module subroutine setSortedArrDefComQsortrdp_D0_SK1(array, method)
13419#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13420 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComQsortrdp_D0_SK1
13423 character(
*,SKG) ,
intent(inout) :: array
13424 type(qsortrdp_type) ,
intent(in) :: method
13431 pure recursive module subroutine setSortedArrDefComQsortrdp_D1_SK5(array, method)
13432#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13433 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComQsortrdp_D1_SK5
13436 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
13437 type(qsortrdp_type) ,
intent(in) :: method
13442 pure recursive module subroutine setSortedArrDefComQsortrdp_D1_SK4(array, method)
13443#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13444 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComQsortrdp_D1_SK4
13447 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
13448 type(qsortrdp_type) ,
intent(in) :: method
13453 pure recursive module subroutine setSortedArrDefComQsortrdp_D1_SK3(array, method)
13454#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13455 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComQsortrdp_D1_SK3
13458 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
13459 type(qsortrdp_type) ,
intent(in) :: method
13464 pure recursive module subroutine setSortedArrDefComQsortrdp_D1_SK2(array, method)
13465#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13466 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComQsortrdp_D1_SK2
13469 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
13470 type(qsortrdp_type) ,
intent(in) :: method
13475 pure recursive module subroutine setSortedArrDefComQsortrdp_D1_SK1(array, method)
13476#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13477 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComQsortrdp_D1_SK1
13480 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
13481 type(qsortrdp_type) ,
intent(in) :: method
13488 pure recursive module subroutine setSortedArrDefComQsortrdp_D1_IK5(array, method)
13489#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13490 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComQsortrdp_D1_IK5
13493 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
13494 type(qsortrdp_type) ,
intent(in) :: method
13499 pure recursive module subroutine setSortedArrDefComQsortrdp_D1_IK4(array, method)
13500#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13501 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComQsortrdp_D1_IK4
13504 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
13505 type(qsortrdp_type) ,
intent(in) :: method
13510 pure recursive module subroutine setSortedArrDefComQsortrdp_D1_IK3(array, method)
13511#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13512 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComQsortrdp_D1_IK3
13515 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
13516 type(qsortrdp_type) ,
intent(in) :: method
13521 pure recursive module subroutine setSortedArrDefComQsortrdp_D1_IK2(array, method)
13522#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13523 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComQsortrdp_D1_IK2
13526 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
13527 type(qsortrdp_type) ,
intent(in) :: method
13532 pure recursive module subroutine setSortedArrDefComQsortrdp_D1_IK1(array, method)
13533#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13534 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComQsortrdp_D1_IK1
13537 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
13538 type(qsortrdp_type) ,
intent(in) :: method
13545 pure recursive module subroutine setSortedArrDefComQsortrdp_D1_LK5(array, method)
13546#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13547 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComQsortrdp_D1_LK5
13550 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
13551 type(qsortrdp_type) ,
intent(in) :: method
13556 pure recursive module subroutine setSortedArrDefComQsortrdp_D1_LK4(array, method)
13557#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13558 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComQsortrdp_D1_LK4
13561 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
13562 type(qsortrdp_type) ,
intent(in) :: method
13567 pure recursive module subroutine setSortedArrDefComQsortrdp_D1_LK3(array, method)
13568#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13569 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComQsortrdp_D1_LK3
13572 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
13573 type(qsortrdp_type) ,
intent(in) :: method
13578 pure recursive module subroutine setSortedArrDefComQsortrdp_D1_LK2(array, method)
13579#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13580 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComQsortrdp_D1_LK2
13583 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
13584 type(qsortrdp_type) ,
intent(in) :: method
13589 pure recursive module subroutine setSortedArrDefComQsortrdp_D1_LK1(array, method)
13590#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13591 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComQsortrdp_D1_LK1
13594 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
13595 type(qsortrdp_type) ,
intent(in) :: method
13602 pure recursive module subroutine setSortedArrDefComQsortrdp_D1_CK5(array, method)
13603#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13604 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComQsortrdp_D1_CK5
13607 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
13608 type(qsortrdp_type) ,
intent(in) :: method
13613 pure recursive module subroutine setSortedArrDefComQsortrdp_D1_CK4(array, method)
13614#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13615 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComQsortrdp_D1_CK4
13618 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
13619 type(qsortrdp_type) ,
intent(in) :: method
13624 pure recursive module subroutine setSortedArrDefComQsortrdp_D1_CK3(array, method)
13625#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13626 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComQsortrdp_D1_CK3
13629 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
13630 type(qsortrdp_type) ,
intent(in) :: method
13635 pure recursive module subroutine setSortedArrDefComQsortrdp_D1_CK2(array, method)
13636#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13637 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComQsortrdp_D1_CK2
13640 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
13641 type(qsortrdp_type) ,
intent(in) :: method
13646 pure recursive module subroutine setSortedArrDefComQsortrdp_D1_CK1(array, method)
13647#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13648 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComQsortrdp_D1_CK1
13651 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
13652 type(qsortrdp_type) ,
intent(in) :: method
13659 pure recursive module subroutine setSortedArrDefComQsortrdp_D1_RK5(array, method)
13660#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13661 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComQsortrdp_D1_RK5
13664 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
13665 type(qsortrdp_type) ,
intent(in) :: method
13670 pure recursive module subroutine setSortedArrDefComQsortrdp_D1_RK4(array, method)
13671#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13672 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComQsortrdp_D1_RK4
13675 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
13676 type(qsortrdp_type) ,
intent(in) :: method
13681 pure recursive module subroutine setSortedArrDefComQsortrdp_D1_RK3(array, method)
13682#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13683 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComQsortrdp_D1_RK3
13686 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
13687 type(qsortrdp_type) ,
intent(in) :: method
13692 pure recursive module subroutine setSortedArrDefComQsortrdp_D1_RK2(array, method)
13693#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13694 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComQsortrdp_D1_RK2
13697 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
13698 type(qsortrdp_type) ,
intent(in) :: method
13703 pure recursive module subroutine setSortedArrDefComQsortrdp_D1_RK1(array, method)
13704#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13705 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComQsortrdp_D1_RK1
13708 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
13709 type(qsortrdp_type) ,
intent(in) :: method
13718 pure recursive module subroutine setSortedArrDefComQsortrdp_D1_PSSK5(array, method)
13719#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13720 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComQsortrdp_D1_PSSK5
13724 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
13725 type(qsortrdp_type) ,
intent(in) :: method
13730 pure recursive module subroutine setSortedArrDefComQsortrdp_D1_PSSK4(array, method)
13731#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13732 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComQsortrdp_D1_PSSK4
13736 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
13737 type(qsortrdp_type) ,
intent(in) :: method
13742 pure recursive module subroutine setSortedArrDefComQsortrdp_D1_PSSK3(array, method)
13743#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13744 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComQsortrdp_D1_PSSK3
13748 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
13749 type(qsortrdp_type) ,
intent(in) :: method
13754 pure recursive module subroutine setSortedArrDefComQsortrdp_D1_PSSK2(array, method)
13755#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13756 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComQsortrdp_D1_PSSK2
13760 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
13761 type(qsortrdp_type) ,
intent(in) :: method
13766 pure recursive module subroutine setSortedArrDefComQsortrdp_D1_PSSK1(array, method)
13767#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13768 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComQsortrdp_D1_PSSK1
13772 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
13773 type(qsortrdp_type) ,
intent(in) :: method
13782 pure recursive module subroutine setSortedArrDefComQsortrdp_D1_BSSK(array, method)
13783#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13784 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComQsortrdp_D1_BSSK
13788 type(css_type) ,
intent(inout) ,
contiguous :: array(:)
13789 type(qsortrdp_type) ,
intent(in) :: method
13811 pure module subroutine setSortedArrDefComBubble_D0_SK5(array, method)
13812#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13813 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComBubble_D0_SK5
13816 character(
*,SKG) ,
intent(inout) :: array
13817 type(bubble_type) ,
intent(in) :: method
13822 pure module subroutine setSortedArrDefComBubble_D0_SK4(array, method)
13823#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13824 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComBubble_D0_SK4
13827 character(
*,SKG) ,
intent(inout) :: array
13828 type(bubble_type) ,
intent(in) :: method
13833 pure module subroutine setSortedArrDefComBubble_D0_SK3(array, method)
13834#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13835 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComBubble_D0_SK3
13838 character(
*,SKG) ,
intent(inout) :: array
13839 type(bubble_type) ,
intent(in) :: method
13844 pure module subroutine setSortedArrDefComBubble_D0_SK2(array, method)
13845#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13846 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComBubble_D0_SK2
13849 character(
*,SKG) ,
intent(inout) :: array
13850 type(bubble_type) ,
intent(in) :: method
13855 pure module subroutine setSortedArrDefComBubble_D0_SK1(array, method)
13856#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13857 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComBubble_D0_SK1
13860 character(
*,SKG) ,
intent(inout) :: array
13861 type(bubble_type) ,
intent(in) :: method
13868 pure module subroutine setSortedArrDefComBubble_D1_SK5(array, method)
13869#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13870 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComBubble_D1_SK5
13873 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
13874 type(bubble_type) ,
intent(in) :: method
13879 pure module subroutine setSortedArrDefComBubble_D1_SK4(array, method)
13880#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13881 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComBubble_D1_SK4
13884 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
13885 type(bubble_type) ,
intent(in) :: method
13890 pure module subroutine setSortedArrDefComBubble_D1_SK3(array, method)
13891#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13892 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComBubble_D1_SK3
13895 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
13896 type(bubble_type) ,
intent(in) :: method
13901 pure module subroutine setSortedArrDefComBubble_D1_SK2(array, method)
13902#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13903 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComBubble_D1_SK2
13906 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
13907 type(bubble_type) ,
intent(in) :: method
13912 pure module subroutine setSortedArrDefComBubble_D1_SK1(array, method)
13913#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13914 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComBubble_D1_SK1
13917 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
13918 type(bubble_type) ,
intent(in) :: method
13925 pure module subroutine setSortedArrDefComBubble_D1_IK5(array, method)
13926#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13927 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComBubble_D1_IK5
13930 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
13931 type(bubble_type) ,
intent(in) :: method
13936 pure module subroutine setSortedArrDefComBubble_D1_IK4(array, method)
13937#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13938 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComBubble_D1_IK4
13941 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
13942 type(bubble_type) ,
intent(in) :: method
13947 pure module subroutine setSortedArrDefComBubble_D1_IK3(array, method)
13948#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13949 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComBubble_D1_IK3
13952 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
13953 type(bubble_type) ,
intent(in) :: method
13958 pure module subroutine setSortedArrDefComBubble_D1_IK2(array, method)
13959#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13960 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComBubble_D1_IK2
13963 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
13964 type(bubble_type) ,
intent(in) :: method
13969 pure module subroutine setSortedArrDefComBubble_D1_IK1(array, method)
13970#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13971 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComBubble_D1_IK1
13974 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
13975 type(bubble_type) ,
intent(in) :: method
13982 pure module subroutine setSortedArrDefComBubble_D1_LK5(array, method)
13983#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13984 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComBubble_D1_LK5
13987 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
13988 type(bubble_type) ,
intent(in) :: method
13993 pure module subroutine setSortedArrDefComBubble_D1_LK4(array, method)
13994#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
13995 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComBubble_D1_LK4
13998 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
13999 type(bubble_type) ,
intent(in) :: method
14004 pure module subroutine setSortedArrDefComBubble_D1_LK3(array, method)
14005#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14006 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComBubble_D1_LK3
14009 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
14010 type(bubble_type) ,
intent(in) :: method
14015 pure module subroutine setSortedArrDefComBubble_D1_LK2(array, method)
14016#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14017 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComBubble_D1_LK2
14020 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
14021 type(bubble_type) ,
intent(in) :: method
14026 pure module subroutine setSortedArrDefComBubble_D1_LK1(array, method)
14027#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14028 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComBubble_D1_LK1
14031 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
14032 type(bubble_type) ,
intent(in) :: method
14039 pure module subroutine setSortedArrDefComBubble_D1_CK5(array, method)
14040#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14041 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComBubble_D1_CK5
14044 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
14045 type(bubble_type) ,
intent(in) :: method
14050 pure module subroutine setSortedArrDefComBubble_D1_CK4(array, method)
14051#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14052 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComBubble_D1_CK4
14055 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
14056 type(bubble_type) ,
intent(in) :: method
14061 pure module subroutine setSortedArrDefComBubble_D1_CK3(array, method)
14062#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14063 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComBubble_D1_CK3
14066 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
14067 type(bubble_type) ,
intent(in) :: method
14072 pure module subroutine setSortedArrDefComBubble_D1_CK2(array, method)
14073#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14074 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComBubble_D1_CK2
14077 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
14078 type(bubble_type) ,
intent(in) :: method
14083 pure module subroutine setSortedArrDefComBubble_D1_CK1(array, method)
14084#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14085 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComBubble_D1_CK1
14088 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
14089 type(bubble_type) ,
intent(in) :: method
14096 pure module subroutine setSortedArrDefComBubble_D1_RK5(array, method)
14097#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14098 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComBubble_D1_RK5
14101 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
14102 type(bubble_type) ,
intent(in) :: method
14107 pure module subroutine setSortedArrDefComBubble_D1_RK4(array, method)
14108#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14109 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComBubble_D1_RK4
14112 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
14113 type(bubble_type) ,
intent(in) :: method
14118 pure module subroutine setSortedArrDefComBubble_D1_RK3(array, method)
14119#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14120 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComBubble_D1_RK3
14123 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
14124 type(bubble_type) ,
intent(in) :: method
14129 pure module subroutine setSortedArrDefComBubble_D1_RK2(array, method)
14130#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14131 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComBubble_D1_RK2
14134 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
14135 type(bubble_type) ,
intent(in) :: method
14140 pure module subroutine setSortedArrDefComBubble_D1_RK1(array, method)
14141#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14142 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComBubble_D1_RK1
14145 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
14146 type(bubble_type) ,
intent(in) :: method
14155 pure module subroutine setSortedArrDefComBubble_D1_PSSK5(array, method)
14156#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14157 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComBubble_D1_PSSK5
14161 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
14162 type(bubble_type) ,
intent(in) :: method
14167 pure module subroutine setSortedArrDefComBubble_D1_PSSK4(array, method)
14168#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14169 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComBubble_D1_PSSK4
14173 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
14174 type(bubble_type) ,
intent(in) :: method
14179 pure module subroutine setSortedArrDefComBubble_D1_PSSK3(array, method)
14180#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14181 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComBubble_D1_PSSK3
14185 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
14186 type(bubble_type) ,
intent(in) :: method
14191 pure module subroutine setSortedArrDefComBubble_D1_PSSK2(array, method)
14192#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14193 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComBubble_D1_PSSK2
14197 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
14198 type(bubble_type) ,
intent(in) :: method
14203 pure module subroutine setSortedArrDefComBubble_D1_PSSK1(array, method)
14204#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14205 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComBubble_D1_PSSK1
14209 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
14210 type(bubble_type) ,
intent(in) :: method
14219 pure module subroutine setSortedArrDefComBubble_D1_BSSK(array, method)
14220#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14221 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComBubble_D1_BSSK
14225 type(css_type) ,
intent(inout) ,
contiguous :: array(:)
14226 type(bubble_type) ,
intent(in) :: method
14248 pure module subroutine setSortedArrDefComHeapi_D0_SK5(array, method)
14249#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14250 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComHeapi_D0_SK5
14253 character(
*,SKG) ,
intent(inout) :: array
14254 type(heapi_type) ,
intent(in) :: method
14259 pure module subroutine setSortedArrDefComHeapi_D0_SK4(array, method)
14260#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14261 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComHeapi_D0_SK4
14264 character(
*,SKG) ,
intent(inout) :: array
14265 type(heapi_type) ,
intent(in) :: method
14270 pure module subroutine setSortedArrDefComHeapi_D0_SK3(array, method)
14271#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14272 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComHeapi_D0_SK3
14275 character(
*,SKG) ,
intent(inout) :: array
14276 type(heapi_type) ,
intent(in) :: method
14281 pure module subroutine setSortedArrDefComHeapi_D0_SK2(array, method)
14282#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14283 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComHeapi_D0_SK2
14286 character(
*,SKG) ,
intent(inout) :: array
14287 type(heapi_type) ,
intent(in) :: method
14292 pure module subroutine setSortedArrDefComHeapi_D0_SK1(array, method)
14293#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14294 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComHeapi_D0_SK1
14297 character(
*,SKG) ,
intent(inout) :: array
14298 type(heapi_type) ,
intent(in) :: method
14305 pure module subroutine setSortedArrDefComHeapi_D1_SK5(array, method)
14306#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14307 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComHeapi_D1_SK5
14310 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
14311 type(heapi_type) ,
intent(in) :: method
14316 pure module subroutine setSortedArrDefComHeapi_D1_SK4(array, method)
14317#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14318 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComHeapi_D1_SK4
14321 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
14322 type(heapi_type) ,
intent(in) :: method
14327 pure module subroutine setSortedArrDefComHeapi_D1_SK3(array, method)
14328#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14329 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComHeapi_D1_SK3
14332 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
14333 type(heapi_type) ,
intent(in) :: method
14338 pure module subroutine setSortedArrDefComHeapi_D1_SK2(array, method)
14339#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14340 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComHeapi_D1_SK2
14343 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
14344 type(heapi_type) ,
intent(in) :: method
14349 pure module subroutine setSortedArrDefComHeapi_D1_SK1(array, method)
14350#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14351 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComHeapi_D1_SK1
14354 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
14355 type(heapi_type) ,
intent(in) :: method
14362 pure module subroutine setSortedArrDefComHeapi_D1_IK5(array, method)
14363#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14364 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComHeapi_D1_IK5
14367 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
14368 type(heapi_type) ,
intent(in) :: method
14373 pure module subroutine setSortedArrDefComHeapi_D1_IK4(array, method)
14374#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14375 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComHeapi_D1_IK4
14378 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
14379 type(heapi_type) ,
intent(in) :: method
14384 pure module subroutine setSortedArrDefComHeapi_D1_IK3(array, method)
14385#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14386 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComHeapi_D1_IK3
14389 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
14390 type(heapi_type) ,
intent(in) :: method
14395 pure module subroutine setSortedArrDefComHeapi_D1_IK2(array, method)
14396#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14397 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComHeapi_D1_IK2
14400 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
14401 type(heapi_type) ,
intent(in) :: method
14406 pure module subroutine setSortedArrDefComHeapi_D1_IK1(array, method)
14407#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14408 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComHeapi_D1_IK1
14411 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
14412 type(heapi_type) ,
intent(in) :: method
14419 pure module subroutine setSortedArrDefComHeapi_D1_LK5(array, method)
14420#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14421 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComHeapi_D1_LK5
14424 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
14425 type(heapi_type) ,
intent(in) :: method
14430 pure module subroutine setSortedArrDefComHeapi_D1_LK4(array, method)
14431#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14432 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComHeapi_D1_LK4
14435 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
14436 type(heapi_type) ,
intent(in) :: method
14441 pure module subroutine setSortedArrDefComHeapi_D1_LK3(array, method)
14442#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14443 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComHeapi_D1_LK3
14446 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
14447 type(heapi_type) ,
intent(in) :: method
14452 pure module subroutine setSortedArrDefComHeapi_D1_LK2(array, method)
14453#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14454 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComHeapi_D1_LK2
14457 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
14458 type(heapi_type) ,
intent(in) :: method
14463 pure module subroutine setSortedArrDefComHeapi_D1_LK1(array, method)
14464#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14465 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComHeapi_D1_LK1
14468 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
14469 type(heapi_type) ,
intent(in) :: method
14476 pure module subroutine setSortedArrDefComHeapi_D1_CK5(array, method)
14477#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14478 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComHeapi_D1_CK5
14481 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
14482 type(heapi_type) ,
intent(in) :: method
14487 pure module subroutine setSortedArrDefComHeapi_D1_CK4(array, method)
14488#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14489 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComHeapi_D1_CK4
14492 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
14493 type(heapi_type) ,
intent(in) :: method
14498 pure module subroutine setSortedArrDefComHeapi_D1_CK3(array, method)
14499#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14500 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComHeapi_D1_CK3
14503 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
14504 type(heapi_type) ,
intent(in) :: method
14509 pure module subroutine setSortedArrDefComHeapi_D1_CK2(array, method)
14510#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14511 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComHeapi_D1_CK2
14514 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
14515 type(heapi_type) ,
intent(in) :: method
14520 pure module subroutine setSortedArrDefComHeapi_D1_CK1(array, method)
14521#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14522 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComHeapi_D1_CK1
14525 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
14526 type(heapi_type) ,
intent(in) :: method
14533 pure module subroutine setSortedArrDefComHeapi_D1_RK5(array, method)
14534#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14535 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComHeapi_D1_RK5
14538 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
14539 type(heapi_type) ,
intent(in) :: method
14544 pure module subroutine setSortedArrDefComHeapi_D1_RK4(array, method)
14545#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14546 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComHeapi_D1_RK4
14549 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
14550 type(heapi_type) ,
intent(in) :: method
14555 pure module subroutine setSortedArrDefComHeapi_D1_RK3(array, method)
14556#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14557 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComHeapi_D1_RK3
14560 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
14561 type(heapi_type) ,
intent(in) :: method
14566 pure module subroutine setSortedArrDefComHeapi_D1_RK2(array, method)
14567#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14568 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComHeapi_D1_RK2
14571 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
14572 type(heapi_type) ,
intent(in) :: method
14577 pure module subroutine setSortedArrDefComHeapi_D1_RK1(array, method)
14578#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14579 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComHeapi_D1_RK1
14582 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
14583 type(heapi_type) ,
intent(in) :: method
14592 pure module subroutine setSortedArrDefComHeapi_D1_PSSK5(array, method)
14593#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14594 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComHeapi_D1_PSSK5
14598 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
14599 type(heapi_type) ,
intent(in) :: method
14604 pure module subroutine setSortedArrDefComHeapi_D1_PSSK4(array, method)
14605#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14606 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComHeapi_D1_PSSK4
14610 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
14611 type(heapi_type) ,
intent(in) :: method
14616 pure module subroutine setSortedArrDefComHeapi_D1_PSSK3(array, method)
14617#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14618 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComHeapi_D1_PSSK3
14622 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
14623 type(heapi_type) ,
intent(in) :: method
14628 pure module subroutine setSortedArrDefComHeapi_D1_PSSK2(array, method)
14629#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14630 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComHeapi_D1_PSSK2
14634 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
14635 type(heapi_type) ,
intent(in) :: method
14640 pure module subroutine setSortedArrDefComHeapi_D1_PSSK1(array, method)
14641#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14642 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComHeapi_D1_PSSK1
14646 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
14647 type(heapi_type) ,
intent(in) :: method
14656 pure module subroutine setSortedArrDefComHeapi_D1_BSSK(array, method)
14657#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14658 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComHeapi_D1_BSSK
14662 type(css_type) ,
intent(inout) ,
contiguous :: array(:)
14663 type(heapi_type) ,
intent(in) :: method
14685 pure module subroutine setSortedArrDefComHeapr_D0_SK5(array, method)
14686#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14687 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComHeapr_D0_SK5
14690 character(
*,SKG) ,
intent(inout) :: array
14691 type(heapr_type) ,
intent(in) :: method
14696 pure module subroutine setSortedArrDefComHeapr_D0_SK4(array, method)
14697#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14698 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComHeapr_D0_SK4
14701 character(
*,SKG) ,
intent(inout) :: array
14702 type(heapr_type) ,
intent(in) :: method
14707 pure module subroutine setSortedArrDefComHeapr_D0_SK3(array, method)
14708#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14709 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComHeapr_D0_SK3
14712 character(
*,SKG) ,
intent(inout) :: array
14713 type(heapr_type) ,
intent(in) :: method
14718 pure module subroutine setSortedArrDefComHeapr_D0_SK2(array, method)
14719#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14720 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComHeapr_D0_SK2
14723 character(
*,SKG) ,
intent(inout) :: array
14724 type(heapr_type) ,
intent(in) :: method
14729 pure module subroutine setSortedArrDefComHeapr_D0_SK1(array, method)
14730#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14731 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComHeapr_D0_SK1
14734 character(
*,SKG) ,
intent(inout) :: array
14735 type(heapr_type) ,
intent(in) :: method
14742 pure module subroutine setSortedArrDefComHeapr_D1_SK5(array, method)
14743#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14744 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComHeapr_D1_SK5
14747 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
14748 type(heapr_type) ,
intent(in) :: method
14753 pure module subroutine setSortedArrDefComHeapr_D1_SK4(array, method)
14754#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14755 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComHeapr_D1_SK4
14758 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
14759 type(heapr_type) ,
intent(in) :: method
14764 pure module subroutine setSortedArrDefComHeapr_D1_SK3(array, method)
14765#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14766 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComHeapr_D1_SK3
14769 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
14770 type(heapr_type) ,
intent(in) :: method
14775 pure module subroutine setSortedArrDefComHeapr_D1_SK2(array, method)
14776#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14777 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComHeapr_D1_SK2
14780 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
14781 type(heapr_type) ,
intent(in) :: method
14786 pure module subroutine setSortedArrDefComHeapr_D1_SK1(array, method)
14787#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14788 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComHeapr_D1_SK1
14791 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
14792 type(heapr_type) ,
intent(in) :: method
14799 pure module subroutine setSortedArrDefComHeapr_D1_IK5(array, method)
14800#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14801 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComHeapr_D1_IK5
14804 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
14805 type(heapr_type) ,
intent(in) :: method
14810 pure module subroutine setSortedArrDefComHeapr_D1_IK4(array, method)
14811#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14812 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComHeapr_D1_IK4
14815 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
14816 type(heapr_type) ,
intent(in) :: method
14821 pure module subroutine setSortedArrDefComHeapr_D1_IK3(array, method)
14822#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14823 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComHeapr_D1_IK3
14826 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
14827 type(heapr_type) ,
intent(in) :: method
14832 pure module subroutine setSortedArrDefComHeapr_D1_IK2(array, method)
14833#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14834 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComHeapr_D1_IK2
14837 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
14838 type(heapr_type) ,
intent(in) :: method
14843 pure module subroutine setSortedArrDefComHeapr_D1_IK1(array, method)
14844#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14845 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComHeapr_D1_IK1
14848 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
14849 type(heapr_type) ,
intent(in) :: method
14856 pure module subroutine setSortedArrDefComHeapr_D1_LK5(array, method)
14857#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14858 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComHeapr_D1_LK5
14861 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
14862 type(heapr_type) ,
intent(in) :: method
14867 pure module subroutine setSortedArrDefComHeapr_D1_LK4(array, method)
14868#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14869 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComHeapr_D1_LK4
14872 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
14873 type(heapr_type) ,
intent(in) :: method
14878 pure module subroutine setSortedArrDefComHeapr_D1_LK3(array, method)
14879#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14880 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComHeapr_D1_LK3
14883 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
14884 type(heapr_type) ,
intent(in) :: method
14889 pure module subroutine setSortedArrDefComHeapr_D1_LK2(array, method)
14890#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14891 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComHeapr_D1_LK2
14894 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
14895 type(heapr_type) ,
intent(in) :: method
14900 pure module subroutine setSortedArrDefComHeapr_D1_LK1(array, method)
14901#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14902 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComHeapr_D1_LK1
14905 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
14906 type(heapr_type) ,
intent(in) :: method
14913 pure module subroutine setSortedArrDefComHeapr_D1_CK5(array, method)
14914#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14915 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComHeapr_D1_CK5
14918 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
14919 type(heapr_type) ,
intent(in) :: method
14924 pure module subroutine setSortedArrDefComHeapr_D1_CK4(array, method)
14925#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14926 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComHeapr_D1_CK4
14929 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
14930 type(heapr_type) ,
intent(in) :: method
14935 pure module subroutine setSortedArrDefComHeapr_D1_CK3(array, method)
14936#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14937 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComHeapr_D1_CK3
14940 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
14941 type(heapr_type) ,
intent(in) :: method
14946 pure module subroutine setSortedArrDefComHeapr_D1_CK2(array, method)
14947#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14948 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComHeapr_D1_CK2
14951 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
14952 type(heapr_type) ,
intent(in) :: method
14957 pure module subroutine setSortedArrDefComHeapr_D1_CK1(array, method)
14958#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14959 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComHeapr_D1_CK1
14962 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
14963 type(heapr_type) ,
intent(in) :: method
14970 pure module subroutine setSortedArrDefComHeapr_D1_RK5(array, method)
14971#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14972 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComHeapr_D1_RK5
14975 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
14976 type(heapr_type) ,
intent(in) :: method
14981 pure module subroutine setSortedArrDefComHeapr_D1_RK4(array, method)
14982#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14983 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComHeapr_D1_RK4
14986 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
14987 type(heapr_type) ,
intent(in) :: method
14992 pure module subroutine setSortedArrDefComHeapr_D1_RK3(array, method)
14993#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
14994 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComHeapr_D1_RK3
14997 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
14998 type(heapr_type) ,
intent(in) :: method
15003 pure module subroutine setSortedArrDefComHeapr_D1_RK2(array, method)
15004#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15005 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComHeapr_D1_RK2
15008 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
15009 type(heapr_type) ,
intent(in) :: method
15014 pure module subroutine setSortedArrDefComHeapr_D1_RK1(array, method)
15015#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15016 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComHeapr_D1_RK1
15019 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
15020 type(heapr_type) ,
intent(in) :: method
15029 pure module subroutine setSortedArrDefComHeapr_D1_PSSK5(array, method)
15030#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15031 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComHeapr_D1_PSSK5
15035 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
15036 type(heapr_type) ,
intent(in) :: method
15041 pure module subroutine setSortedArrDefComHeapr_D1_PSSK4(array, method)
15042#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15043 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComHeapr_D1_PSSK4
15047 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
15048 type(heapr_type) ,
intent(in) :: method
15053 pure module subroutine setSortedArrDefComHeapr_D1_PSSK3(array, method)
15054#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15055 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComHeapr_D1_PSSK3
15059 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
15060 type(heapr_type) ,
intent(in) :: method
15065 pure module subroutine setSortedArrDefComHeapr_D1_PSSK2(array, method)
15066#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15067 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComHeapr_D1_PSSK2
15071 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
15072 type(heapr_type) ,
intent(in) :: method
15077 pure module subroutine setSortedArrDefComHeapr_D1_PSSK1(array, method)
15078#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15079 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComHeapr_D1_PSSK1
15083 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
15084 type(heapr_type) ,
intent(in) :: method
15093 pure module subroutine setSortedArrDefComHeapr_D1_BSSK(array, method)
15094#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15095 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComHeapr_D1_BSSK
15099 type(css_type) ,
intent(inout) ,
contiguous :: array(:)
15100 type(heapr_type) ,
intent(in) :: method
15122 pure module subroutine setSortedArrDefComInsertionl_D0_SK5(array, method)
15123#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15124 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComInsertionl_D0_SK5
15127 character(
*,SKG) ,
intent(inout) :: array
15128 type(insertionl_type) ,
intent(in) :: method
15133 pure module subroutine setSortedArrDefComInsertionl_D0_SK4(array, method)
15134#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15135 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComInsertionl_D0_SK4
15138 character(
*,SKG) ,
intent(inout) :: array
15139 type(insertionl_type) ,
intent(in) :: method
15144 pure module subroutine setSortedArrDefComInsertionl_D0_SK3(array, method)
15145#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15146 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComInsertionl_D0_SK3
15149 character(
*,SKG) ,
intent(inout) :: array
15150 type(insertionl_type) ,
intent(in) :: method
15155 pure module subroutine setSortedArrDefComInsertionl_D0_SK2(array, method)
15156#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15157 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComInsertionl_D0_SK2
15160 character(
*,SKG) ,
intent(inout) :: array
15161 type(insertionl_type) ,
intent(in) :: method
15166 pure module subroutine setSortedArrDefComInsertionl_D0_SK1(array, method)
15167#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15168 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComInsertionl_D0_SK1
15171 character(
*,SKG) ,
intent(inout) :: array
15172 type(insertionl_type) ,
intent(in) :: method
15179 pure module subroutine setSortedArrDefComInsertionl_D1_SK5(array, method)
15180#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15181 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComInsertionl_D1_SK5
15184 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
15185 type(insertionl_type) ,
intent(in) :: method
15190 pure module subroutine setSortedArrDefComInsertionl_D1_SK4(array, method)
15191#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15192 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComInsertionl_D1_SK4
15195 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
15196 type(insertionl_type) ,
intent(in) :: method
15201 pure module subroutine setSortedArrDefComInsertionl_D1_SK3(array, method)
15202#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15203 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComInsertionl_D1_SK3
15206 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
15207 type(insertionl_type) ,
intent(in) :: method
15212 pure module subroutine setSortedArrDefComInsertionl_D1_SK2(array, method)
15213#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15214 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComInsertionl_D1_SK2
15217 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
15218 type(insertionl_type) ,
intent(in) :: method
15223 pure module subroutine setSortedArrDefComInsertionl_D1_SK1(array, method)
15224#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15225 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComInsertionl_D1_SK1
15228 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
15229 type(insertionl_type) ,
intent(in) :: method
15236 pure module subroutine setSortedArrDefComInsertionl_D1_IK5(array, method)
15237#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15238 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComInsertionl_D1_IK5
15241 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
15242 type(insertionl_type) ,
intent(in) :: method
15247 pure module subroutine setSortedArrDefComInsertionl_D1_IK4(array, method)
15248#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15249 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComInsertionl_D1_IK4
15252 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
15253 type(insertionl_type) ,
intent(in) :: method
15258 pure module subroutine setSortedArrDefComInsertionl_D1_IK3(array, method)
15259#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15260 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComInsertionl_D1_IK3
15263 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
15264 type(insertionl_type) ,
intent(in) :: method
15269 pure module subroutine setSortedArrDefComInsertionl_D1_IK2(array, method)
15270#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15271 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComInsertionl_D1_IK2
15274 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
15275 type(insertionl_type) ,
intent(in) :: method
15280 pure module subroutine setSortedArrDefComInsertionl_D1_IK1(array, method)
15281#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15282 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComInsertionl_D1_IK1
15285 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
15286 type(insertionl_type) ,
intent(in) :: method
15293 pure module subroutine setSortedArrDefComInsertionl_D1_LK5(array, method)
15294#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15295 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComInsertionl_D1_LK5
15298 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
15299 type(insertionl_type) ,
intent(in) :: method
15304 pure module subroutine setSortedArrDefComInsertionl_D1_LK4(array, method)
15305#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15306 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComInsertionl_D1_LK4
15309 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
15310 type(insertionl_type) ,
intent(in) :: method
15315 pure module subroutine setSortedArrDefComInsertionl_D1_LK3(array, method)
15316#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15317 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComInsertionl_D1_LK3
15320 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
15321 type(insertionl_type) ,
intent(in) :: method
15326 pure module subroutine setSortedArrDefComInsertionl_D1_LK2(array, method)
15327#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15328 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComInsertionl_D1_LK2
15331 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
15332 type(insertionl_type) ,
intent(in) :: method
15337 pure module subroutine setSortedArrDefComInsertionl_D1_LK1(array, method)
15338#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15339 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComInsertionl_D1_LK1
15342 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
15343 type(insertionl_type) ,
intent(in) :: method
15350 pure module subroutine setSortedArrDefComInsertionl_D1_CK5(array, method)
15351#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15352 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComInsertionl_D1_CK5
15355 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
15356 type(insertionl_type) ,
intent(in) :: method
15361 pure module subroutine setSortedArrDefComInsertionl_D1_CK4(array, method)
15362#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15363 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComInsertionl_D1_CK4
15366 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
15367 type(insertionl_type) ,
intent(in) :: method
15372 pure module subroutine setSortedArrDefComInsertionl_D1_CK3(array, method)
15373#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15374 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComInsertionl_D1_CK3
15377 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
15378 type(insertionl_type) ,
intent(in) :: method
15383 pure module subroutine setSortedArrDefComInsertionl_D1_CK2(array, method)
15384#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15385 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComInsertionl_D1_CK2
15388 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
15389 type(insertionl_type) ,
intent(in) :: method
15394 pure module subroutine setSortedArrDefComInsertionl_D1_CK1(array, method)
15395#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15396 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComInsertionl_D1_CK1
15399 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
15400 type(insertionl_type) ,
intent(in) :: method
15407 pure module subroutine setSortedArrDefComInsertionl_D1_RK5(array, method)
15408#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15409 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComInsertionl_D1_RK5
15412 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
15413 type(insertionl_type) ,
intent(in) :: method
15418 pure module subroutine setSortedArrDefComInsertionl_D1_RK4(array, method)
15419#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15420 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComInsertionl_D1_RK4
15423 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
15424 type(insertionl_type) ,
intent(in) :: method
15429 pure module subroutine setSortedArrDefComInsertionl_D1_RK3(array, method)
15430#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15431 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComInsertionl_D1_RK3
15434 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
15435 type(insertionl_type) ,
intent(in) :: method
15440 pure module subroutine setSortedArrDefComInsertionl_D1_RK2(array, method)
15441#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15442 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComInsertionl_D1_RK2
15445 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
15446 type(insertionl_type) ,
intent(in) :: method
15451 pure module subroutine setSortedArrDefComInsertionl_D1_RK1(array, method)
15452#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15453 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComInsertionl_D1_RK1
15456 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
15457 type(insertionl_type) ,
intent(in) :: method
15466 pure module subroutine setSortedArrDefComInsertionl_D1_PSSK5(array, method)
15467#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15468 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComInsertionl_D1_PSSK5
15472 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
15473 type(insertionl_type) ,
intent(in) :: method
15478 pure module subroutine setSortedArrDefComInsertionl_D1_PSSK4(array, method)
15479#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15480 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComInsertionl_D1_PSSK4
15484 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
15485 type(insertionl_type) ,
intent(in) :: method
15490 pure module subroutine setSortedArrDefComInsertionl_D1_PSSK3(array, method)
15491#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15492 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComInsertionl_D1_PSSK3
15496 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
15497 type(insertionl_type) ,
intent(in) :: method
15502 pure module subroutine setSortedArrDefComInsertionl_D1_PSSK2(array, method)
15503#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15504 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComInsertionl_D1_PSSK2
15508 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
15509 type(insertionl_type) ,
intent(in) :: method
15514 pure module subroutine setSortedArrDefComInsertionl_D1_PSSK1(array, method)
15515#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15516 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComInsertionl_D1_PSSK1
15520 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
15521 type(insertionl_type) ,
intent(in) :: method
15530 pure module subroutine setSortedArrDefComInsertionl_D1_BSSK(array, method)
15531#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15532 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComInsertionl_D1_BSSK
15536 type(css_type) ,
intent(inout) ,
contiguous :: array(:)
15537 type(insertionl_type) ,
intent(in) :: method
15559 pure module subroutine setSortedArrDefComInsertionb_D0_SK5(array, method)
15560#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15561 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComInsertionb_D0_SK5
15564 character(
*,SKG) ,
intent(inout) :: array
15565 type(insertionb_type) ,
intent(in) :: method
15570 pure module subroutine setSortedArrDefComInsertionb_D0_SK4(array, method)
15571#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15572 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComInsertionb_D0_SK4
15575 character(
*,SKG) ,
intent(inout) :: array
15576 type(insertionb_type) ,
intent(in) :: method
15581 pure module subroutine setSortedArrDefComInsertionb_D0_SK3(array, method)
15582#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15583 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComInsertionb_D0_SK3
15586 character(
*,SKG) ,
intent(inout) :: array
15587 type(insertionb_type) ,
intent(in) :: method
15592 pure module subroutine setSortedArrDefComInsertionb_D0_SK2(array, method)
15593#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15594 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComInsertionb_D0_SK2
15597 character(
*,SKG) ,
intent(inout) :: array
15598 type(insertionb_type) ,
intent(in) :: method
15603 pure module subroutine setSortedArrDefComInsertionb_D0_SK1(array, method)
15604#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15605 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComInsertionb_D0_SK1
15608 character(
*,SKG) ,
intent(inout) :: array
15609 type(insertionb_type) ,
intent(in) :: method
15616 pure module subroutine setSortedArrDefComInsertionb_D1_SK5(array, method)
15617#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15618 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComInsertionb_D1_SK5
15621 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
15622 type(insertionb_type) ,
intent(in) :: method
15627 pure module subroutine setSortedArrDefComInsertionb_D1_SK4(array, method)
15628#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15629 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComInsertionb_D1_SK4
15632 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
15633 type(insertionb_type) ,
intent(in) :: method
15638 pure module subroutine setSortedArrDefComInsertionb_D1_SK3(array, method)
15639#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15640 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComInsertionb_D1_SK3
15643 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
15644 type(insertionb_type) ,
intent(in) :: method
15649 pure module subroutine setSortedArrDefComInsertionb_D1_SK2(array, method)
15650#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15651 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComInsertionb_D1_SK2
15654 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
15655 type(insertionb_type) ,
intent(in) :: method
15660 pure module subroutine setSortedArrDefComInsertionb_D1_SK1(array, method)
15661#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15662 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComInsertionb_D1_SK1
15665 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
15666 type(insertionb_type) ,
intent(in) :: method
15673 pure module subroutine setSortedArrDefComInsertionb_D1_IK5(array, method)
15674#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15675 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComInsertionb_D1_IK5
15678 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
15679 type(insertionb_type) ,
intent(in) :: method
15684 pure module subroutine setSortedArrDefComInsertionb_D1_IK4(array, method)
15685#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15686 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComInsertionb_D1_IK4
15689 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
15690 type(insertionb_type) ,
intent(in) :: method
15695 pure module subroutine setSortedArrDefComInsertionb_D1_IK3(array, method)
15696#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15697 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComInsertionb_D1_IK3
15700 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
15701 type(insertionb_type) ,
intent(in) :: method
15706 pure module subroutine setSortedArrDefComInsertionb_D1_IK2(array, method)
15707#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15708 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComInsertionb_D1_IK2
15711 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
15712 type(insertionb_type) ,
intent(in) :: method
15717 pure module subroutine setSortedArrDefComInsertionb_D1_IK1(array, method)
15718#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15719 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComInsertionb_D1_IK1
15722 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
15723 type(insertionb_type) ,
intent(in) :: method
15730 pure module subroutine setSortedArrDefComInsertionb_D1_LK5(array, method)
15731#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15732 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComInsertionb_D1_LK5
15735 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
15736 type(insertionb_type) ,
intent(in) :: method
15741 pure module subroutine setSortedArrDefComInsertionb_D1_LK4(array, method)
15742#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15743 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComInsertionb_D1_LK4
15746 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
15747 type(insertionb_type) ,
intent(in) :: method
15752 pure module subroutine setSortedArrDefComInsertionb_D1_LK3(array, method)
15753#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15754 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComInsertionb_D1_LK3
15757 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
15758 type(insertionb_type) ,
intent(in) :: method
15763 pure module subroutine setSortedArrDefComInsertionb_D1_LK2(array, method)
15764#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15765 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComInsertionb_D1_LK2
15768 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
15769 type(insertionb_type) ,
intent(in) :: method
15774 pure module subroutine setSortedArrDefComInsertionb_D1_LK1(array, method)
15775#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15776 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComInsertionb_D1_LK1
15779 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
15780 type(insertionb_type) ,
intent(in) :: method
15787 pure module subroutine setSortedArrDefComInsertionb_D1_CK5(array, method)
15788#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15789 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComInsertionb_D1_CK5
15792 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
15793 type(insertionb_type) ,
intent(in) :: method
15798 pure module subroutine setSortedArrDefComInsertionb_D1_CK4(array, method)
15799#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15800 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComInsertionb_D1_CK4
15803 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
15804 type(insertionb_type) ,
intent(in) :: method
15809 pure module subroutine setSortedArrDefComInsertionb_D1_CK3(array, method)
15810#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15811 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComInsertionb_D1_CK3
15814 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
15815 type(insertionb_type) ,
intent(in) :: method
15820 pure module subroutine setSortedArrDefComInsertionb_D1_CK2(array, method)
15821#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15822 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComInsertionb_D1_CK2
15825 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
15826 type(insertionb_type) ,
intent(in) :: method
15831 pure module subroutine setSortedArrDefComInsertionb_D1_CK1(array, method)
15832#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15833 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComInsertionb_D1_CK1
15836 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
15837 type(insertionb_type) ,
intent(in) :: method
15844 pure module subroutine setSortedArrDefComInsertionb_D1_RK5(array, method)
15845#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15846 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComInsertionb_D1_RK5
15849 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
15850 type(insertionb_type) ,
intent(in) :: method
15855 pure module subroutine setSortedArrDefComInsertionb_D1_RK4(array, method)
15856#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15857 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComInsertionb_D1_RK4
15860 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
15861 type(insertionb_type) ,
intent(in) :: method
15866 pure module subroutine setSortedArrDefComInsertionb_D1_RK3(array, method)
15867#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15868 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComInsertionb_D1_RK3
15871 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
15872 type(insertionb_type) ,
intent(in) :: method
15877 pure module subroutine setSortedArrDefComInsertionb_D1_RK2(array, method)
15878#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15879 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComInsertionb_D1_RK2
15882 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
15883 type(insertionb_type) ,
intent(in) :: method
15888 pure module subroutine setSortedArrDefComInsertionb_D1_RK1(array, method)
15889#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15890 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComInsertionb_D1_RK1
15893 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
15894 type(insertionb_type) ,
intent(in) :: method
15903 pure module subroutine setSortedArrDefComInsertionb_D1_PSSK5(array, method)
15904#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15905 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComInsertionb_D1_PSSK5
15909 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
15910 type(insertionb_type) ,
intent(in) :: method
15915 pure module subroutine setSortedArrDefComInsertionb_D1_PSSK4(array, method)
15916#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15917 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComInsertionb_D1_PSSK4
15921 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
15922 type(insertionb_type) ,
intent(in) :: method
15927 pure module subroutine setSortedArrDefComInsertionb_D1_PSSK3(array, method)
15928#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15929 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComInsertionb_D1_PSSK3
15933 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
15934 type(insertionb_type) ,
intent(in) :: method
15939 pure module subroutine setSortedArrDefComInsertionb_D1_PSSK2(array, method)
15940#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15941 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComInsertionb_D1_PSSK2
15945 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
15946 type(insertionb_type) ,
intent(in) :: method
15951 pure module subroutine setSortedArrDefComInsertionb_D1_PSSK1(array, method)
15952#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15953 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComInsertionb_D1_PSSK1
15957 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
15958 type(insertionb_type) ,
intent(in) :: method
15967 pure module subroutine setSortedArrDefComInsertionb_D1_BSSK(array, method)
15968#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15969 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComInsertionb_D1_BSSK
15973 type(css_type) ,
intent(inout) ,
contiguous :: array(:)
15974 type(insertionb_type) ,
intent(in) :: method
15996 PURE recursive module subroutine setSortedArrDefComMerger_D0_SK5(array, method)
15997#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
15998 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComMerger_D0_SK5
16001 character(
*,SKG) ,
intent(inout) :: array
16002 type(merger_type) ,
intent(in) :: method
16007 PURE recursive module subroutine setSortedArrDefComMerger_D0_SK4(array, method)
16008#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16009 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComMerger_D0_SK4
16012 character(
*,SKG) ,
intent(inout) :: array
16013 type(merger_type) ,
intent(in) :: method
16018 PURE recursive module subroutine setSortedArrDefComMerger_D0_SK3(array, method)
16019#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16020 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComMerger_D0_SK3
16023 character(
*,SKG) ,
intent(inout) :: array
16024 type(merger_type) ,
intent(in) :: method
16029 PURE recursive module subroutine setSortedArrDefComMerger_D0_SK2(array, method)
16030#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16031 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComMerger_D0_SK2
16034 character(
*,SKG) ,
intent(inout) :: array
16035 type(merger_type) ,
intent(in) :: method
16040 PURE recursive module subroutine setSortedArrDefComMerger_D0_SK1(array, method)
16041#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16042 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComMerger_D0_SK1
16045 character(
*,SKG) ,
intent(inout) :: array
16046 type(merger_type) ,
intent(in) :: method
16053 PURE recursive module subroutine setSortedArrDefComMerger_D1_SK5(array, method)
16054#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16055 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComMerger_D1_SK5
16058 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
16059 type(merger_type) ,
intent(in) :: method
16064 PURE recursive module subroutine setSortedArrDefComMerger_D1_SK4(array, method)
16065#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16066 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComMerger_D1_SK4
16069 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
16070 type(merger_type) ,
intent(in) :: method
16075 PURE recursive module subroutine setSortedArrDefComMerger_D1_SK3(array, method)
16076#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16077 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComMerger_D1_SK3
16080 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
16081 type(merger_type) ,
intent(in) :: method
16086 PURE recursive module subroutine setSortedArrDefComMerger_D1_SK2(array, method)
16087#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16088 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComMerger_D1_SK2
16091 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
16092 type(merger_type) ,
intent(in) :: method
16097 PURE recursive module subroutine setSortedArrDefComMerger_D1_SK1(array, method)
16098#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16099 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComMerger_D1_SK1
16102 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
16103 type(merger_type) ,
intent(in) :: method
16110 PURE recursive module subroutine setSortedArrDefComMerger_D1_IK5(array, method)
16111#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16112 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComMerger_D1_IK5
16115 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
16116 type(merger_type) ,
intent(in) :: method
16121 PURE recursive module subroutine setSortedArrDefComMerger_D1_IK4(array, method)
16122#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16123 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComMerger_D1_IK4
16126 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
16127 type(merger_type) ,
intent(in) :: method
16132 PURE recursive module subroutine setSortedArrDefComMerger_D1_IK3(array, method)
16133#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16134 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComMerger_D1_IK3
16137 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
16138 type(merger_type) ,
intent(in) :: method
16143 PURE recursive module subroutine setSortedArrDefComMerger_D1_IK2(array, method)
16144#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16145 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComMerger_D1_IK2
16148 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
16149 type(merger_type) ,
intent(in) :: method
16154 PURE recursive module subroutine setSortedArrDefComMerger_D1_IK1(array, method)
16155#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16156 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComMerger_D1_IK1
16159 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
16160 type(merger_type) ,
intent(in) :: method
16167 PURE recursive module subroutine setSortedArrDefComMerger_D1_LK5(array, method)
16168#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16169 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComMerger_D1_LK5
16172 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
16173 type(merger_type) ,
intent(in) :: method
16178 PURE recursive module subroutine setSortedArrDefComMerger_D1_LK4(array, method)
16179#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16180 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComMerger_D1_LK4
16183 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
16184 type(merger_type) ,
intent(in) :: method
16189 PURE recursive module subroutine setSortedArrDefComMerger_D1_LK3(array, method)
16190#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16191 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComMerger_D1_LK3
16194 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
16195 type(merger_type) ,
intent(in) :: method
16200 PURE recursive module subroutine setSortedArrDefComMerger_D1_LK2(array, method)
16201#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16202 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComMerger_D1_LK2
16205 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
16206 type(merger_type) ,
intent(in) :: method
16211 PURE recursive module subroutine setSortedArrDefComMerger_D1_LK1(array, method)
16212#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16213 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComMerger_D1_LK1
16216 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
16217 type(merger_type) ,
intent(in) :: method
16224 PURE recursive module subroutine setSortedArrDefComMerger_D1_CK5(array, method)
16225#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16226 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComMerger_D1_CK5
16229 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
16230 type(merger_type) ,
intent(in) :: method
16235 PURE recursive module subroutine setSortedArrDefComMerger_D1_CK4(array, method)
16236#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16237 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComMerger_D1_CK4
16240 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
16241 type(merger_type) ,
intent(in) :: method
16246 PURE recursive module subroutine setSortedArrDefComMerger_D1_CK3(array, method)
16247#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16248 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComMerger_D1_CK3
16251 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
16252 type(merger_type) ,
intent(in) :: method
16257 PURE recursive module subroutine setSortedArrDefComMerger_D1_CK2(array, method)
16258#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16259 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComMerger_D1_CK2
16262 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
16263 type(merger_type) ,
intent(in) :: method
16268 PURE recursive module subroutine setSortedArrDefComMerger_D1_CK1(array, method)
16269#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16270 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComMerger_D1_CK1
16273 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
16274 type(merger_type) ,
intent(in) :: method
16281 PURE recursive module subroutine setSortedArrDefComMerger_D1_RK5(array, method)
16282#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16283 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComMerger_D1_RK5
16286 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
16287 type(merger_type) ,
intent(in) :: method
16292 PURE recursive module subroutine setSortedArrDefComMerger_D1_RK4(array, method)
16293#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16294 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComMerger_D1_RK4
16297 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
16298 type(merger_type) ,
intent(in) :: method
16303 PURE recursive module subroutine setSortedArrDefComMerger_D1_RK3(array, method)
16304#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16305 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComMerger_D1_RK3
16308 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
16309 type(merger_type) ,
intent(in) :: method
16314 PURE recursive module subroutine setSortedArrDefComMerger_D1_RK2(array, method)
16315#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16316 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComMerger_D1_RK2
16319 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
16320 type(merger_type) ,
intent(in) :: method
16325 PURE recursive module subroutine setSortedArrDefComMerger_D1_RK1(array, method)
16326#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16327 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComMerger_D1_RK1
16330 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
16331 type(merger_type) ,
intent(in) :: method
16340 PURE recursive module subroutine setSortedArrDefComMerger_D1_PSSK5(array, method)
16341#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16342 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComMerger_D1_PSSK5
16346 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
16347 type(merger_type) ,
intent(in) :: method
16352 PURE recursive module subroutine setSortedArrDefComMerger_D1_PSSK4(array, method)
16353#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16354 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComMerger_D1_PSSK4
16358 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
16359 type(merger_type) ,
intent(in) :: method
16364 PURE recursive module subroutine setSortedArrDefComMerger_D1_PSSK3(array, method)
16365#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16366 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComMerger_D1_PSSK3
16370 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
16371 type(merger_type) ,
intent(in) :: method
16376 PURE recursive module subroutine setSortedArrDefComMerger_D1_PSSK2(array, method)
16377#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16378 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComMerger_D1_PSSK2
16382 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
16383 type(merger_type) ,
intent(in) :: method
16388 PURE recursive module subroutine setSortedArrDefComMerger_D1_PSSK1(array, method)
16389#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16390 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComMerger_D1_PSSK1
16394 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
16395 type(merger_type) ,
intent(in) :: method
16404 PURE recursive module subroutine setSortedArrDefComMerger_D1_BSSK(array, method)
16405#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16406 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComMerger_D1_BSSK
16410 type(css_type) ,
intent(inout) ,
contiguous :: array(:)
16411 type(merger_type) ,
intent(in) :: method
16433 pure module subroutine setSortedArrDefComSelection_D0_SK5(array, method)
16434#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16435 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComSelection_D0_SK5
16438 character(
*,SKG) ,
intent(inout) :: array
16439 type(selection_type) ,
intent(in) :: method
16444 pure module subroutine setSortedArrDefComSelection_D0_SK4(array, method)
16445#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16446 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComSelection_D0_SK4
16449 character(
*,SKG) ,
intent(inout) :: array
16450 type(selection_type) ,
intent(in) :: method
16455 pure module subroutine setSortedArrDefComSelection_D0_SK3(array, method)
16456#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16457 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComSelection_D0_SK3
16460 character(
*,SKG) ,
intent(inout) :: array
16461 type(selection_type) ,
intent(in) :: method
16466 pure module subroutine setSortedArrDefComSelection_D0_SK2(array, method)
16467#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16468 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComSelection_D0_SK2
16471 character(
*,SKG) ,
intent(inout) :: array
16472 type(selection_type) ,
intent(in) :: method
16477 pure module subroutine setSortedArrDefComSelection_D0_SK1(array, method)
16478#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16479 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComSelection_D0_SK1
16482 character(
*,SKG) ,
intent(inout) :: array
16483 type(selection_type) ,
intent(in) :: method
16490 pure module subroutine setSortedArrDefComSelection_D1_SK5(array, method)
16491#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16492 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComSelection_D1_SK5
16495 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
16496 type(selection_type) ,
intent(in) :: method
16501 pure module subroutine setSortedArrDefComSelection_D1_SK4(array, method)
16502#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16503 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComSelection_D1_SK4
16506 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
16507 type(selection_type) ,
intent(in) :: method
16512 pure module subroutine setSortedArrDefComSelection_D1_SK3(array, method)
16513#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16514 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComSelection_D1_SK3
16517 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
16518 type(selection_type) ,
intent(in) :: method
16523 pure module subroutine setSortedArrDefComSelection_D1_SK2(array, method)
16524#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16525 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComSelection_D1_SK2
16528 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
16529 type(selection_type) ,
intent(in) :: method
16534 pure module subroutine setSortedArrDefComSelection_D1_SK1(array, method)
16535#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16536 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComSelection_D1_SK1
16539 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
16540 type(selection_type) ,
intent(in) :: method
16547 pure module subroutine setSortedArrDefComSelection_D1_IK5(array, method)
16548#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16549 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComSelection_D1_IK5
16552 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
16553 type(selection_type) ,
intent(in) :: method
16558 pure module subroutine setSortedArrDefComSelection_D1_IK4(array, method)
16559#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16560 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComSelection_D1_IK4
16563 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
16564 type(selection_type) ,
intent(in) :: method
16569 pure module subroutine setSortedArrDefComSelection_D1_IK3(array, method)
16570#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16571 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComSelection_D1_IK3
16574 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
16575 type(selection_type) ,
intent(in) :: method
16580 pure module subroutine setSortedArrDefComSelection_D1_IK2(array, method)
16581#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16582 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComSelection_D1_IK2
16585 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
16586 type(selection_type) ,
intent(in) :: method
16591 pure module subroutine setSortedArrDefComSelection_D1_IK1(array, method)
16592#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16593 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComSelection_D1_IK1
16596 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
16597 type(selection_type) ,
intent(in) :: method
16604 pure module subroutine setSortedArrDefComSelection_D1_LK5(array, method)
16605#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16606 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComSelection_D1_LK5
16609 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
16610 type(selection_type) ,
intent(in) :: method
16615 pure module subroutine setSortedArrDefComSelection_D1_LK4(array, method)
16616#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16617 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComSelection_D1_LK4
16620 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
16621 type(selection_type) ,
intent(in) :: method
16626 pure module subroutine setSortedArrDefComSelection_D1_LK3(array, method)
16627#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16628 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComSelection_D1_LK3
16631 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
16632 type(selection_type) ,
intent(in) :: method
16637 pure module subroutine setSortedArrDefComSelection_D1_LK2(array, method)
16638#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16639 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComSelection_D1_LK2
16642 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
16643 type(selection_type) ,
intent(in) :: method
16648 pure module subroutine setSortedArrDefComSelection_D1_LK1(array, method)
16649#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16650 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComSelection_D1_LK1
16653 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
16654 type(selection_type) ,
intent(in) :: method
16661 pure module subroutine setSortedArrDefComSelection_D1_CK5(array, method)
16662#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16663 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComSelection_D1_CK5
16666 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
16667 type(selection_type) ,
intent(in) :: method
16672 pure module subroutine setSortedArrDefComSelection_D1_CK4(array, method)
16673#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16674 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComSelection_D1_CK4
16677 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
16678 type(selection_type) ,
intent(in) :: method
16683 pure module subroutine setSortedArrDefComSelection_D1_CK3(array, method)
16684#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16685 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComSelection_D1_CK3
16688 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
16689 type(selection_type) ,
intent(in) :: method
16694 pure module subroutine setSortedArrDefComSelection_D1_CK2(array, method)
16695#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16696 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComSelection_D1_CK2
16699 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
16700 type(selection_type) ,
intent(in) :: method
16705 pure module subroutine setSortedArrDefComSelection_D1_CK1(array, method)
16706#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16707 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComSelection_D1_CK1
16710 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
16711 type(selection_type) ,
intent(in) :: method
16718 pure module subroutine setSortedArrDefComSelection_D1_RK5(array, method)
16719#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16720 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComSelection_D1_RK5
16723 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
16724 type(selection_type) ,
intent(in) :: method
16729 pure module subroutine setSortedArrDefComSelection_D1_RK4(array, method)
16730#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16731 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComSelection_D1_RK4
16734 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
16735 type(selection_type) ,
intent(in) :: method
16740 pure module subroutine setSortedArrDefComSelection_D1_RK3(array, method)
16741#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16742 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComSelection_D1_RK3
16745 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
16746 type(selection_type) ,
intent(in) :: method
16751 pure module subroutine setSortedArrDefComSelection_D1_RK2(array, method)
16752#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16753 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComSelection_D1_RK2
16756 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
16757 type(selection_type) ,
intent(in) :: method
16762 pure module subroutine setSortedArrDefComSelection_D1_RK1(array, method)
16763#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16764 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComSelection_D1_RK1
16767 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
16768 type(selection_type) ,
intent(in) :: method
16777 pure module subroutine setSortedArrDefComSelection_D1_PSSK5(array, method)
16778#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16779 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComSelection_D1_PSSK5
16783 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
16784 type(selection_type) ,
intent(in) :: method
16789 pure module subroutine setSortedArrDefComSelection_D1_PSSK4(array, method)
16790#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16791 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComSelection_D1_PSSK4
16795 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
16796 type(selection_type) ,
intent(in) :: method
16801 pure module subroutine setSortedArrDefComSelection_D1_PSSK3(array, method)
16802#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16803 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComSelection_D1_PSSK3
16807 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
16808 type(selection_type) ,
intent(in) :: method
16813 pure module subroutine setSortedArrDefComSelection_D1_PSSK2(array, method)
16814#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16815 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComSelection_D1_PSSK2
16819 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
16820 type(selection_type) ,
intent(in) :: method
16825 pure module subroutine setSortedArrDefComSelection_D1_PSSK1(array, method)
16826#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16827 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComSelection_D1_PSSK1
16831 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
16832 type(selection_type) ,
intent(in) :: method
16841 pure module subroutine setSortedArrDefComSelection_D1_BSSK(array, method)
16842#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16843 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComSelection_D1_BSSK
16847 type(css_type) ,
intent(inout) ,
contiguous :: array(:)
16848 type(selection_type) ,
intent(in) :: method
16870 pure module subroutine setSortedArrDefComShell_D0_SK5(array, method)
16871#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16872 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComShell_D0_SK5
16875 character(
*,SKG) ,
intent(inout) :: array
16876 type(shell_type) ,
intent(in) :: method
16881 pure module subroutine setSortedArrDefComShell_D0_SK4(array, method)
16882#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16883 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComShell_D0_SK4
16886 character(
*,SKG) ,
intent(inout) :: array
16887 type(shell_type) ,
intent(in) :: method
16892 pure module subroutine setSortedArrDefComShell_D0_SK3(array, method)
16893#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16894 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComShell_D0_SK3
16897 character(
*,SKG) ,
intent(inout) :: array
16898 type(shell_type) ,
intent(in) :: method
16903 pure module subroutine setSortedArrDefComShell_D0_SK2(array, method)
16904#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16905 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComShell_D0_SK2
16908 character(
*,SKG) ,
intent(inout) :: array
16909 type(shell_type) ,
intent(in) :: method
16914 pure module subroutine setSortedArrDefComShell_D0_SK1(array, method)
16915#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16916 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComShell_D0_SK1
16919 character(
*,SKG) ,
intent(inout) :: array
16920 type(shell_type) ,
intent(in) :: method
16927 pure module subroutine setSortedArrDefComShell_D1_SK5(array, method)
16928#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16929 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComShell_D1_SK5
16932 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
16933 type(shell_type) ,
intent(in) :: method
16938 pure module subroutine setSortedArrDefComShell_D1_SK4(array, method)
16939#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16940 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComShell_D1_SK4
16943 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
16944 type(shell_type) ,
intent(in) :: method
16949 pure module subroutine setSortedArrDefComShell_D1_SK3(array, method)
16950#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16951 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComShell_D1_SK3
16954 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
16955 type(shell_type) ,
intent(in) :: method
16960 pure module subroutine setSortedArrDefComShell_D1_SK2(array, method)
16961#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16962 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComShell_D1_SK2
16965 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
16966 type(shell_type) ,
intent(in) :: method
16971 pure module subroutine setSortedArrDefComShell_D1_SK1(array, method)
16972#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16973 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComShell_D1_SK1
16976 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
16977 type(shell_type) ,
intent(in) :: method
16984 pure module subroutine setSortedArrDefComShell_D1_IK5(array, method)
16985#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16986 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComShell_D1_IK5
16989 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
16990 type(shell_type) ,
intent(in) :: method
16995 pure module subroutine setSortedArrDefComShell_D1_IK4(array, method)
16996#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
16997 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComShell_D1_IK4
17000 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
17001 type(shell_type) ,
intent(in) :: method
17006 pure module subroutine setSortedArrDefComShell_D1_IK3(array, method)
17007#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
17008 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComShell_D1_IK3
17011 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
17012 type(shell_type) ,
intent(in) :: method
17017 pure module subroutine setSortedArrDefComShell_D1_IK2(array, method)
17018#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
17019 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComShell_D1_IK2
17022 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
17023 type(shell_type) ,
intent(in) :: method
17028 pure module subroutine setSortedArrDefComShell_D1_IK1(array, method)
17029#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
17030 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComShell_D1_IK1
17033 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
17034 type(shell_type) ,
intent(in) :: method
17041 pure module subroutine setSortedArrDefComShell_D1_LK5(array, method)
17042#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
17043 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComShell_D1_LK5
17046 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
17047 type(shell_type) ,
intent(in) :: method
17052 pure module subroutine setSortedArrDefComShell_D1_LK4(array, method)
17053#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
17054 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComShell_D1_LK4
17057 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
17058 type(shell_type) ,
intent(in) :: method
17063 pure module subroutine setSortedArrDefComShell_D1_LK3(array, method)
17064#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
17065 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComShell_D1_LK3
17068 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
17069 type(shell_type) ,
intent(in) :: method
17074 pure module subroutine setSortedArrDefComShell_D1_LK2(array, method)
17075#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
17076 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComShell_D1_LK2
17079 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
17080 type(shell_type) ,
intent(in) :: method
17085 pure module subroutine setSortedArrDefComShell_D1_LK1(array, method)
17086#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
17087 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComShell_D1_LK1
17090 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
17091 type(shell_type) ,
intent(in) :: method
17098 pure module subroutine setSortedArrDefComShell_D1_CK5(array, method)
17099#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
17100 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComShell_D1_CK5
17103 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
17104 type(shell_type) ,
intent(in) :: method
17109 pure module subroutine setSortedArrDefComShell_D1_CK4(array, method)
17110#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
17111 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComShell_D1_CK4
17114 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
17115 type(shell_type) ,
intent(in) :: method
17120 pure module subroutine setSortedArrDefComShell_D1_CK3(array, method)
17121#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
17122 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComShell_D1_CK3
17125 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
17126 type(shell_type) ,
intent(in) :: method
17131 pure module subroutine setSortedArrDefComShell_D1_CK2(array, method)
17132#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
17133 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComShell_D1_CK2
17136 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
17137 type(shell_type) ,
intent(in) :: method
17142 pure module subroutine setSortedArrDefComShell_D1_CK1(array, method)
17143#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
17144 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComShell_D1_CK1
17147 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
17148 type(shell_type) ,
intent(in) :: method
17155 pure module subroutine setSortedArrDefComShell_D1_RK5(array, method)
17156#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
17157 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComShell_D1_RK5
17160 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
17161 type(shell_type) ,
intent(in) :: method
17166 pure module subroutine setSortedArrDefComShell_D1_RK4(array, method)
17167#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
17168 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComShell_D1_RK4
17171 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
17172 type(shell_type) ,
intent(in) :: method
17177 pure module subroutine setSortedArrDefComShell_D1_RK3(array, method)
17178#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
17179 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComShell_D1_RK3
17182 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
17183 type(shell_type) ,
intent(in) :: method
17188 pure module subroutine setSortedArrDefComShell_D1_RK2(array, method)
17189#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
17190 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComShell_D1_RK2
17193 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
17194 type(shell_type) ,
intent(in) :: method
17199 pure module subroutine setSortedArrDefComShell_D1_RK1(array, method)
17200#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
17201 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComShell_D1_RK1
17204 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
17205 type(shell_type) ,
intent(in) :: method
17214 pure module subroutine setSortedArrDefComShell_D1_PSSK5(array, method)
17215#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
17216 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComShell_D1_PSSK5
17220 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
17221 type(shell_type) ,
intent(in) :: method
17226 pure module subroutine setSortedArrDefComShell_D1_PSSK4(array, method)
17227#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
17228 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComShell_D1_PSSK4
17232 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
17233 type(shell_type) ,
intent(in) :: method
17238 pure module subroutine setSortedArrDefComShell_D1_PSSK3(array, method)
17239#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
17240 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComShell_D1_PSSK3
17244 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
17245 type(shell_type) ,
intent(in) :: method
17250 pure module subroutine setSortedArrDefComShell_D1_PSSK2(array, method)
17251#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
17252 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComShell_D1_PSSK2
17256 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
17257 type(shell_type) ,
intent(in) :: method
17262 pure module subroutine setSortedArrDefComShell_D1_PSSK1(array, method)
17263#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
17264 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComShell_D1_PSSK1
17268 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
17269 type(shell_type) ,
intent(in) :: method
17278 pure module subroutine setSortedArrDefComShell_D1_BSSK(array, method)
17279#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
17280 !DEC$ ATTRIBUTES DLLEXPORT :: setSortedArrDefComShell_D1_BSSK
17284 type(css_type) ,
intent(inout) ,
contiguous :: array(:)
17285 type(shell_type) ,
intent(in) :: method
17298end module pm_arraySort
Generate and return the sorted elements of the input scalar string or contiguous vector in ascending ...
Generate and return .true. if the input array is sorted in strictly all ascending order (without equa...
Generate and return .true. if the input array is sorted in ascending order (with the possibility of e...
Generate and return .true. if the input array is sorted in strictly all descending order (without equ...
Generate and return .true. if the input array is sorted in descending order (with the possibility of ...
Return .true. if the input array is sorted, either ascending or descending, or all equal.
Sort the input scalar string or contiguous vector in ascending order, or return the sorted indices of...
This module contains procedures and generic interfaces for various sorting tasks.
type(qsorti_type), parameter qsorti
type(isort_type), parameter isort
type(shell_type), parameter shell
type(bubble_type), parameter bubble
character(*, SK), parameter MODULE_NAME
type(qsortr_type), parameter qsortr
type(insertionl_type), parameter insertionl
type(heapi_type), parameter heapi
type(selection_type), parameter selection
type(qsortrdp_type), parameter qsortrdp
type(heapr_type), parameter heapr
type(insertionb_type), parameter insertionb
type(merger_type), parameter merger
This module contains the derived types for generating allocatable containers of scalar,...
This module defines the relevant Fortran kind type-parameters frequently used in the ParaMonte librar...
integer, parameter RK
The default real kind in the ParaMonte library: real64 in Fortran, c_double in C-Fortran Interoperati...
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 is the css_pdt parameterized type for generating instances of container of scalar of string obje...
This is the css_type type for generating instances of container of scalar of string objects.