55   static constexpr int records{10};  in TEST()  local
56   for (int j{1}; j <= records; ++j) {  in TEST()
70   for (int j{records}; j >= 1; --j) {  in TEST()
111   static constexpr int records{10};  in TEST()  local
112   for (int j{1}; j <= records; ++j) {  in TEST()
131   for (int j{records}; j >= 1; --j) {  in TEST()
198   static const int records{10};  in TEST()  local
199   for (int j{1}; j <= records; ++j) {  in TEST()
215   for (int j{1}; j <= records; ++j) {  in TEST()
228   for (int j{records}; j >= 1; --j) {  in TEST()
272   static const int records{10};  in TEST()  local
273   std::int64_t buffer[records]; // INTEGER*8 :: BUFFER(0:9) = [(j,j=0,9)]  in TEST()
274   for (int j{0}; j < records; ++j) {  in TEST()
278   for (int j{1}; j <= records; ++j) {  in TEST()
293   for (int j{1}; j <= records; ++j) {  in TEST()
308   for (int j{records}; j >= 1; --j) {  in TEST()
355   static constexpr int records{10};  in TEST()  local
357   for (int j{1}; j <= records; ++j) {  in TEST()
367   for (int j{records}; j >= 1; --j) {  in TEST()
404   static const int records{10};  in TEST()  local
405   std::int64_t buffer[records]; // INTEGER*8 :: BUFFER(0:9) = [(j,j=0,9)]  in TEST()
406   for (int j{0}; j < records; ++j) {  in TEST()
411   for (int j{1}; j <= records; ++j) {  in TEST()
429   for (int j{1}; j <= records; ++j) {  in TEST()
435     std::int64_t check[records];  in TEST()
450   for (int j{records}; j >= 1; --j) {  in TEST()
461     std::int64_t check[records];  in TEST()
507   static constexpr std::string_view records[] = {  in TEST()  local
510   for (const auto &record : records) {  in TEST()
579   static constexpr std::string_view records[] = {"ABCDEFGHIJKLMNOPQRST"};  in TEST()  local
581   for (const auto &record : records) {  in TEST()