Changeset 14 for trunk/SOURCES


Ignore:
Timestamp:
05/22/15 15:55:50 (9 years ago)
Author:
dumas
Message:

Nouvelle version Hemin-15 : Hemisphere Nord 15km

Location:
trunk/SOURCES
Files:
10 added
1 deleted
6 edited

Legend:

Unmodified
Added
Removed

  • trunk/SOURCES/Fichiers-parametres/Makefile.tof-lsce3130.inc

    r9 r14  
    3636IFORT= ifort 
    3737 
    38 ARITHM    = -O2 -fp-model precise  -heap-arrays -traceback -diag-disable warn # -traceback   -CB  -g  # options pour une meilleure arithmetique 
     38ARITHM    = -O2 -fp-model precise  -heap-arrays -traceback -diag-disable warn -mcmodel=medium # -traceback   -CB  -g  # options pour une meilleure arithmetique 
    3939                                                                      # (normalement reproductible) 
    4040#ARITHM    =  -fp-model precise -warn all -CU -CA # options pour une meilleure arithmetique (normalement reproductible) 

  • trunk/SOURCES/GrIce2sea_files/climat_GrIce2sea_years_mod.f90

    r12 r14  
    112112!  end where 
    113113 
     114!cdc test debug Hemin15 
     115!  where (bm(:,:).lt.-20) bm(:,:)=-10. 
     116 
     117 
    114118  acc(:,:) = 0. 
    115119  abl(:,:) = 0. 
    … …  
    129133  Tann(:,:)  = tab(:,:) 
    130134!  call lect_input(3,'Tann',1,Tann,temp_annual_file,trim(dirnameinp)//trim(runname)//'.nc') 
     135 
     136!cdc test debug Hemin15 
     137!  where (Tann(:,:).lt.-100.) Tann(:,:)=10. 
     138 
    131139 
    132140  ta0(:,:)   = Tann(:,:) 

  • trunk/SOURCES/Greeneem_files/module_choix-greeneem.f90

    r13 r14  
    6767 
    6868!use dragging_vitbil 
    69 ! use dragging_hwatstream 
     69!use dragging_hwatstream 
    7070!use dragging_hwat_cont 
    71 use dragging_hwat_contmaj          !version neem sans streams 
     71!use dragging_hwat_contmaj          !version neem sans streams validee greeneem15 
    7272!use dragging_neem               ! neem avec streamsn,masque offline 
     73use dragging_hwat_sedim          ! version C. Dumas 
     74 
    7375 
    7476!------------ spinup ----------------------------------- 

  • trunk/SOURCES/Hemin40_files/module_choix-hemin40-0.4.f90

    r13 r14  
    9292!use dragging_vitbil 
    9393!use dragging_hwatstream 
    94 use dragging_hwat_contmaj 
     94!use dragging_hwat_contmaj ! frottement basal catherine grisliv8 ice stream peu actifs 
     95use dragging_hwat_sedim 
    9596!use dragging_hwat_cont 
    9697 

  • trunk/SOURCES/Makefile.grisli.inc

    r13 r14  
    6767        interface_input.o deformation_type.o autre_pr_temp_type.o  \ 
    6868        iso_declar_mod-0.3.o isostasie_mod-0.3.o noisostasie_mod-0.3.o \ 
    69         deformation_mod_2lois.o deformation_mod_2lois_isotherme.o      \ 
     69        deformation_mod_2lois.o deformation_mod_2lois_isotherme.o     \ 
    7070        sliding_Bindshadler_mod.o no_sliding.o                      \ 
    7171        dragging_hwatermax_0.2_mod.o dragging_calc_beta_mod.o  \ 
    7272        dragging_hwat-contigu_mod.o dragging_hwat_contmaj_mod.o \ 
    73         prop-thermiques_mod.o  \ 
     73        dragging_hwat_sedim_mod.o  prop-thermiques_mod.o  \ 
    7474        calving_frange.o no_calving.o no_lakes.o \ 
    7575        out_profile_mod.o printtable_mod.o mix-SIA-L1_mod.o \ 
    … …  
    101101 
    102102 
    103 # Modules communs Post geographiques 
     103# Modules communs Post geographiques  
    104104 
    105105mod_post_geo = step_temp_type.o 
    … …  
    203203        track_hemin40_mod.o 
    204204 
     205Liste_hemin15 = output_hemin40_mod.o \ 
     206        lect-hemin15_mod.o  \ 
     207        bmelt-hemin40-depth_mod.o \ 
     208        fake-routines-hemin15_mod.o  module_choix-hemin15.o \ 
     209        track_hemin15_mod.o 
     210 
    205211Liste_greeneem15 = output_greeneem_mod-0.4.o \ 
    206212        lect-greeneem_mod.o \ 
    … …  
    268274Dim_hemin40 = paradim-hemin40_mod.o geography-hemin40_mod.o 
    269275 
     276Dim_hemin15 = paradim-hemin15_mod.o geography-hemin15_mod.o 
     277 
    270278Dim_eura40 = paradim-euras40_mod.o geography-euras40_mod.o 
    271279 
    … …  
    690698        $(FT) dragging_hwat_contmaj_mod.f90 
    691699 
     700dragging_hwat_sedim_mod.o : dragging_hwat_sedim_mod.f90 
     701        $(FT) dragging_hwat_sedim_mod.f90 
     702 
    692703dragging_calc_beta_mod.o : Antarctique_general_files/dragging_calc_beta_mod.f90 
    693704        $(FT) Antarctique_general_files/dragging_calc_beta_mod.f90 
    … …  
    10951106 
    10961107moy_mxmy.o : moy_mxmy.f90 
    1097         $(FT)  moy_mxmy.f90 
     1108        $(FT) moy_mxmy.f90 
    10981109 
    10991110neffect-0.3.o : neffect-0.3.f90 #module3d.mod 
    … …  
    12201231        $(FT) Hemin40_files/output_hemin40_mod.f90 
    12211232 
    1222 lect-clim-act-hemin40_mod.o : Hemin40_files/lect-clim-act-hemin40_mod.f90 
    1223         $(FT) Hemin40_files/lect-clim-act-hemin40_mod.f90 
    1224  
    12251233lect-hemin40_mod.o : Hemin40_files/lect-hemin40_mod.f90 
    12261234        $(FT) Hemin40_files/lect-hemin40_mod.f90 
    … …  
    12411249        $(FT) Hemin40_files/track_hemin40_mod.f90 
    12421250 
     1251# Routines Hemin-15 : 
     1252 
     1253paradim-hemin15_mod.o : Hemin15_files/paradim-hemin15_mod.f90 
     1254        $(FT) Hemin15_files/paradim-hemin15_mod.f90 
     1255 
     1256geography-hemin15_mod.o : Hemin15_files/geography-hemin15_mod.f90 
     1257        $(FT) Hemin15_files/geography-hemin15_mod.f90 
     1258 
     1259lect-hemin15_mod.o : Hemin15_files/lect-hemin15_mod.f90 
     1260        $(FT) Hemin15_files/lect-hemin15_mod.f90 
     1261 
     1262fake-routines-hemin15_mod.o : Hemin15_files/fake-routines-hemin15_mod.f90 
     1263        $(FT) Hemin15_files/fake-routines-hemin15_mod.f90 
     1264 
     1265module_choix-hemin15.o : Hemin15_files/module_choix-hemin15.f90 
     1266        $(FT) Hemin15_files/module_choix-hemin15.f90 
     1267 
     1268track_hemin15_mod.o : Hemin15_files/track_hemin15_mod.f90 
     1269        $(FT) Hemin15_files/track_hemin15_mod.f90 
     1270 
    12431271# routines Eurasie-40 
    12441272 
    … …  
    12691297 
    12701298icetemp_declar-0.5_mod.o : Temperature-routines/icetemp_declar-0.5_mod.f90 
    1271         $(FT)  Temperature-routines/icetemp_declar-0.5_mod.f90 
     1299        $(FT) Temperature-routines/icetemp_declar-0.5_mod.f90 
    12721300 
    12731301interface_advec_icetemp.o :  Temperature-routines/interface_advec_icetemp.f90 
    1274         $(FT)  Temperature-routines/interface_advec_icetemp.f90 
     1302        $(FT) Temperature-routines/interface_advec_icetemp.f90 
    12751303 
    12761304interface_icetempmod.o :  Temperature-routines/interface_icetempmod.f90 
    1277         $(FT)  Temperature-routines/interface_icetempmod.f90 
     1305        $(FT) Temperature-routines/interface_icetempmod.f90 
    12781306 
    12791307interface_prop_th_icetemp.o:  Temperature-routines/interface_prop_th_icetemp.f90 
    1280         $(FT)  Temperature-routines/interface_prop_th_icetemp.f90 
     1308        $(FT) Temperature-routines/interface_prop_th_icetemp.f90 
    12811309 
    12821310interface_Qprod_icetemp.o:  Temperature-routines/interface_Qprod_icetemp.f90 
    1283         $(FT)  Temperature-routines/interface_Qprod_icetemp.f90 
     1311        $(FT) Temperature-routines/interface_Qprod_icetemp.f90 
    12841312 
    12851313interface_temp_col.o :  Temperature-routines/interface_temp_col.f90 
    1286         $(FT)  Temperature-routines/interface_temp_col.f90 
     1314        $(FT) Temperature-routines/interface_temp_col.f90 
    12871315 
    12881316# Routines Agrif 
    … …  
    13181346 
    13191347graphique_L2.o : New-remplimat/graphique_L2.f90 
    1320         $(FT)  New-remplimat/graphique_L2.f90 
     1348        $(FT) New-remplimat/graphique_L2.f90 
    13211349 
    13221350graph-sgbsv.o : New-remplimat/graph-sgbsv.f90 
    … …  
    13751403 
    13761404toy_declar_3D_grisli_mod.o : Recul_force_grounding_line/toy_declar_3D_grisli_mod.f90 
    1377         $(FT)  Recul_force_grounding_line/toy_declar_3D_grisli_mod.f90 
    1378  
    1379 declar_io_ncdf_toy_mod_fake.o :  Recul_force_grounding_line/declar_io_ncdf_toy_mod_fake.f90 
    1380         $(FT)  Recul_force_grounding_line/declar_io_ncdf_toy_mod_fake.f90 
     1405        $(FT) Recul_force_grounding_line/toy_declar_3D_grisli_mod.f90 
     1406 
     1407declar_io_ncdf_toy_mod_fake.o : Recul_force_grounding_line/declar_io_ncdf_toy_mod_fake.f90 
     1408        $(FT) Recul_force_grounding_line/declar_io_ncdf_toy_mod_fake.f90 
    13811409 
    13821410declar_toy_retreat.o : Recul_force_grounding_line/declar_toy_retreat.f90 
    1383         $(FT)  Recul_force_grounding_line/declar_toy_retreat.f90 
     1411        $(FT) Recul_force_grounding_line/declar_toy_retreat.f90 
    13841412 
    13851413toy_retreat_mod.o  : Recul_force_grounding_line/toy_retreat_mod.f90 
    … …  
    15261554        $(routine_elliptiques) $(NCDF_LIB)  $(MKL_LIB) 
    15271555 
     1556Hemin-15 : $(Dim_hemin15) $(mod_dim_communs) \ 
     1557        $(toy_recul)  \ 
     1558        $(mod_communs) \ 
     1559        $(mod_clim_tof) \ 
     1560        $(mod_no_tracers) \ 
     1561        $(mod_ell) $(Liste_hemin15) \ 
     1562        $(mod_post_geo) \ 
     1563        $(diagnoshelf) \ 
     1564        $(Liste_Netcdf) \ 
     1565        $(routines_communes) steps_time_loop.o \ 
     1566        $(routine_elliptiques) 
     1567 
     1568        $(LK) -o  ../bin/Hemin-15 \ 
     1569        $(Dim_hemin15) $(mod_dim_communs) \ 
     1570        $(toy_recul)  \ 
     1571        $(mod_communs) \ 
     1572        $(mod_clim_tof) \ 
     1573        $(mod_no_tracers) \ 
     1574        $(mod_ell) $(Liste_hemin15) \ 
     1575        $(mod_post_geo) \ 
     1576        $(diagnoshelf) \ 
     1577        $(Liste_Netcdf) \ 
     1578        $(routines_communes) steps_time_loop.o \ 
     1579        $(routine_elliptiques) $(NCDF_LIB)  $(MKL_LIB) 
     1580 
    15281581Greeneem15 : $(Dim_greeneem15) $(mod_dim_communs) \ 
    15291582        $(toy_recul)  \ 

  • trunk/SOURCES/Netcdf-routines/sortie_netcdf_GRISLI_mod.0.2-hassine.f90

    r13 r14  
    178178    !------------------------------------ 
    179179    ! open(num_file,file='../'//trim(dirsource)//'/Fichiers-parametres/'//geoplace//'_TEMPS-NETCDF.dat') 
    180     open(num_file,file=trim(dirsource)//'/Fichiers-parametres/'//geoplace//'_TEMPS-NETCDF.dat') 
     180    open(num_file,file=trim(dirsource)//'/Fichiers-parametres/'//geoplace//'_TEMPS-NETCDF.dat',status='old') 
    181181 
    182182 
Note: See TracChangeset for help on using the changeset viewer.