(use gromit)


(define-property-type password 'prop_password
		      (set        integer required constant (key 0))
		      (algorithm  integer required constant)
		      (iterations integer required constant)
		      (salt       integer required constant)
		      (crypt      integer required constant))

(define-object-type account 'attrib_account
	       (onboarding  integer)
	       (pre-genesis integer)
	       (password    password))