Changeset f5b967d in flexpart.git


Ignore:
Timestamp:
Aug 24, 2018, 5:01:17 PM (12 months ago)
Author:
Espen Sollum ATMOS <eso@…>
Branches:
dev
Parents:
f13c04a
Message:

Removed 1 option from old COMMAND

Location:
src
Files:
1 added
3 edited

Legend:

Unmodified
Added
Removed
  • src/getfields.f90

    rf13c04a rf5b967d  
    20820860  indmin=indj
    209209
    210    if (WETBKDEP) then
    211         call writeprecip(itime,memind(1))
    212    endif
     210    if (WETBKDEP) then
     211      call writeprecip(itime,memind(1))
     212    endif
    213213
    214214  endif
  • src/makefile

    rf13c04a rf5b967d  
    140140        concoutput_inversion_nest.o     \
    141141        concoutput_inversion.o \
    142         getfields.o
     142        getfields.o readwind_ecmwf.o
    143143
    144144## For MPI version
  • src/readcommand.f90

    rf13c04a rf5b967d  
    238238    if (old) call skplin(3,unitcommand)
    239239    read(unitcommand,*) linit_cond
    240     if (old) call skplin(3,unitcommand)
    241     read(unitcommand,*) linversionout      !added by RT
     240    !if (old) call skplin(3,unitcommand)
     241    !read(unitcommand,*) linversionout      !added by RT
    242242    if (old) call skplin(3,unitcommand)
    243243    read(unitcommand,*) surf_only
Note: See TracChangeset for help on using the changeset viewer.
hosted by ZAMG