Changeset 1389


Ignore:
Timestamp:
Oct 30, 2011, 12:10:58 PM (6 years ago)
Author:
joerg
Message:
 
File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/scripting/haskell/Trees.hs

    r1388 r1389  
    9898      (tail nodes ++ [head nodes])
    9999
    100 north_east n = "($(" ++ n ++ ".north east) + (.7mm,-.7mm)$)"
    101 north_west n = "($(" ++ n ++ ".north west) + (-.7mm,-.7mm)$)"
    102 south_east n = "($(" ++ n ++ ".south east) + (.7mm,.7mm)$)"
    103 south_west n = "($(" ++ n ++ ".south west) + (-.7mm,.7mm)$)"
     100north_east n = "($(" ++ n ++ ".north east) + (.4mm,-.4mm)$)"
     101north_west n = "($(" ++ n ++ ".north west) + (-.4mm,-.4mm)$)"
     102south_east n = "($(" ++ n ++ ".south east) + (.4mm,.4mm)$)"
     103south_west n = "($(" ++ n ++ ".south west) + (-.4mm,.4mm)$)"
    104104south n = "($(" ++ n ++ ".south) + (0mm,-1mm)$)"
    105105north n = "($(" ++ n ++ ".north) + (0mm,1mm)$)"
Note: See TracChangeset for help on using the changeset viewer.