Removed tabs in 3D T90 files

Src/class_Data3D.T90

@@ -1,5 +1,5 @@
 ! ---
-! Copyright (C) 1996-2016	The SIESTA group
+! Copyright (C) 1996-2016       The SIESTA group
 !  This file is distributed under the terms of the
 !  GNU General Public License: see COPYING in the top directory
 !  or http://www.gnu.org/copyleft/gpl.txt .
@@ -68,7 +68,7 @@
     type(TYPE_NAME_) :: a3d_data
     if (associated(a3d_data%val)) then
         call de_alloc( a3d_data%val, &
-            name="val "//trim(a3d_data%name),routine=STR_TYPE_NAME)	
+            name="val "//trim(a3d_data%name),routine=STR_TYPE_NAME)     
     end if
   end subroutine delete_Data
   
@@ -134,7 +134,7 @@
     endif
 
     call re_alloc(this%data%val,1,n,1,m,1,l, &
-        name="val "//trim(this%data%name),routine=STR_TYPE_NAME)	
+        name="val "//trim(this%data%name),routine=STR_TYPE_NAME)        
 !$OMP parallel workshare default(shared)
     this%data%val(:,:,:) = val(:,:,:)
 !$OMP end parallel workshare
@@ -163,7 +163,7 @@
     VAR_TYPE(PREC)              :: v
 #else
     VAR_TYPE                    :: v
-#endif	
+#endif  
     
     v = this%data%val(idx1,idx2,idx3)
   end function valData3D_Idx

Src/class_SpData3D.T90

@@ -1,5 +1,5 @@
 ! ---
-! Copyright (C) 1996-2016	The SIESTA group
+! Copyright (C) 1996-2016       The SIESTA group
 !  This file is distributed under the terms of the
 !  GNU General Public License: see COPYING in the top directory
 !  or http://www.gnu.org/copyleft/gpl.txt .
@@ -154,10 +154,10 @@
        end if
        if ( sparsity_dim == 1 ) then ! Regular way...
            call VAR_NEW_TYPE(this%data%a, &
- 	        nnzs(sp),dim1,dim2,"(new from "//STR_TYPE_NAME//")")
+                nnzs(sp),dim1,dim2,"(new from "//STR_TYPE_NAME//")")
        else if ( sparsity_dim == 2 ) then ! Regular way...
            call VAR_NEW_TYPE(this%data%a, &
- 	        dim1,nnzs(sp),dim2,"(new from "//STR_TYPE_NAME//")")
+                dim1,nnzs(sp),dim2,"(new from "//STR_TYPE_NAME//")")
        else ! it must be 3
            call VAR_NEW_TYPE(this%data%a, &
                 dim1,dim2,nnzs(sp),"(new from "//STR_TYPE_NAME//")")
@@ -292,7 +292,7 @@
         n = 0
       else
         ! we have to use a different variable
-	! name than dim (due to interface problems)
+        ! name than dim (due to interface problems)
         ldim = dim
         n = size(this%data%a%data%val,ldim)
       end if

version.info

@@ -1 +1,2 @@
-trunk-749--clean-19
+trunk-749--clean-20
+