|
◆ csv_record_addfield_double()
subroutine, private file_utilities::csv_record_addfield_double |
( |
type(csv_record), intent(inout) |
this, |
|
|
double precision, intent(in) |
field, |
|
|
character(len=*), intent(in), optional |
form, |
|
|
logical, intent(in), optional |
force_quote |
|
) |
| |
|
private |
Add a field from a DOUBLE PRECISION variable to the csv record this.
The field will be quoted if necessary.
- Parametri
-
[in,out] | this | object where to add field |
[in] | field | field to be added |
[in] | form | optional format |
[in] | force_quote | if provided and .TRUE. , the field will be quoted even if not necessary |
Definizione alla linea 721 del file file_utilities.F90.
722 IF (c_e(cfield) .AND. len_trim(cfield) /= 0) THEN 723 READ(cfield, '(I32)', iostat=lier) field 726 IF (.NOT. PRESENT(ier)) THEN 727 CALL l4f_log(l4f_error, & 728 'in csv_record_getfield, invalid integer field: '//trim(cfield))
|