new_bg_magnetic Function

public function new_bg_magnetic(default_func) result(bg_magnetic)

Arguments

Type IntentOptional Attributes Name
procedure(real(dp)) :: default_func

Return Value type(bg_magnetic_t)