Changeset 4440 for LMDZ6


Ignore:
Timestamp:
Feb 16, 2023, 10:49:20 AM (17 months ago)
Author:
fhourdin
Message:

Deactivating filtre and check if iim=1 (2D y-z)

Location:
LMDZ6/trunk/libf
Files:
3 edited

Legend:

Unmodified
Added
Removed

  • LMDZ6/trunk/libf/filtrez/filtreg.F

    r1907 r4440  
    7171
    7272      INTEGER :: sdd1_type, sdd2_type
     73
     74      if ( iim == 1 ) return ! no filtre in 2D y-z
    7375
    7476      IF (first) THEN

  • LMDZ6/trunk/libf/filtrez/filtreg_mod.F90

    r2603 r4440  
    6666    !-----------------------------------------------------------
    6767    !
     68    if ( iim == 1 ) return ! No filtre in 2D y-z
    6869
    6970    pi       = 2. * ASIN( 1. )
    … …  
    125126    !
    126127    colat0  =  MIN( 0.5, dymin/dxmin )
     128    ! colat0  =  1.
    127129    !
    128130    IF( .NOT.fxyhypb.AND.ysinus )  THEN

  • LMDZ6/trunk/libf/grid/dimension/makdim

    r2239 r4440  
    1212fi
    1313
    14 if (($1 % 8 != 0)) && (( $# == 3 ))
     14if ( ( ($1 % 8 != 0)) && (( $# == 3 ) ) || ( $1 == 1 ) )
    1515then
    1616    echo "The number of longitudes must be a multiple of 8."
Note: See TracChangeset for help on using the changeset viewer.