＜LBOUND Example Program＞

Program lbound_example
  Real a(0:2,4)
  Print 1, Lbound(a,Dim=1)
  Print 1, Lbound(a,Dim=2)
  Print 1, Lbound(a)
1 Format(99(1X,I0,:,','))
End

---

■ Execution Results

 0
 1
 0, 1