<Example Program 1>

	Program namelist_example_1     Integer i1(2)     Real :: abc     Character(5) :: ch     Namelist /sample/ i1,abc,ch     i1 = (/123,-5/)     abc = 3.14     ch = 'ABCDEF'     Write (*,Nml=sample) End
	Execution Results   &SAMPLE I1 = 123 -5, ABC = 3.1400001, CH = ABCDE/

<Example Program 2>

	Program namelist_example_2     Integer i1(2)     Real :: abc     Character(5) :: ch     Namelist /sample/ i1,abc,ch     i1 = (/123,-5/)     abc = 3.14     ch = 'ABCDE'     Read (*,Nml=sample)     Write (*,Nml=sample) End
	Example Input &sample abc = 4.56/ Execution Results   &SAMPLE I1 = 123 -5, ABC = 4.5599999, CH = ABCDE/