/[lmdze]/trunk/libf/dyn3d/logic.f90
ViewVC logotype

Diff of /trunk/libf/dyn3d/logic.f90

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 12 by guez, Mon Jul 21 16:05:07 2008 UTC revision 13 by guez, Fri Jul 25 19:59:34 2008 UTC
# Line 30  contains Line 30  contains
30    
31      !------------------------------------      !------------------------------------
32    
     print *, "Call sequence information: read_logic"  
   
33      print *, "Enter namelist 'logic_nml'."      print *, "Enter namelist 'logic_nml'."
34      read(unit=*, nml=logic_nml)      read(unit=*, nml=logic_nml)
35      write(unit=*, nml=logic_nml)      write(unit=*, nml=logic_nml)

Legend:
Removed from v.12  
changed lines
  Added in v.13

  ViewVC Help
Powered by ViewVC 1.1.21