Salome HOME
Porting to python3
[tools/yacsgen.git] / Examples / fort1 / components.py
1 # Copyright (C) 2009-2016  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, or (at your option) any later version.
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 exec(compile(open("../context.py").read(), "../context.py", 'exec'))
24 from module_generator import Generator,Module,Service,F77Component
25 from module_generator import Library
26
27 cwd=os.getcwd()
28
29 c1=F77Component("fcode1", services=[Service("serv1",inport=[("a","double"),("b","double")],
30                          outport=[("c","double")],
31                          outstream=[("PARAM","CALCIUM_double","I")],), ],
32                 libs = [Library(name="code1", path=cwd)],
33                 rlibs = cwd,
34                )
35
36 c2=F77Component("fcode2", services=[Service("serv1",inport=[("a","double"),("b","double")],
37                          outport=[("c","double")],
38                          instream=[("PARAM","CALCIUM_double","I")],), ],
39                sources=["code2.f","bidul.f"])
40
41 g=Generator(Module("fcompos",components=[c1,c2],prefix="./install"),context)
42 g.generate()
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