============
**Examples**
============

ASM Slot
--------

.. image:: img/BeispielASMNut.png
   :scale: 80%

::
   
   exit_on_error = false
   exit_on_end = false
   verbosity = 2

   new_model_force("FML_Example","ASM Slot")

   global_unit('mm')
   pickdist(0.01)
   cosys('cartes')
 
   -- slot parameter --

   H0  = 0.5
   D1  = 8.0
   B1  = 3.0
   H1  = 2.0
   D2  = 10.0
   D3  = 6.0
   H2  = 18.0

   -- FML

   fml = require("fml")
 
   fml.SetLocalCS(0, 0, 180)
 
   P0a = fml.Point:Create( 1, H0)
   P0b = fml.Point:Create(-1, H0)
   
   M1  = fml.Point:Create(0, D1/2)
   M2  = fml.Point:Create(0, D1+H1+D2/2)
   M3  = fml.Point:Create(0, D1+H1+H2-D3/2)
   
   K1  = fml.Circle:Create(M1, D1/2)
   K2  = fml.Circle:Create(M2, D2/2)
   K3  = fml.Circle:Create(M3, D3/2)
   
   G0  = fml.Line:Create(P0a, P0b)
   G1  = fml.Line:Create(M1, M2)
   G2  = fml.Line:Parallel(G1, B1/2)
   
   S0a = fml.Point:Intersection(G0, K1, 1)
   S1a = fml.Point:Intersection(G2, K1, 2)   
   S2a = fml.Point:Intersection(G2, K2, 1)   
   
   T2a = fml.Point:Tangent(K2, K3, 1)   
   T3a = fml.Point:Tangent(K2, K3, 2)   
   
   S0b, S1b, S2b, T2b, T3b = fml.Point:Mirror(G1, S0a, S1a, S2a, T2a, T3a)

   -- Node chains

   ndt(1.0)

   nc_line    (S0a.x, S0a.y, S0b.x, S0b.y, 0)
   nc_circle_m(S0a.x, S0a.y, S1a.x, S1a.y, M1.x, M1.y, D1/2, 0)
   nc_line    (S1a.x, S1a.y, S2a.x, S2a.y, 0)
   nc_circle_m(S2a.x, S2a.y, T2a.x, T2a.y, M2.x, M2.y, D2/2, 0)
   nc_line    (T2a.x, T2a.y, T3a.x, T3a.y, 0)
   nc_circle_m(T3a.x, T3a.y, T3b.x, T3b.y, M3.x, M3.y, D3/2, 0)
   nc_line    (T3b.x, T3b.y, T2b.x, T2b.y, 0)
   nc_circle_m(T2b.x, T2b.y, S2b.x, S2b.y, M2.x, M2.y, D2/2, 0)
   nc_line    (S2b.x, S2b.y, S1b.x, S1b.y, 0)
   nc_circle_m(S1b.x, S1b.y, S0b.x, S0b.y, M1.x, M1.y, D1/2, 0)

   adapt_window()

Polschuh
--------

.. image:: img/BeispielPolschuh.png

::
   
 exit_on_error = false
 exit_on_end = false
 verbosity = 2

 new_model_force("Polschuh","Test")

 global_unit('mm')
 pickdist(0.01)
 cosys('cartes')

 -- FML-Bereich --

 fml = require("fml")

 -- Parameter:
 b1 = 10
 h1 =  3 
 h2 =  2 
 h3 =  4 
 r1 = 21
 r2 = 16
 r3 =  1.0
 r4 =  1.2
 r5 =  1.4

 -- Points
 p1 = fml.Point:Create(0, 0)
 p2 = fml.Point:Create(b1/2, 0)
 p3 = fml.Point:Create(0, h1)
 p4 = fml.Point:Create(b1/2, h1)
 p5 = fml.Point:Create(0, -h2-h3)
 
 m1 = fml.Point:Create(0, -h2-h3-r1)
 m2 = fml.Point:Create(0, -h2-r2)
 
 -- Lines
 g1 = fml.Line:Create(p1, p2)
 g2 = fml.Line:Create(p2, p4)
 
 -- Circles
 c1 = fml.Circle:Create(m1, r1) 
 c2 = fml.Circle:Create(m2, r2) 

 -- Node chains

 ndt(0.6)

 -- Verrundung 1 (Mittelpunkt, Anfangspunkt, Endpunkt):
 m3, a3, e3 = fml.Point:Rounding(g1, g2, r3, 2)
 nc_circle_m(a3.x, a3.y, e3.x, e3.y, m3.x, m3.y, r3, 0)
 
 -- Verrundung 2 (Mittelpunkt, Anfangspunkt, Endpunkt):
 m4, a4, e4 = fml.Point:Rounding(g1, c2, r4, 8)
 nc_circle_m(a4.x, a4.y, e4.x, e4.y, m4.x, m4.y, r4, 0)
 
 -- Verrundung 3 (Mittelpunkt, Anfangspunkt, Endpunkt):
 m5, a5, e5 = fml.Point:Rounding(c1, c2, r5, 1)
 nc_circle_m(a5.x, a5.y, e5.x, e5.y, m5.x, m5.y, r5, 0)
 
 -- oberer Polschuhbogen:
 nc_circle_m(e5.x, e5.y, e4.x, e4.y, c2.x, c2.y, c2.r, 0)
 
 -- unterer Polschuhbogen:
 nc_circle_m(a5.x, a5.y, p5.x, p5.y, c1.x, c1.y, c1.r, 0)
 
 -- Abschlusslinien:
 nc_line(a4.x, a4.y, a3.x, a3.y, 0)
 nc_line(e3.x, e3.y, p4.x, p4.y, 0)
 nc_line_cont(p3.x, p3.y, 0)
 nc_line_cont(p5.x, p5.y, 0)
 
 adapt_window()

 -- Meshing
 create_mesh()

 -- Knotenketten und Netz spiegeln:
 mirror_nodechains(p3.x, p3.y, p5.x, p5.y)