00001 ! demona: 00002 ! decomposition enhanced mechanics optimized numerical analysis 00003 ! based on the solution of transient nonlinear pde's with 00004 ! Newton-Krylov,Multilevel and Domain decomposition techniques 00005 ! 00006 ! focus on multiphysics problems like FSI or multiphase 00007 ! 00008 ! data structure is so that each physiscs can reach other physics variables any time 00009 ! 00010 ! each physics can have is domains and subdomains as well as own physics time 00011 ! 00012 ! calculations are based on indexMatrix 00013 ! 00014 ! index matrix provides indirect adressing, however, flexibility is increased with its use 00015 ! 00016 ! so that implicit vs. explicit, different numberings and sweeps can be performed on the problem 00017 00018 program demona 00019 00020 ! modules 00021 00022 use demonaParameters 00023 00024 implicit none 00025 00026 00027 00028 00029 00030 !call welcome(welcomeMessage) 00031 00032 00033 call initializeModel 00034 00035 00036 call preprocessor 00037 00038 00039 !print*,'processor by-passed' 00040 call processor 00041 00042 00043 call postprocessor 00044 00045 00046 end program demona
1.6.1