125 PURE module function getReversedNew_D0_SK5(array)
result(ArrayReversed)
126#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
127 !DEC$ ATTRIBUTES DLLEXPORT :: getReversedNew_D0_SK5
130 character(
*,SKG) ,
intent(in) :: array
131 character(
len(array,IK),SKG) :: ArrayReversed
136 PURE module function getReversedNew_D0_SK4(array)
result(ArrayReversed)
137#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
138 !DEC$ ATTRIBUTES DLLEXPORT :: getReversedNew_D0_SK4
141 character(
*,SKG) ,
intent(in) :: array
142 character(
len(array,IK),SKG) :: ArrayReversed
147 PURE module function getReversedNew_D0_SK3(array)
result(ArrayReversed)
148#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
149 !DEC$ ATTRIBUTES DLLEXPORT :: getReversedNew_D0_SK3
152 character(
*,SKG) ,
intent(in) :: array
153 character(
len(array,IK),SKG) :: ArrayReversed
158 PURE module function getReversedNew_D0_SK2(array)
result(ArrayReversed)
159#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
160 !DEC$ ATTRIBUTES DLLEXPORT :: getReversedNew_D0_SK2
163 character(
*,SKG) ,
intent(in) :: array
164 character(
len(array,IK),SKG) :: ArrayReversed
169 PURE module function getReversedNew_D0_SK1(array)
result(ArrayReversed)
170#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
171 !DEC$ ATTRIBUTES DLLEXPORT :: getReversedNew_D0_SK1
174 character(
*,SKG) ,
intent(in) :: array
175 character(
len(array,IK),SKG) :: ArrayReversed
182 PURE module function getReversedNew_D1_SK5(array)
result(ArrayReversed)
183#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
184 !DEC$ ATTRIBUTES DLLEXPORT :: getReversedNew_D1_SK5
187 character(
*,SKG) ,
intent(in) ,
contiguous :: array(:)
188 character(
len(array,IK),SKG) :: ArrayReversed(
size(array))
193 PURE module function getReversedNew_D1_SK4(array)
result(ArrayReversed)
194#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
195 !DEC$ ATTRIBUTES DLLEXPORT :: getReversedNew_D1_SK4
198 character(
*,SKG) ,
intent(in) ,
contiguous :: array(:)
199 character(
len(array,IK),SKG) :: ArrayReversed(
size(array))
204 PURE module function getReversedNew_D1_SK3(array)
result(ArrayReversed)
205#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
206 !DEC$ ATTRIBUTES DLLEXPORT :: getReversedNew_D1_SK3
209 character(
*,SKG) ,
intent(in) ,
contiguous :: array(:)
210 character(
len(array,IK),SKG) :: ArrayReversed(
size(array))
215 PURE module function getReversedNew_D1_SK2(array)
result(ArrayReversed)
216#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
217 !DEC$ ATTRIBUTES DLLEXPORT :: getReversedNew_D1_SK2
220 character(
*,SKG) ,
intent(in) ,
contiguous :: array(:)
221 character(
len(array,IK),SKG) :: ArrayReversed(
size(array))
226 PURE module function getReversedNew_D1_SK1(array)
result(ArrayReversed)
227#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
228 !DEC$ ATTRIBUTES DLLEXPORT :: getReversedNew_D1_SK1
231 character(
*,SKG) ,
intent(in) ,
contiguous :: array(:)
232 character(
len(array,IK),SKG) :: ArrayReversed(
size(array))
239 PURE module function getReversedNew_D1_IK5(array)
result(ArrayReversed)
240#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
241 !DEC$ ATTRIBUTES DLLEXPORT :: getReversedNew_D1_IK5
244 integer(IKG) ,
intent(in) ,
contiguous :: array(:)
245 integer(IKG) :: ArrayReversed(
size(array))
250 PURE module function getReversedNew_D1_IK4(array)
result(ArrayReversed)
251#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
252 !DEC$ ATTRIBUTES DLLEXPORT :: getReversedNew_D1_IK4
255 integer(IKG) ,
intent(in) ,
contiguous :: array(:)
256 integer(IKG) :: ArrayReversed(
size(array))
261 PURE module function getReversedNew_D1_IK3(array)
result(ArrayReversed)
262#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
263 !DEC$ ATTRIBUTES DLLEXPORT :: getReversedNew_D1_IK3
266 integer(IKG) ,
intent(in) ,
contiguous :: array(:)
267 integer(IKG) :: ArrayReversed(
size(array))
272 PURE module function getReversedNew_D1_IK2(array)
result(ArrayReversed)
273#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
274 !DEC$ ATTRIBUTES DLLEXPORT :: getReversedNew_D1_IK2
277 integer(IKG) ,
intent(in) ,
contiguous :: array(:)
278 integer(IKG) :: ArrayReversed(
size(array))
283 PURE module function getReversedNew_D1_IK1(array)
result(ArrayReversed)
284#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
285 !DEC$ ATTRIBUTES DLLEXPORT :: getReversedNew_D1_IK1
288 integer(IKG) ,
intent(in) ,
contiguous :: array(:)
289 integer(IKG) :: ArrayReversed(
size(array))
296 PURE module function getReversedNew_D1_LK5(array)
result(ArrayReversed)
297#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
298 !DEC$ ATTRIBUTES DLLEXPORT :: getReversedNew_D1_LK5
301 logical(LKG) ,
intent(in) ,
contiguous :: array(:)
302 logical(LKG) :: ArrayReversed(
size(array))
307 PURE module function getReversedNew_D1_LK4(array)
result(ArrayReversed)
308#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
309 !DEC$ ATTRIBUTES DLLEXPORT :: getReversedNew_D1_LK4
312 logical(LKG) ,
intent(in) ,
contiguous :: array(:)
313 logical(LKG) :: ArrayReversed(
size(array))
318 PURE module function getReversedNew_D1_LK3(array)
result(ArrayReversed)
319#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
320 !DEC$ ATTRIBUTES DLLEXPORT :: getReversedNew_D1_LK3
323 logical(LKG) ,
intent(in) ,
contiguous :: array(:)
324 logical(LKG) :: ArrayReversed(
size(array))
329 PURE module function getReversedNew_D1_LK2(array)
result(ArrayReversed)
330#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
331 !DEC$ ATTRIBUTES DLLEXPORT :: getReversedNew_D1_LK2
334 logical(LKG) ,
intent(in) ,
contiguous :: array(:)
335 logical(LKG) :: ArrayReversed(
size(array))
340 PURE module function getReversedNew_D1_LK1(array)
result(ArrayReversed)
341#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
342 !DEC$ ATTRIBUTES DLLEXPORT :: getReversedNew_D1_LK1
345 logical(LKG) ,
intent(in) ,
contiguous :: array(:)
346 logical(LKG) :: ArrayReversed(
size(array))
353 PURE module function getReversedNew_D1_CK5(array)
result(ArrayReversed)
354#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
355 !DEC$ ATTRIBUTES DLLEXPORT :: getReversedNew_D1_CK5
358 complex(CKG) ,
intent(in) ,
contiguous :: array(:)
359 complex(CKG) :: ArrayReversed(
size(array))
364 PURE module function getReversedNew_D1_CK4(array)
result(ArrayReversed)
365#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
366 !DEC$ ATTRIBUTES DLLEXPORT :: getReversedNew_D1_CK4
369 complex(CKG) ,
intent(in) ,
contiguous :: array(:)
370 complex(CKG) :: ArrayReversed(
size(array))
375 PURE module function getReversedNew_D1_CK3(array)
result(ArrayReversed)
376#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
377 !DEC$ ATTRIBUTES DLLEXPORT :: getReversedNew_D1_CK3
380 complex(CKG) ,
intent(in) ,
contiguous :: array(:)
381 complex(CKG) :: ArrayReversed(
size(array))
386 PURE module function getReversedNew_D1_CK2(array)
result(ArrayReversed)
387#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
388 !DEC$ ATTRIBUTES DLLEXPORT :: getReversedNew_D1_CK2
391 complex(CKG) ,
intent(in) ,
contiguous :: array(:)
392 complex(CKG) :: ArrayReversed(
size(array))
397 PURE module function getReversedNew_D1_CK1(array)
result(ArrayReversed)
398#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
399 !DEC$ ATTRIBUTES DLLEXPORT :: getReversedNew_D1_CK1
402 complex(CKG) ,
intent(in) ,
contiguous :: array(:)
403 complex(CKG) :: ArrayReversed(
size(array))
410 PURE module function getReversedNew_D1_RK5(array)
result(ArrayReversed)
411#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
412 !DEC$ ATTRIBUTES DLLEXPORT :: getReversedNew_D1_RK5
415 real(RKG) ,
intent(in) ,
contiguous :: array(:)
416 real(RKG) :: ArrayReversed(
size(array))
421 PURE module function getReversedNew_D1_RK4(array)
result(ArrayReversed)
422#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
423 !DEC$ ATTRIBUTES DLLEXPORT :: getReversedNew_D1_RK4
426 real(RKG) ,
intent(in) ,
contiguous :: array(:)
427 real(RKG) :: ArrayReversed(
size(array))
432 PURE module function getReversedNew_D1_RK3(array)
result(ArrayReversed)
433#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
434 !DEC$ ATTRIBUTES DLLEXPORT :: getReversedNew_D1_RK3
437 real(RKG) ,
intent(in) ,
contiguous :: array(:)
438 real(RKG) :: ArrayReversed(
size(array))
443 PURE module function getReversedNew_D1_RK2(array)
result(ArrayReversed)
444#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
445 !DEC$ ATTRIBUTES DLLEXPORT :: getReversedNew_D1_RK2
448 real(RKG) ,
intent(in) ,
contiguous :: array(:)
449 real(RKG) :: ArrayReversed(
size(array))
454 PURE module function getReversedNew_D1_RK1(array)
result(ArrayReversed)
455#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
456 !DEC$ ATTRIBUTES DLLEXPORT :: getReversedNew_D1_RK1
459 real(RKG) ,
intent(in) ,
contiguous :: array(:)
460 real(RKG) :: ArrayReversed(
size(array))
469 PURE module function getReversedNew_D1_PSSK5(array)
result(ArrayReversed)
470#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
471 !DEC$ ATTRIBUTES DLLEXPORT :: getReversedNew_D1_PSSK5
475 type(css_pdt(SKG)) ,
intent(in) ,
contiguous :: array(:)
476 type(css_pdt(SKG)) :: ArrayReversed(
size(array))
481 PURE module function getReversedNew_D1_PSSK4(array)
result(ArrayReversed)
482#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
483 !DEC$ ATTRIBUTES DLLEXPORT :: getReversedNew_D1_PSSK4
487 type(css_pdt(SKG)) ,
intent(in) ,
contiguous :: array(:)
488 type(css_pdt(SKG)) :: ArrayReversed(
size(array))
493 PURE module function getReversedNew_D1_PSSK3(array)
result(ArrayReversed)
494#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
495 !DEC$ ATTRIBUTES DLLEXPORT :: getReversedNew_D1_PSSK3
499 type(css_pdt(SKG)) ,
intent(in) ,
contiguous :: array(:)
500 type(css_pdt(SKG)) :: ArrayReversed(
size(array))
505 PURE module function getReversedNew_D1_PSSK2(array)
result(ArrayReversed)
506#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
507 !DEC$ ATTRIBUTES DLLEXPORT :: getReversedNew_D1_PSSK2
511 type(css_pdt(SKG)) ,
intent(in) ,
contiguous :: array(:)
512 type(css_pdt(SKG)) :: ArrayReversed(
size(array))
517 PURE module function getReversedNew_D1_PSSK1(array)
result(ArrayReversed)
518#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
519 !DEC$ ATTRIBUTES DLLEXPORT :: getReversedNew_D1_PSSK1
523 type(css_pdt(SKG)) ,
intent(in) ,
contiguous :: array(:)
524 type(css_pdt(SKG)) :: ArrayReversed(
size(array))
625 PURE module subroutine setReversedOld_D0_SK5(array)
626#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
627 !DEC$ ATTRIBUTES DLLEXPORT :: setReversedOld_D0_SK5
630 character(
*,SKG) ,
intent(inout) :: array
635 PURE module subroutine setReversedOld_D0_SK4(array)
636#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
637 !DEC$ ATTRIBUTES DLLEXPORT :: setReversedOld_D0_SK4
640 character(
*,SKG) ,
intent(inout) :: array
645 PURE module subroutine setReversedOld_D0_SK3(array)
646#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
647 !DEC$ ATTRIBUTES DLLEXPORT :: setReversedOld_D0_SK3
650 character(
*,SKG) ,
intent(inout) :: array
655 PURE module subroutine setReversedOld_D0_SK2(array)
656#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
657 !DEC$ ATTRIBUTES DLLEXPORT :: setReversedOld_D0_SK2
660 character(
*,SKG) ,
intent(inout) :: array
665 PURE module subroutine setReversedOld_D0_SK1(array)
666#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
667 !DEC$ ATTRIBUTES DLLEXPORT :: setReversedOld_D0_SK1
670 character(
*,SKG) ,
intent(inout) :: array
677 PURE module subroutine setReversedOld_D1_SK5(array)
678#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
679 !DEC$ ATTRIBUTES DLLEXPORT :: setReversedOld_D1_SK5
682 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
687 PURE module subroutine setReversedOld_D1_SK4(array)
688#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
689 !DEC$ ATTRIBUTES DLLEXPORT :: setReversedOld_D1_SK4
692 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
697 PURE module subroutine setReversedOld_D1_SK3(array)
698#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
699 !DEC$ ATTRIBUTES DLLEXPORT :: setReversedOld_D1_SK3
702 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
707 PURE module subroutine setReversedOld_D1_SK2(array)
708#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
709 !DEC$ ATTRIBUTES DLLEXPORT :: setReversedOld_D1_SK2
712 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
717 PURE module subroutine setReversedOld_D1_SK1(array)
718#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
719 !DEC$ ATTRIBUTES DLLEXPORT :: setReversedOld_D1_SK1
722 character(
*,SKG) ,
intent(inout) ,
contiguous :: array(:)
729 PURE module subroutine setReversedOld_D1_IK5(array)
730#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
731 !DEC$ ATTRIBUTES DLLEXPORT :: setReversedOld_D1_IK5
734 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
739 PURE module subroutine setReversedOld_D1_IK4(array)
740#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
741 !DEC$ ATTRIBUTES DLLEXPORT :: setReversedOld_D1_IK4
744 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
749 PURE module subroutine setReversedOld_D1_IK3(array)
750#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
751 !DEC$ ATTRIBUTES DLLEXPORT :: setReversedOld_D1_IK3
754 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
759 PURE module subroutine setReversedOld_D1_IK2(array)
760#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
761 !DEC$ ATTRIBUTES DLLEXPORT :: setReversedOld_D1_IK2
764 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
769 PURE module subroutine setReversedOld_D1_IK1(array)
770#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
771 !DEC$ ATTRIBUTES DLLEXPORT :: setReversedOld_D1_IK1
774 integer(IKG) ,
intent(inout) ,
contiguous :: array(:)
781 PURE module subroutine setReversedOld_D1_LK5(array)
782#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
783 !DEC$ ATTRIBUTES DLLEXPORT :: setReversedOld_D1_LK5
786 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
791 PURE module subroutine setReversedOld_D1_LK4(array)
792#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
793 !DEC$ ATTRIBUTES DLLEXPORT :: setReversedOld_D1_LK4
796 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
801 PURE module subroutine setReversedOld_D1_LK3(array)
802#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
803 !DEC$ ATTRIBUTES DLLEXPORT :: setReversedOld_D1_LK3
806 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
811 PURE module subroutine setReversedOld_D1_LK2(array)
812#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
813 !DEC$ ATTRIBUTES DLLEXPORT :: setReversedOld_D1_LK2
816 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
821 PURE module subroutine setReversedOld_D1_LK1(array)
822#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
823 !DEC$ ATTRIBUTES DLLEXPORT :: setReversedOld_D1_LK1
826 logical(LKG) ,
intent(inout) ,
contiguous :: array(:)
833 PURE module subroutine setReversedOld_D1_CK5(array)
834#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
835 !DEC$ ATTRIBUTES DLLEXPORT :: setReversedOld_D1_CK5
838 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
843 PURE module subroutine setReversedOld_D1_CK4(array)
844#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
845 !DEC$ ATTRIBUTES DLLEXPORT :: setReversedOld_D1_CK4
848 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
853 PURE module subroutine setReversedOld_D1_CK3(array)
854#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
855 !DEC$ ATTRIBUTES DLLEXPORT :: setReversedOld_D1_CK3
858 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
863 PURE module subroutine setReversedOld_D1_CK2(array)
864#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
865 !DEC$ ATTRIBUTES DLLEXPORT :: setReversedOld_D1_CK2
868 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
873 PURE module subroutine setReversedOld_D1_CK1(array)
874#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
875 !DEC$ ATTRIBUTES DLLEXPORT :: setReversedOld_D1_CK1
878 complex(CKG) ,
intent(inout) ,
contiguous :: array(:)
885 PURE module subroutine setReversedOld_D1_RK5(array)
886#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
887 !DEC$ ATTRIBUTES DLLEXPORT :: setReversedOld_D1_RK5
890 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
895 PURE module subroutine setReversedOld_D1_RK4(array)
896#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
897 !DEC$ ATTRIBUTES DLLEXPORT :: setReversedOld_D1_RK4
900 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
905 PURE module subroutine setReversedOld_D1_RK3(array)
906#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
907 !DEC$ ATTRIBUTES DLLEXPORT :: setReversedOld_D1_RK3
910 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
915 PURE module subroutine setReversedOld_D1_RK2(array)
916#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
917 !DEC$ ATTRIBUTES DLLEXPORT :: setReversedOld_D1_RK2
920 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
925 PURE module subroutine setReversedOld_D1_RK1(array)
926#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
927 !DEC$ ATTRIBUTES DLLEXPORT :: setReversedOld_D1_RK1
930 real(RKG) ,
intent(inout) ,
contiguous :: array(:)
939 PURE module subroutine setReversedOld_D1_PSSK5(array)
940#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
941 !DEC$ ATTRIBUTES DLLEXPORT :: setReversedOld_D1_PSSK5
945 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
950 PURE module subroutine setReversedOld_D1_PSSK4(array)
951#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
952 !DEC$ ATTRIBUTES DLLEXPORT :: setReversedOld_D1_PSSK4
956 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
961 PURE module subroutine setReversedOld_D1_PSSK3(array)
962#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
963 !DEC$ ATTRIBUTES DLLEXPORT :: setReversedOld_D1_PSSK3
967 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
972 PURE module subroutine setReversedOld_D1_PSSK2(array)
973#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
974 !DEC$ ATTRIBUTES DLLEXPORT :: setReversedOld_D1_PSSK2
978 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
983 PURE module subroutine setReversedOld_D1_PSSK1(array)
984#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
985 !DEC$ ATTRIBUTES DLLEXPORT :: setReversedOld_D1_PSSK1
989 type(css_pdt(SKG)) ,
intent(inout) ,
contiguous :: array(:)
1005 PURE module subroutine setReversedNew_D0_SK5(array, ArrayReversed)
1006#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1007 !DEC$ ATTRIBUTES DLLEXPORT :: setReversedNew_D0_SK5
1010 character(
*,SKG) ,
intent(in) :: array
1011 character(
*,SKG) ,
intent(out) :: ArrayReversed
1016 PURE module subroutine setReversedNew_D0_SK4(array, ArrayReversed)
1017#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1018 !DEC$ ATTRIBUTES DLLEXPORT :: setReversedNew_D0_SK4
1021 character(
*,SKG) ,
intent(in) :: array
1022 character(
*,SKG) ,
intent(out) :: ArrayReversed
1027 PURE module subroutine setReversedNew_D0_SK3(array, ArrayReversed)
1028#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1029 !DEC$ ATTRIBUTES DLLEXPORT :: setReversedNew_D0_SK3
1032 character(
*,SKG) ,
intent(in) :: array
1033 character(
*,SKG) ,
intent(out) :: ArrayReversed
1038 PURE module subroutine setReversedNew_D0_SK2(array, ArrayReversed)
1039#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1040 !DEC$ ATTRIBUTES DLLEXPORT :: setReversedNew_D0_SK2
1043 character(
*,SKG) ,
intent(in) :: array
1044 character(
*,SKG) ,
intent(out) :: ArrayReversed
1049 PURE module subroutine setReversedNew_D0_SK1(array, ArrayReversed)
1050#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1051 !DEC$ ATTRIBUTES DLLEXPORT :: setReversedNew_D0_SK1
1054 character(
*,SKG) ,
intent(in) :: array
1055 character(
*,SKG) ,
intent(out) :: ArrayReversed
1062 PURE module subroutine setReversedNew_D1_SK5(array, ArrayReversed)
1063#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1064 !DEC$ ATTRIBUTES DLLEXPORT :: setReversedNew_D1_SK5
1067 character(
*,SKG) ,
intent(in) ,
contiguous :: array(:)
1068 character(
*,SKG) ,
intent(out) ,
contiguous :: ArrayReversed(:)
1073 PURE module subroutine setReversedNew_D1_SK4(array, ArrayReversed)
1074#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1075 !DEC$ ATTRIBUTES DLLEXPORT :: setReversedNew_D1_SK4
1078 character(
*,SKG) ,
intent(in) ,
contiguous :: array(:)
1079 character(
*,SKG) ,
intent(out) ,
contiguous :: ArrayReversed(:)
1084 PURE module subroutine setReversedNew_D1_SK3(array, ArrayReversed)
1085#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1086 !DEC$ ATTRIBUTES DLLEXPORT :: setReversedNew_D1_SK3
1089 character(
*,SKG) ,
intent(in) ,
contiguous :: array(:)
1090 character(
*,SKG) ,
intent(out) ,
contiguous :: ArrayReversed(:)
1095 PURE module subroutine setReversedNew_D1_SK2(array, ArrayReversed)
1096#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1097 !DEC$ ATTRIBUTES DLLEXPORT :: setReversedNew_D1_SK2
1100 character(
*,SKG) ,
intent(in) ,
contiguous :: array(:)
1101 character(
*,SKG) ,
intent(out) ,
contiguous :: ArrayReversed(:)
1106 PURE module subroutine setReversedNew_D1_SK1(array, ArrayReversed)
1107#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1108 !DEC$ ATTRIBUTES DLLEXPORT :: setReversedNew_D1_SK1
1111 character(
*,SKG) ,
intent(in) ,
contiguous :: array(:)
1112 character(
*,SKG) ,
intent(out) ,
contiguous :: ArrayReversed(:)
1119 PURE module subroutine setReversedNew_D1_IK5(array, ArrayReversed)
1120#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1121 !DEC$ ATTRIBUTES DLLEXPORT :: setReversedNew_D1_IK5
1124 integer(IKG) ,
intent(in) ,
contiguous :: array(:)
1125 integer(IKG) ,
intent(out) ,
contiguous :: ArrayReversed(:)
1130 PURE module subroutine setReversedNew_D1_IK4(array, ArrayReversed)
1131#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1132 !DEC$ ATTRIBUTES DLLEXPORT :: setReversedNew_D1_IK4
1135 integer(IKG) ,
intent(in) ,
contiguous :: array(:)
1136 integer(IKG) ,
intent(out) ,
contiguous :: ArrayReversed(:)
1141 PURE module subroutine setReversedNew_D1_IK3(array, ArrayReversed)
1142#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1143 !DEC$ ATTRIBUTES DLLEXPORT :: setReversedNew_D1_IK3
1146 integer(IKG) ,
intent(in) ,
contiguous :: array(:)
1147 integer(IKG) ,
intent(out) ,
contiguous :: ArrayReversed(:)
1152 PURE module subroutine setReversedNew_D1_IK2(array, ArrayReversed)
1153#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1154 !DEC$ ATTRIBUTES DLLEXPORT :: setReversedNew_D1_IK2
1157 integer(IKG) ,
intent(in) ,
contiguous :: array(:)
1158 integer(IKG) ,
intent(out) ,
contiguous :: ArrayReversed(:)
1163 PURE module subroutine setReversedNew_D1_IK1(array, ArrayReversed)
1164#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1165 !DEC$ ATTRIBUTES DLLEXPORT :: setReversedNew_D1_IK1
1168 integer(IKG) ,
intent(in) ,
contiguous :: array(:)
1169 integer(IKG) ,
intent(out) ,
contiguous :: ArrayReversed(:)
1176 PURE module subroutine setReversedNew_D1_LK5(array, ArrayReversed)
1177#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1178 !DEC$ ATTRIBUTES DLLEXPORT :: setReversedNew_D1_LK5
1181 logical(LKG) ,
intent(in) ,
contiguous :: array(:)
1182 logical(LKG) ,
intent(out) ,
contiguous :: ArrayReversed(:)
1187 PURE module subroutine setReversedNew_D1_LK4(array, ArrayReversed)
1188#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1189 !DEC$ ATTRIBUTES DLLEXPORT :: setReversedNew_D1_LK4
1192 logical(LKG) ,
intent(in) ,
contiguous :: array(:)
1193 logical(LKG) ,
intent(out) ,
contiguous :: ArrayReversed(:)
1198 PURE module subroutine setReversedNew_D1_LK3(array, ArrayReversed)
1199#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1200 !DEC$ ATTRIBUTES DLLEXPORT :: setReversedNew_D1_LK3
1203 logical(LKG) ,
intent(in) ,
contiguous :: array(:)
1204 logical(LKG) ,
intent(out) ,
contiguous :: ArrayReversed(:)
1209 PURE module subroutine setReversedNew_D1_LK2(array, ArrayReversed)
1210#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1211 !DEC$ ATTRIBUTES DLLEXPORT :: setReversedNew_D1_LK2
1214 logical(LKG) ,
intent(in) ,
contiguous :: array(:)
1215 logical(LKG) ,
intent(out) ,
contiguous :: ArrayReversed(:)
1220 PURE module subroutine setReversedNew_D1_LK1(array, ArrayReversed)
1221#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1222 !DEC$ ATTRIBUTES DLLEXPORT :: setReversedNew_D1_LK1
1225 logical(LKG) ,
intent(in) ,
contiguous :: array(:)
1226 logical(LKG) ,
intent(out) ,
contiguous :: ArrayReversed(:)
1233 PURE module subroutine setReversedNew_D1_CK5(array, ArrayReversed)
1234#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1235 !DEC$ ATTRIBUTES DLLEXPORT :: setReversedNew_D1_CK5
1238 complex(CKG) ,
intent(in) ,
contiguous :: array(:)
1239 complex(CKG) ,
intent(out) ,
contiguous :: ArrayReversed(:)
1244 PURE module subroutine setReversedNew_D1_CK4(array, ArrayReversed)
1245#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1246 !DEC$ ATTRIBUTES DLLEXPORT :: setReversedNew_D1_CK4
1249 complex(CKG) ,
intent(in) ,
contiguous :: array(:)
1250 complex(CKG) ,
intent(out) ,
contiguous :: ArrayReversed(:)
1255 PURE module subroutine setReversedNew_D1_CK3(array, ArrayReversed)
1256#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1257 !DEC$ ATTRIBUTES DLLEXPORT :: setReversedNew_D1_CK3
1260 complex(CKG) ,
intent(in) ,
contiguous :: array(:)
1261 complex(CKG) ,
intent(out) ,
contiguous :: ArrayReversed(:)
1266 PURE module subroutine setReversedNew_D1_CK2(array, ArrayReversed)
1267#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1268 !DEC$ ATTRIBUTES DLLEXPORT :: setReversedNew_D1_CK2
1271 complex(CKG) ,
intent(in) ,
contiguous :: array(:)
1272 complex(CKG) ,
intent(out) ,
contiguous :: ArrayReversed(:)
1277 PURE module subroutine setReversedNew_D1_CK1(array, ArrayReversed)
1278#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1279 !DEC$ ATTRIBUTES DLLEXPORT :: setReversedNew_D1_CK1
1282 complex(CKG) ,
intent(in) ,
contiguous :: array(:)
1283 complex(CKG) ,
intent(out) ,
contiguous :: ArrayReversed(:)
1290 PURE module subroutine setReversedNew_D1_RK5(array, ArrayReversed)
1291#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1292 !DEC$ ATTRIBUTES DLLEXPORT :: setReversedNew_D1_RK5
1295 real(RKG) ,
intent(in) ,
contiguous :: array(:)
1296 real(RKG) ,
intent(out) ,
contiguous :: ArrayReversed(:)
1301 PURE module subroutine setReversedNew_D1_RK4(array, ArrayReversed)
1302#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1303 !DEC$ ATTRIBUTES DLLEXPORT :: setReversedNew_D1_RK4
1306 real(RKG) ,
intent(in) ,
contiguous :: array(:)
1307 real(RKG) ,
intent(out) ,
contiguous :: ArrayReversed(:)
1312 PURE module subroutine setReversedNew_D1_RK3(array, ArrayReversed)
1313#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1314 !DEC$ ATTRIBUTES DLLEXPORT :: setReversedNew_D1_RK3
1317 real(RKG) ,
intent(in) ,
contiguous :: array(:)
1318 real(RKG) ,
intent(out) ,
contiguous :: ArrayReversed(:)
1323 PURE module subroutine setReversedNew_D1_RK2(array, ArrayReversed)
1324#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1325 !DEC$ ATTRIBUTES DLLEXPORT :: setReversedNew_D1_RK2
1328 real(RKG) ,
intent(in) ,
contiguous :: array(:)
1329 real(RKG) ,
intent(out) ,
contiguous :: ArrayReversed(:)
1334 PURE module subroutine setReversedNew_D1_RK1(array, ArrayReversed)
1335#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1336 !DEC$ ATTRIBUTES DLLEXPORT :: setReversedNew_D1_RK1
1339 real(RKG) ,
intent(in) ,
contiguous :: array(:)
1340 real(RKG) ,
intent(out) ,
contiguous :: ArrayReversed(:)
1349 PURE module subroutine setReversedNew_D1_PSSK5(array, ArrayReversed)
1350#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1351 !DEC$ ATTRIBUTES DLLEXPORT :: setReversedNew_D1_PSSK5
1355 type(css_pdt(SKG)) ,
intent(in) ,
contiguous :: array(:)
1356 type(css_pdt(SKG)) ,
intent(out) ,
contiguous :: ArrayReversed(:)
1361 PURE module subroutine setReversedNew_D1_PSSK4(array, ArrayReversed)
1362#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1363 !DEC$ ATTRIBUTES DLLEXPORT :: setReversedNew_D1_PSSK4
1367 type(css_pdt(SKG)) ,
intent(in) ,
contiguous :: array(:)
1368 type(css_pdt(SKG)) ,
intent(out) ,
contiguous :: ArrayReversed(:)
1373 PURE module subroutine setReversedNew_D1_PSSK3(array, ArrayReversed)
1374#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1375 !DEC$ ATTRIBUTES DLLEXPORT :: setReversedNew_D1_PSSK3
1379 type(css_pdt(SKG)) ,
intent(in) ,
contiguous :: array(:)
1380 type(css_pdt(SKG)) ,
intent(out) ,
contiguous :: ArrayReversed(:)
1385 PURE module subroutine setReversedNew_D1_PSSK2(array, ArrayReversed)
1386#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1387 !DEC$ ATTRIBUTES DLLEXPORT :: setReversedNew_D1_PSSK2
1391 type(css_pdt(SKG)) ,
intent(in) ,
contiguous :: array(:)
1392 type(css_pdt(SKG)) ,
intent(out) ,
contiguous :: ArrayReversed(:)
1397 PURE module subroutine setReversedNew_D1_PSSK1(array, ArrayReversed)
1398#if __INTEL_COMPILER && DLL_ENABLED && (_WIN32 || _WIN64)
1399 !DEC$ ATTRIBUTES DLLEXPORT :: setReversedNew_D1_PSSK1
1403 type(css_pdt(SKG)) ,
intent(in) ,
contiguous :: array(:)
1404 type(css_pdt(SKG)) ,
intent(out) ,
contiguous :: ArrayReversed(:)
Generate and return an output array whose elements are the reversed-order elements of the input array...
Reverse the order of the elements of the input array, such that   array = array(lenArray:1:-1),...
This module contains procedures and generic interfaces for reversing the order of elements in arrays ...
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 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...