Commit ef19190a authored by Robert Schweppe's avatar Robert Schweppe
Browse files

- added the pure keyword to the transfer function alias

- removed the allocatable keyword from actual transfer functions
parent 39b434fe
Pipeline #28200 failed with stages
in 0 seconds
......@@ -551,7 +551,7 @@ class TFSource(SourceCode):
' {}'.format(tf.math_string),
' ',
' real(dp), dimension(size(x(1)%data_p, kind=ix)) :: func_result',
' real(dp), dimension(), intent(in) :: param',
' real(dp), dimension(:), intent(in) :: param',
' type(InputFieldContainer), dimension(:), intent(in) :: x',
' pure function {}(x, param) result(func_result)'.format(tf.index_name),
' ! ----------------------------------------------------------------------------------------',
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment