Wrapper module for the generation of version and serial headers. It helps to track what data was generated with which version of the code.
Note
This module can be exported to the other KKR codes, to use them one just needs to comment out the correct pre-compilation flag defined as the begining of the file.
Type | Visibility | Attributes | Name | Initial | |||
---|---|---|---|---|---|---|---|
character(len=5), | private, | parameter | :: | codename | = | 'JuKKR' | |
character(len=:), | public, | allocatable | :: | serialnr |
T a k e
i n f o r m a t i o n
f r o m
v e r s i o n
f i l e
a n d
c r e a t e
s e r i a l
n u m b e r
w i t h
t i m e
s t a m p
T h i s
i s
c a l l e d
a f t e r
a n
o p e n
s t a t e m e n t
o f
a
f i l e
t h a t
i s
w r i t t e n ,
p r i n t s
h e a d e r
l i n e
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
integer, | intent(in) | :: | unit | |||
character(len=*), | intent(in), | optional | :: | addition | ||
logical, | intent(in), | optional | :: | disable_print |
C h e c k s
i f
a
h e a d e r
w i t h
s e r i a l - n u m b e r
i s
i n
t h e
f i r s t
l i n e
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
integer, | intent(in) | :: | unit |