anchor.diff:    end type edgesg_structure
   
   
  -  type,private  :: gauss_structure
  +  type :: gauss_structure
        real(r8),allocatable:: lpg(:,:)
        real(r8),allocatable:: lwg(:)
        real(r8),allocatable:: lvn(:,:)
        integer(i4),allocatable:: upwind_donald(:)
     end type gauss_structure
   
  -  type,private  :: ngbr_structure
  +  type :: ngbr_structure
        !Numero de vizinhos de cada no (primeiros vizinhos ou segundos vizinhos)
        integer(i4)       :: numberngbr
   
  
positive.code:   ! node structure
    !--------------------------------------------------------------------------------------
  
    type,private  :: coords_structure
       real(r8),dimension(1:2):: xy
       real(r8),dimension(1:3):: xyz
    end type coords_structure
  
    type,private  :: coords2_structure
       real(r8),dimension(:,:),allocatable:: xyz2
    end type coords2_structure
  
    type,private  :: edges_structure
       real(r8),dimension(:,:),allocatable:: xyz2
       real(r8),allocatable:: PG(:)
    end type edges_structure
  
    type,private  :: edgesg_structure
       real(r8),allocatable:: MRGG(:,:)
       real(r8),allocatable:: MPGG(:,:)
       real(r8),allocatable:: VBGG(:)
  
negative.code:      real(r8),allocatable        :: lvd(:)
    end type ngbr_structure
  
    type :: flux_structure
       real(r8),allocatable    :: flux
    end type flux_structure
  
    type :: node_structure
  
       !Informacoes de cada grupo de vizinhos
       type (ngbr_structure),allocatable  :: ngbr(:)
  