libsim  Versione7.2.6

◆ 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]filenamename of the file to be opened, it must be a relative path name
[in]filetypetype of file, the constants filetype_data or filetype_config have to be used

Definizione alla linea 458 del file file_utilities.F90.

458 
459 
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
467 
468 IF (PRESENT(form)) THEN
469  CALL csv_record_addfield(this, trim(to_char(field, form)), force_quote=force_quote)
470 ELSE
471  CALL csv_record_addfield(this, t2c(field), force_quote=force_quote)
472 ENDIF
473 
474 END SUBROUTINE csv_record_addfield_int
475 
476 
480 SUBROUTINE csv_record_addfield_int_miss(this, field, force_quote)
Methods for successively adding fields to a csv_record object.

Generated with Doxygen.