fix missing nml, whitespace

NOAA-GFDL · Sep 12, 2023 · e3402dd · e3402dd
1 parent e9b4d23
commit e3402dd
Show file tree

Hide file tree

Showing 2 changed files with 5 additions and 5 deletions.
diff --git a/test_fms/tridiagonal/test_tridiagonal.sh b/test_fms/tridiagonal/test_tridiagonal.sh
@@ -27,15 +27,15 @@
 # Set common test settings.
 . ../test-lib.sh
 
-rm input.nml && touch input.nml
+rm -f input.nml && touch input.nml
 
 test_expect_success "test tridiagonal functionality 32 bit reals" '
     mpirun -n 1 ./test_tridiagonal_r4
 '
 test_expect_success "test tridiagonal functionality 64 bit reals" '
     mpirun -n 1 ./test_tridiagonal_r8
 '
-# tries to call without a,b,c args provided or preciously set
+# tries to call without a,b,c args provided or preciously set 
 cat <<_EOF > input.nml
 &test_tridiagonal_nml
 do_error_check = .true.

diff --git a/tridiagonal/tridiagonal.F90 b/tridiagonal/tridiagonal.F90
@@ -76,7 +76,7 @@
 !> @{
 module tridiagonal_mod
 
-    use platform_mod, only: r4_kind, r8_kind 
+    use platform_mod, only: r4_kind, r8_kind
     use mpp_mod,      only: mpp_error, FATAL
     implicit none
 
@@ -90,8 +90,8 @@ module tridiagonal_mod
         real(r8_kind), private, allocatable, dimension(:,:)   :: bb
     end type
 
-    type(tridiag_reals_r4) :: tridiag_r4 
-    type(tridiag_reals_r8) :: tridiag_r8 
+    type(tridiag_reals_r4) :: tridiag_r4
+    type(tridiag_reals_r8) :: tridiag_r8
 
     !! allocated when a,b,c are passed to tri_invert
     logical, private :: init_tridiagonal_r4 = .false.