docs/programming/reference/library/src/4e/gate/pose.md · urbit.org

git.iko.soy/urbit.org

on 140ac0e help sign in

48 lines 751 B history raw

1### `++pose`

3Parse options

5Parsing composer: if `vex` reflects a failure, connect it with the

6following rule `sab`. See also: the monad applicator ;\~

8Accepts

9-------

11`sab` is a `++rule`.

13`vex` is an `++edge`.

15Produces

16--------

20Source

21------

23 ++ pose :: first or second

24 ~/ %pose

25 |* {vex/edge sab/rule}

26 ?~ q.vex

27 =+ roq=(sab)

28 [p=(last p.vex p.roq) q=q.roq]

29 vex

30 ::

33Examples

34--------

36 ~zod/try=> `@t`(scan "+" ;~(pose lus tar cen))

37 '+'

38 ~zod/try=> `@t`(scan "*" ;~(pose lus tar cen))

39 '*'

40 ~zod/try=> `@t`(scan "%" ;~(pose lus tar cen))

41 '%'

42 ~zod/try=> `@t`(scan "-" ;~(pose lus tar cen))

43 ! {1 1}

44 ! exit

48***