Changeset 4440 for LMDZ6/trunk/libf
- Timestamp:
- Feb 16, 2023, 10:49:20 AM (20 months ago)
- Location:
- LMDZ6/trunk/libf
- Files:
-
- 3 edited
Legend:
- Unmodified
- Added
- Removed
-
LMDZ6/trunk/libf/filtrez/filtreg.F
r1907 r4440 71 71 72 72 INTEGER :: sdd1_type, sdd2_type 73 74 if ( iim == 1 ) return ! no filtre in 2D y-z 73 75 74 76 IF (first) THEN -
LMDZ6/trunk/libf/filtrez/filtreg_mod.F90
r2603 r4440 66 66 !----------------------------------------------------------- 67 67 ! 68 if ( iim == 1 ) return ! No filtre in 2D y-z 68 69 69 70 pi = 2. * ASIN( 1. ) … … 125 126 ! 126 127 colat0 = MIN( 0.5, dymin/dxmin ) 128 ! colat0 = 1. 127 129 ! 128 130 IF( .NOT.fxyhypb.AND.ysinus ) THEN -
LMDZ6/trunk/libf/grid/dimension/makdim
r2239 r4440 12 12 fi 13 13 14 if ( ($1 % 8 != 0)) && (( $# == 3 ))14 if ( ( ($1 % 8 != 0)) && (( $# == 3 ) ) || ( $1 == 1 ) ) 15 15 then 16 16 echo "The number of longitudes must be a multiple of 8."
Note: See TracChangeset
for help on using the changeset viewer.