     (doseq [ [districtName schools] district]
       (gen-schools districtName schools (format "/tmp/test/B-%s-schools.xml" districtName))
       (gen-session districtName (format "/tmp/test/C-%s-calendar.xml" districtName))
-      (gen-sections districtName (format "/tmp/test/D-%s-master-schedule.xml" districtName))
+      (gen-sections districtName schools (format "/tmp/test/D-%s-master-schedule.xml" districtName))
       (doseq [ schoolName schools ]
         (def rng (range 1 (+ 1 studentCount)))
         (gen-students schoolName rng (format "/tmp/test/E-%s-student.xml" schoolName))

  )
)

(defn gen-sections [districtName output-file]
  (gen-edfi :InterchangeMasterSchedule output-file (reverse (create-section districtName)))
)



  (gen-edfi :InterchangeEducationOrgCalendar output-file (reverse (create-session districtName)))
)

(defn create-section [districtName schoolName]
  (into () [
    (element :CourseOffering {}
      (element :LocalCourseCode {} (format "%s-Math-7" schoolName))
      (element :LocalCourseTitle {} "7th Grade Math")
      (element :SchoolReference {}
        (element :EducationalOrgIdentity {}
          (element :StateOrganizationId {} schoolName)
        )
      )
      (element :SessionReference {}
