Skip to content
Snippets Groups Projects

Feature extend julianday

Merged Luis Kornblueh requested to merge feature-extend-julianday into master
1 file
+ 0
7
Compare changes
  • Side-by-side
  • Inline
+ 0
7
@@ -128,13 +128,6 @@ module mtime_c_bindings
import :: c_ptr
type(c_ptr), value :: jd
end subroutine my_deallocatejuliandelta
!
function my_addjuliandeltatojulianday(my_julianday, my_juliandelta, ret_julianday) result(julianday_ptr) &
& bind(c, name='addJulianDelta')
import :: c_ptr
type(c_ptr) :: julianday_ptr
type(c_ptr), value :: my_julianday, my_juliandelta, ret_julianday
end function my_addjuliandeltatojulianday
end interface
interface
Loading