Commit 21f57506 authored by Knut's avatar Knut

on_grid meteo: removed doubled code

parent e2d231d4
......@@ -133,15 +133,6 @@
call open_meteo_file(meteo_file)
if(iextr .eq. 1 .and. jextr .eq. 1) then
point_source = .true.
LEVEL3 'Assuming Point Source meteo forcing'
! if (on_grid .eq. .false. ) then
LEVEL3 'Setting on_grid to true'
! end if
end if
if (met_lat(1) .gt. met_lat(2)) then
LEVEL3 'Reverting lat-axis and setting grid_scan to 0'
grid_scan = 0
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment