{- Tarea a entregar antes del 16 de setiembre de 2023 a las 23 hs -}
{- Funciones lineales -}

incluir Predefinido

{- Ejercicio 1: escribir dos funciones cantPos y cantNeg que dada una secuencia de enteros devuelven la cantidad 
de positivos (o cero) y de negativos que hay en la secuencia respectivamente. 
Escribir una funcion posNeg que dada una secuencia devuelve un par donde el primer elemento es la cantidad de 
enteros no negativos (positivos o cero) de la secuencia y el segundo la cantidad de negativos. Ejemplo:
posNeg ([1,2,7,0,-1,-3, 0])
(5,2)
-}
     
{- Ejercicio 2: Definir el conjunto de secuencias de enteros no vacías, SecZnoV. Usando la funcion dada restoZ escribir una funcion minSec que dada una secuencia no vacia de enteros devuelva el minimo.  Idem para el maximo (maxSec). Ejemplos:
minSec([1,3,0,4])
0
maxSec([1,3,0,4])
4
maxSec([])
Error: {Interprete columna: 8}
 Valor [] no pertenece al conjunto SecZnoV
porque no se cumple: [[] /= []].  
-}                     
restoZ :: Z* -> Z*
restoZ (xs) = resto(xs)

{- Ejercicio 3: dado un elemento entero y una secuencia de enteros escribir una funcion pertenece que devuelve True si 
el elemento esta en la lista y False si no. Ejemplos:
pertenece (0, [1,3,0,4])
True
pertenece (-5, [1,3,0,4])
False
-}  

{- Ejercicio 4: dadas dos secuencias de enteros escribir una funcion inter que devuelve una secuencia con los 
elementos comunes a ambas. Ejemplo:
inter ([1,3,0,4], [-5,3,0,-1,2])
[3,0] 
-}                                   

{- Ejercicio 5: Definir una funcion mcd que dados dos naturales a y b distintos de 0 implemente el algoritmo de Euclides para hallar el maximo comun divisor de a y b. Componiendo la funcion divisores del Predefinido y algunas de las funciones anteriores,  definir una funcion mcdDef que dados dos naturales distintos de 0, devuelva el maximo comun 
divisor de ellos. -}

{- Figuras
El area de un trapecio es ((baseMayor + baseMenor) * altura ) / 2.
Si los cuatro vertices de un trapecio, son (2.0,0),(1.5,2.0), (0,2.0), (x,0), escribir el area como funcion de la coordenada en x del cuarto vertice del trapecio. Cual debe ser esa coordenada para que el area de un trapecio sea 6cm^2 ? Usando la funcion primitiva poli, obtenga la figura del trapecio resultante.
Elija una o mas de una de las siguientes:

1) Con otro poligono de cuatro vertices y usando las funciones color3D, transparencia3D y juntarFigEn3D, obtenga un prisma. 

Para facilitar la tarea, recomendamos que escriba la secuencia de los puntos como una funcion 
fig1 :: () -> (R X R)*
fig1 () = [(2.0,0),(1.5,2.0), (0,2.0), (x,0)] donde el valor de x es el hallado. Luego puede usar poli(fig1()) en el interprete. 

2) Componiendo figuras 2D de su eleccion mediante las funciones disponibles (juntar, mover, color, rotar, escalar), obtenga una figura de su eleccion. 

3) Obtenga una figura en 2D o en 3D de su eleccion.-}