Ignore:
Timestamp:
07/10/18 14:53:09 (6 years ago)
Author:
acosce
Message:

update LMDZORINCA_v6 to follow NPv6.1.5

File:
1 edited

Legend:

Unmodified
Added
Removed
  • CONFIG/UNIFORM/v6/LMDZORINCA_v6/GENERAL/DRIVER/lmdz.driver

    r3897 r3967  
    159159    IGCM_comp_modifyDefFile nonblocker config.def solaire $value 
    160160 
     161    # Read value for eccentricity from file Eccentricity.txt. If file not existing, take DEFAULT value from file. 
     162    if [ -f Eccentricity.txt ] ; then 
     163        value=`grep Annee_${year} Eccentricity.txt | awk -F= '{print $2}'` 
     164        if [ X"${value}" = X ] ; then 
     165            # The grep returned empty variable, stop execution 
     166            IGCM_debug_Exit "The file Eccentricity.txt do not contain the current year." 
     167            IGCM_debug_Verif_Exit 
     168        fi 
     169    else 
     170        value=DEFAULT 
     171    fi 
     172    IGCM_comp_modifyDefFile nonblocker config.def R_ecc $value 
     173 
     174    # Read value for obliquity from file Obliquity.txt. If file not existing, take DEFAULT value from file. 
     175    if [ -f Obliquity.txt ] ; then 
     176        value=`grep Annee_${year} Obliquity.txt | awk -F= '{print $2}'` 
     177        if [ X"${value}" = X ] ; then 
     178            # The grep returned empty variable, stop execution 
     179            IGCM_debug_Exit "The file Obliquity.txt do not contain the current year." 
     180            IGCM_debug_Verif_Exit 
     181        fi 
     182    else 
     183        value=DEFAULT 
     184    fi 
     185    IGCM_comp_modifyDefFile nonblocker config.def R_incl $value 
     186 
     187    # Read value for perihelie from file Perihelie.txt. If file not existing, take DEFAULT value from file. 
     188    if [ -f Perihelie.txt ] ; then 
     189        value=`grep Annee_${year} Perihelie.txt | awk -F= '{print $2}'` 
     190        if [ X"${value}" = X ] ; then 
     191            # The grep returned empty variable, stop execution 
     192            IGCM_debug_Exit "The file Perihelie.txt do not contain the current year." 
     193            IGCM_debug_Verif_Exit 
     194        fi 
     195    else 
     196        value=DEFAULT 
     197    fi 
     198    IGCM_comp_modifyDefFile nonblocker config.def R_peri $value 
    161199 
    162200    # Read value for co2_ppm from file CO2.txt. If file not existing, take DEFAULT value from file.  
     
    349387    else 
    350388        echo "LMDZ is running in forced mode without ocean model, set type_ocean=force in run.def" 
    351         IGCM_comp_modifyDefFile blocker run.def type_ocean force 
     389        IGCM_comp_modifyDefFile nonblocker run.def type_ocean force 
    352390    fi 
    353391 
     
    366404 
    367405 
     406    # run.def : Activate the call to phytrac  
     407    if [ ! X${lmdz_UserChoices_iflag_phytrac} = X ]; then  
     408        IGCM_comp_modifyDefFile nonblocker run.def iflag_phytrac ${lmdz_UserChoices_iflag_phytrac} 
     409    else 
     410        IGCM_comp_modifyDefFile nonblocker run.def iflag_phytrac 0 
     411    fi  
     412 
     413    # physiq.def : Activate the call to phytrac  
     414    if [ ! X${lmdz_UserChoices_ok_bug_cv_trac} = X ]; then  
     415        IGCM_comp_modifyDefFile nonblocker physiq.def ok_bug_cv_trac  ${lmdz_UserChoices_ok_bug_cv_trac} 
     416    else 
     417        IGCM_comp_modifyDefFile nonblocker physiq.def ok_bug_cv_trac  n 
     418    fi  
     419 
    368420    # config.def : Activate direct radiative effect if ok_ade=y 
    369421    if [ ! X${lmdz_UserChoices_ok_ade} = X ]; then  
     
    432484    fi  
    433485 
     486    # physiq.def : Modify parameter tau_gl if it is set in lmdz.card 
     487    if [ ! X${lmdz_UserChoices_tau_gl} = X ]; then  
     488        IGCM_comp_modifyDefFile nonblocker physiq.def tau_gl ${lmdz_UserChoices_tau_gl} 
     489    else 
     490        # Take default value set in physiq.def 
     491        IGCM_comp_modifyDefFile nonblocker config.def tau_gl DEFAULT 
     492    fi 
     493    
     494 
    434495    # guide.def : Activate nudging if ok_guide=y set in lmdz.card 
    435496    if [ ! X${lmdz_UserChoices_ok_guide} = X ] ; then 
     
    438499        IGCM_comp_modifyDefFile nonblocker guide.def ok_guide n 
    439500    fi 
     501 
    440502 
    441503    ## Read ByPass_hgardfou_teta option in lmdz.card --> divide teta* by 2 if [ $ByPass_hgardfou_teta = 1 ] 
Note: See TracChangeset for help on using the changeset viewer.