Ignore:
Timestamp:
Dec 18, 2024, 7:36:56 PM (6 hours ago)
Author:
fhourdin
Message:

Modified access to http://lmdz...

File:
1 edited

Legend:

Unmodified
Added
Removed
  • BOL/LMDZ_Setup/script_SIMU

    r5422 r5426  
    9292if [ "$aerosols" = "spla" ] ; then ERA10mDIR=$STORED/$MAINDIR/ERA10m ; fi
    9393LIMITDIR=$STORED/$MAINDIR/LIMIT
    94 SPLADIR=$STORED/$MAINDIR/INPUT_SPLA
    9594DEFDIR=$SIMUDIR/DEF
    9695
     
    132131echo mois ancien  : $ym
    133132echo mois nouveau : $next
    134 
    135 INI=${SPLADIR}/INITIAL
    136 PERIOD=${SPLADIR}/PERIOD00${month}/SUB
    137133
    138134echo '#################################################################'
     
    230226  fi
    231227
    232   ## Ca doit etre la meme liste de fichiers rapatriee par setup.sh dans $LMDZ_INIT/SPLA_Init
    233   ## et interpolee (setup.sh aussi) dans $SPLADIR
    234   if [ $aerosols = spla ] ; then
    235     inputf="wth.dat cly.dat donnees_lisa.nc SOILSPEC.data \
    236                 carbon_emissions.nc sulphur_emissions_antro.nc  \
    237                 sulphur_emissions_nat.nc  sulphur_emissions_volc.nc"
    238     for file in $inputf ; do ${GET} $INI/$file . ; done
    239 
    240     change="dust.nc "
    241     for file in $change ; do ${GET} $PERIOD/$file . ; done
     228  # Rapatriement des fichiers pour SPLA.
     229  # AFAIRE : si le wget marche de toutes les machines, enlever le wget_pub equivalent dans setup.sh
     230  #          et le faire automatiquement dans ln_from_pub
     231  if [[ $aerosols = "spla" ]]; then
     232    for file in donnees_lisa.nc SOILSPEC.data ; do
     233         ln_from_pub 3DInputData/dust_chimere $file
     234    done
     235    for file in cly.dat dust$mo.nc wth.dat ; do
     236         ln_from_pub 3DInputData/dust_inca $file
     237    done
     238    ln -s dust$mo.nc dust.nc
     239    for file in carbon_emissions.nc sulphur_emissions_antro.nc sulphur_emissions_nat.nc \
     240         sulphur_emissions_volc.nc  ; do
     241         ln_from_pub 3DInputData/non_dust $file
     242    done
    242243
    243244    # Le calcul d'emissions de sels marins utilise les vents ERA-10m interpoles sur grille_s (lonv,latu) avec le script era2gcm_uv10m.sh
     
    263264    set +e ; for t in stomate sechiba ; do cp $SIMUDIR/start_$t.$ym.nc ${t}_rest_in.nc ; done ; set -e
    264265    if [ "`grep RIVER_ROUTING orchidee.def |grep -i y`" ] ; then
    265       set +e ; ln -s $LMDZ_INIT/routing_simple.nc . ; ln -s $LMDZ_INIT/routing.nc .
    266                cp $SIMUDIR/start_routing.$ym.nc routing_start.nc ; set -e
     266      set +e
     267      for file in routing_simple.nc routing.nc ; do
     268          ln_from_pub 3DInputData/Orchideee routing.nc
     269      done
     270      cp $SIMUDIR/start_routing.$ym.nc routing_start.nc
     271      set -e
    267272    fi
    268273
     
    277282       echo "Autoinitialisation d'orchidee au besoin"
    278283       echo '#########################################################'
    279        get="ln -s $LMDZ_INIT/"
    280284       for file in cartepente2d_15min.nc \
    281           lai2D.nc soils_param.nc soil_bulk_and_ph.nc alb_bg_modisopt_2D_ESA_v2.nc reftemp.nc ; do ${get}$file ; done
    282 
     285          lai2D.nc soils_param.nc soil_bulk_and_ph.nc alb_bg_modisopt_2D_ESA_v2.nc reftemp.nc ; do
     286          ln_from_pub 3DInputData/Orchidee $file
     287       done
    283288       ln -sf alb_bg_modisopt_2D_ESA_v2.nc alb_bg.nc
    284289
     
    292297
    293298      if [ $veget = 7994 ] ; then
    294          get="ln -s $LMDZ_INIT/"
    295          for file in ndep_nhx.nc ndep_noy.nc nfert_cropland.nc nfert_pasture.nc nmanure_cropland.nc nmanure_pasture.nc bnf.nc ; do ${get}$file ; done
     299         for file in ndep_nhx.nc ndep_noy.nc nfert_cropland.nc nfert_pasture.nc nmanure_cropland.nc nmanure_pasture.nc bnf.nc ; do
     300            ln_from_pub 3DInputData/Orchidee $file
     301         done
    296302      fi
    297303
Note: See TracChangeset for help on using the changeset viewer.