Changeset 111


Ignore:
Timestamp:
Apr 18, 2011, 8:10:30 AM (14 years ago)
Author:
aslmd
Message:

LMD_MM_MARS: modifications pour portage gnome: makemeso jusque 128, api avec plus de niveaux vert, scripts launch

Location:
trunk/mesoscale/LMD_MM_MARS
Files:
5 edited

Legend:

Unmodified
Added
Removed

  • trunk/mesoscale/LMD_MM_MARS/SIMU/launch.gnome

    r100 r111  
    22####################################################################### nom
    33# @ job_name            =       LMD_LES_MARS
    4 ####################################################################### real ou ideal ???
    5 # @ environment         =       real=0 ; tmpdir=$(job_name).$(jobid)
    64####################################################################### MPICH / serial
    75# @ job_type            =       MPICH
    … …  
    108####################################################################### A / B / C / AP / BP / CP
    119# @ class               =       AP             
    12 ####################################################################### 24gb
     10####################################################################### 24gb (cf. llps pendant fonctionnement)
    1311# @ resources           =       ConsumableCpus(1)ConsumableMemory(1gb) 
     12####################################################################### real ou ideal ???
     13# @ environment         =       real=0 ; tmpdir=$(job_name).$(jobid) ; para=$(job_type)
    1414#######################################################################
    15 
    1615
    1716#######################################################################
    … …  
    4948fi
    5049#######################################################################
     50#### avant wrf.exe, necessaire ???
    5151#declare -x MP_STACK_SIZE=640000000
    5252#declare -x MP_STACK_SIZE=64000000
    5353#######################################################################
    54 mpirun wrf.exe
     54if [[ "${para}" == "MPICH" ]]
     55then
     56   mpirun wrf.exe
     57else
     58   ./wrf.exe
     59fi
    5560#######################################################################

  • trunk/mesoscale/LMD_MM_MARS/SIMU/launch.gnome.ideal

    r100 r111  
    11#######################################################################
    22####################################################################### nom
    3 # @ job_name            =       LMD_LES_MARS
     3# @ job_name            =       PREP_LES
    44####################################################################### real ou ideal ???
    55# @ environment         =       real=0 ; tmpdir=$(job_name).$(jobid)

  • trunk/mesoscale/LMD_MM_MARS/SRC/POSTPROC/api.F90

    r95 r111  
    9090      CHARACTER (LEN=20)                                 :: process, dummy
    9191      CHARACTER (LEN=2000)                               :: fields, process_these_fields
    92       REAL, DIMENSION(99)                                :: interp_levels
     92      REAL, DIMENSION(299)                                :: interp_levels
    9393      REAL                                               :: rval
    9494      REAL                                               :: MISSING=1.e36

  • trunk/mesoscale/LMD_MM_MARS/SRC/WRFV2/phys/module_lmd_driver.F

    r99 r111  
    11041104            !!! -- HFX apparaissait nul aux interfaces des tuiles
    11051105            if ( output_tab2d(subs,ind_HFX) .le. 1.e-8 ) then
    1106                print *, 'HFX is zero !!! ', i, j
    1107                print *, 'I substituted the value right next to it ', output_tab2d(subs+1,ind_HFX)
     1106               !print *, 'HFX is zero !!! ', i, j
     1107               !print *, 'I substituted the value right next to it ', output_tab2d(subs+1,ind_HFX)
    11081108               output_tab2d(subs,ind_HFX) = output_tab2d(subs+1,ind_HFX)
    11091109            endif

  • trunk/mesoscale/LMD_MM_MARS/makemeso

    r86 r111  
    110110         exit
    111111       fi
    112        echo How many processors ? 1, 2, 4, 6, 8, 12, 16, 20, 24, 32 test 64 ; read numproc ;;
     112       echo How many processors ? e.g. 1, 2, 4, 6, 8, 12, 16, 20, 24, 32, 64, 128 ; read numproc ;;
    113113    4) compilo='ifort' ; numproc=1 ;;
    114     5) compilo='mpifort' ; echo How many processors ? 1, 2, 4, 6, 8, 12, 16, 20, 24, 32 test 64 ; read numproc ;;
    115     7) compilo='mpixlf' ; echo How many processors ? 1, 2, 4, 6, 8, 12, 16, 20, 24, 32 test 64 ; read numproc ;;
     114    5) compilo='mpifort' ; echo How many processors ? e.g. 1, 2, 4, 6, 8, 12, 16, 20, 24, 32, 64, 128 ; read numproc ;;
     115    7) compilo='mpixlf' ; echo How many processors ? e.g. 1, 2, 4, 6, 8, 12, 16, 20, 24, 32, 64, 128 ; read numproc ;;
    116116### for tests
    11711799) compilo='gnu' ; numproc=1 ;;
    … …  
    402402        physy=$(expr ${lat} - 1) ; physy=$(expr ${physy} \/ 6)
    403403        physz=$(expr ${level} - 1) ;;
    404 ### TESTS
    405404    32) physx=$(expr ${lon} - 1) ; physx=$(expr ${physx} \/ 4)
    406405        physy=$(expr ${lat} - 1) ; physy=$(expr ${physy} \/ 8)
    … …  
    408407    64) physx=$(expr ${lon} - 1) ; physx=$(expr ${physx} \/ 8)
    409408        physy=$(expr ${lat} - 1) ; physy=$(expr ${physy} \/ 8)
     409        physz=$(expr ${level} - 1) ;;
     410    128) physx=$(expr ${lon} - 1) ; physx=$(expr ${physx} \/ 8)
     411        physy=$(expr ${lat} - 1) ; physy=$(expr ${physy} \/ 16)
    410412        physz=$(expr ${level} - 1) ;;
    411413    *) echo not supported ; exit
Note: See TracChangeset for help on using the changeset viewer.