#include "zone.inc"

      
      STRUCTURE /OD_Demand/
         
         INTEGER*2 nints  ! number of demand intervals
         REAL      begint(MAX_DEMAND_INTERVALS)  ! begin time of each
                                                 !   interval 
         
         INTEGER   interval ! current interval number
         REAL      tnext    ! Start of next demand interval
         
C      - Options
         REAL      fracinf        ! the fraction of vehicles with
                                  !   routing information
         REAL      ribfa          ! vehicle choice indifference band
         REAL      bound          ! ?
         REAL      startfrom      ! fraction of distance along links at
                                  !   which to generate vehicles
         REAL      load_factor    ! fraction to uniformly increase/
                                  !   decrease network demand
                                  !   (normally=1.0)
         
         END STRUCTURE

      

      
      
      STRUCTURE /Activity/
         INTEGER*2 nzones  ! number of zones
         INTEGER*2 ndests  ! number of destinations
         
         RECORD /Zone_Data/ zone(NU_ZN)  ! zone storage
         RECORD /OD_Demand/ dem          ! demand data
         
         
         INTEGER*2 zonelist(MAX_ZN_NU) !npz (index)
         INTEGER*2 dest2zone(NU_ZN)    !converts dest pointer to its zone
                                       !pointer number
         INTEGER*2 destlist(NU_ZN)     !idests
         
         END STRUCTURE