Changeset 1804 for palm/trunk/SOURCE/tridia_solver.f90

Timestamp:

Apr 5, 2016 4:30:18 PM (8 years ago)

Author:

maronga

Message:

removed parameter file check. update of mrungui for compilation with qt5

File:

• palm/trunk/SOURCE/tridia_solver.f90 (modified) (2 diffs)

palm/trunk/SOURCE/tridia_solver.f90

@@ -19 +19 @@
 ! Current revisions:
 ! ------------------
-! 
+! Removed code for parameter file check (__check)
 ! 
 ! Former revisions:
@@ -130 +130 @@
 !
 !--    Calculate constant coefficients of the tridiagonal matrix
-#if ! defined ( __check )
        CALL maketri
        CALL split
-#endif
 
     END SUBROUTINE tridia_init