Finite Element Fortran Programmer

finite element method problem

Finite Element Fortran Source Code

i am a begginner in fortran and am trying to write a program that calulates the distance between two points, in order to identify duplicate co ordinates.
there are a list of co ordinate points and for each of these co ordinate points is a corresponding label, i.e. co-ordinat point 1 is node 1, co ordiante point 2 is node 2 etc (e.g. (0,0) is node 1, (0,3) is node 2, (0,6) is node 3 etc...)
Once the distance has been calculated the prgram then runs an IF statement with the criteria that if the distance is less that 10E-6 that it would flag this result, in an IFLAG vector of the nodal points.
does any on know how to do this? i would really appreciate it.
thanks
ps am willing to descirbe the problem in more detail if you need it.

This is a list of software packages that implement the finite element method for solving partial differential equations.

Software	Features	Developer	Version	Released	License	Price	Platform
Agros2D	Multiplatform open source application for the solution of physical problems based on the Hermes library	University of West Bohemia	3.2	2014-03-03	GNU GPL	Free	Linux, Windows
ANSA Pre-processor	An advanced CAE pre-processing software for complete model build up.	BETA	Linux, Mac OS X, Windows
CalculiX	It is an Open Source FEA project. The solver uses a partially compatible ABAQUS file format. The pre/post-processor generates input data for many FEA and CFD applications	Guido Dhondt, Klaus Wittig	2.14	2018-04-27	GNU GPL	Free	Linux, Windows
DIANA FEA	General purpose finite element package utilised by civil, structural and geotechnical engineers.	DIANA FEA BV, The Netherlands	10.1	2016-11-14	Paid	Windows, Linux
deal.II	Comprehensive set of tools for finite element codes, scaling from laptops to clusters with 10,000+ cores. Written in C++.	Wolfgang Bangerth, Timo Heister, Guido Kanschat, Matthias Maier et al.	9.0	2018-05-12	LGPL	Free	Linux, Unix, Mac OS X, Windows
DUNE	Distributed and Unified Numerics Environment, written in C++	DUNE Developer team	2.4.1	2016-02-29	GPL Version 2 with Run-Time Exception	Free	Linux, Unix, Mac OS X
Elmer	Open source multiphysical simulation software developed by Finnish Ministry of Education's CSC, written primarily in Fortran (written in Fortran90, C and C++)	CSC	8.2	2016-03-15	GPL	Free	Linux, Mac OS X, Windows
FEBio	Finite Elements for Biomechanics	University of Utah (MRL), Columbia University (MBL)	2.7	April, 2018	Custom	Free	Linux, Mac OS X, Windows
FEniCS Project	Software package developed by American and European researchers with the goal to enable automated solution of differential equations	FEniCS Team	1.6.0	2015-07-29	LGPL (Core) & GPL/LGPL (Non-Core)^[1]	Free	Linux, Unix, Mac OS X, Windows
FEATool Multiphysics	MATLAB FEM and PDE multiphysics simulation toolbox	Precise Simulation	1.10	2019-05-17	Free for personal use^[2]	Windows, Mac OS X, Linux, Unix
Femap	Finite element pre- and post-processor	Siemens PLM Software	11.4.0	2016-09-16	Windows
FreeFEM^[3]	FreeFEM is a free and open-source parallel FEA software for multiphysics simulations. The problems are defined in terms of their variational formulation and can be easily implemented using FreeFEM language. Written in C++.	Sorbonne University^[4] and Jacques-Louis Lions Laboratory^[5]	4.2.1	2019-06-06	LGPL	Free	Linux, MacOS, Windows, Solaris
GOMA	GOMA is an open-source, parallel, and scalable multiphysics software package for modeling and simulation of real-life physical processes, with a basis in computational fluid dynamics for problems with evolving geometry.	Sandia National Laboratories, University of New Mexico	6.1	Aug 28, 2015	GPL Version 2	Free	Linux
GetFEM++	A generic finite element library written in C++ with interfaces for Python, Matlab and Scilab. It focuses on modeling of contact mechanics and discontinuities (e.g. cracks).	Yves Renard, Julien Pommier	5.0	2015-07	LGPL	Free	Unix, Mac OS X, Windows
Hermes Project	Modular C/C++ library for rapid development of space- and space-time adaptive hp-FEM solvers	hp-FEM group	3.0	2014-03-01	LGPL	Free	Linux, Unix, Mac OS X, Windows
Mathematica^[6]	General purpose computation software.	Wolfram Research	12.0.0 (April 16, 2019; 4 months ago)[±]^[7]	Regularly	Proprietary	Linux, Mac OS X, Windows, Raspbian, Online service.
MFEM	MFEM is a free, lightweight, scalable C++ library for finite element methods that features arbitrary high-order finite element meshes and spaces, support for a wide variety of discretizations, and emphasis on usability, generality, and high-performance computing efficiency.	MFEM team	3.4	2018-05-29	LGPL-2.1 with static linking exception	Free	Linux, Unix, Mac OS X, Windows
MoFEM JosePH	Mesh Oriented hp-FE code, written in C++	University of Glasgow	0.6.8	2017-11-16	LGPL	Free	Unix, Mac OS X
OOFEM	Object Oriented Finite EleMent solver, written in C++	Bořek Patzák	2.4	2016-02-15	GPL Version 2	Free	Unix, Windows
OpenSees	Open System for Earthquake Engineering Simulation	Non Commercial	Free	Unix, Linux, Windows
SESAM (FEM)	Software suite for structural and hydrodynamic analysis of ships and offshore structures	DNV GL	regularly	Proprietary, SaaS	Windows, Web browser
Range Software	Multiphysics Finite Element Analysis Software	Tomáš Šoltys	3.0	2018-04-30	GPL	Free	Linux, Windows
Z88/Z88Aurora	Freeware finite element package; The present version Z88Aurora V4 offers, in addition to static strength analysis modules such as non-linear strength calculations (large displacements), simulations with non-linear materials, natural frequency, static thermal analysis and a contact module.	Frank Rieg	Z88 V15, Z88Aurora V4	2017-07-17, 2017-04-24	GNU GPL, Custom	Free	Linux, Windows, Mac OS X
Abaqus	Advanced Franco-USA software from SIMULIA, owned by Dassault Systemes	Abaqus Inc.	2019	2019-12	Linux, Windows
CONSELF	CAE simulation from your browser	CONSELF SRL	2.9	2015-10	SaaS	Freemium	Web browser
FreeCAD	Parametric 3D modeler with a FEM workbench allowing it to use external solvers like CalculiX, Z88, Elmer, and OpenFoam	FreeCAD Team	0.18	12 March 2019	LGPL 2	Free	Linux, Windows, Mac OS X
HyperMesh	Finite element pre- and post-processor. (Hypermesh is a product within the HyperWorks suite)	Altair	Linux, Mac OS X, Windows
ADINA	Finite element software for structural, fluid, heat transfer, electromagnetic, and multiphysics problems, including fluid-structure interaction and thermo-mechanical coupling	Adina R&D
Advance Design	BIM software for FEM structural analysis, including international design eurocodes	GRAITEC	2014	2013-09
Autodesk Simulation	Finite Element software of Autodesk	Autodesk	Windows
ANSYS	US-based and -developed full CAE software package	Ansys Inc.	19.2	2018-09-18	Free student version available, up to 32,000 nodes/elements^[8]	Windows, Linux
COMSOL Multiphysics	COMSOL Multiphysics Finite Element Analysis Software (formerly FEMLAB)	COMSOL Inc.	5.4	2018-10-03	Linux, Mac OS X, Windows, Web browser
CosmosWorks	Part of SolidWorks	Dassault Systèmes SolidWorks Corp.	Windows
Quickfield	Tor Cooperative	6.1	2015-12-22	Windows
LS-DYNA	Best known for explicit dynamics / crash analysis	LSTC - Livermore Software Technology Corporation	R8.0	2015-03	Linux, Windows
Nastran	Originally developed for NASA, now available commercially from several software companies	MSC NASTRAN, Siemens PLM NX Nastran^[9]	2014	2014	Linux, Mac OS X, Windows
RFEM	3D finite element analysis software	Dlubal Software	5.06	2016-02	Free student license available^[10]	Windows
SimScale	German 100% web-based CAE platform	SimScale GmbH	14	2013-07	SaaS	Free community version available^[11]	Web browser
VisualFEA	Finite element software for structural, geotechnical, heat transfer and seepage analysis	Intuition Software	5.11	2016-01	Proprietary software	Free educational version available^[12]	Mac OS X, Windows
JCMsuite	Finite element software for the analysis of electromagnetic waves, elasticity and heat conduction	JCMwave GmbH	3.6.1	2017-01-27	Linux, Windows
JMAG	2D and 3D finite element analysis software for electromagnetic field, thermal, structural	JSOL	18.1	2019-06	Education pack available	Linux, Windows, Web browser
StressCheck	Finite element analysis software based on p-FEM with a focus on solid mechanics applications	ESRD, Inc.	10.4	2018-04	Student version available (limited to 15k DOF)	Windows

Engineering Stress Analysis- A Finite Element Approach With FORTRAN 77 Software! Wiley & Sons, Chichester, 1987, 250. Programming for finite element software development. The reader with detailed programming information. The OO approach to finite element programming requires a radically different approach to traditional. Editor reviewed sites about Fortran Source Code for Finite Elements. Visit Best of the Web. Put your hard drive in motion with top websites created for and about the computing industry. Find leading consultants, explore news and reviews of computer sciences, software, open source projects, PC's and many other topics. PASLIB programmer's guide for the finite element machine, revision 2.1-A Operating systems support for the finite element machine Three Parallel Computation Methods for Structural Vibration Analysis. Which Compiler is faster when dealing with large matrices and arrays? Intel Fortran or C++? If you are about to develop a Finite Element Analysis Solver that will handle a large number of calculations performed through the use of matrices and arrays then is C++ going to perform similarly with Fortran or is Fortran still the best way to go. Additionally, Fortran 90 compilers are relatively expensive compared with C/C++ compi! Lers and either will require a steep learning curve. For the student and practitioner with a good background in Finite Element programming and able and willing to invest considerable time and effort, this book will be invaluable. Impact Finite Element Program. Since this is a high performance number crunching type of software and Java is not known to be competitive to ex. Fortran or C++ in this area. True, it is slower but with the new interpreters from IBM and Sun, the built in runtime compiling actually gets the speed up quite a bit so this is not.

Feature comparison[edit]

This is a wiki table generated by FEA-compare project. Please, contribute changes directly to the project instead of editing the table below. The project also provides an HTML version with the first row and Feature column being fixed for ease of table exploration.

Feature	Deal II	Elmerfem	FEATool Multiphysics	FEniCS	Firedrake	GetFEM++	libMesh	MFEM	Range	COMSOL(R)
license:	LGPL	GNU (L)GPL	Proprietary	GNU GPLLGPL	GNU LGPL	LGPL	GPL	LGPL-2.1 with static linking exception	GPL	Proprietary
GUI:	No	Yes, partial functionality	Matlab and Octave GUI	Postprocessing only	No	No	No	No	Yes	Yes
Community:	Google Group	1000's of users, discussion forum, mailing list	Mailing list	Mailing list	Mailing list and IRC channel	Mailing list	mail lists	GitHub	GitHub
Documentation:	50+ tutorials, 50+ video lectures, Doxygen	ElmerSolver Manual, Elmer Models Manual, ElmerGUI Tutorials, etc. (>700 pages of LaTeX documentation)	Online FEATool documentation, ~600 pages, ~50 built-in step-by-step GUI tutorials, and 150 m-script model examples	Tutorial, demos (how many?), 700-page book	Manual, demos, API reference	User doc, tutorials, demos, developer's guide	Doxygen, 40+ example codes	Doxygen, Example codes	user manual, tutorials
Mesh
mesh elements:	intervals (1d), quads (2d), and hexes (3d) only	intervals (1d), triangles, quadrilaterals (2d), tetrahedra, pyramids, wedges, hexahedra (3d)	intervals, triangles, tetrahedra, quads, hexes	intervals, triangles, tetrahedra (quads, hexes - work in progress)	intervals, triangles, tetrahedra, quads, plus extruded meshes of hexes and wedges	intervals, triangles, tetrahedra, quads, hexes, prisms, some 4D elements, easily extensible.	Tria, Quad, Tetra, Prism, etc.	segments (1d), triangles, quadrilaterals (2d), tetrahedra, hexahedra (3d)	points(0d), segments (1d), triangles, quadrilaterals (2d), tetrahedra, hexahedra (3d)
mesh high-order mapping:	any order	Yes, for Lagrange elements	(Any - work in progress)	(Any - using appropriate branches)	any order	Any? Second-order is the default for most cases.
mesh generation:	external+predefined shapes	Limited own meshing capabilities with ElmerGrid and netgen/tetgen APIs. Internal extrusion and mesh multiplication on parallel level.	Integrated DistMesh, Gmsh, and Triangle GUI and CLI interfaces	Yes, Constructive Solid Geometry (CSG) supported via mshr (CGAL and Tetgen used as backends)	External + predefined shapes. Internal mesh extrusion operation.	Experimental in any dimension + predefined shapes + Extrusion.	Built-in	Support for Gmsh, CUBIT, NetGen, Truegrid, NetCDF, etc. formats + some internal tools	Yes (TetGen)	Built-in
mesh adaptive-refinement:	h, p, and hp for CG and DG	h-refinement for selected equations	Only h	Only h	h, p, mached hp, singular hp	Conforming and non-confrorming h-refinement for any p. General mesh optimization / r-adaptivity.	generate new mesh with variable density, no(?) p-refinement.
mesh inputoutput:	OpenFOAM, FEniCS XML, GiD, Gmsh, GMV, Triangle	XDMF (and FEniCS XML)	gmsh, GiD, Ansys	Gmsh, CUBIT, NetGen, Truegrid, NetCDF, etc.	rbm, stl
mesh check:	intersections (collision testing)	?	Minimal	limited features (double nodes, degenerated elements, intersected elements)
CAD files support:	IGES, STEP (with OpenCascade wrapper)	Limited support via OpenCASCADE in ElmerGUI	No	NURBS meshes	Yes (stl)	STEP, IGES and many others.
mesh operation:	Merge, join, extrude, and revolve operations	Extrude, rotate, translation, refine	distort/translate/rotate/scale	Mesh optimization, general AMR	Extrude, rotate, translation, refine
Parallel possibilities
automatic mesh partitioning:	yes, shared (METIS/Parmetis) and distributed (p4est)	partitioning with ElmerGrid using Metis or geometric division	Yes (ParMETIS and SCOTCH)	Yes	Yes (METIS)	Yes	No
MPI:	Yes (up to 147k processes), test for 4k processes and geometric multigrid for 147k, strong and weak scaling	Yes, demonstrated scalability up to 1000's of cores	Yes, DOLFIN solver scales up to 24k	Yes, Scaling plot for Firedrake out to 24k cores.	Yes	Yes	Yes	No	Almost ideal for parameter sweep? For large scale simulations Comsol 4.2 bench by Pepper has 19.2 speedup on 24 core cluster (0.8 efficiency).
threads:	Threading Build Blocks	threadsafe, limited threading, work in progress	Yes	No	Yes
OpenMP:	Yes (vectorization only)	Yes, partially	Limited	Yes	Yes	Yes
OpenCL:	No	No	No	Yes, based on OCCA	No
CUDA:	work in progress	No	No	Yes, based on OCCA	No
Solver
Dimension:	1/2/3D	1D/2D/3D (dimensions may coexist)	1/2/3D	1/2/3D	1/2/3D	Any, possibility to mix and couple problem of different dimension	2D3D	1D/2D/3D	0D/1D/2D/3D (dimensions may coexist)
FE:	Lagrange elements of any order, continuous and discontinuous; Nedelec and Raviart-Thomas elements of any order; BDM and Bernstein; elements composed of other elements.	Lagrange elements, p-elements up to 10th order, Hcurl conforming elements (linear and quadratic) for	Lagrange (1st-5th order), Crouzeix-Raviart, Hermite	Lagrange, BDM, RT, Nedelic, Crouzeix-Raviart, all simplex elements in the Periodic Table (femtable.org), any	Lagrange, BDM, RT, Nedelec, all simplex elements and Q- quad elements in the Periodic Table, any	Continuous and discontinuous Lagrange, Hermite, Argyris, Morley, Nedelec, Raviart-Thomas, composite elements (HCT, FVS), Hierarchical elements, Xfem, easily extensible.	Lagrange, Hierarchic, Discontinuous Monomials	Arbitrary high-order: H1, H(div), and H(curl)-conforming spaces. Discontinuous L2 spaces, Numerical trace (interfacial) spaces. NURBS spaces for isogeometric analysis.	Lagrange elements	in Wave Optics Module: frequency domain and trainsient UI - 1,2, and 3 order; time explicit UI - 1,2,3, and 4 order;
Quadrature:	Gauss-Legendre, Gauss-Lobatto, midpoint, trapezoidal, Simpson, Milne and Weddle (closed Newton-Cotes for 4 and 7 order polinomials), Gauss quadrature with logarithmic or 1/R weighting function, Telles quadrature of arbitrary order.	Gauss-Legendre (1D and tensor product rules in 2D and 3D) tabulated up to 44th-order to high precision, best available rules for triangles and tetrahedra to very high order, best available monomial rules for quadrilaterals and hexahedra.	General, in particular Gauss-Legendre and Gauss-Lobatto.
Transient problems:	Any user implemented and/or from a set of predifined. Explicit methods: forward Euler, 3rd and 4th order Runge-Kutta. Implicit methods: backward Euler, implicit Midpoint, Crank-Nicolson, SDIRK. Embedded explicit methods: Heun-Euler, Bogacki-Shampine, Dopri, Fehlberg, Cash-Karp.	BE, CN, and Fractional-Step-Theta schemes	Yes	Yes	(?) assume 2nd order leapfrog for wave optics?
Predifined equations:	Laplace?	Around 40 predefined solvers	Incompressible Navier-Stokes, Heat transfer, convection-diffusion-reaction, linear elasticity, electromagnetics, Darcy's, Brinkman equations, and support for custom PDE equations	No	Yes, many	Yes (Incompressible Navier-Stokes, Heat transfer (convection-conduction-radiation), Stress analysis, Soft body dynamics, Modal analysis, Electrostatics, Magnetostatics )	Yes, via modules
Automated assembly:	Yes	Yes	Yes	Yes	Yes	Yes
Visualization:	External (export to *.vtk and many others)	ElmerPost, VTK widget (but Paraview is recommended)	Built-in with optional Plotly and GMV export	Buil-in simple plotting + External	External	External or with the Scilab/Matlab/Python interface. Possibility to perform complex slices.	No	GLVis, VisIt	GUI (built-in)	Built-in
Output format:	.dx .ucd .gnuplot .povray .eps .gmv .tecplot .tecplot_binary .vtk .vtu .svg .hdf5	Several output formats (VTU, gmsh,...)	GMV and Plotly	VTK(.pvd, .vtu) and XDMF/HDF5	VTK(.pvd, .vtu)	vtk, gmsh, OpenDX.	Many
Boundary elements solver:	Yes	Existing but without multipole acceleration (not usable for large problems)	No	No	No	No
Use multiple meshes:	Yes, autorefined from same initial mesh for each variable of a coupled problem	Continuity of non-conforming interfaces ensured by mortar finite elements	Yes, including non-matching meshes	Yes	Yes including different dimensions and taking account of any transformation.	No
Linear algebra
Used libs:	Built-in + Trilinos, PETSc, and SLEPc	Built-in, Hypre, Trilinos, umfpack, MUMPS, Pardiso, etc. (optional)	Matlab/Octave built-in (Umfpack), supports integration with the FEniCS and OpenFOAM solvers	PETSc, Trilinos/TPetra, Eigen.	PETSc	SuperLU, MUMPS, Built-in.	PETSc, Trilinos, LASPack, SLEPc	hypre, optionally PETSc, SUNDIALS, SuperLU, SuiteSparse, and more	No
Iterative matrix solvers:	All Krylov (CG, Minres, GMRES, BiCGStab, QMRS)	Built-in Krylov solvers, Krylov and multigrid solvers from external libraries	Matlab/Octave built-in	All Krylov	LASPack serial, PETSc parallel	All Krylov	GMRES, CG
Preconditioners:	Many, including algebraic multigrid (via Hypre and ML) and geometric multigrid	Built-in preconditioners (ILU, diagonal, vanka, block) and	Matlab/Octave built-in	Basic ones (ILU, ILUT)	LASPack serial, PETSc parallel	Scalable AMG via hypre	ILU, Jacobi
Matrix-free
matrix-free:	Yes	Experimental implementation	Yes	No	Yes	No
matrix-free save memory:	Yes	No	Yes	No
matrix-free speed-up:	Yes	No	Yes	No
Used language
Native language:	C++	Fortran (2003 standard)	Matlab / Octave	C++	Python (and generated C)	C++	C++	C++	C++
Bindings to language:	No	Python	Python, Scilab or Matlab	Python	No
Other
Predefined equations:	Model bricks: Laplace, linear and nonlinear elasticity, Helmholtz, plasticity, Mindlin and K.L. plates, boundary conditions including contact with friction.	Many
Coupled nonlinear problems:	Yes	Yes
Binary:	Linux, Windows (work in progress), Mac	Windows, Linux (launchpad: Debian/Ubuntu), Mac (homebrew) (all with MPI)	Windows, Linux, Mac	Linux (DebianUbuntu), Mac	No. Automated installers for Linux and Mac	Linux (Debian/Ubuntu)	Yes
fullname:	Elmer finite element software	Modular Finite Element Methods Library
Testing:	3500+ tests	More than 400 consistency tests ensuring backward compatibility	Yes
Symbolic derivation of the tangent system for nonlinear problems:	Yes	No
Support for fictitious domain methods:	Yes	No
Wilkinson Prize:	2007	2015 for dolfin-adjoint	No
scripting:	Fully scriptable in as m-file Matlab scripts and the GUI supports exporting models in script format	No
multiphysics:	Arbitrary multiphysics couplings are supported	Yes
Optimization Solvers:	Support for TAO- and nlopt-based constrained optimization solvers incorporating gradient and Hessian information.	No

References[edit]

Fortran Programmer Jobs

^'FEniCS Project'. Retrieved 2017-06-21.
^'FEATool Multiphysics - Product Information'. Retrieved 2018-06-12.
^'FreeFem++'. freefem.org. Retrieved 2018-11-30.
^'Sorbonne Université | Lettres, Médecine, Sciences'. www.sorbonne-universite.fr. Retrieved 2018-11-30.
^Curie, UPMC - Université Pierre et Marie. 'Jacques-Louis Lions Laboratory (LJLL) - UMR 7598 - SCIENCE'. sciences.sorbonne-universite.fr. Retrieved 2018-11-30.
^Mathematica Documentation
^'Mathematica Quick Revision History'. Retrieved 2019-04-16.
^'Student Products - Free Simulation Software'. Ansys.com. Retrieved 2017-05-28.
^'NX Nastran: Siemens PLM Software'. Plm.automation.siemens.com. Retrieved 2017-05-28.
^'Free Student License | Dlubal Software'. Dlubal.com. Retrieved 2017-05-28.
^'Plans & Pricing - SimScale Simulation Platform'. Simscale.com. Retrieved 2017-05-28.
^'Browsing VisualFEA (Finite Element Analysis) by Title'. Ecommons.cornell.edu. 2016-03-01. Retrieved 2017-05-28.

Finite Element Example Problems

Retrieved from 'https://en.wikipedia.org/w/index.php?title=List_of_finite_element_software_packages&oldid=912873324'