|
Revision 1, 0.6 kB
(checked in by thesz, 3 years ago)
|
Initial commit
|
| Line | |
|---|
| 1 |
-- |Heat1DRedirectTest.hs |
|---|
| 2 |
-- A driver for heat1D test program. |
|---|
| 3 |
-- |
|---|
| 4 |
-- Copytight (C) 2007, 2008 Serguey Zefirov |
|---|
| 5 |
-- |
|---|
| 6 |
-- This program is free software; you can redistribute it and/or modify |
|---|
| 7 |
-- it under the terms of the GNU General Public License as published by |
|---|
| 8 |
-- the Free Software Foundation; either version 3, or (at your option) |
|---|
| 9 |
-- any later version. |
|---|
| 10 |
-- See file COPYING or visit http://www.gnu.org/licenses for details. |
|---|
| 11 |
|
|---|
| 12 |
module Main(main) where |
|---|
| 13 |
|
|---|
| 14 |
import Config |
|---|
| 15 |
import Heat1DRedirectProg |
|---|
| 16 |
import RunProcSys |
|---|
| 17 |
|
|---|
| 18 |
main = runProcSys configure |
|---|
| 19 |
|
|---|
| 20 |
configure cfg = (heat1d cfg,undefined) |
|---|
