Changeset f13406c in flexpart.git for src/writeheader.f90
- Timestamp:
- Dec 23, 2013, 6:23:38 PM (10 years ago)
- Branches:
- master, 10.4.1_pesei, FPv9.3.1, FPv9.3.1b_testing, FPv9.3.2, GFS_025, NetCDF, bugfixes+enhancements, deposition, dev, fp9.3.1-20161214-nc4, grib2nc4_repair, inputlist, laptop, release-10, release-10.4.1, scaling-bug, svn-petra, svn-trunk, univie
- Children:
- 4fbe7a5
- Parents:
- e200b7a
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
src/writeheader.f90
re200b7a rf13406c 67 67 68 68 if (ldirect.eq.1) then 69 write(unitheader) ibdate,ibtime, 'FLEXPART V9.0'69 write(unitheader) ibdate,ibtime, trim(flexversion) 70 70 else 71 write(unitheader) iedate,ietime, 'FLEXPART V9.0'71 write(unitheader) iedate,ietime, trim(flexversion) 72 72 endif 73 73
Note: See TracChangeset
for help on using the changeset viewer.