break common continue date default dimension do else enddo endif for goto go to if then return end format write read subroutine function switch program call while &per;gt&per; &per;lt&per; &per;ge&per; &per;le&per; &per;eq&per; &per;ne&per; character complex double precision real real*8 integer common logical implicit dimension external parameter