lambda_init_tvar Function

public function lambda_init_tvar(lambda, t)

Arguments

TypeIntentOptionalAttributesName
procedure(lambda0tvar) :: lambda
real(kind=DP), intent(in) :: t

Return Value type(lambda_obj_tvar)


Called by

proc~~lambda_init_tvar~~CalledByGraph proc~lambda_init_tvar lambda_init_tvar interface~lambda_obj~2 lambda_obj interface~lambda_obj~2->proc~lambda_init_tvar

Contents

Source Code


Source Code

      type(lambda_obj_tvar) function lambda_init_tvar(lambda, t)
         implicit none
         ! Arguments
         procedure(lambda0tvar)             :: lambda
         real(DP), intent(in)               :: t
         lambda_init_tvar%lambdaptr_tvar => lambda
         lambda_init_tvar%t = t
         return
      end function lambda_init_tvar