LCPQ
/
irpf90
mirror of https://gitlab.com/scemama/irpf90.git
10
0
Fork 0
Code Releases Activity

Fix provider...

This commit is contained in:
Thomas Applencourt 2017-03-17 16:21:00 -05:00
parent 5da213f29c
commit 9c233e0362
2 changed files with 3 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
example/Makefile
View File

@ -1,4 +1,4 @@
IRPF90= ../bin/irpf90
IRPF90= ../bin/irpf90 -d
IRPF90FLAGS= -I input/
# Make | Ninja
BUILD_SYSTEM= make

3
src/templates/provider.f90
View File

@ -34,7 +34,8 @@ SUBROUTINE provide_{name}
{/l_entity}
CALL bld_{name}
{name}_is_built = .TRUE.
{?do_openmp}
ENDIF
CALL irp_lock_{name}(.FALSE.)