(sistema (empreitada ()
(makeff (1
(orca_info 1
10
20
(list (capitulo "lev terras"(list (artigo 3
10
(list 0
)
0
)
 (artigo 2
20
(list 0
)
501600
)
)
601920
)
 (capitulo "ggggglev terras"(list (artigo 3
10
(list 0
)
0
)
 (artigo 2
20
(list 0
)
501600
)
)
601920
)
 (capitulo "ggggglev terras"(list (artigo 3
10
(list 0
)
0
)
 (artigo 2
20
(list 0
)
501600
)
)
601920
)
 (capitulo "aggggglev terras"(list (artigo 3
10
(list 0
)
0
)
 (artigo 2
20
(list 0
)
501600
)
)
601920
)
 (capitulo "bggggglev terras"(list (artigo 3
10
(list 0
)
0
)
 (artigo 2
20
(list 0
)
501600
)
)
601920
)
 (capitulo "cggggglev terras"(list (artigo 3
10
(list 0
)
0
)
 (artigo 2
20
(list 0
)
501600
)
)
601920
)
 (capitulo "dggggglev terras"(list (artigo 3
10
(list 0
)
0
)
 (artigo 2
20
(list 0
)
501600
)
)
601920
)
 (capitulo "gggggle v terras"(list (artigo 3
10
(list 0
)
0
)
 (artigo 2
20
(list 0
)
501600
)
)
601920
)
 (capitulo "lev terras"(list (artigo 3
10
(list 0
)
0
)
 (artigo 2
20
(list 0
)
501600
)
)
601920
)
)
)
) (2
(orca_info 1
10
20
(list (capitulo "terras"(list (artigo 2
30
(list 0
)
752400
)
)
902880
)
)
)
))
(makeff (1
(info_ficha "bosta"(makeset (tabela 1
10
)
 (tabela 2
20
)
 (tabela 3
30
)
)
)
) (2
(info_ficha "juntas"(makeset (tabela 3
30
)
 (tabela 4
40
)
)
)
) (3
(info_ficha "juntas"(makeset (tabela 5
30
)
 (tabela 6
40
)
)
)
))
(makeset (produtos 1
"cimento")
 (produtos 2
"entukho")
 (produtos 3
"agua")
 (produtos 4
"tijolo")
)
)
(central_c ()
()
(makeff ((chave 1
1
111
)
100
) ((chave 2
1
111
)
200
) ((chave 3
1
111
)
300
) ((chave 4
1
111
)
400
) ((chave 1
2
111
)
100
) ((chave 2
2
111
)
202
) ((chave 3
2
111
)
300
) ((chave 4
2
111
)
402
))
)
(central_m_e ()
()
()
)
()
(contabilidade (makeff (1
(inf_cliente "ricardo""sts"10
)
) (2
(inf_cliente "luis pedro""braga"20
)
))
(makeff (1
(inf_forn "bloqueira""matos"111
)
) (2
(inf_forn "cimpor""porto"222
)
) (3
(inf_forn "pica_ferro""begaga"333
)
))
(facturas ()
()
)
(recibos ()
()
)
)
)