Assign a character string to a varying string
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
type(varying_string), | intent(out) | :: | var | |||
character(len=*), | intent(in) | :: | exp |
elemental subroutine op_assign_VS_CH (var, exp) type(varying_string), intent(out) :: var character(LEN=*), intent(in) :: exp var = var_str(exp) ! Finish return end subroutine op_assign_VS_CH