--- trunk/libf/dyn3d/logic.f90 2008/07/21 16:05:07 12 +++ trunk/libf/dyn3d/logic.f90 2008/07/25 19:59:34 13 @@ -30,8 +30,6 @@ !------------------------------------ - print *, "Call sequence information: read_logic" - print *, "Enter namelist 'logic_nml'." read(unit=*, nml=logic_nml) write(unit=*, nml=logic_nml)