fixed typo

src/define_tracking_cloud.f90

@@ -275,7 +275,7 @@ load: if (params%irestart > 0 .AND. params%irestart>params%tr_activation) then
            read(19) trcl%yhist(:,i)
            read(19) trcl%zhist(:,i)
            ! correct for vertical exaggeration
-           trcl%zhist(i)=trcl%zhist(i)/params%vex
+           trcl%zhist(:,i)=trcl%zhist(:,i)/params%vex
            read(19) trcl%temphist(:,i)
            read(19) trcl%presshist(:,i)
        end do
@@ -292,7 +292,7 @@ load: if (params%irestart > 0 .AND. params%irestart>params%tr_activation) then
            read(19) surfd%yhist(:,i)
            read(19) surfd%zhist(:,i)
            ! correct for vertical exaggeration
-           surfd%zhist(i)=surfd%zhist(i)/params%vex
+           surfd%zhist(:,i)=surfd%zhist(:,i)/params%vex
            read(19) surfd%temphist(:,i)
            read(19) surfd%presshist(:,i)
        end do