 
 (defn block-of [block-hash] (getblock block-hash))
 
-
+(defn get-all-tx [])
+  
 
 (defn print-it [a-list]
   (doseq [l a-list] (println l)))

(def-rpc importprunedfunds)
;importpubkey "pubkey" ( "label" rescan )
(def-rpc importwallet filename)
(def-rpc-opt keypoolrefill newsize)
;listaccounts ( minconf include_watchonly)
(def-rpc listaddressgroupings)
(def-rpc listlockunspent)
;listreceivedbyaccount ( minconf include_empty include_watchonly)
;listreceivedbyaddress ( minconf include_empty include_watchonly)
;listsinceblock ( "blockhash" target_confirmations include_watchonly)
;listtransactions ( "account" count skip include_watchonly)
(def-rpc-all-opt listunspent minconf maxconf  addresses include_unsafe)
;lockunspent unlock ([{"txid":"txid","vout":n},...])
;move "fromaccount" "toaccount" amount ( minconf "comment" )
(def-rpc removeprunedfunds txid)
;sendfrom "fromaccount" "toaddress" amount ( minconf "comment" "comment_to" )
;sendmany "fromaccount" {"address":amount,...} ( minconf "comment" ["address",...] )
;sendtoaddress "address" amount ( "comment" "comment_to" subtractfeefromamount )
(def-rpc setaccount address account)
(def-rpc settxfee amount)
(def-rpc signmessage address message)

(s/fdef getblockheader 
  :args (s/alt :verbose (s/cat :hash string?), :choice (s/cat :hash string?, :verbose boolean?))
  :ret map?)
(def-rpc-opt getblockheader 1 hash verbose)

(s/fdef getchaintips :ret vector?) 
(def-rpc getchaintips)
