program main
    implicit none
    
    real(3) :: x
    
end program
