Skip to content
Snippets Groups Projects
Commit a56d19c9 authored by Wolf Widdra's avatar Wolf Widdra
Browse files

Fortzran code cleaned. Now compiled with newst f2py

parent 668a33d3
No related branches found
No related tags found
No related merge requests found
No preview for this file type
No preview for this file type
No preview for this file type
No preview for this file type
...@@ -12,7 +12,7 @@ subroutine doeels (e0, theta, phia, phib, wmin, wmax, dw, & ...@@ -12,7 +12,7 @@ subroutine doeels (e0, theta, phia, phib, wmin, wmax, dw, &
! * ! *
! * It is based on the work of Lambin'90 and modified for the use * ! * It is based on the work of Lambin'90 and modified for the use *
! * within python * ! * within python *
! * (KMS and WFW, Martin-Luther-Universität Halle-Wittenberg) * * ! * (KMS and WFW, Martin-Luther-Universitaet Halle-Wittenberg) * *
! ****************************************************************** ! ******************************************************************
implicit none implicit none
...@@ -996,4 +996,4 @@ subroutine seteps(nos, osc_size, osc, epsinf, wn, nLayer, eps) ...@@ -996,4 +996,4 @@ subroutine seteps(nos, osc_size, osc, epsinf, wn, nLayer, eps)
return return
end subroutine seteps end subroutine seteps
end module mod_doeels end module mod_doeels
\ No newline at end of file
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment