Index | Rundeck: P1SoM40 | Created: Mon May 20 03:30:14 EDT 2024 |
read_spectrum | Module: | File: read_spectrum.F90 |
Author :
Version:
Declaration:
subroutine read_spectrum(file_spectral, sp)
- realk : used from realtype_rd
- strspecdata : used from def_spectrum
- allocate_spectrum : used from def_spectrum
- assign_file_unit : used from file_manager
- release_file_unit : used from file_manager
- ereport : used from ereport_mod
- errormessagelength : used from errormessagelength_mod
- file_spectral :
character(len=*), intent(in)
- sp :
type(strspecdata)
- line :
character(len=80)
- char_dum :
character(len=80)
- spectral_k :
character(len=256)
- spectral_var :
character(len=256)
- iomessage :
character(len=errormessagelength)
- ios :
integer
- ierr :
integer
- Initial Value
= i_normal
- iu_spc :
integer
- iu_spc1 :
integer
- iu_spc2 :
integer
- i_type :
integer
- i_subtype :
integer
- i_version :
integer
- i :
integer
- l_exist_k :
logical
- nd_band :
integer
- nd_exclude :
integer
- nd_k_term :
integer
- nd_species :
integer
- nd_scale_variable :
integer
- nd_continuum :
integer
- nd_drop_type :
integer
- nd_ice_type :
integer
- nd_aerosol_species :
integer
- nd_thermal_coeff :
integer
- nd_cloud_parameter :
integer
- nd_humidity :
integer
- nd_aod_wavel :
integer
- nd_phase_term :
integer
- nd_tmp :
integer
- nd_pre :
integer
- nd_mix :
integer
- nd_band_mix_gas :
integer
- nd_sub_band :
integer
- nd_times :
integer
- nd_cont :
integer
- nd_t_lookup_cont :
integer
- nd_k_term_cont :
integer
- nd_species_sb :
integer
- nd_gas_frac :
integer
- cmessage :
character(len=errormessagelength)
- routinename :
character(len=*), parameter
- Initial Value
= 'READ_SPECTRUM'