Guest User

Untitled

a guest
Nov 20th, 2017
85
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.58 KB | None | 0 0
  1. documentclass{article}
  2.  
  3. usepackage{lmodern}
  4. usepackage{xparse}
  5.  
  6. ExplSyntaxOn
  7.  
  8. tl_new:N l__inft_fa_states
  9. tl_new:N l__inft_fa_init
  10.  
  11. keys_define:nn { inft / fa }
  12. {
  13. states .tl_set:N = l__inft_fa_states,
  14. init .tl_set:N = l__inft_fa_init,
  15.  
  16. states .initial:n = { Z },
  17. init .initial:n = { z_0 }
  18. }
  19.  
  20. NewDocumentCommand FA { O{} }
  21. {
  22. group_begin:
  23. keys_set:nn { inft / fa } { #1 }
  24. left(
  25. {
  26. { tl_use:N l__inft_fa_states } ,
  27. { tl_use:N l__inft_fa_init }
  28. }
  29. right)
  30. group_end:
  31. }
  32.  
  33. ExplSyntaxOff
  34.  
  35. begin{document}
  36.  
  37. $M_1 = FA$ qquad
  38. $M_2 = FA[init=z_0]$
  39.  
  40. end{document}
Add Comment
Please, Sign In to add comment