___file

人工智能中Agent开发包。多 Agent 系统是处理自治 Agent 之间知识层的协作问题

                                   )
                      )
                      (:type InkCartridge
                       :id ink
                       :modifiers 1
                       :attributes ((unit_cost ?var204)
                                    (number (10 * ?printer.number))
                                   )
                      )
                     )
     :produced_facts ((:type Printer
                       :id printer
                       :modifiers 1
                       :attributes ((unit_cost ?var41)
                                    (type inkjet)
                                    (number ?var296)
                                   )
                      )
                     )
    )
    (:Primitive AbstractTaskId3
     :time ((1 * ?printer.number))
     :cost ((50 * ?printer.number))
     :consumed_facts ((:type PrinterCase
                       :id case
                       :modifiers 17
                       :attributes ((unit_cost ?var48)
                                    (type ?printer.type)
                                    (number ?printer.number)
                                   )
                      )
                      (:type TonerCartridge
                       :id toner
                       :modifiers 1
                       :attributes ((unit_cost ?var208)
                                    (number ?printer.number)
                                   )
                      )
                     )
     :produced_facts ((:type Printer
                       :id printer
                       :modifiers 1
                       :attributes ((unit_cost ?var52)
                                    (type laser)
                                    (number ?var304)
                                   )
                      )
                     )
    )
    (:Primitive AbstractTaskId2
     :time (1)
     :cost ((275 * ?mb.number))
     :consumed_facts ((:type CPU
                       :id cpu
                       :modifiers 17
                       :attributes ((unit_cost ?var128)
                                    (type ?mb.type)
                                    (number ?mb.number)
                                   )
                      )
                     )
     :produced_facts ((:type MotherBoard
                       :id mb
                       :modifiers 1
                       :attributes ((unit_cost ?var288)
                                    (type ?var290)
                                    (number ?var289)
                                   )
                      )
                     )
    )
    (:Primitive AbstractTaskId1
     :time ((1 * ?monitor.number))
     :cost ((if (?monitor.type == sgva) then (120 * ?monitor.number) else (100 * ?monitor.number)))
     :consumed_facts ((:type CRT
                       :id crt
                       :modifiers 1
                       :attributes ((unit_cost ?var64)
                                    (number ?monitor.number)
                                   )
                      )
                      (:type GFXadapter
                       :id card
                       :modifiers 1
                       :attributes ((unit_cost ?var67)
                                    (type ?monitor.type)
                                    (number ?monitor.number)
                                   )
                      )
                     )
     :produced_facts ((:type Monitor
                       :id monitor
                       :modifiers 1
                       :attributes ((unit_cost ?var71)
                                    (type ?var316)
                                    (number ?var315)
                                   )
                      )
                     )
    )
    (:Primitive AbstractTaskId0
     :time ((1 * ?computer.number))
     :cost ((?computer.number * 125))
     :consumed_facts ((:type KeyBoard
                       :id kb
                       :modifiers 17
                       :attributes ((unit_cost ?var75)
                                    (type ?computer.kb_type)
                                    (number ?computer.number)
                                   )
                      )
                      (:type Printer
                       :id printer
                       :modifiers 1
                       :attributes ((unit_cost ?var79)
                                    (type ?computer.printer_type)
                                    (number ?computer.number)
                                   )
                      )
                      (:type Monitor
                       :id monitor
                       :modifiers 1
                       :attributes ((unit_cost ?var83)
                                    (type ?computer.monitor_type)
                                    (number ?computer.number)
                                   )
                      )
                      (:type MotherBoard
                       :id board
                       :modifiers 1
                       :attributes ((unit_cost ?var132)
                                    (type ?computer.cpu_speed)
                                    (number ?computer.number)
                                   )
                      )
                     )
     :produced_facts ((:type Computer
                       :id computer
                       :modifiers 1
                       :attributes ((kb_type ?var338)
                                    (unit_cost ?var91)
                                    (cpu_speed ?var337)
                                    (printer_type ?var339)
                                    (number ?var336)
                                    (monitor_type ?var340)
                                   )
                      )
                     )
     :ordering ((:lhs ?kb
                 :rhs ?printer
                )
                (:lhs ?kb
                 :rhs ?monitor
                )
                (:lhs ?kb
                 :rhs ?board
                )
               )
    )
    (:Rulebase AbstractTaskId7
       (Rule0
          ?var171 <- (Computer (kb_type ?var172) (cpu_speed ?var174) (unit_cost ?var173) (printer_type ?var175) (number ?var176) (monitor_type ?var177))
          =>
          (send_message (type inform) (content ?var171) (receiver PrinterMaker0))
       )
    )
  END_TASK_LIST

  BEGIN_GENERATION_PLAN
    BEGIN_PREAMBLE
      :platform "Windows"
      :directory "."
    END_PREAMBLE
    BEGIN_AGENT_LIST
      (:id AgentId3
       :generate false
       :status Saved
       :has_gui true
       :dns_file "dns.db"
      )
      (:id AgentId2
       :generate false
       :status Saved
       :has_gui false
       :dns_file "dns.db"
      )
      (:id AgentId1
       :generate false
       :status Saved
       :has_gui false
       :dns_file "dns.db"
      )
      (:id AgentId0
       :generate false
       :status Saved
       :has_gui false
       :dns_file "dns.db"
      )
    END_AGENT_LIST
    BEGIN_TASK_LIST
      (:id AbstractTaskId6
       :generate false
       :status Saved
       :external null
      )
      (:id AbstractTaskId5
       :generate false
       :status Saved
       :external null
      )
      (:id AbstractTaskId4
       :generate false
       :status Saved
       :external null
      )
      (:id AbstractTaskId3
       :generate false
       :status Saved
       :external null
      )
      (:id AbstractTaskId2
       :generate false
       :status Saved
       :external null
      )
      (:id AbstractTaskId1
       :generate false
       :status Saved
       :external null
      )
      (:id AbstractTaskId0
       :generate false
       :status Saved
       :external null
      )
      (:id AbstractTaskId7
       :generate false
       :status Saved
       :external null
      )
    END_TASK_LIST
    BEGIN_NAMESERVER_LIST
      (:name Nameserver2
       :is_root true
       :has_gui false
       :address_output_file "dns.db"
       :time_grain 0.1
      )
    END_NAMESERVER_LIST
    BEGIN_FACILITATOR_LIST
      (:name Facilitator2
       :period 5.00
       :has_gui false
       :dns_file "dns.db"
      )
    END_FACILITATOR_LIST
    BEGIN_VISUALISER_LIST
      (:name Visualiser2
       :has_gui false
       :dns_file "dns.db"
      )
    END_VISUALISER_LIST
  END_GENERATION_PLAN
END_GENERATOR