# 31-iperboli Postscript("31-iperboli.ps",1.6,1.6) lato=c(-2,2); par(bg="#ccff99") Grafica(lato,lato,cornice=T) t=seq(-2,2,by=0.01) f = function (x,y) x*x-y*y valori=outer(t,t,f) Livelli(t,t,valori=valori,scritte=0.5, livelli=setdiff(seq(-2,2,by=0.5),0)) Livelli(t,t,valori=valori,spessore=2, colore="red",scritte=0) dev.off()