Ignore:
Timestamp:
04/05/16 14:52:40 (8 years ago)
Author:
aquiquet
Message:

SMB forced: T perturbation from ice cores which may affect SMB (rappact)

File:
1 edited

Legend:

Unmodified
Added
Removed

  • trunk/SOURCES/GrIce2sea_files/climat_GrIce2sea_years_mod.f90

    r34 r55  
    116116!cdc test debug Hemin15 et Greeneem15 
    117117!  where (bm(:,:).lt.-1000) bm(:,:)=0. 
    118  
     118  where (bm(:,:).eq.0) bm(:,:)=-10. !afq 
    119119 
    120120  acc(:,:) = 0. 
    … …  
    138138!cdc test debug Hemin15 
    139139!  where (Tann(:,:).lt.-100.) Tann(:,:)=10. 
    140  
     140  where (Tann(:,:).lt.-100.) Tann(:,:)=10. !afq 
    141141 
    142142  ta0(:,:)   = Tann(:,:) 
Note: See TracChangeset for help on using the changeset viewer.