org.eclipse.photran.core.vpg.tests/type-checker-test-code/test-constants/test.f90

type point
  integer x, y
end type

type(point) :: pt




print *, 3   !<<<<< 10, 10, 10, 11, integer
print *, 3.4 !<<<<< 11, 10, 11, 13, real
!print *, point(3, 4)  ! 12, 10, 12, 21, type(point)
end