254 PURE module subroutine setResizedDDDD_D0_SK5(array, failed, errmsg)
255#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
256 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedDDDD_D0_SK5
259 character(:,SKG) ,
intent(inout) ,
allocatable :: array
260 character(
*, SK) ,
intent(out) ,
optional :: errmsg
261 logical(LK) ,
intent(out) ,
optional :: failed
266 PURE module subroutine setResizedDDDD_D0_SK4(array, failed, errmsg)
267#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
268 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedDDDD_D0_SK4
271 character(:,SKG) ,
intent(inout) ,
allocatable :: array
272 character(
*, SK) ,
intent(out) ,
optional :: errmsg
273 logical(LK) ,
intent(out) ,
optional :: failed
278 PURE module subroutine setResizedDDDD_D0_SK3(array, failed, errmsg)
279#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
280 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedDDDD_D0_SK3
283 character(:,SKG) ,
intent(inout) ,
allocatable :: array
284 character(
*, SK) ,
intent(out) ,
optional :: errmsg
285 logical(LK) ,
intent(out) ,
optional :: failed
290 PURE module subroutine setResizedDDDD_D0_SK2(array, failed, errmsg)
291#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
292 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedDDDD_D0_SK2
295 character(:,SKG) ,
intent(inout) ,
allocatable :: array
296 character(
*, SK) ,
intent(out) ,
optional :: errmsg
297 logical(LK) ,
intent(out) ,
optional :: failed
302 PURE module subroutine setResizedDDDD_D0_SK1(array, failed, errmsg)
303#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
304 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedDDDD_D0_SK1
307 character(:,SKG) ,
intent(inout) ,
allocatable :: array
308 character(
*, SK) ,
intent(out) ,
optional :: errmsg
309 logical(LK) ,
intent(out) ,
optional :: failed
324 PURE module subroutine setResizedDDDD_D1_SK5(array, failed, errmsg)
325#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
326 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedDDDD_D1_SK5
329 character(
*,SKG) ,
intent(inout) ,
allocatable :: array(:)
330 character(
*, SK) ,
intent(out) ,
optional :: errmsg
331 logical(LK) ,
intent(out) ,
optional :: failed
336 PURE module subroutine setResizedDDDD_D1_SK4(array, failed, errmsg)
337#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
338 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedDDDD_D1_SK4
341 character(
*,SKG) ,
intent(inout) ,
allocatable :: array(:)
342 character(
*, SK) ,
intent(out) ,
optional :: errmsg
343 logical(LK) ,
intent(out) ,
optional :: failed
348 PURE module subroutine setResizedDDDD_D1_SK3(array, failed, errmsg)
349#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
350 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedDDDD_D1_SK3
353 character(
*,SKG) ,
intent(inout) ,
allocatable :: array(:)
354 character(
*, SK) ,
intent(out) ,
optional :: errmsg
355 logical(LK) ,
intent(out) ,
optional :: failed
360 PURE module subroutine setResizedDDDD_D1_SK2(array, failed, errmsg)
361#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
362 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedDDDD_D1_SK2
365 character(
*,SKG) ,
intent(inout) ,
allocatable :: array(:)
366 character(
*, SK) ,
intent(out) ,
optional :: errmsg
367 logical(LK) ,
intent(out) ,
optional :: failed
372 PURE module subroutine setResizedDDDD_D1_SK1(array, failed, errmsg)
373#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
374 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedDDDD_D1_SK1
377 character(
*,SKG) ,
intent(inout) ,
allocatable :: array(:)
378 character(
*, SK) ,
intent(out) ,
optional :: errmsg
379 logical(LK) ,
intent(out) ,
optional :: failed
386 PURE module subroutine setResizedDDDD_D1_IK5(array, failed, errmsg)
387#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
388 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedDDDD_D1_IK5
391 integer(IKG) ,
intent(inout) ,
allocatable :: array(:)
392 character(
*, SK) ,
intent(out) ,
optional :: errmsg
393 logical(LK) ,
intent(out) ,
optional :: failed
398 PURE module subroutine setResizedDDDD_D1_IK4(array, failed, errmsg)
399#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
400 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedDDDD_D1_IK4
403 integer(IKG) ,
intent(inout) ,
allocatable :: array(:)
404 character(
*, SK) ,
intent(out) ,
optional :: errmsg
405 logical(LK) ,
intent(out) ,
optional :: failed
410 PURE module subroutine setResizedDDDD_D1_IK3(array, failed, errmsg)
411#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
412 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedDDDD_D1_IK3
415 integer(IKG) ,
intent(inout) ,
allocatable :: array(:)
416 character(
*, SK) ,
intent(out) ,
optional :: errmsg
417 logical(LK) ,
intent(out) ,
optional :: failed
422 PURE module subroutine setResizedDDDD_D1_IK2(array, failed, errmsg)
423#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
424 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedDDDD_D1_IK2
427 integer(IKG) ,
intent(inout) ,
allocatable :: array(:)
428 character(
*, SK) ,
intent(out) ,
optional :: errmsg
429 logical(LK) ,
intent(out) ,
optional :: failed
434 PURE module subroutine setResizedDDDD_D1_IK1(array, failed, errmsg)
435#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
436 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedDDDD_D1_IK1
439 integer(IKG) ,
intent(inout) ,
allocatable :: array(:)
440 character(
*, SK) ,
intent(out) ,
optional :: errmsg
441 logical(LK) ,
intent(out) ,
optional :: failed
448 PURE module subroutine setResizedDDDD_D1_LK5(array, failed, errmsg)
449#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
450 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedDDDD_D1_LK5
453 logical(LKG) ,
intent(inout) ,
allocatable :: array(:)
454 character(
*, SK) ,
intent(out) ,
optional :: errmsg
455 logical(LK) ,
intent(out) ,
optional :: failed
460 PURE module subroutine setResizedDDDD_D1_LK4(array, failed, errmsg)
461#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
462 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedDDDD_D1_LK4
465 logical(LKG) ,
intent(inout) ,
allocatable :: array(:)
466 character(
*, SK) ,
intent(out) ,
optional :: errmsg
467 logical(LK) ,
intent(out) ,
optional :: failed
472 PURE module subroutine setResizedDDDD_D1_LK3(array, failed, errmsg)
473#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
474 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedDDDD_D1_LK3
477 logical(LKG) ,
intent(inout) ,
allocatable :: array(:)
478 character(
*, SK) ,
intent(out) ,
optional :: errmsg
479 logical(LK) ,
intent(out) ,
optional :: failed
484 PURE module subroutine setResizedDDDD_D1_LK2(array, failed, errmsg)
485#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
486 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedDDDD_D1_LK2
489 logical(LKG) ,
intent(inout) ,
allocatable :: array(:)
490 character(
*, SK) ,
intent(out) ,
optional :: errmsg
491 logical(LK) ,
intent(out) ,
optional :: failed
496 PURE module subroutine setResizedDDDD_D1_LK1(array, failed, errmsg)
497#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
498 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedDDDD_D1_LK1
501 logical(LKG) ,
intent(inout) ,
allocatable :: array(:)
502 character(
*, SK) ,
intent(out) ,
optional :: errmsg
503 logical(LK) ,
intent(out) ,
optional :: failed
510 PURE module subroutine setResizedDDDD_D1_CK5(array, failed, errmsg)
511#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
512 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedDDDD_D1_CK5
515 complex(CKG) ,
intent(inout) ,
allocatable :: array(:)
516 character(
*, SK) ,
intent(out) ,
optional :: errmsg
517 logical(LK) ,
intent(out) ,
optional :: failed
522 PURE module subroutine setResizedDDDD_D1_CK4(array, failed, errmsg)
523#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
524 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedDDDD_D1_CK4
527 complex(CKG) ,
intent(inout) ,
allocatable :: array(:)
528 character(
*, SK) ,
intent(out) ,
optional :: errmsg
529 logical(LK) ,
intent(out) ,
optional :: failed
534 PURE module subroutine setResizedDDDD_D1_CK3(array, failed, errmsg)
535#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
536 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedDDDD_D1_CK3
539 complex(CKG) ,
intent(inout) ,
allocatable :: array(:)
540 character(
*, SK) ,
intent(out) ,
optional :: errmsg
541 logical(LK) ,
intent(out) ,
optional :: failed
546 PURE module subroutine setResizedDDDD_D1_CK2(array, failed, errmsg)
547#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
548 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedDDDD_D1_CK2
551 complex(CKG) ,
intent(inout) ,
allocatable :: array(:)
552 character(
*, SK) ,
intent(out) ,
optional :: errmsg
553 logical(LK) ,
intent(out) ,
optional :: failed
558 PURE module subroutine setResizedDDDD_D1_CK1(array, failed, errmsg)
559#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
560 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedDDDD_D1_CK1
563 complex(CKG) ,
intent(inout) ,
allocatable :: array(:)
564 character(
*, SK) ,
intent(out) ,
optional :: errmsg
565 logical(LK) ,
intent(out) ,
optional :: failed
572 PURE module subroutine setResizedDDDD_D1_RK5(array, failed, errmsg)
573#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
574 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedDDDD_D1_RK5
577 real(RKG) ,
intent(inout) ,
allocatable :: array(:)
578 character(
*, SK) ,
intent(out) ,
optional :: errmsg
579 logical(LK) ,
intent(out) ,
optional :: failed
584 PURE module subroutine setResizedDDDD_D1_RK4(array, failed, errmsg)
585#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
586 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedDDDD_D1_RK4
589 real(RKG) ,
intent(inout) ,
allocatable :: array(:)
590 character(
*, SK) ,
intent(out) ,
optional :: errmsg
591 logical(LK) ,
intent(out) ,
optional :: failed
596 PURE module subroutine setResizedDDDD_D1_RK3(array, failed, errmsg)
597#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
598 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedDDDD_D1_RK3
601 real(RKG) ,
intent(inout) ,
allocatable :: array(:)
602 character(
*, SK) ,
intent(out) ,
optional :: errmsg
603 logical(LK) ,
intent(out) ,
optional :: failed
608 PURE module subroutine setResizedDDDD_D1_RK2(array, failed, errmsg)
609#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
610 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedDDDD_D1_RK2
613 real(RKG) ,
intent(inout) ,
allocatable :: array(:)
614 character(
*, SK) ,
intent(out) ,
optional :: errmsg
615 logical(LK) ,
intent(out) ,
optional :: failed
620 PURE module subroutine setResizedDDDD_D1_RK1(array, failed, errmsg)
621#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
622 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedDDDD_D1_RK1
625 real(RKG) ,
intent(inout) ,
allocatable :: array(:)
626 character(
*, SK) ,
intent(out) ,
optional :: errmsg
627 logical(LK) ,
intent(out) ,
optional :: failed
636 module subroutine setResizedDDDD_D1_PSSK5(array, failed, errmsg)
637#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
638 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedDDDD_D1_PSSK5
642 type(css_pdt(SKG)) ,
intent(inout) ,
allocatable :: array(:)
643 character(
*, SK) ,
intent(out) ,
optional :: errmsg
644 logical(LK) ,
intent(out) ,
optional :: failed
649 module subroutine setResizedDDDD_D1_PSSK4(array, failed, errmsg)
650#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
651 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedDDDD_D1_PSSK4
655 type(css_pdt(SKG)) ,
intent(inout) ,
allocatable :: array(:)
656 character(
*, SK) ,
intent(out) ,
optional :: errmsg
657 logical(LK) ,
intent(out) ,
optional :: failed
662 module subroutine setResizedDDDD_D1_PSSK3(array, failed, errmsg)
663#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
664 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedDDDD_D1_PSSK3
668 type(css_pdt(SKG)) ,
intent(inout) ,
allocatable :: array(:)
669 character(
*, SK) ,
intent(out) ,
optional :: errmsg
670 logical(LK) ,
intent(out) ,
optional :: failed
675 module subroutine setResizedDDDD_D1_PSSK2(array, failed, errmsg)
676#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
677 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedDDDD_D1_PSSK2
681 type(css_pdt(SKG)) ,
intent(inout) ,
allocatable :: array(:)
682 character(
*, SK) ,
intent(out) ,
optional :: errmsg
683 logical(LK) ,
intent(out) ,
optional :: failed
688 module subroutine setResizedDDDD_D1_PSSK1(array, failed, errmsg)
689#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
690 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedDDDD_D1_PSSK1
694 type(css_pdt(SKG)) ,
intent(inout) ,
allocatable :: array(:)
695 character(
*, SK) ,
intent(out) ,
optional :: errmsg
696 logical(LK) ,
intent(out) ,
optional :: failed
705 module subroutine setResizedDDDD_D1_BSSK(array, failed, errmsg)
706#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
707 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedDDDD_D1_BSSK
711 type(css_type) ,
intent(inout) ,
allocatable :: array(:)
712 character(
*, SK) ,
intent(out) ,
optional :: errmsg
713 logical(LK) ,
intent(out) ,
optional :: failed
727 PURE module subroutine setResizedDDDD_D2_SK5(array, failed, errmsg)
728#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
729 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedDDDD_D2_SK5
732 character(
*,SKG) ,
intent(inout) ,
allocatable :: array(:,:)
733 character(
*, SK) ,
intent(out) ,
optional :: errmsg
734 logical(LK) ,
intent(out) ,
optional :: failed
739 PURE module subroutine setResizedDDDD_D2_SK4(array, failed, errmsg)
740#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
741 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedDDDD_D2_SK4
744 character(
*,SKG) ,
intent(inout) ,
allocatable :: array(:,:)
745 character(
*, SK) ,
intent(out) ,
optional :: errmsg
746 logical(LK) ,
intent(out) ,
optional :: failed
751 PURE module subroutine setResizedDDDD_D2_SK3(array, failed, errmsg)
752#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
753 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedDDDD_D2_SK3
756 character(
*,SKG) ,
intent(inout) ,
allocatable :: array(:,:)
757 character(
*, SK) ,
intent(out) ,
optional :: errmsg
758 logical(LK) ,
intent(out) ,
optional :: failed
763 PURE module subroutine setResizedDDDD_D2_SK2(array, failed, errmsg)
764#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
765 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedDDDD_D2_SK2
768 character(
*,SKG) ,
intent(inout) ,
allocatable :: array(:,:)
769 character(
*, SK) ,
intent(out) ,
optional :: errmsg
770 logical(LK) ,
intent(out) ,
optional :: failed
775 PURE module subroutine setResizedDDDD_D2_SK1(array, failed, errmsg)
776#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
777 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedDDDD_D2_SK1
780 character(
*,SKG) ,
intent(inout) ,
allocatable :: array(:,:)
781 character(
*, SK) ,
intent(out) ,
optional :: errmsg
782 logical(LK) ,
intent(out) ,
optional :: failed
789 PURE module subroutine setResizedDDDD_D2_IK5(array, failed, errmsg)
790#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
791 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedDDDD_D2_IK5
794 integer(IKG) ,
intent(inout) ,
allocatable :: array(:,:)
795 character(
*, SK) ,
intent(out) ,
optional :: errmsg
796 logical(LK) ,
intent(out) ,
optional :: failed
801 PURE module subroutine setResizedDDDD_D2_IK4(array, failed, errmsg)
802#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
803 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedDDDD_D2_IK4
806 integer(IKG) ,
intent(inout) ,
allocatable :: array(:,:)
807 character(
*, SK) ,
intent(out) ,
optional :: errmsg
808 logical(LK) ,
intent(out) ,
optional :: failed
813 PURE module subroutine setResizedDDDD_D2_IK3(array, failed, errmsg)
814#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
815 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedDDDD_D2_IK3
818 integer(IKG) ,
intent(inout) ,
allocatable :: array(:,:)
819 character(
*, SK) ,
intent(out) ,
optional :: errmsg
820 logical(LK) ,
intent(out) ,
optional :: failed
825 PURE module subroutine setResizedDDDD_D2_IK2(array, failed, errmsg)
826#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
827 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedDDDD_D2_IK2
830 integer(IKG) ,
intent(inout) ,
allocatable :: array(:,:)
831 character(
*, SK) ,
intent(out) ,
optional :: errmsg
832 logical(LK) ,
intent(out) ,
optional :: failed
837 PURE module subroutine setResizedDDDD_D2_IK1(array, failed, errmsg)
838#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
839 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedDDDD_D2_IK1
842 integer(IKG) ,
intent(inout) ,
allocatable :: array(:,:)
843 character(
*, SK) ,
intent(out) ,
optional :: errmsg
844 logical(LK) ,
intent(out) ,
optional :: failed
851 PURE module subroutine setResizedDDDD_D2_LK5(array, failed, errmsg)
852#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
853 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedDDDD_D2_LK5
856 logical(LKG) ,
intent(inout) ,
allocatable :: array(:,:)
857 character(
*, SK) ,
intent(out) ,
optional :: errmsg
858 logical(LK) ,
intent(out) ,
optional :: failed
863 PURE module subroutine setResizedDDDD_D2_LK4(array, failed, errmsg)
864#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
865 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedDDDD_D2_LK4
868 logical(LKG) ,
intent(inout) ,
allocatable :: array(:,:)
869 character(
*, SK) ,
intent(out) ,
optional :: errmsg
870 logical(LK) ,
intent(out) ,
optional :: failed
875 PURE module subroutine setResizedDDDD_D2_LK3(array, failed, errmsg)
876#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
877 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedDDDD_D2_LK3
880 logical(LKG) ,
intent(inout) ,
allocatable :: array(:,:)
881 character(
*, SK) ,
intent(out) ,
optional :: errmsg
882 logical(LK) ,
intent(out) ,
optional :: failed
887 PURE module subroutine setResizedDDDD_D2_LK2(array, failed, errmsg)
888#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
889 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedDDDD_D2_LK2
892 logical(LKG) ,
intent(inout) ,
allocatable :: array(:,:)
893 character(
*, SK) ,
intent(out) ,
optional :: errmsg
894 logical(LK) ,
intent(out) ,
optional :: failed
899 PURE module subroutine setResizedDDDD_D2_LK1(array, failed, errmsg)
900#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
901 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedDDDD_D2_LK1
904 logical(LKG) ,
intent(inout) ,
allocatable :: array(:,:)
905 character(
*, SK) ,
intent(out) ,
optional :: errmsg
906 logical(LK) ,
intent(out) ,
optional :: failed
913 PURE module subroutine setResizedDDDD_D2_CK5(array, failed, errmsg)
914#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
915 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedDDDD_D2_CK5
918 complex(CKG) ,
intent(inout) ,
allocatable :: array(:,:)
919 character(
*, SK) ,
intent(out) ,
optional :: errmsg
920 logical(LK) ,
intent(out) ,
optional :: failed
925 PURE module subroutine setResizedDDDD_D2_CK4(array, failed, errmsg)
926#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
927 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedDDDD_D2_CK4
930 complex(CKG) ,
intent(inout) ,
allocatable :: array(:,:)
931 character(
*, SK) ,
intent(out) ,
optional :: errmsg
932 logical(LK) ,
intent(out) ,
optional :: failed
937 PURE module subroutine setResizedDDDD_D2_CK3(array, failed, errmsg)
938#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
939 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedDDDD_D2_CK3
942 complex(CKG) ,
intent(inout) ,
allocatable :: array(:,:)
943 character(
*, SK) ,
intent(out) ,
optional :: errmsg
944 logical(LK) ,
intent(out) ,
optional :: failed
949 PURE module subroutine setResizedDDDD_D2_CK2(array, failed, errmsg)
950#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
951 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedDDDD_D2_CK2
954 complex(CKG) ,
intent(inout) ,
allocatable :: array(:,:)
955 character(
*, SK) ,
intent(out) ,
optional :: errmsg
956 logical(LK) ,
intent(out) ,
optional :: failed
961 PURE module subroutine setResizedDDDD_D2_CK1(array, failed, errmsg)
962#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
963 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedDDDD_D2_CK1
966 complex(CKG) ,
intent(inout) ,
allocatable :: array(:,:)
967 character(
*, SK) ,
intent(out) ,
optional :: errmsg
968 logical(LK) ,
intent(out) ,
optional :: failed
975 PURE module subroutine setResizedDDDD_D2_RK5(array, failed, errmsg)
976#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
977 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedDDDD_D2_RK5
980 real(RKG) ,
intent(inout) ,
allocatable :: array(:,:)
981 character(
*, SK) ,
intent(out) ,
optional :: errmsg
982 logical(LK) ,
intent(out) ,
optional :: failed
987 PURE module subroutine setResizedDDDD_D2_RK4(array, failed, errmsg)
988#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
989 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedDDDD_D2_RK4
992 real(RKG) ,
intent(inout) ,
allocatable :: array(:,:)
993 character(
*, SK) ,
intent(out) ,
optional :: errmsg
994 logical(LK) ,
intent(out) ,
optional :: failed
999 PURE module subroutine setResizedDDDD_D2_RK3(array, failed, errmsg)
1000#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1001 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedDDDD_D2_RK3
1004 real(RKG) ,
intent(inout) ,
allocatable :: array(:,:)
1005 character(
*, SK) ,
intent(out) ,
optional :: errmsg
1006 logical(LK) ,
intent(out) ,
optional :: failed
1011 PURE module subroutine setResizedDDDD_D2_RK2(array, failed, errmsg)
1012#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1013 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedDDDD_D2_RK2
1016 real(RKG) ,
intent(inout) ,
allocatable :: array(:,:)
1017 character(
*, SK) ,
intent(out) ,
optional :: errmsg
1018 logical(LK) ,
intent(out) ,
optional :: failed
1023 PURE module subroutine setResizedDDDD_D2_RK1(array, failed, errmsg)
1024#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1025 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedDDDD_D2_RK1
1028 real(RKG) ,
intent(inout) ,
allocatable :: array(:,:)
1029 character(
*, SK) ,
intent(out) ,
optional :: errmsg
1030 logical(LK) ,
intent(out) ,
optional :: failed
1039 module subroutine setResizedDDDD_D2_PSSK5(array, failed, errmsg)
1040#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1041 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedDDDD_D2_PSSK5
1045 type(css_pdt(SKG)) ,
intent(inout) ,
allocatable :: array(:,:)
1046 character(
*, SK) ,
intent(out) ,
optional :: errmsg
1047 logical(LK) ,
intent(out) ,
optional :: failed
1052 module subroutine setResizedDDDD_D2_PSSK4(array, failed, errmsg)
1053#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1054 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedDDDD_D2_PSSK4
1058 type(css_pdt(SKG)) ,
intent(inout) ,
allocatable :: array(:,:)
1059 character(
*, SK) ,
intent(out) ,
optional :: errmsg
1060 logical(LK) ,
intent(out) ,
optional :: failed
1065 module subroutine setResizedDDDD_D2_PSSK3(array, failed, errmsg)
1066#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1067 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedDDDD_D2_PSSK3
1071 type(css_pdt(SKG)) ,
intent(inout) ,
allocatable :: array(:,:)
1072 character(
*, SK) ,
intent(out) ,
optional :: errmsg
1073 logical(LK) ,
intent(out) ,
optional :: failed
1078 module subroutine setResizedDDDD_D2_PSSK2(array, failed, errmsg)
1079#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1080 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedDDDD_D2_PSSK2
1084 type(css_pdt(SKG)) ,
intent(inout) ,
allocatable :: array(:,:)
1085 character(
*, SK) ,
intent(out) ,
optional :: errmsg
1086 logical(LK) ,
intent(out) ,
optional :: failed
1091 module subroutine setResizedDDDD_D2_PSSK1(array, failed, errmsg)
1092#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1093 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedDDDD_D2_PSSK1
1097 type(css_pdt(SKG)) ,
intent(inout) ,
allocatable :: array(:,:)
1098 character(
*, SK) ,
intent(out) ,
optional :: errmsg
1099 logical(LK) ,
intent(out) ,
optional :: failed
1108 module subroutine setResizedDDDD_D2_BSSK(array, failed, errmsg)
1109#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1110 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedDDDD_D2_BSSK
1114 type(css_type) ,
intent(inout) ,
allocatable :: array(:,:)
1115 character(
*, SK) ,
intent(out) ,
optional :: errmsg
1116 logical(LK) ,
intent(out) ,
optional :: failed
1130 PURE module subroutine setResizedDDDD_D3_SK5(array, failed, errmsg)
1131#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1132 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedDDDD_D3_SK5
1135 character(
*,SKG) ,
intent(inout) ,
allocatable :: array(:,:,:)
1136 character(
*, SK) ,
intent(out) ,
optional :: errmsg
1137 logical(LK) ,
intent(out) ,
optional :: failed
1142 PURE module subroutine setResizedDDDD_D3_SK4(array, failed, errmsg)
1143#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1144 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedDDDD_D3_SK4
1147 character(
*,SKG) ,
intent(inout) ,
allocatable :: array(:,:,:)
1148 character(
*, SK) ,
intent(out) ,
optional :: errmsg
1149 logical(LK) ,
intent(out) ,
optional :: failed
1154 PURE module subroutine setResizedDDDD_D3_SK3(array, failed, errmsg)
1155#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1156 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedDDDD_D3_SK3
1159 character(
*,SKG) ,
intent(inout) ,
allocatable :: array(:,:,:)
1160 character(
*, SK) ,
intent(out) ,
optional :: errmsg
1161 logical(LK) ,
intent(out) ,
optional :: failed
1166 PURE module subroutine setResizedDDDD_D3_SK2(array, failed, errmsg)
1167#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1168 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedDDDD_D3_SK2
1171 character(
*,SKG) ,
intent(inout) ,
allocatable :: array(:,:,:)
1172 character(
*, SK) ,
intent(out) ,
optional :: errmsg
1173 logical(LK) ,
intent(out) ,
optional :: failed
1178 PURE module subroutine setResizedDDDD_D3_SK1(array, failed, errmsg)
1179#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1180 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedDDDD_D3_SK1
1183 character(
*,SKG) ,
intent(inout) ,
allocatable :: array(:,:,:)
1184 character(
*, SK) ,
intent(out) ,
optional :: errmsg
1185 logical(LK) ,
intent(out) ,
optional :: failed
1192 PURE module subroutine setResizedDDDD_D3_IK5(array, failed, errmsg)
1193#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1194 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedDDDD_D3_IK5
1197 integer(IKG) ,
intent(inout) ,
allocatable :: array(:,:,:)
1198 character(
*, SK) ,
intent(out) ,
optional :: errmsg
1199 logical(LK) ,
intent(out) ,
optional :: failed
1204 PURE module subroutine setResizedDDDD_D3_IK4(array, failed, errmsg)
1205#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1206 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedDDDD_D3_IK4
1209 integer(IKG) ,
intent(inout) ,
allocatable :: array(:,:,:)
1210 character(
*, SK) ,
intent(out) ,
optional :: errmsg
1211 logical(LK) ,
intent(out) ,
optional :: failed
1216 PURE module subroutine setResizedDDDD_D3_IK3(array, failed, errmsg)
1217#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1218 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedDDDD_D3_IK3
1221 integer(IKG) ,
intent(inout) ,
allocatable :: array(:,:,:)
1222 character(
*, SK) ,
intent(out) ,
optional :: errmsg
1223 logical(LK) ,
intent(out) ,
optional :: failed
1228 PURE module subroutine setResizedDDDD_D3_IK2(array, failed, errmsg)
1229#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1230 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedDDDD_D3_IK2
1233 integer(IKG) ,
intent(inout) ,
allocatable :: array(:,:,:)
1234 character(
*, SK) ,
intent(out) ,
optional :: errmsg
1235 logical(LK) ,
intent(out) ,
optional :: failed
1240 PURE module subroutine setResizedDDDD_D3_IK1(array, failed, errmsg)
1241#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1242 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedDDDD_D3_IK1
1245 integer(IKG) ,
intent(inout) ,
allocatable :: array(:,:,:)
1246 character(
*, SK) ,
intent(out) ,
optional :: errmsg
1247 logical(LK) ,
intent(out) ,
optional :: failed
1254 PURE module subroutine setResizedDDDD_D3_LK5(array, failed, errmsg)
1255#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1256 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedDDDD_D3_LK5
1259 logical(LKG) ,
intent(inout) ,
allocatable :: array(:,:,:)
1260 character(
*, SK) ,
intent(out) ,
optional :: errmsg
1261 logical(LK) ,
intent(out) ,
optional :: failed
1266 PURE module subroutine setResizedDDDD_D3_LK4(array, failed, errmsg)
1267#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1268 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedDDDD_D3_LK4
1271 logical(LKG) ,
intent(inout) ,
allocatable :: array(:,:,:)
1272 character(
*, SK) ,
intent(out) ,
optional :: errmsg
1273 logical(LK) ,
intent(out) ,
optional :: failed
1278 PURE module subroutine setResizedDDDD_D3_LK3(array, failed, errmsg)
1279#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1280 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedDDDD_D3_LK3
1283 logical(LKG) ,
intent(inout) ,
allocatable :: array(:,:,:)
1284 character(
*, SK) ,
intent(out) ,
optional :: errmsg
1285 logical(LK) ,
intent(out) ,
optional :: failed
1290 PURE module subroutine setResizedDDDD_D3_LK2(array, failed, errmsg)
1291#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1292 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedDDDD_D3_LK2
1295 logical(LKG) ,
intent(inout) ,
allocatable :: array(:,:,:)
1296 character(
*, SK) ,
intent(out) ,
optional :: errmsg
1297 logical(LK) ,
intent(out) ,
optional :: failed
1302 PURE module subroutine setResizedDDDD_D3_LK1(array, failed, errmsg)
1303#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1304 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedDDDD_D3_LK1
1307 logical(LKG) ,
intent(inout) ,
allocatable :: array(:,:,:)
1308 character(
*, SK) ,
intent(out) ,
optional :: errmsg
1309 logical(LK) ,
intent(out) ,
optional :: failed
1316 PURE module subroutine setResizedDDDD_D3_CK5(array, failed, errmsg)
1317#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1318 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedDDDD_D3_CK5
1321 complex(CKG) ,
intent(inout) ,
allocatable :: array(:,:,:)
1322 character(
*, SK) ,
intent(out) ,
optional :: errmsg
1323 logical(LK) ,
intent(out) ,
optional :: failed
1328 PURE module subroutine setResizedDDDD_D3_CK4(array, failed, errmsg)
1329#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1330 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedDDDD_D3_CK4
1333 complex(CKG) ,
intent(inout) ,
allocatable :: array(:,:,:)
1334 character(
*, SK) ,
intent(out) ,
optional :: errmsg
1335 logical(LK) ,
intent(out) ,
optional :: failed
1340 PURE module subroutine setResizedDDDD_D3_CK3(array, failed, errmsg)
1341#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1342 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedDDDD_D3_CK3
1345 complex(CKG) ,
intent(inout) ,
allocatable :: array(:,:,:)
1346 character(
*, SK) ,
intent(out) ,
optional :: errmsg
1347 logical(LK) ,
intent(out) ,
optional :: failed
1352 PURE module subroutine setResizedDDDD_D3_CK2(array, failed, errmsg)
1353#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1354 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedDDDD_D3_CK2
1357 complex(CKG) ,
intent(inout) ,
allocatable :: array(:,:,:)
1358 character(
*, SK) ,
intent(out) ,
optional :: errmsg
1359 logical(LK) ,
intent(out) ,
optional :: failed
1364 PURE module subroutine setResizedDDDD_D3_CK1(array, failed, errmsg)
1365#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1366 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedDDDD_D3_CK1
1369 complex(CKG) ,
intent(inout) ,
allocatable :: array(:,:,:)
1370 character(
*, SK) ,
intent(out) ,
optional :: errmsg
1371 logical(LK) ,
intent(out) ,
optional :: failed
1378 PURE module subroutine setResizedDDDD_D3_RK5(array, failed, errmsg)
1379#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1380 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedDDDD_D3_RK5
1383 real(RKG) ,
intent(inout) ,
allocatable :: array(:,:,:)
1384 character(
*, SK) ,
intent(out) ,
optional :: errmsg
1385 logical(LK) ,
intent(out) ,
optional :: failed
1390 PURE module subroutine setResizedDDDD_D3_RK4(array, failed, errmsg)
1391#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1392 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedDDDD_D3_RK4
1395 real(RKG) ,
intent(inout) ,
allocatable :: array(:,:,:)
1396 character(
*, SK) ,
intent(out) ,
optional :: errmsg
1397 logical(LK) ,
intent(out) ,
optional :: failed
1402 PURE module subroutine setResizedDDDD_D3_RK3(array, failed, errmsg)
1403#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1404 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedDDDD_D3_RK3
1407 real(RKG) ,
intent(inout) ,
allocatable :: array(:,:,:)
1408 character(
*, SK) ,
intent(out) ,
optional :: errmsg
1409 logical(LK) ,
intent(out) ,
optional :: failed
1414 PURE module subroutine setResizedDDDD_D3_RK2(array, failed, errmsg)
1415#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1416 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedDDDD_D3_RK2
1419 real(RKG) ,
intent(inout) ,
allocatable :: array(:,:,:)
1420 character(
*, SK) ,
intent(out) ,
optional :: errmsg
1421 logical(LK) ,
intent(out) ,
optional :: failed
1426 PURE module subroutine setResizedDDDD_D3_RK1(array, failed, errmsg)
1427#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1428 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedDDDD_D3_RK1
1431 real(RKG) ,
intent(inout) ,
allocatable :: array(:,:,:)
1432 character(
*, SK) ,
intent(out) ,
optional :: errmsg
1433 logical(LK) ,
intent(out) ,
optional :: failed
1442 module subroutine setResizedDDDD_D3_PSSK5(array, failed, errmsg)
1443#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1444 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedDDDD_D3_PSSK5
1448 type(css_pdt(SKG)) ,
intent(inout) ,
allocatable :: array(:,:,:)
1449 character(
*, SK) ,
intent(out) ,
optional :: errmsg
1450 logical(LK) ,
intent(out) ,
optional :: failed
1455 module subroutine setResizedDDDD_D3_PSSK4(array, failed, errmsg)
1456#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1457 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedDDDD_D3_PSSK4
1461 type(css_pdt(SKG)) ,
intent(inout) ,
allocatable :: array(:,:,:)
1462 character(
*, SK) ,
intent(out) ,
optional :: errmsg
1463 logical(LK) ,
intent(out) ,
optional :: failed
1468 module subroutine setResizedDDDD_D3_PSSK3(array, failed, errmsg)
1469#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1470 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedDDDD_D3_PSSK3
1474 type(css_pdt(SKG)) ,
intent(inout) ,
allocatable :: array(:,:,:)
1475 character(
*, SK) ,
intent(out) ,
optional :: errmsg
1476 logical(LK) ,
intent(out) ,
optional :: failed
1481 module subroutine setResizedDDDD_D3_PSSK2(array, failed, errmsg)
1482#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1483 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedDDDD_D3_PSSK2
1487 type(css_pdt(SKG)) ,
intent(inout) ,
allocatable :: array(:,:,:)
1488 character(
*, SK) ,
intent(out) ,
optional :: errmsg
1489 logical(LK) ,
intent(out) ,
optional :: failed
1494 module subroutine setResizedDDDD_D3_PSSK1(array, failed, errmsg)
1495#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1496 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedDDDD_D3_PSSK1
1500 type(css_pdt(SKG)) ,
intent(inout) ,
allocatable :: array(:,:,:)
1501 character(
*, SK) ,
intent(out) ,
optional :: errmsg
1502 logical(LK) ,
intent(out) ,
optional :: failed
1511 module subroutine setResizedDDDD_D3_BSSK(array, failed, errmsg)
1512#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1513 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedDDDD_D3_BSSK
1517 type(css_type) ,
intent(inout) ,
allocatable :: array(:,:,:)
1518 character(
*, SK) ,
intent(out) ,
optional :: errmsg
1519 logical(LK) ,
intent(out) ,
optional :: failed
1535 PURE module subroutine setResizedSDDD_D0_SK5(array, size, failed, errmsg)
1536#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1537 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSDDD_D0_SK5
1540 character(:,SKG) ,
intent(inout) ,
allocatable :: array
1541 integer(IK) ,
intent(in) :: size
1542 character(
*, SK) ,
intent(out) ,
optional :: errmsg
1543 logical(LK) ,
intent(out) ,
optional :: failed
1548 PURE module subroutine setResizedSDDD_D0_SK4(array, size, failed, errmsg)
1549#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1550 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSDDD_D0_SK4
1553 character(:,SKG) ,
intent(inout) ,
allocatable :: array
1554 integer(IK) ,
intent(in) :: size
1555 character(
*, SK) ,
intent(out) ,
optional :: errmsg
1556 logical(LK) ,
intent(out) ,
optional :: failed
1561 PURE module subroutine setResizedSDDD_D0_SK3(array, size, failed, errmsg)
1562#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1563 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSDDD_D0_SK3
1566 character(:,SKG) ,
intent(inout) ,
allocatable :: array
1567 integer(IK) ,
intent(in) :: size
1568 character(
*, SK) ,
intent(out) ,
optional :: errmsg
1569 logical(LK) ,
intent(out) ,
optional :: failed
1574 PURE module subroutine setResizedSDDD_D0_SK2(array, size, failed, errmsg)
1575#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1576 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSDDD_D0_SK2
1579 character(:,SKG) ,
intent(inout) ,
allocatable :: array
1580 integer(IK) ,
intent(in) :: size
1581 character(
*, SK) ,
intent(out) ,
optional :: errmsg
1582 logical(LK) ,
intent(out) ,
optional :: failed
1587 PURE module subroutine setResizedSDDD_D0_SK1(array, size, failed, errmsg)
1588#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1589 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSDDD_D0_SK1
1592 character(:,SKG) ,
intent(inout) ,
allocatable :: array
1593 integer(IK) ,
intent(in) :: size
1594 character(
*, SK) ,
intent(out) ,
optional :: errmsg
1595 logical(LK) ,
intent(out) ,
optional :: failed
1610 PURE module subroutine setResizedSDDD_D1_SK5(array, size, failed, errmsg)
1611#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1612 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSDDD_D1_SK5
1615 character(
*,SKG) ,
intent(inout) ,
allocatable :: array(:)
1616 integer(IK) ,
intent(in) :: size
1617 character(
*, SK) ,
intent(out) ,
optional :: errmsg
1618 logical(LK) ,
intent(out) ,
optional :: failed
1623 PURE module subroutine setResizedSDDD_D1_SK4(array, size, failed, errmsg)
1624#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1625 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSDDD_D1_SK4
1628 character(
*,SKG) ,
intent(inout) ,
allocatable :: array(:)
1629 integer(IK) ,
intent(in) :: size
1630 character(
*, SK) ,
intent(out) ,
optional :: errmsg
1631 logical(LK) ,
intent(out) ,
optional :: failed
1636 PURE module subroutine setResizedSDDD_D1_SK3(array, size, failed, errmsg)
1637#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1638 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSDDD_D1_SK3
1641 character(
*,SKG) ,
intent(inout) ,
allocatable :: array(:)
1642 integer(IK) ,
intent(in) :: size
1643 character(
*, SK) ,
intent(out) ,
optional :: errmsg
1644 logical(LK) ,
intent(out) ,
optional :: failed
1649 PURE module subroutine setResizedSDDD_D1_SK2(array, size, failed, errmsg)
1650#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1651 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSDDD_D1_SK2
1654 character(
*,SKG) ,
intent(inout) ,
allocatable :: array(:)
1655 integer(IK) ,
intent(in) :: size
1656 character(
*, SK) ,
intent(out) ,
optional :: errmsg
1657 logical(LK) ,
intent(out) ,
optional :: failed
1662 PURE module subroutine setResizedSDDD_D1_SK1(array, size, failed, errmsg)
1663#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1664 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSDDD_D1_SK1
1667 character(
*,SKG) ,
intent(inout) ,
allocatable :: array(:)
1668 integer(IK) ,
intent(in) :: size
1669 character(
*, SK) ,
intent(out) ,
optional :: errmsg
1670 logical(LK) ,
intent(out) ,
optional :: failed
1677 PURE module subroutine setResizedSDDD_D1_IK5(array, size, failed, errmsg)
1678#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1679 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSDDD_D1_IK5
1682 integer(IKG) ,
intent(inout) ,
allocatable :: array(:)
1683 integer(IK) ,
intent(in) :: size
1684 character(
*, SK) ,
intent(out) ,
optional :: errmsg
1685 logical(LK) ,
intent(out) ,
optional :: failed
1690 PURE module subroutine setResizedSDDD_D1_IK4(array, size, failed, errmsg)
1691#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1692 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSDDD_D1_IK4
1695 integer(IKG) ,
intent(inout) ,
allocatable :: array(:)
1696 integer(IK) ,
intent(in) :: size
1697 character(
*, SK) ,
intent(out) ,
optional :: errmsg
1698 logical(LK) ,
intent(out) ,
optional :: failed
1703 PURE module subroutine setResizedSDDD_D1_IK3(array, size, failed, errmsg)
1704#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1705 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSDDD_D1_IK3
1708 integer(IKG) ,
intent(inout) ,
allocatable :: array(:)
1709 integer(IK) ,
intent(in) :: size
1710 character(
*, SK) ,
intent(out) ,
optional :: errmsg
1711 logical(LK) ,
intent(out) ,
optional :: failed
1716 PURE module subroutine setResizedSDDD_D1_IK2(array, size, failed, errmsg)
1717#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1718 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSDDD_D1_IK2
1721 integer(IKG) ,
intent(inout) ,
allocatable :: array(:)
1722 integer(IK) ,
intent(in) :: size
1723 character(
*, SK) ,
intent(out) ,
optional :: errmsg
1724 logical(LK) ,
intent(out) ,
optional :: failed
1729 PURE module subroutine setResizedSDDD_D1_IK1(array, size, failed, errmsg)
1730#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1731 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSDDD_D1_IK1
1734 integer(IKG) ,
intent(inout) ,
allocatable :: array(:)
1735 integer(IK) ,
intent(in) :: size
1736 character(
*, SK) ,
intent(out) ,
optional :: errmsg
1737 logical(LK) ,
intent(out) ,
optional :: failed
1744 PURE module subroutine setResizedSDDD_D1_LK5(array, size, failed, errmsg)
1745#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1746 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSDDD_D1_LK5
1749 logical(LKG) ,
intent(inout) ,
allocatable :: array(:)
1750 integer(IK) ,
intent(in) :: size
1751 character(
*, SK) ,
intent(out) ,
optional :: errmsg
1752 logical(LK) ,
intent(out) ,
optional :: failed
1757 PURE module subroutine setResizedSDDD_D1_LK4(array, size, failed, errmsg)
1758#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1759 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSDDD_D1_LK4
1762 logical(LKG) ,
intent(inout) ,
allocatable :: array(:)
1763 integer(IK) ,
intent(in) :: size
1764 character(
*, SK) ,
intent(out) ,
optional :: errmsg
1765 logical(LK) ,
intent(out) ,
optional :: failed
1770 PURE module subroutine setResizedSDDD_D1_LK3(array, size, failed, errmsg)
1771#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1772 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSDDD_D1_LK3
1775 logical(LKG) ,
intent(inout) ,
allocatable :: array(:)
1776 integer(IK) ,
intent(in) :: size
1777 character(
*, SK) ,
intent(out) ,
optional :: errmsg
1778 logical(LK) ,
intent(out) ,
optional :: failed
1783 PURE module subroutine setResizedSDDD_D1_LK2(array, size, failed, errmsg)
1784#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1785 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSDDD_D1_LK2
1788 logical(LKG) ,
intent(inout) ,
allocatable :: array(:)
1789 integer(IK) ,
intent(in) :: size
1790 character(
*, SK) ,
intent(out) ,
optional :: errmsg
1791 logical(LK) ,
intent(out) ,
optional :: failed
1796 PURE module subroutine setResizedSDDD_D1_LK1(array, size, failed, errmsg)
1797#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1798 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSDDD_D1_LK1
1801 logical(LKG) ,
intent(inout) ,
allocatable :: array(:)
1802 integer(IK) ,
intent(in) :: size
1803 character(
*, SK) ,
intent(out) ,
optional :: errmsg
1804 logical(LK) ,
intent(out) ,
optional :: failed
1811 PURE module subroutine setResizedSDDD_D1_CK5(array, size, failed, errmsg)
1812#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1813 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSDDD_D1_CK5
1816 complex(CKG) ,
intent(inout) ,
allocatable :: array(:)
1817 integer(IK) ,
intent(in) :: size
1818 character(
*, SK) ,
intent(out) ,
optional :: errmsg
1819 logical(LK) ,
intent(out) ,
optional :: failed
1824 PURE module subroutine setResizedSDDD_D1_CK4(array, size, failed, errmsg)
1825#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1826 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSDDD_D1_CK4
1829 complex(CKG) ,
intent(inout) ,
allocatable :: array(:)
1830 integer(IK) ,
intent(in) :: size
1831 character(
*, SK) ,
intent(out) ,
optional :: errmsg
1832 logical(LK) ,
intent(out) ,
optional :: failed
1837 PURE module subroutine setResizedSDDD_D1_CK3(array, size, failed, errmsg)
1838#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1839 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSDDD_D1_CK3
1842 complex(CKG) ,
intent(inout) ,
allocatable :: array(:)
1843 integer(IK) ,
intent(in) :: size
1844 character(
*, SK) ,
intent(out) ,
optional :: errmsg
1845 logical(LK) ,
intent(out) ,
optional :: failed
1850 PURE module subroutine setResizedSDDD_D1_CK2(array, size, failed, errmsg)
1851#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1852 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSDDD_D1_CK2
1855 complex(CKG) ,
intent(inout) ,
allocatable :: array(:)
1856 integer(IK) ,
intent(in) :: size
1857 character(
*, SK) ,
intent(out) ,
optional :: errmsg
1858 logical(LK) ,
intent(out) ,
optional :: failed
1863 PURE module subroutine setResizedSDDD_D1_CK1(array, size, failed, errmsg)
1864#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1865 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSDDD_D1_CK1
1868 complex(CKG) ,
intent(inout) ,
allocatable :: array(:)
1869 integer(IK) ,
intent(in) :: size
1870 character(
*, SK) ,
intent(out) ,
optional :: errmsg
1871 logical(LK) ,
intent(out) ,
optional :: failed
1878 PURE module subroutine setResizedSDDD_D1_RK5(array, size, failed, errmsg)
1879#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1880 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSDDD_D1_RK5
1883 real(RKG) ,
intent(inout) ,
allocatable :: array(:)
1884 integer(IK) ,
intent(in) :: size
1885 character(
*, SK) ,
intent(out) ,
optional :: errmsg
1886 logical(LK) ,
intent(out) ,
optional :: failed
1891 PURE module subroutine setResizedSDDD_D1_RK4(array, size, failed, errmsg)
1892#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1893 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSDDD_D1_RK4
1896 real(RKG) ,
intent(inout) ,
allocatable :: array(:)
1897 integer(IK) ,
intent(in) :: size
1898 character(
*, SK) ,
intent(out) ,
optional :: errmsg
1899 logical(LK) ,
intent(out) ,
optional :: failed
1904 PURE module subroutine setResizedSDDD_D1_RK3(array, size, failed, errmsg)
1905#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1906 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSDDD_D1_RK3
1909 real(RKG) ,
intent(inout) ,
allocatable :: array(:)
1910 integer(IK) ,
intent(in) :: size
1911 character(
*, SK) ,
intent(out) ,
optional :: errmsg
1912 logical(LK) ,
intent(out) ,
optional :: failed
1917 PURE module subroutine setResizedSDDD_D1_RK2(array, size, failed, errmsg)
1918#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1919 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSDDD_D1_RK2
1922 real(RKG) ,
intent(inout) ,
allocatable :: array(:)
1923 integer(IK) ,
intent(in) :: size
1924 character(
*, SK) ,
intent(out) ,
optional :: errmsg
1925 logical(LK) ,
intent(out) ,
optional :: failed
1930 PURE module subroutine setResizedSDDD_D1_RK1(array, size, failed, errmsg)
1931#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1932 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSDDD_D1_RK1
1935 real(RKG) ,
intent(inout) ,
allocatable :: array(:)
1936 integer(IK) ,
intent(in) :: size
1937 character(
*, SK) ,
intent(out) ,
optional :: errmsg
1938 logical(LK) ,
intent(out) ,
optional :: failed
1947 module subroutine setResizedSDDD_D1_PSSK5(array, size, failed, errmsg)
1948#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1949 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSDDD_D1_PSSK5
1953 type(css_pdt(SKG)) ,
intent(inout) ,
allocatable :: array(:)
1954 integer(IK) ,
intent(in) :: size
1955 character(
*, SK) ,
intent(out) ,
optional :: errmsg
1956 logical(LK) ,
intent(out) ,
optional :: failed
1961 module subroutine setResizedSDDD_D1_PSSK4(array, size, failed, errmsg)
1962#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1963 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSDDD_D1_PSSK4
1967 type(css_pdt(SKG)) ,
intent(inout) ,
allocatable :: array(:)
1968 integer(IK) ,
intent(in) :: size
1969 character(
*, SK) ,
intent(out) ,
optional :: errmsg
1970 logical(LK) ,
intent(out) ,
optional :: failed
1975 module subroutine setResizedSDDD_D1_PSSK3(array, size, failed, errmsg)
1976#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1977 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSDDD_D1_PSSK3
1981 type(css_pdt(SKG)) ,
intent(inout) ,
allocatable :: array(:)
1982 integer(IK) ,
intent(in) :: size
1983 character(
*, SK) ,
intent(out) ,
optional :: errmsg
1984 logical(LK) ,
intent(out) ,
optional :: failed
1989 module subroutine setResizedSDDD_D1_PSSK2(array, size, failed, errmsg)
1990#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1991 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSDDD_D1_PSSK2
1995 type(css_pdt(SKG)) ,
intent(inout) ,
allocatable :: array(:)
1996 integer(IK) ,
intent(in) :: size
1997 character(
*, SK) ,
intent(out) ,
optional :: errmsg
1998 logical(LK) ,
intent(out) ,
optional :: failed
2003 module subroutine setResizedSDDD_D1_PSSK1(array, size, failed, errmsg)
2004#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2005 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSDDD_D1_PSSK1
2009 type(css_pdt(SKG)) ,
intent(inout) ,
allocatable :: array(:)
2010 integer(IK) ,
intent(in) :: size
2011 character(
*, SK) ,
intent(out) ,
optional :: errmsg
2012 logical(LK) ,
intent(out) ,
optional :: failed
2021 module subroutine setResizedSDDD_D1_BSSK(array, size, failed, errmsg)
2022#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2023 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSDDD_D1_BSSK
2027 type(css_type) ,
intent(inout) ,
allocatable :: array(:)
2028 integer(IK) ,
intent(in) :: size
2029 character(
*, SK) ,
intent(out) ,
optional :: errmsg
2030 logical(LK) ,
intent(out) ,
optional :: failed
2044 PURE module subroutine setResizedSDDD_D2_SK5(array, size, failed, errmsg)
2045#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2046 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSDDD_D2_SK5
2049 character(
*,SKG) ,
intent(inout) ,
allocatable :: array(:,:)
2050 integer(IK) ,
intent(in) , dimension(
2) :: size
2051 character(
*, SK) ,
intent(out) ,
optional :: errmsg
2052 logical(LK) ,
intent(out) ,
optional :: failed
2057 PURE module subroutine setResizedSDDD_D2_SK4(array, size, failed, errmsg)
2058#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2059 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSDDD_D2_SK4
2062 character(
*,SKG) ,
intent(inout) ,
allocatable :: array(:,:)
2063 integer(IK) ,
intent(in) , dimension(
2) :: size
2064 character(
*, SK) ,
intent(out) ,
optional :: errmsg
2065 logical(LK) ,
intent(out) ,
optional :: failed
2070 PURE module subroutine setResizedSDDD_D2_SK3(array, size, failed, errmsg)
2071#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2072 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSDDD_D2_SK3
2075 character(
*,SKG) ,
intent(inout) ,
allocatable :: array(:,:)
2076 integer(IK) ,
intent(in) , dimension(
2) :: size
2077 character(
*, SK) ,
intent(out) ,
optional :: errmsg
2078 logical(LK) ,
intent(out) ,
optional :: failed
2083 PURE module subroutine setResizedSDDD_D2_SK2(array, size, failed, errmsg)
2084#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2085 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSDDD_D2_SK2
2088 character(
*,SKG) ,
intent(inout) ,
allocatable :: array(:,:)
2089 integer(IK) ,
intent(in) , dimension(
2) :: size
2090 character(
*, SK) ,
intent(out) ,
optional :: errmsg
2091 logical(LK) ,
intent(out) ,
optional :: failed
2096 PURE module subroutine setResizedSDDD_D2_SK1(array, size, failed, errmsg)
2097#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2098 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSDDD_D2_SK1
2101 character(
*,SKG) ,
intent(inout) ,
allocatable :: array(:,:)
2102 integer(IK) ,
intent(in) , dimension(
2) :: size
2103 character(
*, SK) ,
intent(out) ,
optional :: errmsg
2104 logical(LK) ,
intent(out) ,
optional :: failed
2111 PURE module subroutine setResizedSDDD_D2_IK5(array, size, failed, errmsg)
2112#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2113 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSDDD_D2_IK5
2116 integer(IKG) ,
intent(inout) ,
allocatable :: array(:,:)
2117 integer(IK) ,
intent(in) , dimension(
2) :: size
2118 character(
*, SK) ,
intent(out) ,
optional :: errmsg
2119 logical(LK) ,
intent(out) ,
optional :: failed
2124 PURE module subroutine setResizedSDDD_D2_IK4(array, size, failed, errmsg)
2125#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2126 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSDDD_D2_IK4
2129 integer(IKG) ,
intent(inout) ,
allocatable :: array(:,:)
2130 integer(IK) ,
intent(in) , dimension(
2) :: size
2131 character(
*, SK) ,
intent(out) ,
optional :: errmsg
2132 logical(LK) ,
intent(out) ,
optional :: failed
2137 PURE module subroutine setResizedSDDD_D2_IK3(array, size, failed, errmsg)
2138#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2139 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSDDD_D2_IK3
2142 integer(IKG) ,
intent(inout) ,
allocatable :: array(:,:)
2143 integer(IK) ,
intent(in) , dimension(
2) :: size
2144 character(
*, SK) ,
intent(out) ,
optional :: errmsg
2145 logical(LK) ,
intent(out) ,
optional :: failed
2150 PURE module subroutine setResizedSDDD_D2_IK2(array, size, failed, errmsg)
2151#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2152 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSDDD_D2_IK2
2155 integer(IKG) ,
intent(inout) ,
allocatable :: array(:,:)
2156 integer(IK) ,
intent(in) , dimension(
2) :: size
2157 character(
*, SK) ,
intent(out) ,
optional :: errmsg
2158 logical(LK) ,
intent(out) ,
optional :: failed
2163 PURE module subroutine setResizedSDDD_D2_IK1(array, size, failed, errmsg)
2164#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2165 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSDDD_D2_IK1
2168 integer(IKG) ,
intent(inout) ,
allocatable :: array(:,:)
2169 integer(IK) ,
intent(in) , dimension(
2) :: size
2170 character(
*, SK) ,
intent(out) ,
optional :: errmsg
2171 logical(LK) ,
intent(out) ,
optional :: failed
2178 PURE module subroutine setResizedSDDD_D2_LK5(array, size, failed, errmsg)
2179#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2180 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSDDD_D2_LK5
2183 logical(LKG) ,
intent(inout) ,
allocatable :: array(:,:)
2184 integer(IK) ,
intent(in) , dimension(
2) :: size
2185 character(
*, SK) ,
intent(out) ,
optional :: errmsg
2186 logical(LK) ,
intent(out) ,
optional :: failed
2191 PURE module subroutine setResizedSDDD_D2_LK4(array, size, failed, errmsg)
2192#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2193 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSDDD_D2_LK4
2196 logical(LKG) ,
intent(inout) ,
allocatable :: array(:,:)
2197 integer(IK) ,
intent(in) , dimension(
2) :: size
2198 character(
*, SK) ,
intent(out) ,
optional :: errmsg
2199 logical(LK) ,
intent(out) ,
optional :: failed
2204 PURE module subroutine setResizedSDDD_D2_LK3(array, size, failed, errmsg)
2205#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2206 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSDDD_D2_LK3
2209 logical(LKG) ,
intent(inout) ,
allocatable :: array(:,:)
2210 integer(IK) ,
intent(in) , dimension(
2) :: size
2211 character(
*, SK) ,
intent(out) ,
optional :: errmsg
2212 logical(LK) ,
intent(out) ,
optional :: failed
2217 PURE module subroutine setResizedSDDD_D2_LK2(array, size, failed, errmsg)
2218#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2219 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSDDD_D2_LK2
2222 logical(LKG) ,
intent(inout) ,
allocatable :: array(:,:)
2223 integer(IK) ,
intent(in) , dimension(
2) :: size
2224 character(
*, SK) ,
intent(out) ,
optional :: errmsg
2225 logical(LK) ,
intent(out) ,
optional :: failed
2230 PURE module subroutine setResizedSDDD_D2_LK1(array, size, failed, errmsg)
2231#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2232 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSDDD_D2_LK1
2235 logical(LKG) ,
intent(inout) ,
allocatable :: array(:,:)
2236 integer(IK) ,
intent(in) , dimension(
2) :: size
2237 character(
*, SK) ,
intent(out) ,
optional :: errmsg
2238 logical(LK) ,
intent(out) ,
optional :: failed
2245 PURE module subroutine setResizedSDDD_D2_CK5(array, size, failed, errmsg)
2246#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2247 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSDDD_D2_CK5
2250 complex(CKG) ,
intent(inout) ,
allocatable :: array(:,:)
2251 integer(IK) ,
intent(in) , dimension(
2) :: size
2252 character(
*, SK) ,
intent(out) ,
optional :: errmsg
2253 logical(LK) ,
intent(out) ,
optional :: failed
2258 PURE module subroutine setResizedSDDD_D2_CK4(array, size, failed, errmsg)
2259#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2260 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSDDD_D2_CK4
2263 complex(CKG) ,
intent(inout) ,
allocatable :: array(:,:)
2264 integer(IK) ,
intent(in) , dimension(
2) :: size
2265 character(
*, SK) ,
intent(out) ,
optional :: errmsg
2266 logical(LK) ,
intent(out) ,
optional :: failed
2271 PURE module subroutine setResizedSDDD_D2_CK3(array, size, failed, errmsg)
2272#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2273 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSDDD_D2_CK3
2276 complex(CKG) ,
intent(inout) ,
allocatable :: array(:,:)
2277 integer(IK) ,
intent(in) , dimension(
2) :: size
2278 character(
*, SK) ,
intent(out) ,
optional :: errmsg
2279 logical(LK) ,
intent(out) ,
optional :: failed
2284 PURE module subroutine setResizedSDDD_D2_CK2(array, size, failed, errmsg)
2285#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2286 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSDDD_D2_CK2
2289 complex(CKG) ,
intent(inout) ,
allocatable :: array(:,:)
2290 integer(IK) ,
intent(in) , dimension(
2) :: size
2291 character(
*, SK) ,
intent(out) ,
optional :: errmsg
2292 logical(LK) ,
intent(out) ,
optional :: failed
2297 PURE module subroutine setResizedSDDD_D2_CK1(array, size, failed, errmsg)
2298#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2299 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSDDD_D2_CK1
2302 complex(CKG) ,
intent(inout) ,
allocatable :: array(:,:)
2303 integer(IK) ,
intent(in) , dimension(
2) :: size
2304 character(
*, SK) ,
intent(out) ,
optional :: errmsg
2305 logical(LK) ,
intent(out) ,
optional :: failed
2312 PURE module subroutine setResizedSDDD_D2_RK5(array, size, failed, errmsg)
2313#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2314 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSDDD_D2_RK5
2317 real(RKG) ,
intent(inout) ,
allocatable :: array(:,:)
2318 integer(IK) ,
intent(in) , dimension(
2) :: size
2319 character(
*, SK) ,
intent(out) ,
optional :: errmsg
2320 logical(LK) ,
intent(out) ,
optional :: failed
2325 PURE module subroutine setResizedSDDD_D2_RK4(array, size, failed, errmsg)
2326#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2327 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSDDD_D2_RK4
2330 real(RKG) ,
intent(inout) ,
allocatable :: array(:,:)
2331 integer(IK) ,
intent(in) , dimension(
2) :: size
2332 character(
*, SK) ,
intent(out) ,
optional :: errmsg
2333 logical(LK) ,
intent(out) ,
optional :: failed
2338 PURE module subroutine setResizedSDDD_D2_RK3(array, size, failed, errmsg)
2339#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2340 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSDDD_D2_RK3
2343 real(RKG) ,
intent(inout) ,
allocatable :: array(:,:)
2344 integer(IK) ,
intent(in) , dimension(
2) :: size
2345 character(
*, SK) ,
intent(out) ,
optional :: errmsg
2346 logical(LK) ,
intent(out) ,
optional :: failed
2351 PURE module subroutine setResizedSDDD_D2_RK2(array, size, failed, errmsg)
2352#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2353 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSDDD_D2_RK2
2356 real(RKG) ,
intent(inout) ,
allocatable :: array(:,:)
2357 integer(IK) ,
intent(in) , dimension(
2) :: size
2358 character(
*, SK) ,
intent(out) ,
optional :: errmsg
2359 logical(LK) ,
intent(out) ,
optional :: failed
2364 PURE module subroutine setResizedSDDD_D2_RK1(array, size, failed, errmsg)
2365#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2366 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSDDD_D2_RK1
2369 real(RKG) ,
intent(inout) ,
allocatable :: array(:,:)
2370 integer(IK) ,
intent(in) , dimension(
2) :: size
2371 character(
*, SK) ,
intent(out) ,
optional :: errmsg
2372 logical(LK) ,
intent(out) ,
optional :: failed
2381 module subroutine setResizedSDDD_D2_PSSK5(array, size, failed, errmsg)
2382#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2383 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSDDD_D2_PSSK5
2387 type(css_pdt(SKG)) ,
intent(inout) ,
allocatable :: array(:,:)
2388 integer(IK) ,
intent(in) :: size
2389 character(
*, SK) ,
intent(out) ,
optional :: errmsg
2390 logical(LK) ,
intent(out) ,
optional :: failed
2395 module subroutine setResizedSDDD_D2_PSSK4(array, size, failed, errmsg)
2396#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2397 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSDDD_D2_PSSK4
2401 type(css_pdt(SKG)) ,
intent(inout) ,
allocatable :: array(:,:)
2402 integer(IK) ,
intent(in) :: size
2403 character(
*, SK) ,
intent(out) ,
optional :: errmsg
2404 logical(LK) ,
intent(out) ,
optional :: failed
2409 module subroutine setResizedSDDD_D2_PSSK3(array, size, failed, errmsg)
2410#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2411 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSDDD_D2_PSSK3
2415 type(css_pdt(SKG)) ,
intent(inout) ,
allocatable :: array(:,:)
2416 integer(IK) ,
intent(in) :: size
2417 character(
*, SK) ,
intent(out) ,
optional :: errmsg
2418 logical(LK) ,
intent(out) ,
optional :: failed
2423 module subroutine setResizedSDDD_D2_PSSK2(array, size, failed, errmsg)
2424#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2425 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSDDD_D2_PSSK2
2429 type(css_pdt(SKG)) ,
intent(inout) ,
allocatable :: array(:,:)
2430 integer(IK) ,
intent(in) :: size
2431 character(
*, SK) ,
intent(out) ,
optional :: errmsg
2432 logical(LK) ,
intent(out) ,
optional :: failed
2437 module subroutine setResizedSDDD_D2_PSSK1(array, size, failed, errmsg)
2438#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2439 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSDDD_D2_PSSK1
2443 type(css_pdt(SKG)) ,
intent(inout) ,
allocatable :: array(:,:)
2444 integer(IK) ,
intent(in) :: size
2445 character(
*, SK) ,
intent(out) ,
optional :: errmsg
2446 logical(LK) ,
intent(out) ,
optional :: failed
2455 module subroutine setResizedSDDD_D2_BSSK(array, size, failed, errmsg)
2456#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2457 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSDDD_D2_BSSK
2461 type(css_type) ,
intent(inout) ,
allocatable :: array(:,:)
2462 integer(IK) ,
intent(in) :: size
2463 character(
*, SK) ,
intent(out) ,
optional :: errmsg
2464 logical(LK) ,
intent(out) ,
optional :: failed
2478 PURE module subroutine setResizedSDDD_D3_SK5(array, size, failed, errmsg)
2479#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2480 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSDDD_D3_SK5
2483 character(
*,SKG) ,
intent(inout) ,
allocatable :: array(:,:,:)
2484 integer(IK) ,
intent(in) , dimension(
3) :: size
2485 character(
*, SK) ,
intent(out) ,
optional :: errmsg
2486 logical(LK) ,
intent(out) ,
optional :: failed
2491 PURE module subroutine setResizedSDDD_D3_SK4(array, size, failed, errmsg)
2492#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2493 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSDDD_D3_SK4
2496 character(
*,SKG) ,
intent(inout) ,
allocatable :: array(:,:,:)
2497 integer(IK) ,
intent(in) , dimension(
3) :: size
2498 character(
*, SK) ,
intent(out) ,
optional :: errmsg
2499 logical(LK) ,
intent(out) ,
optional :: failed
2504 PURE module subroutine setResizedSDDD_D3_SK3(array, size, failed, errmsg)
2505#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2506 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSDDD_D3_SK3
2509 character(
*,SKG) ,
intent(inout) ,
allocatable :: array(:,:,:)
2510 integer(IK) ,
intent(in) , dimension(
3) :: size
2511 character(
*, SK) ,
intent(out) ,
optional :: errmsg
2512 logical(LK) ,
intent(out) ,
optional :: failed
2517 PURE module subroutine setResizedSDDD_D3_SK2(array, size, failed, errmsg)
2518#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2519 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSDDD_D3_SK2
2522 character(
*,SKG) ,
intent(inout) ,
allocatable :: array(:,:,:)
2523 integer(IK) ,
intent(in) , dimension(
3) :: size
2524 character(
*, SK) ,
intent(out) ,
optional :: errmsg
2525 logical(LK) ,
intent(out) ,
optional :: failed
2530 PURE module subroutine setResizedSDDD_D3_SK1(array, size, failed, errmsg)
2531#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2532 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSDDD_D3_SK1
2535 character(
*,SKG) ,
intent(inout) ,
allocatable :: array(:,:,:)
2536 integer(IK) ,
intent(in) , dimension(
3) :: size
2537 character(
*, SK) ,
intent(out) ,
optional :: errmsg
2538 logical(LK) ,
intent(out) ,
optional :: failed
2545 PURE module subroutine setResizedSDDD_D3_IK5(array, size, failed, errmsg)
2546#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2547 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSDDD_D3_IK5
2550 integer(IKG) ,
intent(inout) ,
allocatable :: array(:,:,:)
2551 integer(IK) ,
intent(in) , dimension(
3) :: size
2552 character(
*, SK) ,
intent(out) ,
optional :: errmsg
2553 logical(LK) ,
intent(out) ,
optional :: failed
2558 PURE module subroutine setResizedSDDD_D3_IK4(array, size, failed, errmsg)
2559#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2560 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSDDD_D3_IK4
2563 integer(IKG) ,
intent(inout) ,
allocatable :: array(:,:,:)
2564 integer(IK) ,
intent(in) , dimension(
3) :: size
2565 character(
*, SK) ,
intent(out) ,
optional :: errmsg
2566 logical(LK) ,
intent(out) ,
optional :: failed
2571 PURE module subroutine setResizedSDDD_D3_IK3(array, size, failed, errmsg)
2572#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2573 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSDDD_D3_IK3
2576 integer(IKG) ,
intent(inout) ,
allocatable :: array(:,:,:)
2577 integer(IK) ,
intent(in) , dimension(
3) :: size
2578 character(
*, SK) ,
intent(out) ,
optional :: errmsg
2579 logical(LK) ,
intent(out) ,
optional :: failed
2584 PURE module subroutine setResizedSDDD_D3_IK2(array, size, failed, errmsg)
2585#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2586 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSDDD_D3_IK2
2589 integer(IKG) ,
intent(inout) ,
allocatable :: array(:,:,:)
2590 integer(IK) ,
intent(in) , dimension(
3) :: size
2591 character(
*, SK) ,
intent(out) ,
optional :: errmsg
2592 logical(LK) ,
intent(out) ,
optional :: failed
2597 PURE module subroutine setResizedSDDD_D3_IK1(array, size, failed, errmsg)
2598#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2599 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSDDD_D3_IK1
2602 integer(IKG) ,
intent(inout) ,
allocatable :: array(:,:,:)
2603 integer(IK) ,
intent(in) , dimension(
3) :: size
2604 character(
*, SK) ,
intent(out) ,
optional :: errmsg
2605 logical(LK) ,
intent(out) ,
optional :: failed
2612 PURE module subroutine setResizedSDDD_D3_LK5(array, size, failed, errmsg)
2613#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2614 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSDDD_D3_LK5
2617 logical(LKG) ,
intent(inout) ,
allocatable :: array(:,:,:)
2618 integer(IK) ,
intent(in) , dimension(
3) :: size
2619 character(
*, SK) ,
intent(out) ,
optional :: errmsg
2620 logical(LK) ,
intent(out) ,
optional :: failed
2625 PURE module subroutine setResizedSDDD_D3_LK4(array, size, failed, errmsg)
2626#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2627 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSDDD_D3_LK4
2630 logical(LKG) ,
intent(inout) ,
allocatable :: array(:,:,:)
2631 integer(IK) ,
intent(in) , dimension(
3) :: size
2632 character(
*, SK) ,
intent(out) ,
optional :: errmsg
2633 logical(LK) ,
intent(out) ,
optional :: failed
2638 PURE module subroutine setResizedSDDD_D3_LK3(array, size, failed, errmsg)
2639#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2640 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSDDD_D3_LK3
2643 logical(LKG) ,
intent(inout) ,
allocatable :: array(:,:,:)
2644 integer(IK) ,
intent(in) , dimension(
3) :: size
2645 character(
*, SK) ,
intent(out) ,
optional :: errmsg
2646 logical(LK) ,
intent(out) ,
optional :: failed
2651 PURE module subroutine setResizedSDDD_D3_LK2(array, size, failed, errmsg)
2652#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2653 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSDDD_D3_LK2
2656 logical(LKG) ,
intent(inout) ,
allocatable :: array(:,:,:)
2657 integer(IK) ,
intent(in) , dimension(
3) :: size
2658 character(
*, SK) ,
intent(out) ,
optional :: errmsg
2659 logical(LK) ,
intent(out) ,
optional :: failed
2664 PURE module subroutine setResizedSDDD_D3_LK1(array, size, failed, errmsg)
2665#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2666 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSDDD_D3_LK1
2669 logical(LKG) ,
intent(inout) ,
allocatable :: array(:,:,:)
2670 integer(IK) ,
intent(in) , dimension(
3) :: size
2671 character(
*, SK) ,
intent(out) ,
optional :: errmsg
2672 logical(LK) ,
intent(out) ,
optional :: failed
2679 PURE module subroutine setResizedSDDD_D3_CK5(array, size, failed, errmsg)
2680#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2681 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSDDD_D3_CK5
2684 complex(CKG) ,
intent(inout) ,
allocatable :: array(:,:,:)
2685 integer(IK) ,
intent(in) , dimension(
3) :: size
2686 character(
*, SK) ,
intent(out) ,
optional :: errmsg
2687 logical(LK) ,
intent(out) ,
optional :: failed
2692 PURE module subroutine setResizedSDDD_D3_CK4(array, size, failed, errmsg)
2693#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2694 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSDDD_D3_CK4
2697 complex(CKG) ,
intent(inout) ,
allocatable :: array(:,:,:)
2698 integer(IK) ,
intent(in) , dimension(
3) :: size
2699 character(
*, SK) ,
intent(out) ,
optional :: errmsg
2700 logical(LK) ,
intent(out) ,
optional :: failed
2705 PURE module subroutine setResizedSDDD_D3_CK3(array, size, failed, errmsg)
2706#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2707 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSDDD_D3_CK3
2710 complex(CKG) ,
intent(inout) ,
allocatable :: array(:,:,:)
2711 integer(IK) ,
intent(in) , dimension(
3) :: size
2712 character(
*, SK) ,
intent(out) ,
optional :: errmsg
2713 logical(LK) ,
intent(out) ,
optional :: failed
2718 PURE module subroutine setResizedSDDD_D3_CK2(array, size, failed, errmsg)
2719#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2720 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSDDD_D3_CK2
2723 complex(CKG) ,
intent(inout) ,
allocatable :: array(:,:,:)
2724 integer(IK) ,
intent(in) , dimension(
3) :: size
2725 character(
*, SK) ,
intent(out) ,
optional :: errmsg
2726 logical(LK) ,
intent(out) ,
optional :: failed
2731 PURE module subroutine setResizedSDDD_D3_CK1(array, size, failed, errmsg)
2732#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2733 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSDDD_D3_CK1
2736 complex(CKG) ,
intent(inout) ,
allocatable :: array(:,:,:)
2737 integer(IK) ,
intent(in) , dimension(
3) :: size
2738 character(
*, SK) ,
intent(out) ,
optional :: errmsg
2739 logical(LK) ,
intent(out) ,
optional :: failed
2746 PURE module subroutine setResizedSDDD_D3_RK5(array, size, failed, errmsg)
2747#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2748 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSDDD_D3_RK5
2751 real(RKG) ,
intent(inout) ,
allocatable :: array(:,:,:)
2752 integer(IK) ,
intent(in) , dimension(
3) :: size
2753 character(
*, SK) ,
intent(out) ,
optional :: errmsg
2754 logical(LK) ,
intent(out) ,
optional :: failed
2759 PURE module subroutine setResizedSDDD_D3_RK4(array, size, failed, errmsg)
2760#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2761 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSDDD_D3_RK4
2764 real(RKG) ,
intent(inout) ,
allocatable :: array(:,:,:)
2765 integer(IK) ,
intent(in) , dimension(
3) :: size
2766 character(
*, SK) ,
intent(out) ,
optional :: errmsg
2767 logical(LK) ,
intent(out) ,
optional :: failed
2772 PURE module subroutine setResizedSDDD_D3_RK3(array, size, failed, errmsg)
2773#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2774 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSDDD_D3_RK3
2777 real(RKG) ,
intent(inout) ,
allocatable :: array(:,:,:)
2778 integer(IK) ,
intent(in) , dimension(
3) :: size
2779 character(
*, SK) ,
intent(out) ,
optional :: errmsg
2780 logical(LK) ,
intent(out) ,
optional :: failed
2785 PURE module subroutine setResizedSDDD_D3_RK2(array, size, failed, errmsg)
2786#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2787 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSDDD_D3_RK2
2790 real(RKG) ,
intent(inout) ,
allocatable :: array(:,:,:)
2791 integer(IK) ,
intent(in) , dimension(
3) :: size
2792 character(
*, SK) ,
intent(out) ,
optional :: errmsg
2793 logical(LK) ,
intent(out) ,
optional :: failed
2798 PURE module subroutine setResizedSDDD_D3_RK1(array, size, failed, errmsg)
2799#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2800 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSDDD_D3_RK1
2803 real(RKG) ,
intent(inout) ,
allocatable :: array(:,:,:)
2804 integer(IK) ,
intent(in) , dimension(
3) :: size
2805 character(
*, SK) ,
intent(out) ,
optional :: errmsg
2806 logical(LK) ,
intent(out) ,
optional :: failed
2815 module subroutine setResizedSDDD_D3_PSSK5(array, size, failed, errmsg)
2816#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2817 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSDDD_D3_PSSK5
2821 type(css_pdt(SKG)) ,
intent(inout) ,
allocatable :: array(:,:,:)
2822 integer(IK) ,
intent(in) :: size
2823 character(
*, SK) ,
intent(out) ,
optional :: errmsg
2824 logical(LK) ,
intent(out) ,
optional :: failed
2829 module subroutine setResizedSDDD_D3_PSSK4(array, size, failed, errmsg)
2830#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2831 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSDDD_D3_PSSK4
2835 type(css_pdt(SKG)) ,
intent(inout) ,
allocatable :: array(:,:,:)
2836 integer(IK) ,
intent(in) :: size
2837 character(
*, SK) ,
intent(out) ,
optional :: errmsg
2838 logical(LK) ,
intent(out) ,
optional :: failed
2843 module subroutine setResizedSDDD_D3_PSSK3(array, size, failed, errmsg)
2844#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2845 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSDDD_D3_PSSK3
2849 type(css_pdt(SKG)) ,
intent(inout) ,
allocatable :: array(:,:,:)
2850 integer(IK) ,
intent(in) :: size
2851 character(
*, SK) ,
intent(out) ,
optional :: errmsg
2852 logical(LK) ,
intent(out) ,
optional :: failed
2857 module subroutine setResizedSDDD_D3_PSSK2(array, size, failed, errmsg)
2858#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2859 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSDDD_D3_PSSK2
2863 type(css_pdt(SKG)) ,
intent(inout) ,
allocatable :: array(:,:,:)
2864 integer(IK) ,
intent(in) :: size
2865 character(
*, SK) ,
intent(out) ,
optional :: errmsg
2866 logical(LK) ,
intent(out) ,
optional :: failed
2871 module subroutine setResizedSDDD_D3_PSSK1(array, size, failed, errmsg)
2872#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2873 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSDDD_D3_PSSK1
2877 type(css_pdt(SKG)) ,
intent(inout) ,
allocatable :: array(:,:,:)
2878 integer(IK) ,
intent(in) :: size
2879 character(
*, SK) ,
intent(out) ,
optional :: errmsg
2880 logical(LK) ,
intent(out) ,
optional :: failed
2889 module subroutine setResizedSDDD_D3_BSSK(array, size, failed, errmsg)
2890#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2891 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSDDD_D3_BSSK
2895 type(css_type) ,
intent(inout) ,
allocatable :: array(:,:,:)
2896 integer(IK) ,
intent(in) :: size
2897 character(
*, SK) ,
intent(out) ,
optional :: errmsg
2898 logical(LK) ,
intent(out) ,
optional :: failed
2914 PURE module subroutine setResizedSLDD_D0_SK5(array, size, lbc, failed, errmsg)
2915#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2916 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLDD_D0_SK5
2919 character(:,SKG) ,
intent(inout) ,
allocatable :: array
2920 integer(IK) ,
intent(in) :: size, lbc
2921 character(
*, SK) ,
intent(out) ,
optional :: errmsg
2922 logical(LK) ,
intent(out) ,
optional :: failed
2927 PURE module subroutine setResizedSLDD_D0_SK4(array, size, lbc, failed, errmsg)
2928#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2929 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLDD_D0_SK4
2932 character(:,SKG) ,
intent(inout) ,
allocatable :: array
2933 integer(IK) ,
intent(in) :: size, lbc
2934 character(
*, SK) ,
intent(out) ,
optional :: errmsg
2935 logical(LK) ,
intent(out) ,
optional :: failed
2940 PURE module subroutine setResizedSLDD_D0_SK3(array, size, lbc, failed, errmsg)
2941#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2942 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLDD_D0_SK3
2945 character(:,SKG) ,
intent(inout) ,
allocatable :: array
2946 integer(IK) ,
intent(in) :: size, lbc
2947 character(
*, SK) ,
intent(out) ,
optional :: errmsg
2948 logical(LK) ,
intent(out) ,
optional :: failed
2953 PURE module subroutine setResizedSLDD_D0_SK2(array, size, lbc, failed, errmsg)
2954#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2955 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLDD_D0_SK2
2958 character(:,SKG) ,
intent(inout) ,
allocatable :: array
2959 integer(IK) ,
intent(in) :: size, lbc
2960 character(
*, SK) ,
intent(out) ,
optional :: errmsg
2961 logical(LK) ,
intent(out) ,
optional :: failed
2966 PURE module subroutine setResizedSLDD_D0_SK1(array, size, lbc, failed, errmsg)
2967#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2968 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLDD_D0_SK1
2971 character(:,SKG) ,
intent(inout) ,
allocatable :: array
2972 integer(IK) ,
intent(in) :: size, lbc
2973 character(
*, SK) ,
intent(out) ,
optional :: errmsg
2974 logical(LK) ,
intent(out) ,
optional :: failed
2989 PURE module subroutine setResizedSLDD_D1_SK5(array, size, lbc, failed, errmsg)
2990#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
2991 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLDD_D1_SK5
2994 character(
*,SKG) ,
intent(inout) ,
allocatable :: array(:)
2995 integer(IK) ,
intent(in) :: size, lbc
2996 character(
*, SK) ,
intent(out) ,
optional :: errmsg
2997 logical(LK) ,
intent(out) ,
optional :: failed
3002 PURE module subroutine setResizedSLDD_D1_SK4(array, size, lbc, failed, errmsg)
3003#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3004 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLDD_D1_SK4
3007 character(
*,SKG) ,
intent(inout) ,
allocatable :: array(:)
3008 integer(IK) ,
intent(in) :: size, lbc
3009 character(
*, SK) ,
intent(out) ,
optional :: errmsg
3010 logical(LK) ,
intent(out) ,
optional :: failed
3015 PURE module subroutine setResizedSLDD_D1_SK3(array, size, lbc, failed, errmsg)
3016#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3017 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLDD_D1_SK3
3020 character(
*,SKG) ,
intent(inout) ,
allocatable :: array(:)
3021 integer(IK) ,
intent(in) :: size, lbc
3022 character(
*, SK) ,
intent(out) ,
optional :: errmsg
3023 logical(LK) ,
intent(out) ,
optional :: failed
3028 PURE module subroutine setResizedSLDD_D1_SK2(array, size, lbc, failed, errmsg)
3029#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3030 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLDD_D1_SK2
3033 character(
*,SKG) ,
intent(inout) ,
allocatable :: array(:)
3034 integer(IK) ,
intent(in) :: size, lbc
3035 character(
*, SK) ,
intent(out) ,
optional :: errmsg
3036 logical(LK) ,
intent(out) ,
optional :: failed
3041 PURE module subroutine setResizedSLDD_D1_SK1(array, size, lbc, failed, errmsg)
3042#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3043 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLDD_D1_SK1
3046 character(
*,SKG) ,
intent(inout) ,
allocatable :: array(:)
3047 integer(IK) ,
intent(in) :: size, lbc
3048 character(
*, SK) ,
intent(out) ,
optional :: errmsg
3049 logical(LK) ,
intent(out) ,
optional :: failed
3056 PURE module subroutine setResizedSLDD_D1_IK5(array, size, lbc, failed, errmsg)
3057#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3058 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLDD_D1_IK5
3061 integer(IKG) ,
intent(inout) ,
allocatable :: array(:)
3062 integer(IK) ,
intent(in) :: size, lbc
3063 character(
*, SK) ,
intent(out) ,
optional :: errmsg
3064 logical(LK) ,
intent(out) ,
optional :: failed
3069 PURE module subroutine setResizedSLDD_D1_IK4(array, size, lbc, failed, errmsg)
3070#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3071 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLDD_D1_IK4
3074 integer(IKG) ,
intent(inout) ,
allocatable :: array(:)
3075 integer(IK) ,
intent(in) :: size, lbc
3076 character(
*, SK) ,
intent(out) ,
optional :: errmsg
3077 logical(LK) ,
intent(out) ,
optional :: failed
3082 PURE module subroutine setResizedSLDD_D1_IK3(array, size, lbc, failed, errmsg)
3083#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3084 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLDD_D1_IK3
3087 integer(IKG) ,
intent(inout) ,
allocatable :: array(:)
3088 integer(IK) ,
intent(in) :: size, lbc
3089 character(
*, SK) ,
intent(out) ,
optional :: errmsg
3090 logical(LK) ,
intent(out) ,
optional :: failed
3095 PURE module subroutine setResizedSLDD_D1_IK2(array, size, lbc, failed, errmsg)
3096#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3097 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLDD_D1_IK2
3100 integer(IKG) ,
intent(inout) ,
allocatable :: array(:)
3101 integer(IK) ,
intent(in) :: size, lbc
3102 character(
*, SK) ,
intent(out) ,
optional :: errmsg
3103 logical(LK) ,
intent(out) ,
optional :: failed
3108 PURE module subroutine setResizedSLDD_D1_IK1(array, size, lbc, failed, errmsg)
3109#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3110 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLDD_D1_IK1
3113 integer(IKG) ,
intent(inout) ,
allocatable :: array(:)
3114 integer(IK) ,
intent(in) :: size, lbc
3115 character(
*, SK) ,
intent(out) ,
optional :: errmsg
3116 logical(LK) ,
intent(out) ,
optional :: failed
3123 PURE module subroutine setResizedSLDD_D1_LK5(array, size, lbc, failed, errmsg)
3124#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3125 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLDD_D1_LK5
3128 logical(LKG) ,
intent(inout) ,
allocatable :: array(:)
3129 integer(IK) ,
intent(in) :: size, lbc
3130 character(
*, SK) ,
intent(out) ,
optional :: errmsg
3131 logical(LK) ,
intent(out) ,
optional :: failed
3136 PURE module subroutine setResizedSLDD_D1_LK4(array, size, lbc, failed, errmsg)
3137#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3138 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLDD_D1_LK4
3141 logical(LKG) ,
intent(inout) ,
allocatable :: array(:)
3142 integer(IK) ,
intent(in) :: size, lbc
3143 character(
*, SK) ,
intent(out) ,
optional :: errmsg
3144 logical(LK) ,
intent(out) ,
optional :: failed
3149 PURE module subroutine setResizedSLDD_D1_LK3(array, size, lbc, failed, errmsg)
3150#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3151 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLDD_D1_LK3
3154 logical(LKG) ,
intent(inout) ,
allocatable :: array(:)
3155 integer(IK) ,
intent(in) :: size, lbc
3156 character(
*, SK) ,
intent(out) ,
optional :: errmsg
3157 logical(LK) ,
intent(out) ,
optional :: failed
3162 PURE module subroutine setResizedSLDD_D1_LK2(array, size, lbc, failed, errmsg)
3163#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3164 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLDD_D1_LK2
3167 logical(LKG) ,
intent(inout) ,
allocatable :: array(:)
3168 integer(IK) ,
intent(in) :: size, lbc
3169 character(
*, SK) ,
intent(out) ,
optional :: errmsg
3170 logical(LK) ,
intent(out) ,
optional :: failed
3175 PURE module subroutine setResizedSLDD_D1_LK1(array, size, lbc, failed, errmsg)
3176#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3177 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLDD_D1_LK1
3180 logical(LKG) ,
intent(inout) ,
allocatable :: array(:)
3181 integer(IK) ,
intent(in) :: size, lbc
3182 character(
*, SK) ,
intent(out) ,
optional :: errmsg
3183 logical(LK) ,
intent(out) ,
optional :: failed
3190 PURE module subroutine setResizedSLDD_D1_CK5(array, size, lbc, failed, errmsg)
3191#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3192 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLDD_D1_CK5
3195 complex(CKG) ,
intent(inout) ,
allocatable :: array(:)
3196 integer(IK) ,
intent(in) :: size, lbc
3197 character(
*, SK) ,
intent(out) ,
optional :: errmsg
3198 logical(LK) ,
intent(out) ,
optional :: failed
3203 PURE module subroutine setResizedSLDD_D1_CK4(array, size, lbc, failed, errmsg)
3204#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3205 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLDD_D1_CK4
3208 complex(CKG) ,
intent(inout) ,
allocatable :: array(:)
3209 integer(IK) ,
intent(in) :: size, lbc
3210 character(
*, SK) ,
intent(out) ,
optional :: errmsg
3211 logical(LK) ,
intent(out) ,
optional :: failed
3216 PURE module subroutine setResizedSLDD_D1_CK3(array, size, lbc, failed, errmsg)
3217#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3218 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLDD_D1_CK3
3221 complex(CKG) ,
intent(inout) ,
allocatable :: array(:)
3222 integer(IK) ,
intent(in) :: size, lbc
3223 character(
*, SK) ,
intent(out) ,
optional :: errmsg
3224 logical(LK) ,
intent(out) ,
optional :: failed
3229 PURE module subroutine setResizedSLDD_D1_CK2(array, size, lbc, failed, errmsg)
3230#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3231 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLDD_D1_CK2
3234 complex(CKG) ,
intent(inout) ,
allocatable :: array(:)
3235 integer(IK) ,
intent(in) :: size, lbc
3236 character(
*, SK) ,
intent(out) ,
optional :: errmsg
3237 logical(LK) ,
intent(out) ,
optional :: failed
3242 PURE module subroutine setResizedSLDD_D1_CK1(array, size, lbc, failed, errmsg)
3243#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3244 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLDD_D1_CK1
3247 complex(CKG) ,
intent(inout) ,
allocatable :: array(:)
3248 integer(IK) ,
intent(in) :: size, lbc
3249 character(
*, SK) ,
intent(out) ,
optional :: errmsg
3250 logical(LK) ,
intent(out) ,
optional :: failed
3257 PURE module subroutine setResizedSLDD_D1_RK5(array, size, lbc, failed, errmsg)
3258#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3259 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLDD_D1_RK5
3262 real(RKG) ,
intent(inout) ,
allocatable :: array(:)
3263 integer(IK) ,
intent(in) :: size, lbc
3264 character(
*, SK) ,
intent(out) ,
optional :: errmsg
3265 logical(LK) ,
intent(out) ,
optional :: failed
3270 PURE module subroutine setResizedSLDD_D1_RK4(array, size, lbc, failed, errmsg)
3271#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3272 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLDD_D1_RK4
3275 real(RKG) ,
intent(inout) ,
allocatable :: array(:)
3276 integer(IK) ,
intent(in) :: size, lbc
3277 character(
*, SK) ,
intent(out) ,
optional :: errmsg
3278 logical(LK) ,
intent(out) ,
optional :: failed
3283 PURE module subroutine setResizedSLDD_D1_RK3(array, size, lbc, failed, errmsg)
3284#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3285 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLDD_D1_RK3
3288 real(RKG) ,
intent(inout) ,
allocatable :: array(:)
3289 integer(IK) ,
intent(in) :: size, lbc
3290 character(
*, SK) ,
intent(out) ,
optional :: errmsg
3291 logical(LK) ,
intent(out) ,
optional :: failed
3296 PURE module subroutine setResizedSLDD_D1_RK2(array, size, lbc, failed, errmsg)
3297#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3298 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLDD_D1_RK2
3301 real(RKG) ,
intent(inout) ,
allocatable :: array(:)
3302 integer(IK) ,
intent(in) :: size, lbc
3303 character(
*, SK) ,
intent(out) ,
optional :: errmsg
3304 logical(LK) ,
intent(out) ,
optional :: failed
3309 PURE module subroutine setResizedSLDD_D1_RK1(array, size, lbc, failed, errmsg)
3310#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3311 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLDD_D1_RK1
3314 real(RKG) ,
intent(inout) ,
allocatable :: array(:)
3315 integer(IK) ,
intent(in) :: size, lbc
3316 character(
*, SK) ,
intent(out) ,
optional :: errmsg
3317 logical(LK) ,
intent(out) ,
optional :: failed
3326 module subroutine setResizedSLDD_D1_PSSK5(array, size, lbc, failed, errmsg)
3327#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3328 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLDD_D1_PSSK5
3332 type(css_pdt(SKG)) ,
intent(inout) ,
allocatable :: array(:)
3333 integer(IK) ,
intent(in) :: size, lbc
3334 character(
*, SK) ,
intent(out) ,
optional :: errmsg
3335 logical(LK) ,
intent(out) ,
optional :: failed
3340 module subroutine setResizedSLDD_D1_PSSK4(array, size, lbc, failed, errmsg)
3341#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3342 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLDD_D1_PSSK4
3346 type(css_pdt(SKG)) ,
intent(inout) ,
allocatable :: array(:)
3347 integer(IK) ,
intent(in) :: size, lbc
3348 character(
*, SK) ,
intent(out) ,
optional :: errmsg
3349 logical(LK) ,
intent(out) ,
optional :: failed
3354 module subroutine setResizedSLDD_D1_PSSK3(array, size, lbc, failed, errmsg)
3355#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3356 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLDD_D1_PSSK3
3360 type(css_pdt(SKG)) ,
intent(inout) ,
allocatable :: array(:)
3361 integer(IK) ,
intent(in) :: size, lbc
3362 character(
*, SK) ,
intent(out) ,
optional :: errmsg
3363 logical(LK) ,
intent(out) ,
optional :: failed
3368 module subroutine setResizedSLDD_D1_PSSK2(array, size, lbc, failed, errmsg)
3369#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3370 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLDD_D1_PSSK2
3374 type(css_pdt(SKG)) ,
intent(inout) ,
allocatable :: array(:)
3375 integer(IK) ,
intent(in) :: size, lbc
3376 character(
*, SK) ,
intent(out) ,
optional :: errmsg
3377 logical(LK) ,
intent(out) ,
optional :: failed
3382 module subroutine setResizedSLDD_D1_PSSK1(array, size, lbc, failed, errmsg)
3383#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3384 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLDD_D1_PSSK1
3388 type(css_pdt(SKG)) ,
intent(inout) ,
allocatable :: array(:)
3389 integer(IK) ,
intent(in) :: size, lbc
3390 character(
*, SK) ,
intent(out) ,
optional :: errmsg
3391 logical(LK) ,
intent(out) ,
optional :: failed
3400 module subroutine setResizedSLDD_D1_BSSK(array, size, lbc, failed, errmsg)
3401#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3402 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLDD_D1_BSSK
3406 type(css_type) ,
intent(inout) ,
allocatable :: array(:)
3407 integer(IK) ,
intent(in) :: size, lbc
3408 character(
*, SK) ,
intent(out) ,
optional :: errmsg
3409 logical(LK) ,
intent(out) ,
optional :: failed
3423 PURE module subroutine setResizedSLDD_D2_SK5(array, size, lbc, failed, errmsg)
3424#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3425 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLDD_D2_SK5
3428 character(
*,SKG) ,
intent(inout) ,
allocatable :: array(:,:)
3429 integer(IK) ,
intent(in) , dimension(
2) :: size, lbc
3430 character(
*, SK) ,
intent(out) ,
optional :: errmsg
3431 logical(LK) ,
intent(out) ,
optional :: failed
3436 PURE module subroutine setResizedSLDD_D2_SK4(array, size, lbc, failed, errmsg)
3437#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3438 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLDD_D2_SK4
3441 character(
*,SKG) ,
intent(inout) ,
allocatable :: array(:,:)
3442 integer(IK) ,
intent(in) , dimension(
2) :: size, lbc
3443 character(
*, SK) ,
intent(out) ,
optional :: errmsg
3444 logical(LK) ,
intent(out) ,
optional :: failed
3449 PURE module subroutine setResizedSLDD_D2_SK3(array, size, lbc, failed, errmsg)
3450#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3451 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLDD_D2_SK3
3454 character(
*,SKG) ,
intent(inout) ,
allocatable :: array(:,:)
3455 integer(IK) ,
intent(in) , dimension(
2) :: size, lbc
3456 character(
*, SK) ,
intent(out) ,
optional :: errmsg
3457 logical(LK) ,
intent(out) ,
optional :: failed
3462 PURE module subroutine setResizedSLDD_D2_SK2(array, size, lbc, failed, errmsg)
3463#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3464 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLDD_D2_SK2
3467 character(
*,SKG) ,
intent(inout) ,
allocatable :: array(:,:)
3468 integer(IK) ,
intent(in) , dimension(
2) :: size, lbc
3469 character(
*, SK) ,
intent(out) ,
optional :: errmsg
3470 logical(LK) ,
intent(out) ,
optional :: failed
3475 PURE module subroutine setResizedSLDD_D2_SK1(array, size, lbc, failed, errmsg)
3476#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3477 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLDD_D2_SK1
3480 character(
*,SKG) ,
intent(inout) ,
allocatable :: array(:,:)
3481 integer(IK) ,
intent(in) , dimension(
2) :: size, lbc
3482 character(
*, SK) ,
intent(out) ,
optional :: errmsg
3483 logical(LK) ,
intent(out) ,
optional :: failed
3490 PURE module subroutine setResizedSLDD_D2_IK5(array, size, lbc, failed, errmsg)
3491#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3492 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLDD_D2_IK5
3495 integer(IKG) ,
intent(inout) ,
allocatable :: array(:,:)
3496 integer(IK) ,
intent(in) , dimension(
2) :: size, lbc
3497 character(
*, SK) ,
intent(out) ,
optional :: errmsg
3498 logical(LK) ,
intent(out) ,
optional :: failed
3503 PURE module subroutine setResizedSLDD_D2_IK4(array, size, lbc, failed, errmsg)
3504#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3505 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLDD_D2_IK4
3508 integer(IKG) ,
intent(inout) ,
allocatable :: array(:,:)
3509 integer(IK) ,
intent(in) , dimension(
2) :: size, lbc
3510 character(
*, SK) ,
intent(out) ,
optional :: errmsg
3511 logical(LK) ,
intent(out) ,
optional :: failed
3516 PURE module subroutine setResizedSLDD_D2_IK3(array, size, lbc, failed, errmsg)
3517#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3518 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLDD_D2_IK3
3521 integer(IKG) ,
intent(inout) ,
allocatable :: array(:,:)
3522 integer(IK) ,
intent(in) , dimension(
2) :: size, lbc
3523 character(
*, SK) ,
intent(out) ,
optional :: errmsg
3524 logical(LK) ,
intent(out) ,
optional :: failed
3529 PURE module subroutine setResizedSLDD_D2_IK2(array, size, lbc, failed, errmsg)
3530#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3531 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLDD_D2_IK2
3534 integer(IKG) ,
intent(inout) ,
allocatable :: array(:,:)
3535 integer(IK) ,
intent(in) , dimension(
2) :: size, lbc
3536 character(
*, SK) ,
intent(out) ,
optional :: errmsg
3537 logical(LK) ,
intent(out) ,
optional :: failed
3542 PURE module subroutine setResizedSLDD_D2_IK1(array, size, lbc, failed, errmsg)
3543#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3544 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLDD_D2_IK1
3547 integer(IKG) ,
intent(inout) ,
allocatable :: array(:,:)
3548 integer(IK) ,
intent(in) , dimension(
2) :: size, lbc
3549 character(
*, SK) ,
intent(out) ,
optional :: errmsg
3550 logical(LK) ,
intent(out) ,
optional :: failed
3557 PURE module subroutine setResizedSLDD_D2_LK5(array, size, lbc, failed, errmsg)
3558#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3559 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLDD_D2_LK5
3562 logical(LKG) ,
intent(inout) ,
allocatable :: array(:,:)
3563 integer(IK) ,
intent(in) , dimension(
2) :: size, lbc
3564 character(
*, SK) ,
intent(out) ,
optional :: errmsg
3565 logical(LK) ,
intent(out) ,
optional :: failed
3570 PURE module subroutine setResizedSLDD_D2_LK4(array, size, lbc, failed, errmsg)
3571#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3572 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLDD_D2_LK4
3575 logical(LKG) ,
intent(inout) ,
allocatable :: array(:,:)
3576 integer(IK) ,
intent(in) , dimension(
2) :: size, lbc
3577 character(
*, SK) ,
intent(out) ,
optional :: errmsg
3578 logical(LK) ,
intent(out) ,
optional :: failed
3583 PURE module subroutine setResizedSLDD_D2_LK3(array, size, lbc, failed, errmsg)
3584#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3585 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLDD_D2_LK3
3588 logical(LKG) ,
intent(inout) ,
allocatable :: array(:,:)
3589 integer(IK) ,
intent(in) , dimension(
2) :: size, lbc
3590 character(
*, SK) ,
intent(out) ,
optional :: errmsg
3591 logical(LK) ,
intent(out) ,
optional :: failed
3596 PURE module subroutine setResizedSLDD_D2_LK2(array, size, lbc, failed, errmsg)
3597#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3598 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLDD_D2_LK2
3601 logical(LKG) ,
intent(inout) ,
allocatable :: array(:,:)
3602 integer(IK) ,
intent(in) , dimension(
2) :: size, lbc
3603 character(
*, SK) ,
intent(out) ,
optional :: errmsg
3604 logical(LK) ,
intent(out) ,
optional :: failed
3609 PURE module subroutine setResizedSLDD_D2_LK1(array, size, lbc, failed, errmsg)
3610#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3611 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLDD_D2_LK1
3614 logical(LKG) ,
intent(inout) ,
allocatable :: array(:,:)
3615 integer(IK) ,
intent(in) , dimension(
2) :: size, lbc
3616 character(
*, SK) ,
intent(out) ,
optional :: errmsg
3617 logical(LK) ,
intent(out) ,
optional :: failed
3624 PURE module subroutine setResizedSLDD_D2_CK5(array, size, lbc, failed, errmsg)
3625#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3626 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLDD_D2_CK5
3629 complex(CKG) ,
intent(inout) ,
allocatable :: array(:,:)
3630 integer(IK) ,
intent(in) , dimension(
2) :: size, lbc
3631 character(
*, SK) ,
intent(out) ,
optional :: errmsg
3632 logical(LK) ,
intent(out) ,
optional :: failed
3637 PURE module subroutine setResizedSLDD_D2_CK4(array, size, lbc, failed, errmsg)
3638#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3639 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLDD_D2_CK4
3642 complex(CKG) ,
intent(inout) ,
allocatable :: array(:,:)
3643 integer(IK) ,
intent(in) , dimension(
2) :: size, lbc
3644 character(
*, SK) ,
intent(out) ,
optional :: errmsg
3645 logical(LK) ,
intent(out) ,
optional :: failed
3650 PURE module subroutine setResizedSLDD_D2_CK3(array, size, lbc, failed, errmsg)
3651#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3652 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLDD_D2_CK3
3655 complex(CKG) ,
intent(inout) ,
allocatable :: array(:,:)
3656 integer(IK) ,
intent(in) , dimension(
2) :: size, lbc
3657 character(
*, SK) ,
intent(out) ,
optional :: errmsg
3658 logical(LK) ,
intent(out) ,
optional :: failed
3663 PURE module subroutine setResizedSLDD_D2_CK2(array, size, lbc, failed, errmsg)
3664#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3665 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLDD_D2_CK2
3668 complex(CKG) ,
intent(inout) ,
allocatable :: array(:,:)
3669 integer(IK) ,
intent(in) , dimension(
2) :: size, lbc
3670 character(
*, SK) ,
intent(out) ,
optional :: errmsg
3671 logical(LK) ,
intent(out) ,
optional :: failed
3676 PURE module subroutine setResizedSLDD_D2_CK1(array, size, lbc, failed, errmsg)
3677#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3678 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLDD_D2_CK1
3681 complex(CKG) ,
intent(inout) ,
allocatable :: array(:,:)
3682 integer(IK) ,
intent(in) , dimension(
2) :: size, lbc
3683 character(
*, SK) ,
intent(out) ,
optional :: errmsg
3684 logical(LK) ,
intent(out) ,
optional :: failed
3691 PURE module subroutine setResizedSLDD_D2_RK5(array, size, lbc, failed, errmsg)
3692#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3693 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLDD_D2_RK5
3696 real(RKG) ,
intent(inout) ,
allocatable :: array(:,:)
3697 integer(IK) ,
intent(in) , dimension(
2) :: size, lbc
3698 character(
*, SK) ,
intent(out) ,
optional :: errmsg
3699 logical(LK) ,
intent(out) ,
optional :: failed
3704 PURE module subroutine setResizedSLDD_D2_RK4(array, size, lbc, failed, errmsg)
3705#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3706 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLDD_D2_RK4
3709 real(RKG) ,
intent(inout) ,
allocatable :: array(:,:)
3710 integer(IK) ,
intent(in) , dimension(
2) :: size, lbc
3711 character(
*, SK) ,
intent(out) ,
optional :: errmsg
3712 logical(LK) ,
intent(out) ,
optional :: failed
3717 PURE module subroutine setResizedSLDD_D2_RK3(array, size, lbc, failed, errmsg)
3718#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3719 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLDD_D2_RK3
3722 real(RKG) ,
intent(inout) ,
allocatable :: array(:,:)
3723 integer(IK) ,
intent(in) , dimension(
2) :: size, lbc
3724 character(
*, SK) ,
intent(out) ,
optional :: errmsg
3725 logical(LK) ,
intent(out) ,
optional :: failed
3730 PURE module subroutine setResizedSLDD_D2_RK2(array, size, lbc, failed, errmsg)
3731#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3732 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLDD_D2_RK2
3735 real(RKG) ,
intent(inout) ,
allocatable :: array(:,:)
3736 integer(IK) ,
intent(in) , dimension(
2) :: size, lbc
3737 character(
*, SK) ,
intent(out) ,
optional :: errmsg
3738 logical(LK) ,
intent(out) ,
optional :: failed
3743 PURE module subroutine setResizedSLDD_D2_RK1(array, size, lbc, failed, errmsg)
3744#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3745 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLDD_D2_RK1
3748 real(RKG) ,
intent(inout) ,
allocatable :: array(:,:)
3749 integer(IK) ,
intent(in) , dimension(
2) :: size, lbc
3750 character(
*, SK) ,
intent(out) ,
optional :: errmsg
3751 logical(LK) ,
intent(out) ,
optional :: failed
3760 module subroutine setResizedSLDD_D2_PSSK5(array, size, lbc, failed, errmsg)
3761#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3762 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLDD_D2_PSSK5
3766 type(css_pdt(SKG)) ,
intent(inout) ,
allocatable :: array(:,:)
3767 integer(IK) ,
intent(in) , dimension(
2) :: size, lbc
3768 character(
*, SK) ,
intent(out) ,
optional :: errmsg
3769 logical(LK) ,
intent(out) ,
optional :: failed
3774 module subroutine setResizedSLDD_D2_PSSK4(array, size, lbc, failed, errmsg)
3775#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3776 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLDD_D2_PSSK4
3780 type(css_pdt(SKG)) ,
intent(inout) ,
allocatable :: array(:,:)
3781 integer(IK) ,
intent(in) , dimension(
2) :: size, lbc
3782 character(
*, SK) ,
intent(out) ,
optional :: errmsg
3783 logical(LK) ,
intent(out) ,
optional :: failed
3788 module subroutine setResizedSLDD_D2_PSSK3(array, size, lbc, failed, errmsg)
3789#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3790 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLDD_D2_PSSK3
3794 type(css_pdt(SKG)) ,
intent(inout) ,
allocatable :: array(:,:)
3795 integer(IK) ,
intent(in) , dimension(
2) :: size, lbc
3796 character(
*, SK) ,
intent(out) ,
optional :: errmsg
3797 logical(LK) ,
intent(out) ,
optional :: failed
3802 module subroutine setResizedSLDD_D2_PSSK2(array, size, lbc, failed, errmsg)
3803#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3804 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLDD_D2_PSSK2
3808 type(css_pdt(SKG)) ,
intent(inout) ,
allocatable :: array(:,:)
3809 integer(IK) ,
intent(in) , dimension(
2) :: size, lbc
3810 character(
*, SK) ,
intent(out) ,
optional :: errmsg
3811 logical(LK) ,
intent(out) ,
optional :: failed
3816 module subroutine setResizedSLDD_D2_PSSK1(array, size, lbc, failed, errmsg)
3817#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3818 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLDD_D2_PSSK1
3822 type(css_pdt(SKG)) ,
intent(inout) ,
allocatable :: array(:,:)
3823 integer(IK) ,
intent(in) , dimension(
2) :: size, lbc
3824 character(
*, SK) ,
intent(out) ,
optional :: errmsg
3825 logical(LK) ,
intent(out) ,
optional :: failed
3834 module subroutine setResizedSLDD_D2_BSSK(array, size, lbc, failed, errmsg)
3835#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3836 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLDD_D2_BSSK
3840 type(css_type) ,
intent(inout) ,
allocatable :: array(:,:)
3841 integer(IK) ,
intent(in) , dimension(
2) :: size, lbc
3842 character(
*, SK) ,
intent(out) ,
optional :: errmsg
3843 logical(LK) ,
intent(out) ,
optional :: failed
3857 PURE module subroutine setResizedSLDD_D3_SK5(array, size, lbc, failed, errmsg)
3858#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3859 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLDD_D3_SK5
3862 character(
*,SKG) ,
intent(inout) ,
allocatable :: array(:,:,:)
3863 integer(IK) ,
intent(in) , dimension(
3) :: size, lbc
3864 character(
*, SK) ,
intent(out) ,
optional :: errmsg
3865 logical(LK) ,
intent(out) ,
optional :: failed
3870 PURE module subroutine setResizedSLDD_D3_SK4(array, size, lbc, failed, errmsg)
3871#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3872 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLDD_D3_SK4
3875 character(
*,SKG) ,
intent(inout) ,
allocatable :: array(:,:,:)
3876 integer(IK) ,
intent(in) , dimension(
3) :: size, lbc
3877 character(
*, SK) ,
intent(out) ,
optional :: errmsg
3878 logical(LK) ,
intent(out) ,
optional :: failed
3883 PURE module subroutine setResizedSLDD_D3_SK3(array, size, lbc, failed, errmsg)
3884#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3885 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLDD_D3_SK3
3888 character(
*,SKG) ,
intent(inout) ,
allocatable :: array(:,:,:)
3889 integer(IK) ,
intent(in) , dimension(
3) :: size, lbc
3890 character(
*, SK) ,
intent(out) ,
optional :: errmsg
3891 logical(LK) ,
intent(out) ,
optional :: failed
3896 PURE module subroutine setResizedSLDD_D3_SK2(array, size, lbc, failed, errmsg)
3897#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3898 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLDD_D3_SK2
3901 character(
*,SKG) ,
intent(inout) ,
allocatable :: array(:,:,:)
3902 integer(IK) ,
intent(in) , dimension(
3) :: size, lbc
3903 character(
*, SK) ,
intent(out) ,
optional :: errmsg
3904 logical(LK) ,
intent(out) ,
optional :: failed
3909 PURE module subroutine setResizedSLDD_D3_SK1(array, size, lbc, failed, errmsg)
3910#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3911 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLDD_D3_SK1
3914 character(
*,SKG) ,
intent(inout) ,
allocatable :: array(:,:,:)
3915 integer(IK) ,
intent(in) , dimension(
3) :: size, lbc
3916 character(
*, SK) ,
intent(out) ,
optional :: errmsg
3917 logical(LK) ,
intent(out) ,
optional :: failed
3924 PURE module subroutine setResizedSLDD_D3_IK5(array, size, lbc, failed, errmsg)
3925#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3926 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLDD_D3_IK5
3929 integer(IKG) ,
intent(inout) ,
allocatable :: array(:,:,:)
3930 integer(IK) ,
intent(in) , dimension(
3) :: size, lbc
3931 character(
*, SK) ,
intent(out) ,
optional :: errmsg
3932 logical(LK) ,
intent(out) ,
optional :: failed
3937 PURE module subroutine setResizedSLDD_D3_IK4(array, size, lbc, failed, errmsg)
3938#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3939 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLDD_D3_IK4
3942 integer(IKG) ,
intent(inout) ,
allocatable :: array(:,:,:)
3943 integer(IK) ,
intent(in) , dimension(
3) :: size, lbc
3944 character(
*, SK) ,
intent(out) ,
optional :: errmsg
3945 logical(LK) ,
intent(out) ,
optional :: failed
3950 PURE module subroutine setResizedSLDD_D3_IK3(array, size, lbc, failed, errmsg)
3951#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3952 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLDD_D3_IK3
3955 integer(IKG) ,
intent(inout) ,
allocatable :: array(:,:,:)
3956 integer(IK) ,
intent(in) , dimension(
3) :: size, lbc
3957 character(
*, SK) ,
intent(out) ,
optional :: errmsg
3958 logical(LK) ,
intent(out) ,
optional :: failed
3963 PURE module subroutine setResizedSLDD_D3_IK2(array, size, lbc, failed, errmsg)
3964#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3965 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLDD_D3_IK2
3968 integer(IKG) ,
intent(inout) ,
allocatable :: array(:,:,:)
3969 integer(IK) ,
intent(in) , dimension(
3) :: size, lbc
3970 character(
*, SK) ,
intent(out) ,
optional :: errmsg
3971 logical(LK) ,
intent(out) ,
optional :: failed
3976 PURE module subroutine setResizedSLDD_D3_IK1(array, size, lbc, failed, errmsg)
3977#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3978 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLDD_D3_IK1
3981 integer(IKG) ,
intent(inout) ,
allocatable :: array(:,:,:)
3982 integer(IK) ,
intent(in) , dimension(
3) :: size, lbc
3983 character(
*, SK) ,
intent(out) ,
optional :: errmsg
3984 logical(LK) ,
intent(out) ,
optional :: failed
3991 PURE module subroutine setResizedSLDD_D3_LK5(array, size, lbc, failed, errmsg)
3992#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
3993 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLDD_D3_LK5
3996 logical(LKG) ,
intent(inout) ,
allocatable :: array(:,:,:)
3997 integer(IK) ,
intent(in) , dimension(
3) :: size, lbc
3998 character(
*, SK) ,
intent(out) ,
optional :: errmsg
3999 logical(LK) ,
intent(out) ,
optional :: failed
4004 PURE module subroutine setResizedSLDD_D3_LK4(array, size, lbc, failed, errmsg)
4005#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4006 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLDD_D3_LK4
4009 logical(LKG) ,
intent(inout) ,
allocatable :: array(:,:,:)
4010 integer(IK) ,
intent(in) , dimension(
3) :: size, lbc
4011 character(
*, SK) ,
intent(out) ,
optional :: errmsg
4012 logical(LK) ,
intent(out) ,
optional :: failed
4017 PURE module subroutine setResizedSLDD_D3_LK3(array, size, lbc, failed, errmsg)
4018#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4019 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLDD_D3_LK3
4022 logical(LKG) ,
intent(inout) ,
allocatable :: array(:,:,:)
4023 integer(IK) ,
intent(in) , dimension(
3) :: size, lbc
4024 character(
*, SK) ,
intent(out) ,
optional :: errmsg
4025 logical(LK) ,
intent(out) ,
optional :: failed
4030 PURE module subroutine setResizedSLDD_D3_LK2(array, size, lbc, failed, errmsg)
4031#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4032 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLDD_D3_LK2
4035 logical(LKG) ,
intent(inout) ,
allocatable :: array(:,:,:)
4036 integer(IK) ,
intent(in) , dimension(
3) :: size, lbc
4037 character(
*, SK) ,
intent(out) ,
optional :: errmsg
4038 logical(LK) ,
intent(out) ,
optional :: failed
4043 PURE module subroutine setResizedSLDD_D3_LK1(array, size, lbc, failed, errmsg)
4044#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4045 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLDD_D3_LK1
4048 logical(LKG) ,
intent(inout) ,
allocatable :: array(:,:,:)
4049 integer(IK) ,
intent(in) , dimension(
3) :: size, lbc
4050 character(
*, SK) ,
intent(out) ,
optional :: errmsg
4051 logical(LK) ,
intent(out) ,
optional :: failed
4058 PURE module subroutine setResizedSLDD_D3_CK5(array, size, lbc, failed, errmsg)
4059#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4060 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLDD_D3_CK5
4063 complex(CKG) ,
intent(inout) ,
allocatable :: array(:,:,:)
4064 integer(IK) ,
intent(in) , dimension(
3) :: size, lbc
4065 character(
*, SK) ,
intent(out) ,
optional :: errmsg
4066 logical(LK) ,
intent(out) ,
optional :: failed
4071 PURE module subroutine setResizedSLDD_D3_CK4(array, size, lbc, failed, errmsg)
4072#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4073 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLDD_D3_CK4
4076 complex(CKG) ,
intent(inout) ,
allocatable :: array(:,:,:)
4077 integer(IK) ,
intent(in) , dimension(
3) :: size, lbc
4078 character(
*, SK) ,
intent(out) ,
optional :: errmsg
4079 logical(LK) ,
intent(out) ,
optional :: failed
4084 PURE module subroutine setResizedSLDD_D3_CK3(array, size, lbc, failed, errmsg)
4085#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4086 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLDD_D3_CK3
4089 complex(CKG) ,
intent(inout) ,
allocatable :: array(:,:,:)
4090 integer(IK) ,
intent(in) , dimension(
3) :: size, lbc
4091 character(
*, SK) ,
intent(out) ,
optional :: errmsg
4092 logical(LK) ,
intent(out) ,
optional :: failed
4097 PURE module subroutine setResizedSLDD_D3_CK2(array, size, lbc, failed, errmsg)
4098#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4099 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLDD_D3_CK2
4102 complex(CKG) ,
intent(inout) ,
allocatable :: array(:,:,:)
4103 integer(IK) ,
intent(in) , dimension(
3) :: size, lbc
4104 character(
*, SK) ,
intent(out) ,
optional :: errmsg
4105 logical(LK) ,
intent(out) ,
optional :: failed
4110 PURE module subroutine setResizedSLDD_D3_CK1(array, size, lbc, failed, errmsg)
4111#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4112 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLDD_D3_CK1
4115 complex(CKG) ,
intent(inout) ,
allocatable :: array(:,:,:)
4116 integer(IK) ,
intent(in) , dimension(
3) :: size, lbc
4117 character(
*, SK) ,
intent(out) ,
optional :: errmsg
4118 logical(LK) ,
intent(out) ,
optional :: failed
4125 PURE module subroutine setResizedSLDD_D3_RK5(array, size, lbc, failed, errmsg)
4126#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4127 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLDD_D3_RK5
4130 real(RKG) ,
intent(inout) ,
allocatable :: array(:,:,:)
4131 integer(IK) ,
intent(in) , dimension(
3) :: size, lbc
4132 character(
*, SK) ,
intent(out) ,
optional :: errmsg
4133 logical(LK) ,
intent(out) ,
optional :: failed
4138 PURE module subroutine setResizedSLDD_D3_RK4(array, size, lbc, failed, errmsg)
4139#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4140 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLDD_D3_RK4
4143 real(RKG) ,
intent(inout) ,
allocatable :: array(:,:,:)
4144 integer(IK) ,
intent(in) , dimension(
3) :: size, lbc
4145 character(
*, SK) ,
intent(out) ,
optional :: errmsg
4146 logical(LK) ,
intent(out) ,
optional :: failed
4151 PURE module subroutine setResizedSLDD_D3_RK3(array, size, lbc, failed, errmsg)
4152#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4153 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLDD_D3_RK3
4156 real(RKG) ,
intent(inout) ,
allocatable :: array(:,:,:)
4157 integer(IK) ,
intent(in) , dimension(
3) :: size, lbc
4158 character(
*, SK) ,
intent(out) ,
optional :: errmsg
4159 logical(LK) ,
intent(out) ,
optional :: failed
4164 PURE module subroutine setResizedSLDD_D3_RK2(array, size, lbc, failed, errmsg)
4165#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4166 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLDD_D3_RK2
4169 real(RKG) ,
intent(inout) ,
allocatable :: array(:,:,:)
4170 integer(IK) ,
intent(in) , dimension(
3) :: size, lbc
4171 character(
*, SK) ,
intent(out) ,
optional :: errmsg
4172 logical(LK) ,
intent(out) ,
optional :: failed
4177 PURE module subroutine setResizedSLDD_D3_RK1(array, size, lbc, failed, errmsg)
4178#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4179 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLDD_D3_RK1
4182 real(RKG) ,
intent(inout) ,
allocatable :: array(:,:,:)
4183 integer(IK) ,
intent(in) , dimension(
3) :: size, lbc
4184 character(
*, SK) ,
intent(out) ,
optional :: errmsg
4185 logical(LK) ,
intent(out) ,
optional :: failed
4194 module subroutine setResizedSLDD_D3_PSSK5(array, size, lbc, failed, errmsg)
4195#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4196 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLDD_D3_PSSK5
4200 type(css_pdt(SKG)) ,
intent(inout) ,
allocatable :: array(:,:,:)
4201 integer(IK) ,
intent(in) , dimension(
3) :: size, lbc
4202 character(
*, SK) ,
intent(out) ,
optional :: errmsg
4203 logical(LK) ,
intent(out) ,
optional :: failed
4208 module subroutine setResizedSLDD_D3_PSSK4(array, size, lbc, failed, errmsg)
4209#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4210 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLDD_D3_PSSK4
4214 type(css_pdt(SKG)) ,
intent(inout) ,
allocatable :: array(:,:,:)
4215 integer(IK) ,
intent(in) , dimension(
3) :: size, lbc
4216 character(
*, SK) ,
intent(out) ,
optional :: errmsg
4217 logical(LK) ,
intent(out) ,
optional :: failed
4222 module subroutine setResizedSLDD_D3_PSSK3(array, size, lbc, failed, errmsg)
4223#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4224 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLDD_D3_PSSK3
4228 type(css_pdt(SKG)) ,
intent(inout) ,
allocatable :: array(:,:,:)
4229 integer(IK) ,
intent(in) , dimension(
3) :: size, lbc
4230 character(
*, SK) ,
intent(out) ,
optional :: errmsg
4231 logical(LK) ,
intent(out) ,
optional :: failed
4236 module subroutine setResizedSLDD_D3_PSSK2(array, size, lbc, failed, errmsg)
4237#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4238 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLDD_D3_PSSK2
4242 type(css_pdt(SKG)) ,
intent(inout) ,
allocatable :: array(:,:,:)
4243 integer(IK) ,
intent(in) , dimension(
3) :: size, lbc
4244 character(
*, SK) ,
intent(out) ,
optional :: errmsg
4245 logical(LK) ,
intent(out) ,
optional :: failed
4250 module subroutine setResizedSLDD_D3_PSSK1(array, size, lbc, failed, errmsg)
4251#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4252 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLDD_D3_PSSK1
4256 type(css_pdt(SKG)) ,
intent(inout) ,
allocatable :: array(:,:,:)
4257 integer(IK) ,
intent(in) , dimension(
3) :: size, lbc
4258 character(
*, SK) ,
intent(out) ,
optional :: errmsg
4259 logical(LK) ,
intent(out) ,
optional :: failed
4268 module subroutine setResizedSLDD_D3_BSSK(array, size, lbc, failed, errmsg)
4269#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4270 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLDD_D3_BSSK
4274 type(css_type) ,
intent(inout) ,
allocatable :: array(:,:,:)
4275 integer(IK) ,
intent(in) , dimension(
3) :: size, lbc
4276 character(
*, SK) ,
intent(out) ,
optional :: errmsg
4277 logical(LK) ,
intent(out) ,
optional :: failed
4293 PURE module subroutine setResizedSLLU_D0_SK5(array, size, lbc, lbcold, ubcold, failed, errmsg)
4294#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4295 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLLU_D0_SK5
4298 character(:,SKG) ,
intent(inout) ,
allocatable :: array
4299 integer(IK) ,
intent(in) :: size, lbc, lbcold, ubcold
4300 character(
*, SK) ,
intent(out) ,
optional :: errmsg
4301 logical(LK) ,
intent(out) ,
optional :: failed
4306 PURE module subroutine setResizedSLLU_D0_SK4(array, size, lbc, lbcold, ubcold, failed, errmsg)
4307#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4308 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLLU_D0_SK4
4311 character(:,SKG) ,
intent(inout) ,
allocatable :: array
4312 integer(IK) ,
intent(in) :: size, lbc, lbcold, ubcold
4313 character(
*, SK) ,
intent(out) ,
optional :: errmsg
4314 logical(LK) ,
intent(out) ,
optional :: failed
4319 PURE module subroutine setResizedSLLU_D0_SK3(array, size, lbc, lbcold, ubcold, failed, errmsg)
4320#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4321 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLLU_D0_SK3
4324 character(:,SKG) ,
intent(inout) ,
allocatable :: array
4325 integer(IK) ,
intent(in) :: size, lbc, lbcold, ubcold
4326 character(
*, SK) ,
intent(out) ,
optional :: errmsg
4327 logical(LK) ,
intent(out) ,
optional :: failed
4332 PURE module subroutine setResizedSLLU_D0_SK2(array, size, lbc, lbcold, ubcold, failed, errmsg)
4333#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4334 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLLU_D0_SK2
4337 character(:,SKG) ,
intent(inout) ,
allocatable :: array
4338 integer(IK) ,
intent(in) :: size, lbc, lbcold, ubcold
4339 character(
*, SK) ,
intent(out) ,
optional :: errmsg
4340 logical(LK) ,
intent(out) ,
optional :: failed
4345 PURE module subroutine setResizedSLLU_D0_SK1(array, size, lbc, lbcold, ubcold, failed, errmsg)
4346#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4347 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLLU_D0_SK1
4350 character(:,SKG) ,
intent(inout) ,
allocatable :: array
4351 integer(IK) ,
intent(in) :: size, lbc, lbcold, ubcold
4352 character(
*, SK) ,
intent(out) ,
optional :: errmsg
4353 logical(LK) ,
intent(out) ,
optional :: failed
4368 PURE module subroutine setResizedSLLU_D1_SK5(array, size, lbc, lbcold, ubcold, failed, errmsg)
4369#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4370 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLLU_D1_SK5
4373 character(
*,SKG) ,
intent(inout) ,
allocatable :: array(:)
4374 integer(IK) ,
intent(in) :: size, lbc, lbcold, ubcold
4375 character(
*, SK) ,
intent(out) ,
optional :: errmsg
4376 logical(LK) ,
intent(out) ,
optional :: failed
4381 PURE module subroutine setResizedSLLU_D1_SK4(array, size, lbc, lbcold, ubcold, failed, errmsg)
4382#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4383 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLLU_D1_SK4
4386 character(
*,SKG) ,
intent(inout) ,
allocatable :: array(:)
4387 integer(IK) ,
intent(in) :: size, lbc, lbcold, ubcold
4388 character(
*, SK) ,
intent(out) ,
optional :: errmsg
4389 logical(LK) ,
intent(out) ,
optional :: failed
4394 PURE module subroutine setResizedSLLU_D1_SK3(array, size, lbc, lbcold, ubcold, failed, errmsg)
4395#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4396 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLLU_D1_SK3
4399 character(
*,SKG) ,
intent(inout) ,
allocatable :: array(:)
4400 integer(IK) ,
intent(in) :: size, lbc, lbcold, ubcold
4401 character(
*, SK) ,
intent(out) ,
optional :: errmsg
4402 logical(LK) ,
intent(out) ,
optional :: failed
4407 PURE module subroutine setResizedSLLU_D1_SK2(array, size, lbc, lbcold, ubcold, failed, errmsg)
4408#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4409 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLLU_D1_SK2
4412 character(
*,SKG) ,
intent(inout) ,
allocatable :: array(:)
4413 integer(IK) ,
intent(in) :: size, lbc, lbcold, ubcold
4414 character(
*, SK) ,
intent(out) ,
optional :: errmsg
4415 logical(LK) ,
intent(out) ,
optional :: failed
4420 PURE module subroutine setResizedSLLU_D1_SK1(array, size, lbc, lbcold, ubcold, failed, errmsg)
4421#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4422 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLLU_D1_SK1
4425 character(
*,SKG) ,
intent(inout) ,
allocatable :: array(:)
4426 integer(IK) ,
intent(in) :: size, lbc, lbcold, ubcold
4427 character(
*, SK) ,
intent(out) ,
optional :: errmsg
4428 logical(LK) ,
intent(out) ,
optional :: failed
4435 PURE module subroutine setResizedSLLU_D1_IK5(array, size, lbc, lbcold, ubcold, failed, errmsg)
4436#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4437 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLLU_D1_IK5
4440 integer(IKG) ,
intent(inout) ,
allocatable :: array(:)
4441 integer(IK) ,
intent(in) :: size, lbc, lbcold, ubcold
4442 character(
*, SK) ,
intent(out) ,
optional :: errmsg
4443 logical(LK) ,
intent(out) ,
optional :: failed
4448 PURE module subroutine setResizedSLLU_D1_IK4(array, size, lbc, lbcold, ubcold, failed, errmsg)
4449#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4450 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLLU_D1_IK4
4453 integer(IKG) ,
intent(inout) ,
allocatable :: array(:)
4454 integer(IK) ,
intent(in) :: size, lbc, lbcold, ubcold
4455 character(
*, SK) ,
intent(out) ,
optional :: errmsg
4456 logical(LK) ,
intent(out) ,
optional :: failed
4461 PURE module subroutine setResizedSLLU_D1_IK3(array, size, lbc, lbcold, ubcold, failed, errmsg)
4462#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4463 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLLU_D1_IK3
4466 integer(IKG) ,
intent(inout) ,
allocatable :: array(:)
4467 integer(IK) ,
intent(in) :: size, lbc, lbcold, ubcold
4468 character(
*, SK) ,
intent(out) ,
optional :: errmsg
4469 logical(LK) ,
intent(out) ,
optional :: failed
4474 PURE module subroutine setResizedSLLU_D1_IK2(array, size, lbc, lbcold, ubcold, failed, errmsg)
4475#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4476 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLLU_D1_IK2
4479 integer(IKG) ,
intent(inout) ,
allocatable :: array(:)
4480 integer(IK) ,
intent(in) :: size, lbc, lbcold, ubcold
4481 character(
*, SK) ,
intent(out) ,
optional :: errmsg
4482 logical(LK) ,
intent(out) ,
optional :: failed
4487 PURE module subroutine setResizedSLLU_D1_IK1(array, size, lbc, lbcold, ubcold, failed, errmsg)
4488#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4489 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLLU_D1_IK1
4492 integer(IKG) ,
intent(inout) ,
allocatable :: array(:)
4493 integer(IK) ,
intent(in) :: size, lbc, lbcold, ubcold
4494 character(
*, SK) ,
intent(out) ,
optional :: errmsg
4495 logical(LK) ,
intent(out) ,
optional :: failed
4502 PURE module subroutine setResizedSLLU_D1_LK5(array, size, lbc, lbcold, ubcold, failed, errmsg)
4503#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4504 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLLU_D1_LK5
4507 logical(LKG) ,
intent(inout) ,
allocatable :: array(:)
4508 integer(IK) ,
intent(in) :: size, lbc, lbcold, ubcold
4509 character(
*, SK) ,
intent(out) ,
optional :: errmsg
4510 logical(LK) ,
intent(out) ,
optional :: failed
4515 PURE module subroutine setResizedSLLU_D1_LK4(array, size, lbc, lbcold, ubcold, failed, errmsg)
4516#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4517 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLLU_D1_LK4
4520 logical(LKG) ,
intent(inout) ,
allocatable :: array(:)
4521 integer(IK) ,
intent(in) :: size, lbc, lbcold, ubcold
4522 character(
*, SK) ,
intent(out) ,
optional :: errmsg
4523 logical(LK) ,
intent(out) ,
optional :: failed
4528 PURE module subroutine setResizedSLLU_D1_LK3(array, size, lbc, lbcold, ubcold, failed, errmsg)
4529#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4530 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLLU_D1_LK3
4533 logical(LKG) ,
intent(inout) ,
allocatable :: array(:)
4534 integer(IK) ,
intent(in) :: size, lbc, lbcold, ubcold
4535 character(
*, SK) ,
intent(out) ,
optional :: errmsg
4536 logical(LK) ,
intent(out) ,
optional :: failed
4541 PURE module subroutine setResizedSLLU_D1_LK2(array, size, lbc, lbcold, ubcold, failed, errmsg)
4542#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4543 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLLU_D1_LK2
4546 logical(LKG) ,
intent(inout) ,
allocatable :: array(:)
4547 integer(IK) ,
intent(in) :: size, lbc, lbcold, ubcold
4548 character(
*, SK) ,
intent(out) ,
optional :: errmsg
4549 logical(LK) ,
intent(out) ,
optional :: failed
4554 PURE module subroutine setResizedSLLU_D1_LK1(array, size, lbc, lbcold, ubcold, failed, errmsg)
4555#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4556 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLLU_D1_LK1
4559 logical(LKG) ,
intent(inout) ,
allocatable :: array(:)
4560 integer(IK) ,
intent(in) :: size, lbc, lbcold, ubcold
4561 character(
*, SK) ,
intent(out) ,
optional :: errmsg
4562 logical(LK) ,
intent(out) ,
optional :: failed
4569 PURE module subroutine setResizedSLLU_D1_CK5(array, size, lbc, lbcold, ubcold, failed, errmsg)
4570#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4571 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLLU_D1_CK5
4574 complex(CKG) ,
intent(inout) ,
allocatable :: array(:)
4575 integer(IK) ,
intent(in) :: size, lbc, lbcold, ubcold
4576 character(
*, SK) ,
intent(out) ,
optional :: errmsg
4577 logical(LK) ,
intent(out) ,
optional :: failed
4582 PURE module subroutine setResizedSLLU_D1_CK4(array, size, lbc, lbcold, ubcold, failed, errmsg)
4583#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4584 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLLU_D1_CK4
4587 complex(CKG) ,
intent(inout) ,
allocatable :: array(:)
4588 integer(IK) ,
intent(in) :: size, lbc, lbcold, ubcold
4589 character(
*, SK) ,
intent(out) ,
optional :: errmsg
4590 logical(LK) ,
intent(out) ,
optional :: failed
4595 PURE module subroutine setResizedSLLU_D1_CK3(array, size, lbc, lbcold, ubcold, failed, errmsg)
4596#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4597 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLLU_D1_CK3
4600 complex(CKG) ,
intent(inout) ,
allocatable :: array(:)
4601 integer(IK) ,
intent(in) :: size, lbc, lbcold, ubcold
4602 character(
*, SK) ,
intent(out) ,
optional :: errmsg
4603 logical(LK) ,
intent(out) ,
optional :: failed
4608 PURE module subroutine setResizedSLLU_D1_CK2(array, size, lbc, lbcold, ubcold, failed, errmsg)
4609#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4610 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLLU_D1_CK2
4613 complex(CKG) ,
intent(inout) ,
allocatable :: array(:)
4614 integer(IK) ,
intent(in) :: size, lbc, lbcold, ubcold
4615 character(
*, SK) ,
intent(out) ,
optional :: errmsg
4616 logical(LK) ,
intent(out) ,
optional :: failed
4621 PURE module subroutine setResizedSLLU_D1_CK1(array, size, lbc, lbcold, ubcold, failed, errmsg)
4622#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4623 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLLU_D1_CK1
4626 complex(CKG) ,
intent(inout) ,
allocatable :: array(:)
4627 integer(IK) ,
intent(in) :: size, lbc, lbcold, ubcold
4628 character(
*, SK) ,
intent(out) ,
optional :: errmsg
4629 logical(LK) ,
intent(out) ,
optional :: failed
4636 PURE module subroutine setResizedSLLU_D1_RK5(array, size, lbc, lbcold, ubcold, failed, errmsg)
4637#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4638 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLLU_D1_RK5
4641 real(RKG) ,
intent(inout) ,
allocatable :: array(:)
4642 integer(IK) ,
intent(in) :: size, lbc, lbcold, ubcold
4643 character(
*, SK) ,
intent(out) ,
optional :: errmsg
4644 logical(LK) ,
intent(out) ,
optional :: failed
4649 PURE module subroutine setResizedSLLU_D1_RK4(array, size, lbc, lbcold, ubcold, failed, errmsg)
4650#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4651 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLLU_D1_RK4
4654 real(RKG) ,
intent(inout) ,
allocatable :: array(:)
4655 integer(IK) ,
intent(in) :: size, lbc, lbcold, ubcold
4656 character(
*, SK) ,
intent(out) ,
optional :: errmsg
4657 logical(LK) ,
intent(out) ,
optional :: failed
4662 PURE module subroutine setResizedSLLU_D1_RK3(array, size, lbc, lbcold, ubcold, failed, errmsg)
4663#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4664 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLLU_D1_RK3
4667 real(RKG) ,
intent(inout) ,
allocatable :: array(:)
4668 integer(IK) ,
intent(in) :: size, lbc, lbcold, ubcold
4669 character(
*, SK) ,
intent(out) ,
optional :: errmsg
4670 logical(LK) ,
intent(out) ,
optional :: failed
4675 PURE module subroutine setResizedSLLU_D1_RK2(array, size, lbc, lbcold, ubcold, failed, errmsg)
4676#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4677 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLLU_D1_RK2
4680 real(RKG) ,
intent(inout) ,
allocatable :: array(:)
4681 integer(IK) ,
intent(in) :: size, lbc, lbcold, ubcold
4682 character(
*, SK) ,
intent(out) ,
optional :: errmsg
4683 logical(LK) ,
intent(out) ,
optional :: failed
4688 PURE module subroutine setResizedSLLU_D1_RK1(array, size, lbc, lbcold, ubcold, failed, errmsg)
4689#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4690 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLLU_D1_RK1
4693 real(RKG) ,
intent(inout) ,
allocatable :: array(:)
4694 integer(IK) ,
intent(in) :: size, lbc, lbcold, ubcold
4695 character(
*, SK) ,
intent(out) ,
optional :: errmsg
4696 logical(LK) ,
intent(out) ,
optional :: failed
4705 module subroutine setResizedSLLU_D1_PSSK5(array, size, lbc, lbcold, ubcold, failed, errmsg)
4706#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4707 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLLU_D1_PSSK5
4711 type(css_pdt(SKG)) ,
intent(inout) ,
allocatable :: array(:)
4712 integer(IK) ,
intent(in) :: size, lbc, lbcold, ubcold
4713 character(
*, SK) ,
intent(out) ,
optional :: errmsg
4714 logical(LK) ,
intent(out) ,
optional :: failed
4719 module subroutine setResizedSLLU_D1_PSSK4(array, size, lbc, lbcold, ubcold, failed, errmsg)
4720#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4721 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLLU_D1_PSSK4
4725 type(css_pdt(SKG)) ,
intent(inout) ,
allocatable :: array(:)
4726 integer(IK) ,
intent(in) :: size, lbc, lbcold, ubcold
4727 character(
*, SK) ,
intent(out) ,
optional :: errmsg
4728 logical(LK) ,
intent(out) ,
optional :: failed
4733 module subroutine setResizedSLLU_D1_PSSK3(array, size, lbc, lbcold, ubcold, failed, errmsg)
4734#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4735 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLLU_D1_PSSK3
4739 type(css_pdt(SKG)) ,
intent(inout) ,
allocatable :: array(:)
4740 integer(IK) ,
intent(in) :: size, lbc, lbcold, ubcold
4741 character(
*, SK) ,
intent(out) ,
optional :: errmsg
4742 logical(LK) ,
intent(out) ,
optional :: failed
4747 module subroutine setResizedSLLU_D1_PSSK2(array, size, lbc, lbcold, ubcold, failed, errmsg)
4748#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4749 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLLU_D1_PSSK2
4753 type(css_pdt(SKG)) ,
intent(inout) ,
allocatable :: array(:)
4754 integer(IK) ,
intent(in) :: size, lbc, lbcold, ubcold
4755 character(
*, SK) ,
intent(out) ,
optional :: errmsg
4756 logical(LK) ,
intent(out) ,
optional :: failed
4761 module subroutine setResizedSLLU_D1_PSSK1(array, size, lbc, lbcold, ubcold, failed, errmsg)
4762#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4763 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLLU_D1_PSSK1
4767 type(css_pdt(SKG)) ,
intent(inout) ,
allocatable :: array(:)
4768 integer(IK) ,
intent(in) :: size, lbc, lbcold, ubcold
4769 character(
*, SK) ,
intent(out) ,
optional :: errmsg
4770 logical(LK) ,
intent(out) ,
optional :: failed
4779 module subroutine setResizedSLLU_D1_BSSK(array, size, lbc, lbcold, ubcold, failed, errmsg)
4780#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4781 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLLU_D1_BSSK
4785 type(css_type) ,
intent(inout) ,
allocatable :: array(:)
4786 integer(IK) ,
intent(in) :: size, lbc, lbcold, ubcold
4787 character(
*, SK) ,
intent(out) ,
optional :: errmsg
4788 logical(LK) ,
intent(out) ,
optional :: failed
4802 PURE module subroutine setResizedSLLU_D2_SK5(array, size, lbc, lbcold, ubcold, failed, errmsg)
4803#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4804 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLLU_D2_SK5
4807 character(
*,SKG) ,
intent(inout) ,
allocatable :: array(:,:)
4808 integer(IK) ,
intent(in) , dimension(
2) :: size, lbc, lbcold, ubcold
4809 character(
*, SK) ,
intent(out) ,
optional :: errmsg
4810 logical(LK) ,
intent(out) ,
optional :: failed
4815 PURE module subroutine setResizedSLLU_D2_SK4(array, size, lbc, lbcold, ubcold, failed, errmsg)
4816#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4817 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLLU_D2_SK4
4820 character(
*,SKG) ,
intent(inout) ,
allocatable :: array(:,:)
4821 integer(IK) ,
intent(in) , dimension(
2) :: size, lbc, lbcold, ubcold
4822 character(
*, SK) ,
intent(out) ,
optional :: errmsg
4823 logical(LK) ,
intent(out) ,
optional :: failed
4828 PURE module subroutine setResizedSLLU_D2_SK3(array, size, lbc, lbcold, ubcold, failed, errmsg)
4829#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4830 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLLU_D2_SK3
4833 character(
*,SKG) ,
intent(inout) ,
allocatable :: array(:,:)
4834 integer(IK) ,
intent(in) , dimension(
2) :: size, lbc, lbcold, ubcold
4835 character(
*, SK) ,
intent(out) ,
optional :: errmsg
4836 logical(LK) ,
intent(out) ,
optional :: failed
4841 PURE module subroutine setResizedSLLU_D2_SK2(array, size, lbc, lbcold, ubcold, failed, errmsg)
4842#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4843 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLLU_D2_SK2
4846 character(
*,SKG) ,
intent(inout) ,
allocatable :: array(:,:)
4847 integer(IK) ,
intent(in) , dimension(
2) :: size, lbc, lbcold, ubcold
4848 character(
*, SK) ,
intent(out) ,
optional :: errmsg
4849 logical(LK) ,
intent(out) ,
optional :: failed
4854 PURE module subroutine setResizedSLLU_D2_SK1(array, size, lbc, lbcold, ubcold, failed, errmsg)
4855#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4856 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLLU_D2_SK1
4859 character(
*,SKG) ,
intent(inout) ,
allocatable :: array(:,:)
4860 integer(IK) ,
intent(in) , dimension(
2) :: size, lbc, lbcold, ubcold
4861 character(
*, SK) ,
intent(out) ,
optional :: errmsg
4862 logical(LK) ,
intent(out) ,
optional :: failed
4869 PURE module subroutine setResizedSLLU_D2_IK5(array, size, lbc, lbcold, ubcold, failed, errmsg)
4870#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4871 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLLU_D2_IK5
4874 integer(IKG) ,
intent(inout) ,
allocatable :: array(:,:)
4875 integer(IK) ,
intent(in) , dimension(
2) :: size, lbc, lbcold, ubcold
4876 character(
*, SK) ,
intent(out) ,
optional :: errmsg
4877 logical(LK) ,
intent(out) ,
optional :: failed
4882 PURE module subroutine setResizedSLLU_D2_IK4(array, size, lbc, lbcold, ubcold, failed, errmsg)
4883#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4884 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLLU_D2_IK4
4887 integer(IKG) ,
intent(inout) ,
allocatable :: array(:,:)
4888 integer(IK) ,
intent(in) , dimension(
2) :: size, lbc, lbcold, ubcold
4889 character(
*, SK) ,
intent(out) ,
optional :: errmsg
4890 logical(LK) ,
intent(out) ,
optional :: failed
4895 PURE module subroutine setResizedSLLU_D2_IK3(array, size, lbc, lbcold, ubcold, failed, errmsg)
4896#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4897 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLLU_D2_IK3
4900 integer(IKG) ,
intent(inout) ,
allocatable :: array(:,:)
4901 integer(IK) ,
intent(in) , dimension(
2) :: size, lbc, lbcold, ubcold
4902 character(
*, SK) ,
intent(out) ,
optional :: errmsg
4903 logical(LK) ,
intent(out) ,
optional :: failed
4908 PURE module subroutine setResizedSLLU_D2_IK2(array, size, lbc, lbcold, ubcold, failed, errmsg)
4909#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4910 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLLU_D2_IK2
4913 integer(IKG) ,
intent(inout) ,
allocatable :: array(:,:)
4914 integer(IK) ,
intent(in) , dimension(
2) :: size, lbc, lbcold, ubcold
4915 character(
*, SK) ,
intent(out) ,
optional :: errmsg
4916 logical(LK) ,
intent(out) ,
optional :: failed
4921 PURE module subroutine setResizedSLLU_D2_IK1(array, size, lbc, lbcold, ubcold, failed, errmsg)
4922#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4923 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLLU_D2_IK1
4926 integer(IKG) ,
intent(inout) ,
allocatable :: array(:,:)
4927 integer(IK) ,
intent(in) , dimension(
2) :: size, lbc, lbcold, ubcold
4928 character(
*, SK) ,
intent(out) ,
optional :: errmsg
4929 logical(LK) ,
intent(out) ,
optional :: failed
4936 PURE module subroutine setResizedSLLU_D2_LK5(array, size, lbc, lbcold, ubcold, failed, errmsg)
4937#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4938 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLLU_D2_LK5
4941 logical(LKG) ,
intent(inout) ,
allocatable :: array(:,:)
4942 integer(IK) ,
intent(in) , dimension(
2) :: size, lbc, lbcold, ubcold
4943 character(
*, SK) ,
intent(out) ,
optional :: errmsg
4944 logical(LK) ,
intent(out) ,
optional :: failed
4949 PURE module subroutine setResizedSLLU_D2_LK4(array, size, lbc, lbcold, ubcold, failed, errmsg)
4950#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4951 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLLU_D2_LK4
4954 logical(LKG) ,
intent(inout) ,
allocatable :: array(:,:)
4955 integer(IK) ,
intent(in) , dimension(
2) :: size, lbc, lbcold, ubcold
4956 character(
*, SK) ,
intent(out) ,
optional :: errmsg
4957 logical(LK) ,
intent(out) ,
optional :: failed
4962 PURE module subroutine setResizedSLLU_D2_LK3(array, size, lbc, lbcold, ubcold, failed, errmsg)
4963#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4964 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLLU_D2_LK3
4967 logical(LKG) ,
intent(inout) ,
allocatable :: array(:,:)
4968 integer(IK) ,
intent(in) , dimension(
2) :: size, lbc, lbcold, ubcold
4969 character(
*, SK) ,
intent(out) ,
optional :: errmsg
4970 logical(LK) ,
intent(out) ,
optional :: failed
4975 PURE module subroutine setResizedSLLU_D2_LK2(array, size, lbc, lbcold, ubcold, failed, errmsg)
4976#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4977 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLLU_D2_LK2
4980 logical(LKG) ,
intent(inout) ,
allocatable :: array(:,:)
4981 integer(IK) ,
intent(in) , dimension(
2) :: size, lbc, lbcold, ubcold
4982 character(
*, SK) ,
intent(out) ,
optional :: errmsg
4983 logical(LK) ,
intent(out) ,
optional :: failed
4988 PURE module subroutine setResizedSLLU_D2_LK1(array, size, lbc, lbcold, ubcold, failed, errmsg)
4989#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
4990 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLLU_D2_LK1
4993 logical(LKG) ,
intent(inout) ,
allocatable :: array(:,:)
4994 integer(IK) ,
intent(in) , dimension(
2) :: size, lbc, lbcold, ubcold
4995 character(
*, SK) ,
intent(out) ,
optional :: errmsg
4996 logical(LK) ,
intent(out) ,
optional :: failed
5003 PURE module subroutine setResizedSLLU_D2_CK5(array, size, lbc, lbcold, ubcold, failed, errmsg)
5004#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5005 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLLU_D2_CK5
5008 complex(CKG) ,
intent(inout) ,
allocatable :: array(:,:)
5009 integer(IK) ,
intent(in) , dimension(
2) :: size, lbc, lbcold, ubcold
5010 character(
*, SK) ,
intent(out) ,
optional :: errmsg
5011 logical(LK) ,
intent(out) ,
optional :: failed
5016 PURE module subroutine setResizedSLLU_D2_CK4(array, size, lbc, lbcold, ubcold, failed, errmsg)
5017#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5018 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLLU_D2_CK4
5021 complex(CKG) ,
intent(inout) ,
allocatable :: array(:,:)
5022 integer(IK) ,
intent(in) , dimension(
2) :: size, lbc, lbcold, ubcold
5023 character(
*, SK) ,
intent(out) ,
optional :: errmsg
5024 logical(LK) ,
intent(out) ,
optional :: failed
5029 PURE module subroutine setResizedSLLU_D2_CK3(array, size, lbc, lbcold, ubcold, failed, errmsg)
5030#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5031 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLLU_D2_CK3
5034 complex(CKG) ,
intent(inout) ,
allocatable :: array(:,:)
5035 integer(IK) ,
intent(in) , dimension(
2) :: size, lbc, lbcold, ubcold
5036 character(
*, SK) ,
intent(out) ,
optional :: errmsg
5037 logical(LK) ,
intent(out) ,
optional :: failed
5042 PURE module subroutine setResizedSLLU_D2_CK2(array, size, lbc, lbcold, ubcold, failed, errmsg)
5043#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5044 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLLU_D2_CK2
5047 complex(CKG) ,
intent(inout) ,
allocatable :: array(:,:)
5048 integer(IK) ,
intent(in) , dimension(
2) :: size, lbc, lbcold, ubcold
5049 character(
*, SK) ,
intent(out) ,
optional :: errmsg
5050 logical(LK) ,
intent(out) ,
optional :: failed
5055 PURE module subroutine setResizedSLLU_D2_CK1(array, size, lbc, lbcold, ubcold, failed, errmsg)
5056#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5057 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLLU_D2_CK1
5060 complex(CKG) ,
intent(inout) ,
allocatable :: array(:,:)
5061 integer(IK) ,
intent(in) , dimension(
2) :: size, lbc, lbcold, ubcold
5062 character(
*, SK) ,
intent(out) ,
optional :: errmsg
5063 logical(LK) ,
intent(out) ,
optional :: failed
5070 PURE module subroutine setResizedSLLU_D2_RK5(array, size, lbc, lbcold, ubcold, failed, errmsg)
5071#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5072 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLLU_D2_RK5
5075 real(RKG) ,
intent(inout) ,
allocatable :: array(:,:)
5076 integer(IK) ,
intent(in) , dimension(
2) :: size, lbc, lbcold, ubcold
5077 character(
*, SK) ,
intent(out) ,
optional :: errmsg
5078 logical(LK) ,
intent(out) ,
optional :: failed
5083 PURE module subroutine setResizedSLLU_D2_RK4(array, size, lbc, lbcold, ubcold, failed, errmsg)
5084#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5085 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLLU_D2_RK4
5088 real(RKG) ,
intent(inout) ,
allocatable :: array(:,:)
5089 integer(IK) ,
intent(in) , dimension(
2) :: size, lbc, lbcold, ubcold
5090 character(
*, SK) ,
intent(out) ,
optional :: errmsg
5091 logical(LK) ,
intent(out) ,
optional :: failed
5096 PURE module subroutine setResizedSLLU_D2_RK3(array, size, lbc, lbcold, ubcold, failed, errmsg)
5097#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5098 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLLU_D2_RK3
5101 real(RKG) ,
intent(inout) ,
allocatable :: array(:,:)
5102 integer(IK) ,
intent(in) , dimension(
2) :: size, lbc, lbcold, ubcold
5103 character(
*, SK) ,
intent(out) ,
optional :: errmsg
5104 logical(LK) ,
intent(out) ,
optional :: failed
5109 PURE module subroutine setResizedSLLU_D2_RK2(array, size, lbc, lbcold, ubcold, failed, errmsg)
5110#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5111 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLLU_D2_RK2
5114 real(RKG) ,
intent(inout) ,
allocatable :: array(:,:)
5115 integer(IK) ,
intent(in) , dimension(
2) :: size, lbc, lbcold, ubcold
5116 character(
*, SK) ,
intent(out) ,
optional :: errmsg
5117 logical(LK) ,
intent(out) ,
optional :: failed
5122 PURE module subroutine setResizedSLLU_D2_RK1(array, size, lbc, lbcold, ubcold, failed, errmsg)
5123#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5124 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLLU_D2_RK1
5127 real(RKG) ,
intent(inout) ,
allocatable :: array(:,:)
5128 integer(IK) ,
intent(in) , dimension(
2) :: size, lbc, lbcold, ubcold
5129 character(
*, SK) ,
intent(out) ,
optional :: errmsg
5130 logical(LK) ,
intent(out) ,
optional :: failed
5139 module subroutine setResizedSLLU_D2_PSSK5(array, size, lbc, lbcold, ubcold, failed, errmsg)
5140#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5141 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLLU_D2_PSSK5
5145 type(css_pdt(SKG)) ,
intent(inout) ,
allocatable :: array(:,:)
5146 integer(IK) ,
intent(in) , dimension(
2) :: size, lbc, lbcold, ubcold
5147 character(
*, SK) ,
intent(out) ,
optional :: errmsg
5148 logical(LK) ,
intent(out) ,
optional :: failed
5153 module subroutine setResizedSLLU_D2_PSSK4(array, size, lbc, lbcold, ubcold, failed, errmsg)
5154#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5155 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLLU_D2_PSSK4
5159 type(css_pdt(SKG)) ,
intent(inout) ,
allocatable :: array(:,:)
5160 integer(IK) ,
intent(in) , dimension(
2) :: size, lbc, lbcold, ubcold
5161 character(
*, SK) ,
intent(out) ,
optional :: errmsg
5162 logical(LK) ,
intent(out) ,
optional :: failed
5167 module subroutine setResizedSLLU_D2_PSSK3(array, size, lbc, lbcold, ubcold, failed, errmsg)
5168#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5169 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLLU_D2_PSSK3
5173 type(css_pdt(SKG)) ,
intent(inout) ,
allocatable :: array(:,:)
5174 integer(IK) ,
intent(in) , dimension(
2) :: size, lbc, lbcold, ubcold
5175 character(
*, SK) ,
intent(out) ,
optional :: errmsg
5176 logical(LK) ,
intent(out) ,
optional :: failed
5181 module subroutine setResizedSLLU_D2_PSSK2(array, size, lbc, lbcold, ubcold, failed, errmsg)
5182#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5183 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLLU_D2_PSSK2
5187 type(css_pdt(SKG)) ,
intent(inout) ,
allocatable :: array(:,:)
5188 integer(IK) ,
intent(in) , dimension(
2) :: size, lbc, lbcold, ubcold
5189 character(
*, SK) ,
intent(out) ,
optional :: errmsg
5190 logical(LK) ,
intent(out) ,
optional :: failed
5195 module subroutine setResizedSLLU_D2_PSSK1(array, size, lbc, lbcold, ubcold, failed, errmsg)
5196#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5197 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLLU_D2_PSSK1
5201 type(css_pdt(SKG)) ,
intent(inout) ,
allocatable :: array(:,:)
5202 integer(IK) ,
intent(in) , dimension(
2) :: size, lbc, lbcold, ubcold
5203 character(
*, SK) ,
intent(out) ,
optional :: errmsg
5204 logical(LK) ,
intent(out) ,
optional :: failed
5213 module subroutine setResizedSLLU_D2_BSSK(array, size, lbc, lbcold, ubcold, failed, errmsg)
5214#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5215 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLLU_D2_BSSK
5219 type(css_type) ,
intent(inout) ,
allocatable :: array(:,:)
5220 integer(IK) ,
intent(in) , dimension(
2) :: size, lbc, lbcold, ubcold
5221 character(
*, SK) ,
intent(out) ,
optional :: errmsg
5222 logical(LK) ,
intent(out) ,
optional :: failed
5236 PURE module subroutine setResizedSLLU_D3_SK5(array, size, lbc, lbcold, ubcold, failed, errmsg)
5237#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5238 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLLU_D3_SK5
5241 character(
*,SKG) ,
intent(inout) ,
allocatable :: array(:,:,:)
5242 integer(IK) ,
intent(in) , dimension(
3) :: size, lbc, lbcold, ubcold
5243 character(
*, SK) ,
intent(out) ,
optional :: errmsg
5244 logical(LK) ,
intent(out) ,
optional :: failed
5249 PURE module subroutine setResizedSLLU_D3_SK4(array, size, lbc, lbcold, ubcold, failed, errmsg)
5250#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5251 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLLU_D3_SK4
5254 character(
*,SKG) ,
intent(inout) ,
allocatable :: array(:,:,:)
5255 integer(IK) ,
intent(in) , dimension(
3) :: size, lbc, lbcold, ubcold
5256 character(
*, SK) ,
intent(out) ,
optional :: errmsg
5257 logical(LK) ,
intent(out) ,
optional :: failed
5262 PURE module subroutine setResizedSLLU_D3_SK3(array, size, lbc, lbcold, ubcold, failed, errmsg)
5263#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5264 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLLU_D3_SK3
5267 character(
*,SKG) ,
intent(inout) ,
allocatable :: array(:,:,:)
5268 integer(IK) ,
intent(in) , dimension(
3) :: size, lbc, lbcold, ubcold
5269 character(
*, SK) ,
intent(out) ,
optional :: errmsg
5270 logical(LK) ,
intent(out) ,
optional :: failed
5275 PURE module subroutine setResizedSLLU_D3_SK2(array, size, lbc, lbcold, ubcold, failed, errmsg)
5276#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5277 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLLU_D3_SK2
5280 character(
*,SKG) ,
intent(inout) ,
allocatable :: array(:,:,:)
5281 integer(IK) ,
intent(in) , dimension(
3) :: size, lbc, lbcold, ubcold
5282 character(
*, SK) ,
intent(out) ,
optional :: errmsg
5283 logical(LK) ,
intent(out) ,
optional :: failed
5288 PURE module subroutine setResizedSLLU_D3_SK1(array, size, lbc, lbcold, ubcold, failed, errmsg)
5289#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5290 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLLU_D3_SK1
5293 character(
*,SKG) ,
intent(inout) ,
allocatable :: array(:,:,:)
5294 integer(IK) ,
intent(in) , dimension(
3) :: size, lbc, lbcold, ubcold
5295 character(
*, SK) ,
intent(out) ,
optional :: errmsg
5296 logical(LK) ,
intent(out) ,
optional :: failed
5303 PURE module subroutine setResizedSLLU_D3_IK5(array, size, lbc, lbcold, ubcold, failed, errmsg)
5304#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5305 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLLU_D3_IK5
5308 integer(IKG) ,
intent(inout) ,
allocatable :: array(:,:,:)
5309 integer(IK) ,
intent(in) , dimension(
3) :: size, lbc, lbcold, ubcold
5310 character(
*, SK) ,
intent(out) ,
optional :: errmsg
5311 logical(LK) ,
intent(out) ,
optional :: failed
5316 PURE module subroutine setResizedSLLU_D3_IK4(array, size, lbc, lbcold, ubcold, failed, errmsg)
5317#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5318 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLLU_D3_IK4
5321 integer(IKG) ,
intent(inout) ,
allocatable :: array(:,:,:)
5322 integer(IK) ,
intent(in) , dimension(
3) :: size, lbc, lbcold, ubcold
5323 character(
*, SK) ,
intent(out) ,
optional :: errmsg
5324 logical(LK) ,
intent(out) ,
optional :: failed
5329 PURE module subroutine setResizedSLLU_D3_IK3(array, size, lbc, lbcold, ubcold, failed, errmsg)
5330#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5331 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLLU_D3_IK3
5334 integer(IKG) ,
intent(inout) ,
allocatable :: array(:,:,:)
5335 integer(IK) ,
intent(in) , dimension(
3) :: size, lbc, lbcold, ubcold
5336 character(
*, SK) ,
intent(out) ,
optional :: errmsg
5337 logical(LK) ,
intent(out) ,
optional :: failed
5342 PURE module subroutine setResizedSLLU_D3_IK2(array, size, lbc, lbcold, ubcold, failed, errmsg)
5343#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5344 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLLU_D3_IK2
5347 integer(IKG) ,
intent(inout) ,
allocatable :: array(:,:,:)
5348 integer(IK) ,
intent(in) , dimension(
3) :: size, lbc, lbcold, ubcold
5349 character(
*, SK) ,
intent(out) ,
optional :: errmsg
5350 logical(LK) ,
intent(out) ,
optional :: failed
5355 PURE module subroutine setResizedSLLU_D3_IK1(array, size, lbc, lbcold, ubcold, failed, errmsg)
5356#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5357 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLLU_D3_IK1
5360 integer(IKG) ,
intent(inout) ,
allocatable :: array(:,:,:)
5361 integer(IK) ,
intent(in) , dimension(
3) :: size, lbc, lbcold, ubcold
5362 character(
*, SK) ,
intent(out) ,
optional :: errmsg
5363 logical(LK) ,
intent(out) ,
optional :: failed
5370 PURE module subroutine setResizedSLLU_D3_LK5(array, size, lbc, lbcold, ubcold, failed, errmsg)
5371#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5372 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLLU_D3_LK5
5375 logical(LKG) ,
intent(inout) ,
allocatable :: array(:,:,:)
5376 integer(IK) ,
intent(in) , dimension(
3) :: size, lbc, lbcold, ubcold
5377 character(
*, SK) ,
intent(out) ,
optional :: errmsg
5378 logical(LK) ,
intent(out) ,
optional :: failed
5383 PURE module subroutine setResizedSLLU_D3_LK4(array, size, lbc, lbcold, ubcold, failed, errmsg)
5384#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5385 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLLU_D3_LK4
5388 logical(LKG) ,
intent(inout) ,
allocatable :: array(:,:,:)
5389 integer(IK) ,
intent(in) , dimension(
3) :: size, lbc, lbcold, ubcold
5390 character(
*, SK) ,
intent(out) ,
optional :: errmsg
5391 logical(LK) ,
intent(out) ,
optional :: failed
5396 PURE module subroutine setResizedSLLU_D3_LK3(array, size, lbc, lbcold, ubcold, failed, errmsg)
5397#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5398 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLLU_D3_LK3
5401 logical(LKG) ,
intent(inout) ,
allocatable :: array(:,:,:)
5402 integer(IK) ,
intent(in) , dimension(
3) :: size, lbc, lbcold, ubcold
5403 character(
*, SK) ,
intent(out) ,
optional :: errmsg
5404 logical(LK) ,
intent(out) ,
optional :: failed
5409 PURE module subroutine setResizedSLLU_D3_LK2(array, size, lbc, lbcold, ubcold, failed, errmsg)
5410#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5411 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLLU_D3_LK2
5414 logical(LKG) ,
intent(inout) ,
allocatable :: array(:,:,:)
5415 integer(IK) ,
intent(in) , dimension(
3) :: size, lbc, lbcold, ubcold
5416 character(
*, SK) ,
intent(out) ,
optional :: errmsg
5417 logical(LK) ,
intent(out) ,
optional :: failed
5422 PURE module subroutine setResizedSLLU_D3_LK1(array, size, lbc, lbcold, ubcold, failed, errmsg)
5423#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5424 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLLU_D3_LK1
5427 logical(LKG) ,
intent(inout) ,
allocatable :: array(:,:,:)
5428 integer(IK) ,
intent(in) , dimension(
3) :: size, lbc, lbcold, ubcold
5429 character(
*, SK) ,
intent(out) ,
optional :: errmsg
5430 logical(LK) ,
intent(out) ,
optional :: failed
5437 PURE module subroutine setResizedSLLU_D3_CK5(array, size, lbc, lbcold, ubcold, failed, errmsg)
5438#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5439 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLLU_D3_CK5
5442 complex(CKG) ,
intent(inout) ,
allocatable :: array(:,:,:)
5443 integer(IK) ,
intent(in) , dimension(
3) :: size, lbc, lbcold, ubcold
5444 character(
*, SK) ,
intent(out) ,
optional :: errmsg
5445 logical(LK) ,
intent(out) ,
optional :: failed
5450 PURE module subroutine setResizedSLLU_D3_CK4(array, size, lbc, lbcold, ubcold, failed, errmsg)
5451#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5452 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLLU_D3_CK4
5455 complex(CKG) ,
intent(inout) ,
allocatable :: array(:,:,:)
5456 integer(IK) ,
intent(in) , dimension(
3) :: size, lbc, lbcold, ubcold
5457 character(
*, SK) ,
intent(out) ,
optional :: errmsg
5458 logical(LK) ,
intent(out) ,
optional :: failed
5463 PURE module subroutine setResizedSLLU_D3_CK3(array, size, lbc, lbcold, ubcold, failed, errmsg)
5464#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5465 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLLU_D3_CK3
5468 complex(CKG) ,
intent(inout) ,
allocatable :: array(:,:,:)
5469 integer(IK) ,
intent(in) , dimension(
3) :: size, lbc, lbcold, ubcold
5470 character(
*, SK) ,
intent(out) ,
optional :: errmsg
5471 logical(LK) ,
intent(out) ,
optional :: failed
5476 PURE module subroutine setResizedSLLU_D3_CK2(array, size, lbc, lbcold, ubcold, failed, errmsg)
5477#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5478 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLLU_D3_CK2
5481 complex(CKG) ,
intent(inout) ,
allocatable :: array(:,:,:)
5482 integer(IK) ,
intent(in) , dimension(
3) :: size, lbc, lbcold, ubcold
5483 character(
*, SK) ,
intent(out) ,
optional :: errmsg
5484 logical(LK) ,
intent(out) ,
optional :: failed
5489 PURE module subroutine setResizedSLLU_D3_CK1(array, size, lbc, lbcold, ubcold, failed, errmsg)
5490#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5491 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLLU_D3_CK1
5494 complex(CKG) ,
intent(inout) ,
allocatable :: array(:,:,:)
5495 integer(IK) ,
intent(in) , dimension(
3) :: size, lbc, lbcold, ubcold
5496 character(
*, SK) ,
intent(out) ,
optional :: errmsg
5497 logical(LK) ,
intent(out) ,
optional :: failed
5504 PURE module subroutine setResizedSLLU_D3_RK5(array, size, lbc, lbcold, ubcold, failed, errmsg)
5505#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5506 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLLU_D3_RK5
5509 real(RKG) ,
intent(inout) ,
allocatable :: array(:,:,:)
5510 integer(IK) ,
intent(in) , dimension(
3) :: size, lbc, lbcold, ubcold
5511 character(
*, SK) ,
intent(out) ,
optional :: errmsg
5512 logical(LK) ,
intent(out) ,
optional :: failed
5517 PURE module subroutine setResizedSLLU_D3_RK4(array, size, lbc, lbcold, ubcold, failed, errmsg)
5518#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5519 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLLU_D3_RK4
5522 real(RKG) ,
intent(inout) ,
allocatable :: array(:,:,:)
5523 integer(IK) ,
intent(in) , dimension(
3) :: size, lbc, lbcold, ubcold
5524 character(
*, SK) ,
intent(out) ,
optional :: errmsg
5525 logical(LK) ,
intent(out) ,
optional :: failed
5530 PURE module subroutine setResizedSLLU_D3_RK3(array, size, lbc, lbcold, ubcold, failed, errmsg)
5531#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5532 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLLU_D3_RK3
5535 real(RKG) ,
intent(inout) ,
allocatable :: array(:,:,:)
5536 integer(IK) ,
intent(in) , dimension(
3) :: size, lbc, lbcold, ubcold
5537 character(
*, SK) ,
intent(out) ,
optional :: errmsg
5538 logical(LK) ,
intent(out) ,
optional :: failed
5543 PURE module subroutine setResizedSLLU_D3_RK2(array, size, lbc, lbcold, ubcold, failed, errmsg)
5544#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5545 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLLU_D3_RK2
5548 real(RKG) ,
intent(inout) ,
allocatable :: array(:,:,:)
5549 integer(IK) ,
intent(in) , dimension(
3) :: size, lbc, lbcold, ubcold
5550 character(
*, SK) ,
intent(out) ,
optional :: errmsg
5551 logical(LK) ,
intent(out) ,
optional :: failed
5556 PURE module subroutine setResizedSLLU_D3_RK1(array, size, lbc, lbcold, ubcold, failed, errmsg)
5557#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5558 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLLU_D3_RK1
5561 real(RKG) ,
intent(inout) ,
allocatable :: array(:,:,:)
5562 integer(IK) ,
intent(in) , dimension(
3) :: size, lbc, lbcold, ubcold
5563 character(
*, SK) ,
intent(out) ,
optional :: errmsg
5564 logical(LK) ,
intent(out) ,
optional :: failed
5573 module subroutine setResizedSLLU_D3_PSSK5(array, size, lbc, lbcold, ubcold, failed, errmsg)
5574#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5575 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLLU_D3_PSSK5
5579 type(css_pdt(SKG)) ,
intent(inout) ,
allocatable :: array(:,:,:)
5580 integer(IK) ,
intent(in) , dimension(
3) :: size, lbc, lbcold, ubcold
5581 character(
*, SK) ,
intent(out) ,
optional :: errmsg
5582 logical(LK) ,
intent(out) ,
optional :: failed
5587 module subroutine setResizedSLLU_D3_PSSK4(array, size, lbc, lbcold, ubcold, failed, errmsg)
5588#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5589 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLLU_D3_PSSK4
5593 type(css_pdt(SKG)) ,
intent(inout) ,
allocatable :: array(:,:,:)
5594 integer(IK) ,
intent(in) , dimension(
3) :: size, lbc, lbcold, ubcold
5595 character(
*, SK) ,
intent(out) ,
optional :: errmsg
5596 logical(LK) ,
intent(out) ,
optional :: failed
5601 module subroutine setResizedSLLU_D3_PSSK3(array, size, lbc, lbcold, ubcold, failed, errmsg)
5602#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5603 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLLU_D3_PSSK3
5607 type(css_pdt(SKG)) ,
intent(inout) ,
allocatable :: array(:,:,:)
5608 integer(IK) ,
intent(in) , dimension(
3) :: size, lbc, lbcold, ubcold
5609 character(
*, SK) ,
intent(out) ,
optional :: errmsg
5610 logical(LK) ,
intent(out) ,
optional :: failed
5615 module subroutine setResizedSLLU_D3_PSSK2(array, size, lbc, lbcold, ubcold, failed, errmsg)
5616#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5617 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLLU_D3_PSSK2
5621 type(css_pdt(SKG)) ,
intent(inout) ,
allocatable :: array(:,:,:)
5622 integer(IK) ,
intent(in) , dimension(
3) :: size, lbc, lbcold, ubcold
5623 character(
*, SK) ,
intent(out) ,
optional :: errmsg
5624 logical(LK) ,
intent(out) ,
optional :: failed
5629 module subroutine setResizedSLLU_D3_PSSK1(array, size, lbc, lbcold, ubcold, failed, errmsg)
5630#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5631 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLLU_D3_PSSK1
5635 type(css_pdt(SKG)) ,
intent(inout) ,
allocatable :: array(:,:,:)
5636 integer(IK) ,
intent(in) , dimension(
3) :: size, lbc, lbcold, ubcold
5637 character(
*, SK) ,
intent(out) ,
optional :: errmsg
5638 logical(LK) ,
intent(out) ,
optional :: failed
5647 module subroutine setResizedSLLU_D3_BSSK(array, size, lbc, lbcold, ubcold, failed, errmsg)
5648#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
5649 !DEC$ ATTRIBUTES DLLEXPORT :: setResizedSLLU_D3_BSSK
5653 type(css_type) ,
intent(inout) ,
allocatable :: array(:,:,:)
5654 integer(IK) ,
intent(in) , dimension(
3) :: size, lbc, lbcold, ubcold
5655 character(
*, SK) ,
intent(out) ,
optional :: errmsg
5656 logical(LK) ,
intent(out) ,
optional :: failed
Allocate or resize (shrink or expand) an input allocatable scalar string or array of rank 1....
This module contains procedures and generic interfaces for resizing allocatable arrays of various typ...
character(*, SK), parameter MODULE_NAME
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 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.