pack_data_I2_R8 Subroutine

private pure subroutine pack_data_I2_R8(a1, a2, packed)

Arguments

TypeIntentOptionalAttributesName
integer(kind=I2P), intent(in) :: a1(1:)
real(kind=R8P), intent(in) :: a2(1:)
integer(kind=I1P), intent(inout), allocatable:: packed(:)

Called by

proc~~pack_data_i2_r8~~CalledByGraph proc~pack_data_i2_r8 pack_data_I2_R8 interface~pack_data pack_data interface~pack_data->proc~pack_data_i2_r8 proc~encode_binary_dataarray1_rank1_r4p encode_binary_dataarray1_rank1_R4P proc~encode_binary_dataarray1_rank1_r4p->interface~pack_data proc~encode_binary_dataarray3_rank3_r8p encode_binary_dataarray3_rank3_R8P proc~encode_binary_dataarray3_rank3_r8p->interface~pack_data proc~encode_binary_dataarray6_rank1_i1p encode_binary_dataarray6_rank1_I1P proc~encode_binary_dataarray6_rank1_i1p->interface~pack_data program~volatile_doctest~949 volatile_doctest program~volatile_doctest~949->interface~pack_data program~volatile_doctest~371 volatile_doctest program~volatile_doctest~371->interface~pack_data program~volatile_doctest~550 volatile_doctest program~volatile_doctest~550->interface~pack_data proc~encode_binary_dataarray1_rank4_i8p encode_binary_dataarray1_rank4_I8P proc~encode_binary_dataarray1_rank4_i8p->interface~pack_data program~volatile_doctest~382 volatile_doctest program~volatile_doctest~382->interface~pack_data program~volatile_doctest~570 volatile_doctest program~volatile_doctest~570->interface~pack_data program~volatile_doctest~960 volatile_doctest program~volatile_doctest~960->interface~pack_data program~volatile_doctest~1128 volatile_doctest program~volatile_doctest~1128->interface~pack_data program~volatile_doctest~1148 volatile_doctest program~volatile_doctest~1148->interface~pack_data proc~encode_binary_dataarray1_rank1_i8p encode_binary_dataarray1_rank1_I8P proc~encode_binary_dataarray1_rank1_i8p->interface~pack_data proc~encode_binary_dataarray3_rank3_r4p encode_binary_dataarray3_rank3_R4P proc~encode_binary_dataarray3_rank3_r4p->interface~pack_data proc~encode_binary_dataarray1_rank2_i2p encode_binary_dataarray1_rank2_I2P proc~encode_binary_dataarray1_rank2_i2p->interface~pack_data program~volatile_doctest~372 volatile_doctest program~volatile_doctest~372->interface~pack_data program~volatile_doctest~392 volatile_doctest program~volatile_doctest~392->interface~pack_data program~volatile_doctest~560 volatile_doctest program~volatile_doctest~560->interface~pack_data proc~encode_binary_dataarray6_rank3_r8p encode_binary_dataarray6_rank3_R8P proc~encode_binary_dataarray6_rank3_r8p->interface~pack_data program~volatile_doctest~950 volatile_doctest program~volatile_doctest~950->interface~pack_data program~volatile_doctest~970 volatile_doctest program~volatile_doctest~970->interface~pack_data program~volatile_doctest~1138 volatile_doctest program~volatile_doctest~1138->interface~pack_data program~volatile_doctest~383 volatile_doctest program~volatile_doctest~383->interface~pack_data program~volatile_doctest~551 volatile_doctest program~volatile_doctest~551->interface~pack_data program~volatile_doctest~571 volatile_doctest program~volatile_doctest~571->interface~pack_data program~volatile_doctest~961 volatile_doctest program~volatile_doctest~961->interface~pack_data program~volatile_doctest~1129 volatile_doctest program~volatile_doctest~1129->interface~pack_data program~volatile_doctest~1149 volatile_doctest program~volatile_doctest~1149->interface~pack_data proc~encode_binary_dataarray3_rank3_i8p encode_binary_dataarray3_rank3_I8P proc~encode_binary_dataarray3_rank3_i8p->interface~pack_data proc~encode_binary_dataarray1_rank2_i1p encode_binary_dataarray1_rank2_I1P proc~encode_binary_dataarray1_rank2_i1p->interface~pack_data proc~encode_binary_dataarray6_rank3_r4p encode_binary_dataarray6_rank3_R4P proc~encode_binary_dataarray6_rank3_r4p->interface~pack_data program~volatile_doctest~373 volatile_doctest program~volatile_doctest~373->interface~pack_data program~volatile_doctest~393 volatile_doctest program~volatile_doctest~393->interface~pack_data program~volatile_doctest~561 volatile_doctest program~volatile_doctest~561->interface~pack_data program~volatile_doctest~951 volatile_doctest program~volatile_doctest~951->interface~pack_data program~volatile_doctest~971 volatile_doctest program~volatile_doctest~971->interface~pack_data program~volatile_doctest~1139 volatile_doctest program~volatile_doctest~1139->interface~pack_data proc~encode_binary_dataarray1_rank4_i2p encode_binary_dataarray1_rank4_I2P proc~encode_binary_dataarray1_rank4_i2p->interface~pack_data program~volatile_doctest~384 volatile_doctest program~volatile_doctest~384->interface~pack_data program~volatile_doctest~552 volatile_doctest program~volatile_doctest~552->interface~pack_data program~volatile_doctest~572 volatile_doctest program~volatile_doctest~572->interface~pack_data program~volatile_doctest~962 volatile_doctest program~volatile_doctest~962->interface~pack_data program~volatile_doctest~1130 volatile_doctest program~volatile_doctest~1130->interface~pack_data program~volatile_doctest~1150 volatile_doctest program~volatile_doctest~1150->interface~pack_data program~volatile_doctest~952 volatile_doctest program~volatile_doctest~952->interface~pack_data proc~encode_binary_dataarray1_rank3_r8p encode_binary_dataarray1_rank3_R8P proc~encode_binary_dataarray1_rank3_r8p->interface~pack_data proc~encode_binary_dataarray6_rank3_i8p encode_binary_dataarray6_rank3_I8P proc~encode_binary_dataarray6_rank3_i8p->interface~pack_data program~volatile_doctest~374 volatile_doctest program~volatile_doctest~374->interface~pack_data program~volatile_doctest~394 volatile_doctest program~volatile_doctest~394->interface~pack_data program~volatile_doctest~562 volatile_doctest program~volatile_doctest~562->interface~pack_data program~volatile_doctest~972 volatile_doctest program~volatile_doctest~972->interface~pack_data program~volatile_doctest~1140 volatile_doctest program~volatile_doctest~1140->interface~pack_data proc~encode_binary_dataarray1_rank4_i1p encode_binary_dataarray1_rank4_I1P proc~encode_binary_dataarray1_rank4_i1p->interface~pack_data program~volatile_doctest~385 volatile_doctest program~volatile_doctest~385->interface~pack_data program~volatile_doctest~553 volatile_doctest program~volatile_doctest~553->interface~pack_data program~volatile_doctest~573 volatile_doctest program~volatile_doctest~573->interface~pack_data program~volatile_doctest~963 volatile_doctest program~volatile_doctest~963->interface~pack_data program~volatile_doctest~1131 volatile_doctest program~volatile_doctest~1131->interface~pack_data proc~encode_binary_dataarray3_rank3_i2p encode_binary_dataarray3_rank3_I2P proc~encode_binary_dataarray3_rank3_i2p->interface~pack_data program~volatile_doctest~1121 volatile_doctest program~volatile_doctest~1121->interface~pack_data program~volatile_doctest~973 volatile_doctest program~volatile_doctest~973->interface~pack_data program~volatile_doctest~1141 volatile_doctest program~volatile_doctest~1141->interface~pack_data proc~encode_binary_dataarray1_rank3_r4p encode_binary_dataarray1_rank3_R4P proc~encode_binary_dataarray1_rank3_r4p->interface~pack_data program~volatile_doctest~375 volatile_doctest program~volatile_doctest~375->interface~pack_data program~volatile_doctest~395 volatile_doctest program~volatile_doctest~395->interface~pack_data program~volatile_doctest~563 volatile_doctest program~volatile_doctest~563->interface~pack_data program~volatile_doctest~953 volatile_doctest program~volatile_doctest~953->interface~pack_data proc~encode_binary_dataarray1_rank1_i2p encode_binary_dataarray1_rank1_I2P proc~encode_binary_dataarray1_rank1_i2p->interface~pack_data proc~encode_binary_dataarray3_rank1_r8p encode_binary_dataarray3_rank1_R8P proc~encode_binary_dataarray3_rank1_r8p->interface~pack_data program~volatile_doctest~386 volatile_doctest program~volatile_doctest~386->interface~pack_data program~volatile_doctest~554 volatile_doctest program~volatile_doctest~554->interface~pack_data program~volatile_doctest~574 volatile_doctest program~volatile_doctest~574->interface~pack_data program~volatile_doctest~964 volatile_doctest program~volatile_doctest~964->interface~pack_data program~volatile_doctest~1132 volatile_doctest program~volatile_doctest~1132->interface~pack_data proc~encode_binary_dataarray3_rank3_i1p encode_binary_dataarray3_rank3_I1P proc~encode_binary_dataarray3_rank3_i1p->interface~pack_data proc~encode_binary_dataarray1_rank3_i8p encode_binary_dataarray1_rank3_I8P proc~encode_binary_dataarray1_rank3_i8p->interface~pack_data proc~encode_binary_dataarray6_rank3_i2p encode_binary_dataarray6_rank3_I2P proc~encode_binary_dataarray6_rank3_i2p->interface~pack_data program~volatile_doctest~376 volatile_doctest program~volatile_doctest~376->interface~pack_data program~volatile_doctest~396 volatile_doctest program~volatile_doctest~396->interface~pack_data program~volatile_doctest~564 volatile_doctest program~volatile_doctest~564->interface~pack_data program~volatile_doctest~954 volatile_doctest program~volatile_doctest~954->interface~pack_data program~volatile_doctest~1122 volatile_doctest program~volatile_doctest~1122->interface~pack_data program~volatile_doctest~1142 volatile_doctest program~volatile_doctest~1142->interface~pack_data proc~encode_binary_dataarray1_rank1_i1p encode_binary_dataarray1_rank1_I1P proc~encode_binary_dataarray1_rank1_i1p->interface~pack_data proc~encode_binary_dataarray3_rank1_r4p encode_binary_dataarray3_rank1_R4P proc~encode_binary_dataarray3_rank1_r4p->interface~pack_data program~volatile_doctest~387 volatile_doctest program~volatile_doctest~387->interface~pack_data program~volatile_doctest~555 volatile_doctest program~volatile_doctest~555->interface~pack_data program~volatile_doctest~575 volatile_doctest program~volatile_doctest~575->interface~pack_data program~volatile_doctest~965 volatile_doctest program~volatile_doctest~965->interface~pack_data program~volatile_doctest~1133 volatile_doctest program~volatile_doctest~1133->interface~pack_data proc~encode_binary_dataarray6_rank1_r8p encode_binary_dataarray6_rank1_R8P proc~encode_binary_dataarray6_rank1_r8p->interface~pack_data program~volatile_doctest~944 volatile_doctest program~volatile_doctest~944->interface~pack_data proc~encode_binary_dataarray6_rank3_i1p encode_binary_dataarray6_rank3_I1P proc~encode_binary_dataarray6_rank3_i1p->interface~pack_data program~volatile_doctest~377 volatile_doctest program~volatile_doctest~377->interface~pack_data program~volatile_doctest~397 volatile_doctest program~volatile_doctest~397->interface~pack_data program~volatile_doctest~565 volatile_doctest program~volatile_doctest~565->interface~pack_data program~volatile_doctest~955 volatile_doctest program~volatile_doctest~955->interface~pack_data program~volatile_doctest~1123 volatile_doctest program~volatile_doctest~1123->interface~pack_data program~volatile_doctest~1143 volatile_doctest program~volatile_doctest~1143->interface~pack_data proc~encode_binary_dataarray1_rank2_r8p encode_binary_dataarray1_rank2_R8P proc~encode_binary_dataarray1_rank2_r8p->interface~pack_data proc~encode_binary_dataarray3_rank1_i8p encode_binary_dataarray3_rank1_I8P proc~encode_binary_dataarray3_rank1_i8p->interface~pack_data program~volatile_doctest~388 volatile_doctest program~volatile_doctest~388->interface~pack_data program~volatile_doctest~556 volatile_doctest program~volatile_doctest~556->interface~pack_data program~volatile_doctest~966 volatile_doctest program~volatile_doctest~966->interface~pack_data program~volatile_doctest~1134 volatile_doctest program~volatile_doctest~1134->interface~pack_data proc~encode_binary_dataarray6_rank1_r4p encode_binary_dataarray6_rank1_R4P proc~encode_binary_dataarray6_rank1_r4p->interface~pack_data program~volatile_doctest~945 volatile_doctest program~volatile_doctest~945->interface~pack_data proc~encode_binary_dataarray1_rank3_i2p encode_binary_dataarray1_rank3_I2P proc~encode_binary_dataarray1_rank3_i2p->interface~pack_data program~volatile_doctest~378 volatile_doctest program~volatile_doctest~378->interface~pack_data program~volatile_doctest~398 volatile_doctest program~volatile_doctest~398->interface~pack_data program~volatile_doctest~546 volatile_doctest program~volatile_doctest~546->interface~pack_data program~volatile_doctest~566 volatile_doctest program~volatile_doctest~566->interface~pack_data program~volatile_doctest~956 volatile_doctest program~volatile_doctest~956->interface~pack_data program~volatile_doctest~1124 volatile_doctest program~volatile_doctest~1124->interface~pack_data program~volatile_doctest~1144 volatile_doctest program~volatile_doctest~1144->interface~pack_data proc~encode_binary_dataarray1_rank2_r4p encode_binary_dataarray1_rank2_R4P proc~encode_binary_dataarray1_rank2_r4p->interface~pack_data program~volatile_doctest~389 volatile_doctest program~volatile_doctest~389->interface~pack_data program~volatile_doctest~557 volatile_doctest program~volatile_doctest~557->interface~pack_data program~volatile_doctest~967 volatile_doctest program~volatile_doctest~967->interface~pack_data program~volatile_doctest~1135 volatile_doctest program~volatile_doctest~1135->interface~pack_data proc~encode_binary_dataarray6_rank1_i8p encode_binary_dataarray6_rank1_I8P proc~encode_binary_dataarray6_rank1_i8p->interface~pack_data program~volatile_doctest~946 volatile_doctest program~volatile_doctest~946->interface~pack_data proc~encode_binary_dataarray1_rank3_i1p encode_binary_dataarray1_rank3_I1P proc~encode_binary_dataarray1_rank3_i1p->interface~pack_data program~volatile_doctest~379 volatile_doctest program~volatile_doctest~379->interface~pack_data program~volatile_doctest~547 volatile_doctest program~volatile_doctest~547->interface~pack_data program~volatile_doctest~567 volatile_doctest program~volatile_doctest~567->interface~pack_data program~volatile_doctest~957 volatile_doctest program~volatile_doctest~957->interface~pack_data program~volatile_doctest~1125 volatile_doctest program~volatile_doctest~1125->interface~pack_data program~volatile_doctest~1145 volatile_doctest program~volatile_doctest~1145->interface~pack_data proc~encode_binary_dataarray1_rank2_i8p encode_binary_dataarray1_rank2_I8P proc~encode_binary_dataarray1_rank2_i8p->interface~pack_data proc~encode_binary_dataarray3_rank1_i2p encode_binary_dataarray3_rank1_I2P proc~encode_binary_dataarray3_rank1_i2p->interface~pack_data program~volatile_doctest~390 volatile_doctest program~volatile_doctest~390->interface~pack_data program~volatile_doctest~558 volatile_doctest program~volatile_doctest~558->interface~pack_data program~volatile_doctest~968 volatile_doctest program~volatile_doctest~968->interface~pack_data program~volatile_doctest~1136 volatile_doctest program~volatile_doctest~1136->interface~pack_data program~volatile_doctest~369 volatile_doctest program~volatile_doctest~369->interface~pack_data program~volatile_doctest~947 volatile_doctest program~volatile_doctest~947->interface~pack_data program~volatile_doctest~548 volatile_doctest program~volatile_doctest~548->interface~pack_data proc~encode_binary_dataarray1_rank4_r8p encode_binary_dataarray1_rank4_R8P proc~encode_binary_dataarray1_rank4_r8p->interface~pack_data program~volatile_doctest~380 volatile_doctest program~volatile_doctest~380->interface~pack_data program~volatile_doctest~568 volatile_doctest program~volatile_doctest~568->interface~pack_data program~volatile_doctest~958 volatile_doctest program~volatile_doctest~958->interface~pack_data program~volatile_doctest~1126 volatile_doctest program~volatile_doctest~1126->interface~pack_data program~volatile_doctest~1146 volatile_doctest program~volatile_doctest~1146->interface~pack_data proc~encode_binary_dataarray1_rank1_r8p encode_binary_dataarray1_rank1_R8P proc~encode_binary_dataarray1_rank1_r8p->interface~pack_data proc~encode_binary_dataarray3_rank1_i1p encode_binary_dataarray3_rank1_I1P proc~encode_binary_dataarray3_rank1_i1p->interface~pack_data program~volatile_doctest~391 volatile_doctest program~volatile_doctest~391->interface~pack_data program~volatile_doctest~559 volatile_doctest program~volatile_doctest~559->interface~pack_data program~volatile_doctest~969 volatile_doctest program~volatile_doctest~969->interface~pack_data program~volatile_doctest~1137 volatile_doctest program~volatile_doctest~1137->interface~pack_data proc~encode_binary_dataarray6_rank1_i2p encode_binary_dataarray6_rank1_I2P proc~encode_binary_dataarray6_rank1_i2p->interface~pack_data program~volatile_doctest~370 volatile_doctest program~volatile_doctest~370->interface~pack_data program~volatile_doctest~948 volatile_doctest program~volatile_doctest~948->interface~pack_data proc~encode_binary_dataarray1_rank4_r4p encode_binary_dataarray1_rank4_R4P proc~encode_binary_dataarray1_rank4_r4p->interface~pack_data program~volatile_doctest~381 volatile_doctest program~volatile_doctest~381->interface~pack_data program~volatile_doctest~549 volatile_doctest program~volatile_doctest~549->interface~pack_data program~volatile_doctest~569 volatile_doctest program~volatile_doctest~569->interface~pack_data program~volatile_doctest~959 volatile_doctest program~volatile_doctest~959->interface~pack_data program~volatile_doctest~1127 volatile_doctest program~volatile_doctest~1127->interface~pack_data program~volatile_doctest~1147 volatile_doctest program~volatile_doctest~1147->interface~pack_data interface~encode_binary_dataarray encode_binary_dataarray interface~encode_binary_dataarray->proc~encode_binary_dataarray1_rank1_r4p interface~encode_binary_dataarray->proc~encode_binary_dataarray3_rank3_r8p interface~encode_binary_dataarray->proc~encode_binary_dataarray6_rank1_i1p interface~encode_binary_dataarray->proc~encode_binary_dataarray1_rank4_i8p interface~encode_binary_dataarray->proc~encode_binary_dataarray1_rank1_i8p interface~encode_binary_dataarray->proc~encode_binary_dataarray3_rank3_r4p interface~encode_binary_dataarray->proc~encode_binary_dataarray1_rank2_i2p interface~encode_binary_dataarray->proc~encode_binary_dataarray6_rank3_r8p interface~encode_binary_dataarray->proc~encode_binary_dataarray3_rank3_i8p interface~encode_binary_dataarray->proc~encode_binary_dataarray1_rank2_i1p interface~encode_binary_dataarray->proc~encode_binary_dataarray6_rank3_r4p interface~encode_binary_dataarray->proc~encode_binary_dataarray1_rank4_i2p interface~encode_binary_dataarray->proc~encode_binary_dataarray1_rank3_r8p interface~encode_binary_dataarray->proc~encode_binary_dataarray6_rank3_i8p interface~encode_binary_dataarray->proc~encode_binary_dataarray1_rank4_i1p interface~encode_binary_dataarray->proc~encode_binary_dataarray3_rank3_i2p interface~encode_binary_dataarray->proc~encode_binary_dataarray1_rank3_r4p interface~encode_binary_dataarray->proc~encode_binary_dataarray1_rank1_i2p interface~encode_binary_dataarray->proc~encode_binary_dataarray3_rank1_r8p interface~encode_binary_dataarray->proc~encode_binary_dataarray3_rank3_i1p interface~encode_binary_dataarray->proc~encode_binary_dataarray1_rank3_i8p interface~encode_binary_dataarray->proc~encode_binary_dataarray6_rank3_i2p interface~encode_binary_dataarray->proc~encode_binary_dataarray1_rank1_i1p interface~encode_binary_dataarray->proc~encode_binary_dataarray3_rank1_r4p interface~encode_binary_dataarray->proc~encode_binary_dataarray6_rank1_r8p interface~encode_binary_dataarray->proc~encode_binary_dataarray6_rank3_i1p interface~encode_binary_dataarray->proc~encode_binary_dataarray1_rank2_r8p interface~encode_binary_dataarray->proc~encode_binary_dataarray3_rank1_i8p interface~encode_binary_dataarray->proc~encode_binary_dataarray6_rank1_r4p interface~encode_binary_dataarray->proc~encode_binary_dataarray1_rank3_i2p interface~encode_binary_dataarray->proc~encode_binary_dataarray1_rank2_r4p interface~encode_binary_dataarray->proc~encode_binary_dataarray6_rank1_i8p interface~encode_binary_dataarray->proc~encode_binary_dataarray1_rank3_i1p interface~encode_binary_dataarray->proc~encode_binary_dataarray1_rank2_i8p interface~encode_binary_dataarray->proc~encode_binary_dataarray3_rank1_i2p interface~encode_binary_dataarray->proc~encode_binary_dataarray1_rank4_r8p interface~encode_binary_dataarray->proc~encode_binary_dataarray1_rank1_r8p interface~encode_binary_dataarray->proc~encode_binary_dataarray3_rank1_i1p interface~encode_binary_dataarray->proc~encode_binary_dataarray6_rank1_i2p interface~encode_binary_dataarray->proc~encode_binary_dataarray1_rank4_r4p proc~write_dataarray1_rank1_r4p~2 write_dataarray1_rank1_R4P proc~write_dataarray1_rank1_r4p~2->interface~encode_binary_dataarray proc~write_dataarray1_rank3_i1p~2 write_dataarray1_rank3_I1P proc~write_dataarray1_rank3_i1p~2->interface~encode_binary_dataarray proc~write_dataarray1_rank2_i4p~2 write_dataarray1_rank2_I4P proc~write_dataarray1_rank2_i4p~2->interface~encode_binary_dataarray proc~write_dataarray3_rank1_r4p~2 write_dataarray3_rank1_R4P proc~write_dataarray3_rank1_r4p~2->interface~encode_binary_dataarray proc~write_dataarray6_rank1_r4p~2 write_dataarray6_rank1_R4P proc~write_dataarray6_rank1_r4p~2->interface~encode_binary_dataarray proc~write_dataarray6_rank3_i4p~2 write_dataarray6_rank3_I4P proc~write_dataarray6_rank3_i4p~2->interface~encode_binary_dataarray proc~write_dataarray1_rank1_i2p~2 write_dataarray1_rank1_I2P proc~write_dataarray1_rank1_i2p~2->interface~encode_binary_dataarray proc~write_dataarray1_rank3_r8p~2 write_dataarray1_rank3_R8P proc~write_dataarray1_rank3_r8p~2->interface~encode_binary_dataarray proc~write_dataarray1_rank4_i8p~2 write_dataarray1_rank4_I8P proc~write_dataarray1_rank4_i8p~2->interface~encode_binary_dataarray proc~write_dataarray3_rank1_i2p~2 write_dataarray3_rank1_I2P proc~write_dataarray3_rank1_i2p~2->interface~encode_binary_dataarray proc~write_dataarray6_rank1_i2p~2 write_dataarray6_rank1_I2P proc~write_dataarray6_rank1_i2p~2->interface~encode_binary_dataarray proc~write_dataarray1_rank2_r4p~2 write_dataarray1_rank2_R4P proc~write_dataarray1_rank2_r4p~2->interface~encode_binary_dataarray proc~write_dataarray1_rank3_i4p~2 write_dataarray1_rank3_I4P proc~write_dataarray1_rank3_i4p~2->interface~encode_binary_dataarray proc~write_dataarray1_rank4_i1p~2 write_dataarray1_rank4_I1P proc~write_dataarray1_rank4_i1p~2->interface~encode_binary_dataarray proc~write_dataarray3_rank3_r4p~2 write_dataarray3_rank3_R4P proc~write_dataarray3_rank3_r4p~2->interface~encode_binary_dataarray proc~write_dataarray3_rank3_i1p~2 write_dataarray3_rank3_I1P proc~write_dataarray3_rank3_i1p~2->interface~encode_binary_dataarray proc~write_dataarray6_rank3_r4p~2 write_dataarray6_rank3_R4P proc~write_dataarray6_rank3_r4p~2->interface~encode_binary_dataarray proc~write_dataarray1_rank1_i8p~2 write_dataarray1_rank1_I8P proc~write_dataarray1_rank1_i8p~2->interface~encode_binary_dataarray proc~write_dataarray1_rank2_i2p~2 write_dataarray1_rank2_I2P proc~write_dataarray1_rank2_i2p~2->interface~encode_binary_dataarray proc~write_dataarray1_rank4_r8p~2 write_dataarray1_rank4_R8P proc~write_dataarray1_rank4_r8p~2->interface~encode_binary_dataarray proc~write_dataarray3_rank1_i8p~2 write_dataarray3_rank1_I8P proc~write_dataarray3_rank1_i8p~2->interface~encode_binary_dataarray proc~write_dataarray6_rank1_i8p~2 write_dataarray6_rank1_I8P proc~write_dataarray6_rank1_i8p~2->interface~encode_binary_dataarray proc~write_dataarray6_rank3_i2p~2 write_dataarray6_rank3_I2P proc~write_dataarray6_rank3_i2p~2->interface~encode_binary_dataarray proc~write_dataarray1_rank1_i1p~2 write_dataarray1_rank1_I1P proc~write_dataarray1_rank1_i1p~2->interface~encode_binary_dataarray proc~write_dataarray1_rank3_r4p~2 write_dataarray1_rank3_R4P proc~write_dataarray1_rank3_r4p~2->interface~encode_binary_dataarray proc~write_dataarray1_rank4_i4p~2 write_dataarray1_rank4_I4P proc~write_dataarray1_rank4_i4p~2->interface~encode_binary_dataarray proc~write_dataarray3_rank1_i1p~2 write_dataarray3_rank1_I1P proc~write_dataarray3_rank1_i1p~2->interface~encode_binary_dataarray proc~write_dataarray3_rank3_i4p~2 write_dataarray3_rank3_I4P proc~write_dataarray3_rank3_i4p~2->interface~encode_binary_dataarray proc~write_dataarray6_rank1_i1p~2 write_dataarray6_rank1_I1P proc~write_dataarray6_rank1_i1p~2->interface~encode_binary_dataarray proc~write_dataarray1_rank1_r8p~2 write_dataarray1_rank1_R8P proc~write_dataarray1_rank1_r8p~2->interface~encode_binary_dataarray proc~write_dataarray1_rank2_i8p~2 write_dataarray1_rank2_I8P proc~write_dataarray1_rank2_i8p~2->interface~encode_binary_dataarray proc~write_dataarray1_rank3_i2p~2 write_dataarray1_rank3_I2P proc~write_dataarray1_rank3_i2p~2->interface~encode_binary_dataarray proc~write_dataarray3_rank1_r8p~2 write_dataarray3_rank1_R8P proc~write_dataarray3_rank1_r8p~2->interface~encode_binary_dataarray proc~write_dataarray3_rank3_i8p~2 write_dataarray3_rank3_I8P proc~write_dataarray3_rank3_i8p~2->interface~encode_binary_dataarray proc~write_dataarray6_rank1_r8p~2 write_dataarray6_rank1_R8P proc~write_dataarray6_rank1_r8p~2->interface~encode_binary_dataarray proc~write_dataarray6_rank3_i8p~2 write_dataarray6_rank3_I8P proc~write_dataarray6_rank3_i8p~2->interface~encode_binary_dataarray proc~write_dataarray1_rank1_i4p~2 write_dataarray1_rank1_I4P proc~write_dataarray1_rank1_i4p~2->interface~encode_binary_dataarray proc~write_dataarray1_rank2_i1p~2 write_dataarray1_rank2_I1P proc~write_dataarray1_rank2_i1p~2->interface~encode_binary_dataarray proc~write_dataarray1_rank4_r4p~2 write_dataarray1_rank4_R4P proc~write_dataarray1_rank4_r4p~2->interface~encode_binary_dataarray proc~write_dataarray3_rank1_i4p~2 write_dataarray3_rank1_I4P proc~write_dataarray3_rank1_i4p~2->interface~encode_binary_dataarray proc~write_dataarray6_rank1_i4p~2 write_dataarray6_rank1_I4P proc~write_dataarray6_rank1_i4p~2->interface~encode_binary_dataarray proc~write_dataarray6_rank3_i1p~2 write_dataarray6_rank3_I1P proc~write_dataarray6_rank3_i1p~2->interface~encode_binary_dataarray proc~write_dataarray1_rank2_r8p~2 write_dataarray1_rank2_R8P proc~write_dataarray1_rank2_r8p~2->interface~encode_binary_dataarray proc~write_dataarray1_rank3_i8p~2 write_dataarray1_rank3_I8P proc~write_dataarray1_rank3_i8p~2->interface~encode_binary_dataarray proc~write_dataarray1_rank4_i2p~2 write_dataarray1_rank4_I2P proc~write_dataarray1_rank4_i2p~2->interface~encode_binary_dataarray proc~write_dataarray3_rank3_r8p~2 write_dataarray3_rank3_R8P proc~write_dataarray3_rank3_r8p~2->interface~encode_binary_dataarray proc~write_dataarray3_rank3_i2p~2 write_dataarray3_rank3_I2P proc~write_dataarray3_rank3_i2p~2->interface~encode_binary_dataarray proc~write_dataarray6_rank3_r8p~2 write_dataarray6_rank3_R8P proc~write_dataarray6_rank3_r8p~2->interface~encode_binary_dataarray

Contents

Source Code


Source Code

   pure subroutine pack_data_I2_R8(a1, a2, packed)
   !< Pack different kinds of data into single I1P array.
   !<
   !<```fortran
   !< use befor64
   !< use penf
   !< integer(I2P)              :: a1(1)
   !< real(R8P)                 :: a2(1)
   !< integer(I1P), allocatable :: pack(:)
   !< a1(1) = 0
   !< a2(1) = 1
   !< call pack_data(a1=a1, a2=a2, packed=pack)
   !< print *, pack(size(pack, dim=1))
   !<```
   !=> 63 <<<
   integer(I2P),              intent(in)    :: a1(1:)    !< First data stream.
   real(R8P),                 intent(in)    :: a2(1:)    !< Second data stream.
   integer(I1P), allocatable, intent(inout) :: packed(:) !< Packed data into I1P array.
   integer(I1P), allocatable                :: p1(:)     !< Temporary packed data of first stream.
   integer(I1P), allocatable                :: p2(:)     !< Temporary packed data of second stream.

   p1 = transfer(a1,p1)
   p2 = transfer(a2,p2)
   packed = [p1,p2]
   endsubroutine pack_data_I2_R8