|
◆ open_package_file()
integer function file_utilities::open_package_file |
( |
character(len=*), intent(in) |
filename, |
|
|
integer, intent(in) |
filetype |
|
) |
| |
Opens a specific file for the libsim package.
It searches in different directories using get_package_filepath to locate the file. It returns the unit number associated to the file found and successfully opened, or -1 if the file does not exist or an error occurred while opening it. - Parametri
-
[in] | filename | name of the file to be opened, it must be a relative path name |
[in] | filetype | type of file, the constants filetype_data or filetype_config have to be used |
Definizione alla linea 457 del file file_utilities.F90.
462 SUBROUTINE csv_record_addfield_int(this, field, form, force_quote)
463 TYPE(csv_record), INTENT(INOUT) :: this
464 INTEGER, INTENT(IN) :: field
465 CHARACTER(len=*), INTENT(in), OPTIONAL :: form
466 LOGICAL, INTENT(in), OPTIONAL :: force_quote
468 IF ( PRESENT(form)) THEN
469 CALL csv_record_addfield(this, trim(to_char(field, form)), force_quote=force_quote)
471 CALL csv_record_addfield(this, t2c(field), force_quote=force_quote)
474 END SUBROUTINE csv_record_addfield_int
480 SUBROUTINE csv_record_addfield_int_miss(this, field, force_quote)
|