{

//Declaração
MNT spi00, spi00N("CAT_MNT");

//Instanciação
spi00 = Recupere (Nome = "KRIG_SPI_ESFER_ISO_2000");
spi00N = Novo (Nome = "spi00N", ResX = 5000,
	ResY = 5000, Escala = 500000);


//Operação

spi00N = (spi00 - (-3.26935))/(0.157799 - (-3.26935));

}