Example code for solving Smith-Hutton test - Fortran 90
From CFD-Wiki
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