Example code for solving Smith-Hutton test - Fortran 90
From CFD-Wiki
(Difference between revisions)
(→Main.f90) |
|||
Line 1: | Line 1: | ||
- | + | ''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]] | |
- | + | ||
- | + | ||
- | + | ||
- | + | ||
- | + | ||
- | + | ||
- | + | ||
- | + | ||
- | + | ||
- | + | ||
- | + | ||
- | + | ||
- | + | ||
- | + | ||
- | + | ||
- | + | ||
- | + | ||
- | + | ||
- | + | ||
- | + | ||
- | + | ||
- | + | ||
- | + | ||
- | + | ||
- | + | ||
- | + | ||
- | + | ||
- | + | ||
- | + | ||
- | + | ||
- | + | ||
- | + | ||
- | + | ||
- | + | ||
- | + | ||
- | + | ||
- | + | ||
- | + | ||
- | + | ||
- | + | ||
- | + | ||
- | + | ||
- | + | ||
- | + | ||
- | + | ||
- | + | ||
- | + | ||
- | + | ||
- | + | ||
- | + | ||
- | + | ||
- | + | ||
- | + | ||
- | + | ||
- | + | ||
- | + | ||
- | + | ||
- | + | ||
- | + | ||
- | + | ||
- | + | ||
- | + | ||
- | + | ||
- | + | ||
- | + | ||
- | + | ||
- | + | ||
- | + | ||
- | + | ||
- | + | ||
- | + | ||
- | + | ||
- | + | ||
- | + | ||
- | + | ||
- | + | ||
- | + | ||
- | + | ||
- | + | ||
- | + | ||
- | + | ||
- | + | ||
- | + | ||
- | + | ||
- | + | ||
- | + | ||
- | + | ||
- | + | ||
- | + | ||
- | + | ||
- | + | ||
- | + | ||
- | + | ||
- | + | ||
- | + | ||
- | + | ||
- | + | ||
- | + | ||
- | + | ||
- | + | ||
- | + | ||
- | + | ||
- | + | ||
- | + | ||
- | + | ||
- | + | ||
- | + | ||
- | + | ||
- | + | ||
- | + |
Revision as of 01:45, 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