text: Program: fileio1.f90
  // GlobalScope, Parent: None
  SymbolTable Global {
    // Symbol List: 
  
    // (1, 9)
    // ID: 1, NonConstant, NonAllocatable, NonTarget, NonPointer, Alloc_None, Intent_None, Global
    (int32)() readtest
  }
  
  // MainProgram
  int32 readtest() {
    // MainProgramScope, Parent: GlobalScope
    SymbolTable readtest {
      // Symbol List: 
  
      // (4, 14)
      // ID: 4, NonConstant, NonAllocatable, NonTarget, NonPointer, StaticLocal, Intent_None, readtest
      int32 i
      // (2, 29)
      // ID: 2, NonConstant, NonAllocatable, NonTarget, NonPointer, StaticLocal, Intent_None, readtest
      int32[1:10] x
      // (3, 29)
      // ID: 3, NonConstant, NonAllocatable, NonTarget, NonPointer, StaticLocal, Intent_None, readtest
      int32[1:10] y
    }
  
    // Specification Constructs: 
  
    EntityDeclList {
    }
  
    // Execution Constructs: 
  
    // (7, 4)
    1 = open({./fileio/input/1.dat}, OLD)
    // (8, 4)
    t.1 = (/*IndVar=*/i, /*Init=*/1, /*End=*/10, /*Incr=*/1)
    do (t.1) {
      // (9, 7)
      read(unit = 1) x(i), y(i)
    }
    // (12, 4)
    t.2 = (/*IndVar=*/i, /*Init=*/1, /*End=*/10, /*Incr=*/1)
    do (t.2) {
      // (13, 7)
      printf(x(i), y(i))
    }
  }
  
  