This lightly commented program performs a unit test on the Flags Class.
program Unit_Test write(6,*) 'There is no Unit Test for the Flags Module.' end