Merge branch 'release-10.3beta' into dev

src/readspecies.f90

@@ -100,15 +100,18 @@ subroutine readspecies(id_spec,pos_spec)
   pweightmolar=-999.9
 
   do j=1,24           ! initialize everything to no variation
+    parea_hour(j)=1.
+    ppoint_hour(j)=1.
     area_hour(pos_spec,j)=1.
     point_hour(pos_spec,j)=1.
   end do
   do j=1,7
+    parea_dow(j)=1.
+    ppoint_dow(j)=1.
     area_dow(pos_spec,j)=1.
     point_dow(pos_spec,j)=1.
   end do
 
-  if (readerror.ne.0) then ! text format input
 ! Open the SPECIES file and read species names and properties
 !************************************************************
   specnum(pos_spec)=id_spec
@@ -347,8 +350,6 @@ subroutine readspecies(id_spec,pos_spec)
 20 continue
 
 
-  endif
-
 22 close(unitspecies)
 
 ! namelist output if requested