Salome HOME
Merge from V6_main 01/04/2013
[tools/yacsgen.git] / Examples / fort1 / components.py
1 # Copyright (C) 2009-2013  EDF R&D
2 #
3 # This library is free software; you can redistribute it and/or
4 # modify it under the terms of the GNU Lesser General Public
5 # License as published by the Free Software Foundation; either
6 # version 2.1 of the License.
7 #
8 # This library is distributed in the hope that it will be useful,
9 # but WITHOUT ANY WARRANTY; without even the implied warranty of
10 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
11 # Lesser General Public License for more details.
12 #
13 # You should have received a copy of the GNU Lesser General Public
14 # License along with this library; if not, write to the Free Software
15 # Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307 USA
16 #
17 # See http://www.salome-platform.org/ or email : webmaster.salome@opencascade.com
18 #
19
20 import os
21
22 #import context from ..
23 execfile("../context.py")
24 from module_generator import Generator,Module,Service,F77Component
25
26 cwd=os.getcwd()
27
28 c1=F77Component("fcode1", services=[Service("serv1",inport=[("a","double"),("b","double")],
29                          outport=[("c","double")],
30                          outstream=[("PARAM","CALCIUM_double","I")],), ],
31                 libs="-L%s -lcode1" % cwd,
32                 rlibs="-Wl,--rpath -Wl,%s" % cwd,
33                )
34
35 c2=F77Component("fcode2", services=[Service("serv1",inport=[("a","double"),("b","double")],
36                          outport=[("c","double")],
37                          instream=[("PARAM","CALCIUM_double","I")],), ],
38                sources=["code2.f","bidul.f"])
39
40 g=Generator(Module("fcompos",components=[c1,c2],prefix="./install"),context)
41 g.generate()
42 g.bootstrap()
43 g.configure()
44 g.make()
45 g.install()
46 g.make_appli("appli", restrict=["KERNEL"], altmodules={"GUI":GUI_ROOT_DIR, "YACS":YACS_ROOT_DIR})
47