Example code for solving Smith-Hutton test - Fortran 90
From CFD-Wiki
(Difference between revisions)
Line 5: | Line 5: | ||
''Developer'' | ''Developer'' | ||
- | [[Bound_1.f90 - Set boundary conditions]] | + | *[[Bound_1.f90 - Set boundary conditions]] |
- | [[Check_koeff.f90 - Performing checking of koefficients]] | + | *[[Check_koeff.f90 - Performing checking of koefficients]] |
- | [[Coeff_11.f90 - calculate the coefficients]] | + | *[[Coeff_11.f90 - calculate the coefficients]] |
- | [[Contr_gem1.f90]] | + | *[[Contr_gem1.f90]] |
- | [[COnvrg_sub.f90 - calculationg ]] | + | *[[COnvrg_sub.f90 - calculationg ]] |
- | [[Geom_1.f90]] | + | *[[Geom_1.f90]] |
- | [[Grid_sub.f90]] | + | *[[Grid_sub.f90]] |
- | [[HLPA.f90]] | + | *[[HLPA.f90]] |
- | [[ini.f90]] | + | *[[ini.f90]] |
- | [[input.f90]] | + | *[[input.f90]] |
- | [[Main.f90 - Main modul]] | + | *[[Main.f90 - Main modul]] |
- | [[Out_array_1.f90]] | + | *[[Out_array_1.f90]] |
- | [[Output_aa.f90]] | + | *[[Output_aa.f90]] |
- | [[TDMA_11.f90 - Solution of system of linear equatrions by Thomas method]] | + | *[[TDMA_11.f90 - Solution of system of linear equatrions by Thomas method]] |
- | [[icomm_1.f90 - include module]] | + | *[[icomm_1.f90 - include module]] |
Revision as of 01:46, 19 September 2005
Dear friends
It's jast a scrap. Later I'll correct it, although it's a complete working code
Developer
- 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