کد ایجاد شبکه مربعی و مثلثی با فرترن 90

کد مورد نظر، یک grid (شبکه) مربعی و مثلثی برای کاربر ایجاد می نماید. هندسه مورد نظر یک مربع مستطیل می باشد. فایل های تولید شده پس از اجرای کد به صورت زیر هستند: 1-quad.grid 2-quad_grid_tecplot.dat 3-tria.grid 4-tria_grid_tecplot.dat فایل های با پسوند dat را می توان با tepplot مشاهده نمود. از شبکه های حاصل می توان در حل انواع مسائل CFD استفاده نمود. شبکه مربعی مورد نظر: شبکه مثلثی مورد نظر: .