Changeset 45 for branches


Ignore:
Timestamp:
02/03/16 13:10:44 (8 years ago)
Author:
dumas
Message:

Merge branche iLOVECLIM sur rev 44

Location:
branches/iLoveclim
Files:
7 edited
4 copied

Legend:

Unmodified
Added
Removed
  • branches/iLoveclim

  • branches/iLoveclim/SOURCES/Ant40_files/module_choix-antar40-0.4.f90

    r35 r45  
    8787 
    8888use dragging_hwat_contmaj ! frottement basal catherine grisliv8 ice stream peu actifs 
     89! use dragging_neff_contmaj ! dragging Aurelien et Christophe Fev 2016 
    8990! use dragging_hwat_sedim version sediment HN 
    9091 
  • branches/iLoveclim/SOURCES/Fichiers-parametres/anteis1_TEMPS-NETCDF.dat

    r27 r45  
    20201.e10 
    2121------------------------------------------------------------------------------------------- 
    22 15      npredeft        lecture de predef_tsort 
     228       npredeft        lecture de predef_tsort 
    232310 
    2424100 
    2525200 
    2626500 
    27 100010 
    28 100100 
    29 200010 
    30 200100 
    31 -20990 
    32 -20900 
    33 -20500 
    34 -19500 
    35 -121990 
    36 -125990 
    37 -125900 
    38 -419990 
    39 -419500 
    40 -419000 
    41  
    42  
     271000 
     282000 
     295000 
     307000 
    4331------------------------------------------------------------------------------------------- 
  • branches/iLoveclim/SOURCES/Makefile.grisli-gfortran.inc

    r40 r45  
    4444mod_clim_tof = climat_forcage_mois_mod.o climat-forcage-insolation_mod_oneway.o \ 
    4545        climat-forcage-insolation_mod.o climat_GrIce2sea_years_mod.o \ 
     46        climat_GrIce2sea_years_perturb_mod.o \ 
    4647        climat-perturb_mod-0.4.o \ 
    4748        ablation_mod.o no_ablation_mod.o \ 
     
    7475        dragging_hwatermax_0.2_mod.o dragging_calc_beta_mod.o  \ 
    7576        dragging_hwat-contigu_mod.o dragging_hwat_contmaj_mod.o \ 
    76         dragging_hwat_sedim_mod.o \ 
     77        dragging_hwat_sedim_mod.o dragging_neff_contmaj_mod.o \ 
    7778        calving_frange.o no_calving.o no_lakes.o \ 
    7879        out_profile_mod.o printtable_mod.o mix-SIA-L1_mod.o \ 
     
    637638        $(F_NETCDF) GrIce2sea_files/climat_GrIce2sea_years_mod.f90 
    638639 
     640climat_GrIce2sea_years_perturb_mod.o : GrIce2sea_files/climat_GrIce2sea_years_perturb_mod.f90 
     641        $(F_NETCDF) GrIce2sea_files/climat_GrIce2sea_years_perturb_mod.f90 
     642 
    639643climat-forcage-stat-mois_mod-0.1.o : climat-forcage-stat-mois_mod-0.1.f90 
    640644        $(FT)  climat-forcage-stat-mois_mod-0.1.f90 
     
    708712dragging_hwat_sedim_mod.o : dragging_hwat_sedim_mod.f90 
    709713        $(FT) dragging_hwat_sedim_mod.f90 
     714 
     715dragging_neff_contmaj_mod.o : dragging_neff_contmaj_mod.f90 
     716        $(FT) dragging_neff_contmaj_mod.f90 
    710717 
    711718dragging_calc_beta_mod.o : Antarctique_general_files/dragging_calc_beta_mod.f90 
  • branches/iLoveclim/SOURCES/Makefile.grisli.inc

    r40 r45  
    4343mod_clim_tof = climat_forcage_mois_mod.o climat-forcage-insolation_mod_oneway.o \ 
    4444        climat-forcage-insolation_mod.o climat_GrIce2sea_years_mod.o \ 
     45        climat_GrIce2sea_years_perturb_mod.o \ 
    4546        climat-perturb_mod-0.4.o \ 
    4647        ablation_mod.o no_ablation_mod.o \ 
     
    7374        dragging_hwatermax_0.2_mod.o dragging_calc_beta_mod.o  \ 
    7475        dragging_hwat-contigu_mod.o dragging_hwat_contmaj_mod.o \ 
    75         dragging_hwat_sedim_mod.o \ 
     76        dragging_hwat_sedim_mod.o dragging_neff_contmaj_mod.o \ 
    7677        calving_frange.o no_calving.o no_lakes.o \ 
    7778        out_profile_mod.o printtable_mod.o mix-SIA-L1_mod.o \ 
     
    636637        $(F_NETCDF) GrIce2sea_files/climat_GrIce2sea_years_mod.f90 
    637638 
     639climat_GrIce2sea_years_perturb_mod.o : GrIce2sea_files/climat_GrIce2sea_years_perturb_mod.f90 
     640        $(F_NETCDF) GrIce2sea_files/climat_GrIce2sea_years_perturb_mod.f90 
     641 
    638642climat-forcage-stat-mois_mod-0.1.o : climat-forcage-stat-mois_mod-0.1.f90 
    639643        $(FT)  climat-forcage-stat-mois_mod-0.1.f90 
     
    707711dragging_hwat_sedim_mod.o : dragging_hwat_sedim_mod.f90 
    708712        $(FT) dragging_hwat_sedim_mod.f90 
     713 
     714dragging_neff_contmaj_mod.o : dragging_neff_contmaj_mod.f90 
     715        $(FT) dragging_neff_contmaj_mod.f90 
    709716 
    710717dragging_calc_beta_mod.o : Antarctique_general_files/dragging_calc_beta_mod.f90 
  • branches/iLoveclim/SOURCES/dragging_hwat_sedim_mod.f90

    r38 r45  
    325325 
    326326      if (cotemx(i,j)) then                        ! point cotier 
    327          betamx(i,j)=cf*neffmx(i,j)*0.1  
     327         betamx(i,j)=cf*neffmx(i,j)  
    328328! cat         betamx(i,j)=min(betamx(i,j),tobmax) 
    329329! version Jorge 
     
    379379 
    380380      if (cotemy(i,j)) then                        ! point cotier 
    381          betamy(i,j)=cf*neffmy(i,j)*0.1  
     381         betamy(i,j)=cf*neffmy(i,j)  
    382382! cat         betamy(i,j)=min(betamy(i,j),tobmax) 
    383383! version Jorge 
  • branches/iLoveclim/SOURCES/relaxation_water_diffusion.f90

    r4 r45  
    128128          erelax(i,j)=-kmy(i,j+1)*dtwdx2      ! drelax : diagonale i,j+1  
    129129 
    130           crelax(i,j)=1.+((kmx(i,j)+kmx(i+1,j))+(kmy(i,j+1)+kmy(i,j+1)))*dtwdx2  
     130          crelax(i,j)=1.+((kmx(i,j)+kmx(i+1,j))+(kmy(i,j)+kmy(i,j+1)))*dtwdx2  
    131131                                              !crelax : diagonale i,j  
    132132 
Note: See TracChangeset for help on using the changeset viewer.