                        (get-in ir [hem-pclass :fields field :initial])
 
                        (= type :plant-fn-symbol)
-                       (let [henpt-irks (:irks henpt)
+                       (let [method-arg (get argument-mappings name)
+                             pclass-arg (if-not method-arg
+                                          (first (filter #(= (:param %) name) pargs)))
+                             henpt-irks (:irks henpt)
                              caller_ (get-in ir henpt-irks)
                              caller-pclass (first henpt-irks)]
-
-                         ;;(dbg-println :error "ERROR, not currently supported plant-fn type=" type)
-                         (if (or (= (:type caller_) :plant-fn-field)
+                         (dbg-println :trace "RPC name" name "method-arg"
+                                      method-arg "pclass-arg" pclass-arg)
+                         (or method-arg pclass-arg
+                             (if (or (= (:type caller_) :plant-fn-field)
                                  (and (= (:type caller_) :plant-fn-symbol)
                                       (= (:name caller_) 'this)))
-                           (get-in ir [caller-pclass :fields (:field caller_) :initial])
-                           ;;(dbg-println :error "ERROR, Resolve plant-fn-symbol w/in scope of caller-pclass")
-                           {:type :arg-reference :name name}
-                           ))
+                               (get-in ir [caller-pclass :fields (:field caller_) :initial]))
+                             {:error :unresolved-pclass-ctor}))
 
                        (= type :delay)
                        {}

;;         :args args}]
;; (assoc ir 'root-task rt)))

;; will return subtasks, if any
;; irks are the ks to get-in the ir for the method in question (initially nil)
(defn get-htn-method-subtasks [ir pargs top-level-type mpclass mname display-name margs sub-body irks]

                       (do
                         (dbg-println :error "ERROR, not currently supported plant-fn type=" type)
                         nil))
        _ (dbg-println :trace "RPC pclass-ctor_" pclass-ctor_)
        ;; pclass-ctor_ (cond
        ;;                (= pclass ::unknown) ;; matching method in pargs?
        ;;                ;; (let [plant-fn_ (get-in ir irks)
