layout/ours.m4

   1 include(`parts.i4')
   2
   3 abs midx_m 930 700 90
   4 part midx cross_peco_s m
   5
   6 define(`pt_main_r',`pt_peco_mr')
   7
   8 defobj dualjn_peco_r
   9   abs ic 200 200 0
  10   part pt_i pt_peco_lr c ic
  11   part x cross_peco_l br pt_i_a
  12   part pt_o pt_peco_lr b x_bl
  13   rel pt_o_c oc
  14   rel x_tl ia
  15   extend pt_o_a oa upto ia
  16   rel x_tr ob
  17   rel pt_i_b ib
  18 enddef
  19
  20 defobj demos
  21   abs right 200 200 0
  22   part main_up   ^pt_main_r c right b right_main_up
  23   part main_down  pt_main_r c right b right_main_down
  24   abs up 200 200 90
  25   part main_left  ^pt_main_r c up b up_main_left
  26   part main_right  pt_main_r c up b up_main_right
  27   part dualjn_tr ^dualjn_peco_r ib -right
  28 enddef
  29
  30 #abs demos_right 200 1200 0
  31 #part demos demos right
  32
  33 extend midx_tr -l0_jtr_b parallel demos!right_main_up 315
  34 part l0_jtr ^pt_main_r b
  35
  36 extend midx_tl -l0_jtl_b parallel demos!-right_main_down -315
  37 part l0_jtl pt_main_r b
  38
  39 extend -midx_bl -hj_a len 10 315
  40 part hj ^pt_peco_sr a
  41
  42 extend -hj_c l0_lst uptoang 90 315
  43 rel l0_lst l2_lst 0 -37
  44 rel l2_lst l3_lst 0 -37
  45 #rel l3_lst l4_lst 0 -37
  46 #rel l4_lst l5_lst 0 -37
  47
  48 #rel l0_jblx_c l2_pblx 0 37
  49 #rel l2_pblx l3_pblx 0 37
  50 #extend -l0_lst l0_jblx_c uptoang 0 -315
  51
  52 extend -hj_c -l0_jbl_b parallel demos!right_main_up 315
  53 part l0_jbl ^pt_main_r b
  54
  55 rel -l0_jbl_c l2_pbl 0 -37
  56 rel l2_pbl l3_pbl 0 -37
  57
  58 extend -l0_jtr_c l0_rst uptoang -90 315
  59 rel l0_rst l2_rst 0 -37
  60 rel l2_rst l3_rst 0 -37
  61
  62 extend -l0_jtr_c l0p_dj parallel demos!dualjn_tr_ic 315
  63 rel l0p_dj -l23_dj_ic 0 -37
  64 part l23_dj ^dualjn_peco_r ic
  65
  66 #rel l0_rst -l23_dj_ic 37 -37
  67 #rel -l0_jtr_c -l23_dj_ic 37 -37 -8
  68 extend l23_dj_oa l3_sh uptoang 180 -315
  69
  70
  71 #rel l2_rst l3_rst 0 -37
  72
  73 #rel -l2_rst l2_jr_c
  74
  75
  76 #rel l2_jr_c l3_jr_c 0 37
  77 #part l2_jr pt_peco_ll c
  78 #part l23_jrx cross_peco_l bl l2_jr_a
  79 #part l3_jr pt_peco_ll c
  80
  81 eof