Changeset 1551 for palm/trunk/SOURCE/user_header.f90
- Timestamp:
- Mar 3, 2015 2:18:16 PM (9 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
palm/trunk/SOURCE/user_header.f90
r1321 r1551 20 20 ! Current revisions: 21 21 ! ----------------- 22 ! 22 ! Typo removed 23 23 ! 24 24 ! Former revisions: … … 44 44 ! Description: 45 45 ! ------------ 46 ! Print a header with user-defined information s.46 ! Print a header with user-defined information. 47 47 !------------------------------------------------------------------------------! 48 48 … … 61 61 ! 62 62 !-- If no user-defined variables are read from the namelist-file, no 63 !-- information swill be printed.63 !-- information will be printed. 64 64 IF ( .NOT. user_defined_namelist_found ) THEN 65 65 WRITE ( io, 100 ) … … 68 68 69 69 ! 70 !-- Printing the information s.70 !-- Printing the information. 71 71 WRITE ( io, 110 ) 72 72
Note: See TracChangeset
for help on using the changeset viewer.