Integer :: Num1 = -7, Num2, i, j = 11
Real :: rad1 = 2.34, Temp = 32.456
Logical :: swapflag = .false.
Character :: Sex = 'm'
Character(Len=9) :: myName='Sivakumar'