Ignore:
Timestamp:
11/07/14 11:39:31 (10 years ago)
Author:
sleclech
Message:

correction bug sur initialisation pointeurs

File:
1 edited

Legend:

Unmodified
Added
Removed

  • trunk/SOURCES/Draggings_modules/beta_iter_vitbil_mod.f90

    r4 r8  
    2121 
    2222 
    23   real*8, dimension(:,:),   pointer  :: tab !< tableau 2d real ecrit dans le fichier pour lect ncdf 
     23  real*8, dimension(:,:),   pointer  :: tab => null() !< tableau 2d real ecrit dans le fichier pour lect ncdf 
    2424 
    2525  real, dimension(nx,ny) :: Vcol_x           !< uniquement pour compatibilite 
Note: See TracChangeset for help on using the changeset viewer.