Fortran 逻辑变量（LOGICAL）

program logicaltest
	logical(kind=4) a	!用4 bytes来记录true/false, Fortran 90
	logical*4 b 	!Fortran 77
	logical(4) c	!Fortran 77
	logical(kind=2) e	!用2 bytes来记录true/false, Fortran 90
	logical*2 f	!Fortran 77
	logical(2) g	!Fortran 77
	!对变量赋值
	a=.true.
	b=.false.
	write(*,*) a,b
end