Example code for solving Smith-Hutton test - Fortran 90
From CFD-Wiki
(Difference between revisions)
(2 intermediate revisions not shown) | |||
Line 1: | Line 1: | ||
''Dear friends'' | ''Dear friends'' | ||
- | ''It's | + | ''It's just a scrap. Later I'll correct it, although it's a complete working code'' |
- | '' | + | '''This code have been developed completely by myself in my native Marijampole. Please use it without limitations. Also I ask to add here procedures, which implement other schemes of approximation''' |
+ | |||
+ | '''Kirichkov Michail, Lithuania, Marijampole, 2005 09 19''' | ||
*[[Bound_1.f90 - Set boundary conditions]] | *[[Bound_1.f90 - Set boundary conditions]] |
Latest revision as of 05:53, 19 September 2005
Dear friends
It's just a scrap. Later I'll correct it, although it's a complete working code
This code have been developed completely by myself in my native Marijampole. Please use it without limitations. Also I ask to add here procedures, which implement other schemes of approximation
Kirichkov Michail, Lithuania, Marijampole, 2005 09 19
- Bound_1.f90 - Set boundary conditions
- Check_koeff.f90 - Performing checking of koefficients
- Coeff_11.f90 - calculate the coefficients
- Contr_gem1.f90
- COnvrg_sub.f90 - calculationg
- Geom_1.f90
- Grid_sub.f90
- HLPA.f90
- ini.f90
- input.f90
- Main.f90 - Main modul
- Out_array_1.f90
- Output_aa.f90
- TDMA_11.f90 - Solution of system of linear equatrions by Thomas method
- icomm_1.f90 - include module