Peajes

-- En el primer caso hay 5 peajes en las posiciones 1,4,5,7,10
(
  (
    Cont=>10,
    Ctras=>(
      (Codigo=>(others=>'z'),
      Inicio=>(others=>'z'),
      Final=>(others=>'z'),
      Peaje_km=>7.0,
      Trazado=>(
        Num => 5,
        Ptos => (
          (5.372,2.209),
          (6.352,3.425),
          (8.329,3.291),
          (8.329,4.292),
          (9.281,2.390),
          others=>(100.0,100.0)
        )
      )),
      (Codigo=>(others=>'z'),
      Inicio=>(others=>'z'),
      Final=>(others=>'z'),
      Peaje_km=>0.0,
      Trazado=>(
        Num => 5,
        Ptos => (
          (5.372,2.209),
          (6.332,3.425),
          (5.372,2.209),
          (8.329,4.292),
          (9.281,2.390),
          others=>(100.0,100.0)
        )
      )),
      (Codigo=>(others=>'z'),
      Inicio=>(others=>'z'),
      Final=>(others=>'z'),
      Peaje_km=>0.0,
      Trazado=>(
        Num => 5,
        Ptos => (
          (5.372,2.209),
          (6.332,3.425),
          (7.283,3.209),
          (8.329,4.292),
          (9.281,2.390),
          others=>(100.0,100.0)
        )
      )),
      (Codigo=>(others=>'z'),
      Inicio=>(others=>'z'),
      Final=>(others=>'z'),
      Peaje_km=>4.0,
      Trazado=>(
        Num => 5,
        Ptos => (
          (5.372,2.209),
          (6.332,3.425),
          (7.283,3.209),
          (8.329,4.292),
          (9.281,2.390),
          others=>(100.0,100.0)
        )
      )),
      (Codigo=>(others=>'z'),
      Inicio=>(others=>'z'),
      Final=>(others=>'z'),
      Peaje_km=>7.0,
      Trazado=>(
        Num => 5,
        Ptos => (
          (5.372,2.209),
          (6.332,3.425),
          (7.283,3.209),
          (8.329,4.292),
          (-9.281,2.390),
          others=>(100.0,100.0)
        )
      )),
      (Codigo=>(others=>'z'),
      Inicio=>(others=>'z'),
      Final=>(others=>'z'),
      Peaje_km=>0.0,
      Trazado=>(
        Num => 5,
        Ptos => (
          (5.372,2.209),
          (6.332,3.425),
          (7.283,3.209),
          (8.329,4.292),
          (9.281,2.390),
          others=>(100.0,100.0)
        )
      )),
      (Codigo=>(others=>'z'),
      Inicio=>(others=>'z'),
      Final=>(others=>'z'),
      Peaje_km=>7.0,
      Trazado=>(
        Num => 5,
        Ptos => (
          (5.372,2.209),
          (6.352,3.425),
          (8.329,3.291),
          (8.329,4.292),
          (9.281,2.390),
          others=>(100.0,100.0)
        )
      )),
      (Codigo=>(others=>'z'),
      Inicio=>(others=>'z'),
      Final=>(others=>'z'),
      Peaje_km=>0.0,
      Trazado=>(
        Num => 5,
        Ptos => (
          (5.372,2.209),
          (6.332,3.425),
          (5.372,2.209),
          (8.329,4.292),
          (9.281,2.390),
          others=>(100.0,100.0)
        )
      )),
      (Codigo=>(others=>'z'),
      Inicio=>(others=>'z'),
      Final=>(others=>'z'),
      Peaje_km=>0.0,
      Trazado=>(
        Num => 5,
        Ptos => (
          (5.372,2.209),
          (6.332,3.425),
          (7.283,3.209),
          (8.329,4.292),
          (9.281,2.390),
          others=>(100.0,100.0)
        )
      )),
      (Codigo=>(others=>'z'),
      Inicio=>(others=>'z'),
      Final=>(others=>'z'),
      Peaje_km=>4.0,
      Trazado=>(
        Num => 5,
        Ptos => (
          (5.372,2.209),
          (6.332,3.425),
          (7.283,3.209),
          (8.329,4.292),
          (9.281,2.390),
          others=>(100.0,100.0)
        )
      )),
      others=>(
        Codigo=>(others=>'z'),
        Inicio=>(others=>'z'),
        Final=>(others=>'z'),
        Peaje_km=>42.0,
        Trazado=>(Num => 0,Ptos => (others=>(100.0,100.0)))
      )
    )
  ),
  (
    Cont=>8,
    Ctras=>(
      (Codigo=>(others=>'z'),
      Inicio=>(others=>'z'),
      Final=>(others=>'z'),
      Peaje_km=>7.0,
      Trazado=>(
        Num => 6,
        Ptos => (
          (5.372,2.209),
          (6.352,3.425),
          (8.329,3.291),
          (8.329,4.292),
          (9.281,2.390),
          (9.281,2.390),
          others=>(100.0,100.0)
        )
      )),
      (Codigo=>(others=>'z'),
      Inicio=>(others=>'z'),
      Final=>(others=>'z'),
      Peaje_km=>0.0,
      Trazado=>(
        Num => 4,
        Ptos => (
          (5.372,2.209),
          (6.332,3.425),
          (8.329,4.292),
          (9.281,2.390),
          others=>(100.0,100.0)
        )
      )),
      (Codigo=>(others=>'z'),
      Inicio=>(others=>'z'),
      Final=>(others=>'z'),
      Peaje_km=>7.0,
      Trazado=>(
        Num => 5,
        Ptos => (
          (5.372,2.209),
          (6.332,3.425),
          (7.283,3.209),
          (8.329,4.292),
          (-9.281,2.390),
          others=>(100.0,100.0)
        )
      )),
      (Codigo=>(others=>'z'),
      Inicio=>(others=>'z'),
      Final=>(others=>'z'),
      Peaje_km=>0.0,
      Trazado=>(
        Num => 5,
        Ptos => (
          (5.372,2.209),
          (6.332,3.425),
          (7.283,3.209),
          (8.329,4.292),
          (9.281,2.390),
          others=>(100.0,100.0)
        )
      )),
      (Codigo=>(others=>'z'),
      Inicio=>(others=>'z'),
      Final=>(others=>'z'),
      Peaje_km=>0.0,
      Trazado=>(
        Num => 5,
        Ptos => (
          (5.372,2.209),
          (6.352,3.425),
          (8.329,3.291),
          (8.329,4.292),
          (9.281,2.390),
          others=>(100.0,100.0)
        )
      )),
      (Codigo=>(others=>'z'),
      Inicio=>(others=>'z'),
      Final=>(others=>'z'),
      Peaje_km=>0.0,
      Trazado=>(
        Num => 5,
        Ptos => (
          (5.372,2.209),
          (6.332,3.425),
          (5.372,2.209),
          (8.329,4.292),
          (9.281,2.390),
          others=>(100.0,100.0)
        )
      )),
      (Codigo=>(others=>'z'),
      Inicio=>(others=>'z'),
      Final=>(others=>'z'),
      Peaje_km=>0.0,
      Trazado=>(
        Num => 5,
        Ptos => (
          (5.372,2.209),
          (6.332,3.425),
          (7.283,3.209),
          (8.329,4.292),
          (9.281,2.390),
          others=>(100.0,100.0)
        )
      )),
      (Codigo=>(others=>'z'),
      Inicio=>(others=>'z'),
      Final=>(others=>'z'),
      Peaje_km=>4.0,
      Trazado=>(
        Num => 5,
        Ptos => (
          (5.372,2.209),
          (6.332,3.425),
          (7.283,3.209),
          (8.329,4.292),
          (9.281,2.390),
          others=>(100.0,100.0)
        )
      )),
      others=>(
        Codigo=>(others=>'z'),
        Inicio=>(others=>'z'),
        Final=>(others=>'z'),
        Peaje_km=>42.0,
        Trazado=>(Num => 0,Ptos => (others=>(100.0,100.0)))
      )
    )
  )
);