Changeset 01e6052 in flexpart.git for src/readcommand.f90
- Timestamp:
- Feb 8, 2018, 9:11:05 AM (6 years ago)
- Branches:
- master, 10.4.1_pesei, GFS_025, bugfixes+enhancements, dev, release-10, release-10.4.1, scaling-bug, univie
- Children:
- ccc9ec2, 7d02c2f
- Parents:
- d2a5a83
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
src/readcommand.f90
rb5127f9 r01e6052 644 644 1000 write(*,*) ' #### FLEXPART MODEL ERROR! FILE "COMMAND" #### ' 645 645 write(*,*) ' #### CANNOT BE OPENED IN THE DIRECTORY #### ' 646 write(*,'(a)') path(2)(1:length( 1))646 write(*,'(a)') path(2)(1:length(2)) 647 647 stop 648 648 end subroutine readcommand
Note: See TracChangeset
for help on using the changeset viewer.