tapenade_ge Interface

interface
private subroutine tapenade_ge(model, n, t, ge)

Type	Intent		Name
class(GeModelTapenade)		::	model
real(kind=pr),	intent(in)	::	n(:)
real(kind=pr),	intent(in)	::	t
real(kind=pr),	intent(out)	::	ge