/dports/science/elmerfem/elmerfem-release-9.0/misc/netcdf/src/GridDataMapper/ |
H A D | GridDataMapper.f90 | 34 …tils, ONLY: dp, Solver_t, Model_t, Mesh_t,GetInteger, CoordinateSystemDimension, GetSolverParams, & 257 ENABLE_SCALING = GetLogical(GetSolverParams(Solver), "Enable Scaling", Found) 297 USE DefUtils, ONLY: dp, MAX_NAME_LEN, GetSolverParams, GetString, GetConstReal, ListGetString 341 FileName = GetString( GetSolverParams(Solver), "File Name", Found(1) ) 342 Var_Name = GetString( GetSolverParams(Solver), "Var Name", Found(2) ) 345 …CALL GetNetCDFAccessParameters( GetSolverParams(Solver), Coords, Constants, Permutation, Found(3:4… 349 Mask_Name = GetString( GetSolverParams(Solver), "Mask Variable", Found(5) ) 467 GetInteger(GetSolverParams(Solver),Message,tmpBool) 481 Grids(1) % const_vals(loop) = GetInteger(GetSolverParams(Solver),Message,tmpBool) 563 USE DefUtils, ONLY: MAX_NAME_LEN, GetSolverParams, GetLogical, GetCReal, GetTime, GetConstReal [all …]
|
H A D | NetCDFInterpolate.f90 | 385 USE DefUtils, ONLY: dp, MAX_NAME_LEN, Solver_t, GetSolverParams, GetString, GetLogical 435 elmer = GetString(GetSolverParams(SOLVER),"CS2CS Elmer Projection", found) 441 netcdf = GetString(GetSolverParams(SOLVER), "CS2CS NetCDF Projection", found) 448 … IF ( GetLogical(GetSolverParams(SOLVER), "CS2CS Is Input Radians", found) .AND. found ) THEN
|
/dports/science/elmerfem/elmerfem-release-9.0/fem/src/modules/ |
H A D | ScannedFieldSolver.F90 | 57 SolverParams => GetSolverParams() 143 NofFields = ListGetInteger(GetSolverParams(), 'Number of Fields') 149 FieldNames(FieldInt) = ListGetString(GetSolverParams(), 'Field Name '//TRIM(i2s(FieldInt))) 166 ScanMax = GetInteger(GetSolverParams(), 'Scan Max', Found)
|
H A D | DirectionSolver.F90 | 65 IF (GetLogical(GetSolverParams(),'Discontinuous Galerkin',Found)) RETURN 72 varname = GetString(GetSolverParams(), 'Variable', Found) 191 varname = GetString(GetSolverParams(), 'Variable', Found) 302 IF (varname .ne. GetString(GetSolverParams(), 'Variable', Found)) & 304 varname = GetString(GetSolverParams(), 'Variable', Found)
|
H A D | BeamSolver3D.F90 | 73 SolverPars => GetSolverParams() 108 maxiter = ListGetInteger(GetSolverParams(), &
|
H A D | NormalSolver.F90 | 86 SolverParams => GetSolverParams() 134 SetD = GetLogical(GetSolverParams(), 'Set Dirichlet Conditions',GotIt) 300 SolverParams => GetSolverParams()
|
H A D | SpringAssembly.F90 | 72 SolverParams => GetSolverParams() 92 ValueList => GetSolverParams(SolverPtr)
|
H A D | OdeSolver.F90 | 58 Params => GetSolverParams() 100 Params => GetSolverParams()
|
H A D | ParticleAdvector.F90 | 88 Params => GetSolverParams() 255 Params => GetSolverParams() 352 Params => GetSolverParams() 413 Params => GetSolverParams() 578 Params => GetSolverParams() 975 Params => GetSolverParams()
|
H A D | CoordinateTransform.F90 | 215 UsePDecomp = ListGetLogical(GetSolverParams(), 'Use Polar Decomposition', Found) 217 PDDetTol = GetConstReal(GetSolverParams(), 'Polar Decomposition Determinant Tolerance', Found) 222 PDMaxIter = GetInteger(GetSolverParams(), 'Polar Decomposition Max Iterations', Found)
|
H A D | DivergenceSolver.F90 | 77 SolverParams => GetSolverParams() 265 SolverParams => GetSolverParams()
|
H A D | PressurePrecond.F90 | 59 SolverParams => GetSolverParams()
|
H A D | VelocityPrecond.F90 | 59 SolverParams => GetSolverParams()
|
/dports/science/elmerfem/elmerfem-release-9.0/fem/tests/SecondOrderEdgeElement2D_BCs/ |
H A D | EdgeFEInterpolationTest.F90 | 92 PiolaVersion = GetLogical( GetSolverParams(), 'Optimal Family', Found) 94 IF ( GetLogical(GetSolverParams(), 'Quadratic Approximation', Found) ) THEN 98 SecondFamily = GetLogical( GetSolverParams(), 'Second Kind Basis', Found) 100 ErrorEstimation = GetLogical( GetSolverParams(), 'Error Computation', Found) 103 UseCurlNorm = GetLogical( GetSolverParams(), 'Compute Curl Error', Found) 105 TestMode = ListGetInteger( GetSolverParams(), 'Test Mode', Found)
|
/dports/science/elmerfem/elmerfem-release-9.0/fem/tests/FaceElement2D_BCs/ |
H A D | FaceFEInterpolationTest.F90 | 91 SecondFamily = GetLogical( GetSolverParams(), 'Second Kind Basis', Found) 93 ErrorEstimation = GetLogical( GetSolverParams(), 'Error Computation', Found) 96 UseDivNorm = GetLogical( GetSolverParams(), 'Compute Div Error', Found) 98 TestMode = ListGetInteger( GetSolverParams(), 'Test Mode', Found)
|
/dports/science/elmerfem/elmerfem-release-9.0/fem/tests/FaceElement3D_BCs/ |
H A D | FaceFEInterpolationTest.F90 | 91 SecondFamily = GetLogical( GetSolverParams(), 'Second Kind Basis', Found) 93 ErrorEstimation = GetLogical( GetSolverParams(), 'Error Computation', Found) 96 UseDivNorm = GetLogical( GetSolverParams(), 'Compute Div Error', Found) 98 TestMode = ListGetInteger( GetSolverParams(), 'Test Mode', Found)
|
/dports/science/elmerfem/elmerfem-release-9.0/fem/tests/Shell_With_NormalSolver/ |
H A D | CylinderNormalSolver.F90 | 87 SolverParams => GetSolverParams() 135 SetD = GetLogical(GetSolverParams(), 'Set Dirichlet Conditions',GotIt) 294 SolverParams => GetSolverParams()
|
/dports/science/elmerfem/elmerfem-release-9.0/elmerice/Tests/DGsolver/PROG/ |
H A D | DGtoNodalVariable.f90 | 29 SolverParams => GetSolverParams() 84 SolverParams => GetSolverParams()
|
/dports/science/elmerfem/elmerfem-release-9.0/fem/tests/Zirka/ |
H A D | ZirkaTest.F90 | 75 rps_array => ListGetConstRealArray(GetSolverParams(), 'rps', found) 183 rps_array => ListGetConstRealArray(GetSolverParams(), 'rps_4', found) 225 rps_array => ListGetConstRealArray(GetSolverParams(), 'zirka init sequence', found)
|
/dports/science/elmerfem/elmerfem-release-9.0/fem/tests/BDM2D/ |
H A D | ComputeError.F90 | 70 SolverPars => GetSolverParams() 91 TargetSolverPars => GetSolverParams(TargetSolver)
|
/dports/science/elmerfem/elmerfem-release-9.0/fem/tests/RaviartThomas2D/ |
H A D | ComputeError.F90 | 70 SolverPars => GetSolverParams() 91 TargetSolverPars => GetSolverParams(TargetSolver)
|
/dports/science/elmerfem/elmerfem-release-9.0/fem/tests/BDM3D/ |
H A D | ComputeError.F90 | 70 SolverPars => GetSolverParams() 91 TargetSolverPars => GetSolverParams(TargetSolver)
|
/dports/science/elmerfem/elmerfem-release-9.0/fem/tests/RaviartThomas3D/ |
H A D | ComputeError.F90 | 70 SolverPars => GetSolverParams() 91 TargetSolverPars => GetSolverParams(TargetSolver)
|
/dports/science/elmerfem/elmerfem-release-9.0/elmerice/Solvers/ |
H A D | MMG3DSolver.F90 | 25 SolverParams => GetSolverParams()
|
H A D | SSAmask.F90 | 118 SolverParams => GetSolverParams() 262 SolverParams => GetSolverParams()
|