PROGRAM parsing_03
    INTEGER :: tes
    INTEGER :: res
    tes = 1
    res = tes * 2
    print *, res, tes
END PROGRAM