Start work on partial progresses coalesce.

src/bank-fio.scm

@@ -63,7 +63,7 @@
      (make-bank-transaction id date amount currency varsym message type
 			    account bank specsym)))
 
- ;; Loads Fio bank accound statement.
+ ;; Loads Fio bank account statement.
  (define (bank-fio-parse fn)
    (let ((csv (with-progress% #t fn (csv-parse fn))))
      (if csv