|
| subroutine, public | field_manager_mod::field_manager_init (nfields, table_name) |
| |
| subroutine | field_manager_mod::check_for_name_duplication |
| |
| subroutine | field_manager_mod::new_name (list_name, method_name_in, val_name_in) |
| |
| subroutine, public | field_manager_mod::field_manager_end |
| |
| subroutine | field_manager_mod::strip_front_blanks (name) |
| |
| integer function, public | field_manager_mod::find_field_index_old (model, field_name) |
| |
| integer function, public | field_manager_mod::find_field_index_new (field_name) |
| |
| subroutine, public | field_manager_mod::get_field_info (n, fld_type, fld_name, model, num_methods) |
| |
| subroutine, public | field_manager_mod::get_field_method (n, m, method) |
| |
| subroutine, public | field_manager_mod::get_field_methods (n, methods) |
| |
| function | field_manager_mod::parse_reals (text, label, values) |
| |
| function | field_manager_mod::parse_integers (text, label, values) |
| |
| function | field_manager_mod::parse_strings (text, label, values) |
| |
| integer function | field_manager_mod::parse_real (text, label, value) |
| |
| integer function | field_manager_mod::parse_integer (text, label, value) |
| |
| integer function | field_manager_mod::parse_string (text, label, value) |
| |
| type(field_def) function, pointer, private | field_manager_mod::create_field (parent_p, name) |
| |
| logical recursive function, private | field_manager_mod::dump_list (list_p, recursive, depth, out_unit) |
| |
| subroutine, private | field_manager_mod::find_base (name, path, base) |
| |
| type(field_def) function, pointer, private | field_manager_mod::find_field (name, this_list_p) |
| |
| subroutine, private | field_manager_mod::find_head (name, head, rest) |
| |
| type(field_def) function, pointer, private | field_manager_mod::find_list (path, relative_p, create) |
| |
| logical function, public | field_manager_mod::fm_change_list (name) |
| |
| logical function, public | field_manager_mod::fm_change_root (name) |
| |
| logical function, public | field_manager_mod::fm_dump_list (name, recursive, unit) |
| |
| logical function, public | field_manager_mod::fm_exists (name) |
| |
| integer function, public | field_manager_mod::fm_get_index (name) |
| |
| character(len=fm_path_name_len) function, public | field_manager_mod::fm_get_current_list () |
| |
| integer function, public | field_manager_mod::fm_get_length (name) |
| |
| character(len=8) function, public | field_manager_mod::fm_get_type (name) |
| |
| logical function, public | field_manager_mod::fm_get_value_integer (name, value, index) |
| |
| logical function, public | field_manager_mod::fm_get_value_logical (name, value, index) |
| |
| logical function, public | field_manager_mod::fm_get_value_real (name, value, index) |
| |
| logical function, public | field_manager_mod::fm_get_value_string (name, value, index) |
| |
| type(fm_array_list_def) function, pointer, public | field_manager_mod::fm_intersection (lists, dim) |
| |
| logical function | field_manager_mod::fm_loop_over_list_old (list, name, field_type, index) |
| |
| logical function | set_list_stuff () |
| |
| subroutine, public | field_manager_mod::fm_init_loop (loop_list, iter) |
| |
| logical function | field_manager_mod::fm_loop_over_list_new (iter, name, field_type, index) |
| |
| integer function, public | field_manager_mod::fm_new_list (name, create, keep) |
| |
| integer function, public | field_manager_mod::fm_new_value_integer (name, value, create, index, append) |
| |
| integer function, public | field_manager_mod::fm_new_value_logical (name, value, create, index, append) |
| |
| integer function, public | field_manager_mod::fm_new_value_real (name, value, create, index, append) |
| |
| integer function, public | field_manager_mod::fm_new_value_string (name, value, create, index, append) |
| |
| subroutine, public | field_manager_mod::fm_reset_loop |
| |
| subroutine, public | field_manager_mod::fm_return_root |
| |
| type(field_def) function, pointer, private | field_manager_mod::get_field (name, this_list_p) |
| |
| logical function, public | field_manager_mod::fm_modify_name (oldname, newname) |
| |
| subroutine, private | field_manager_mod::initialize |
| |
| type(field_def) function, pointer, private | field_manager_mod::make_list (this_list_p, name) |
| |
| logical function, public | field_manager_mod::fm_query_method (name, method_name, method_control) |
| |
| recursive logical function | field_manager_mod::query_method (list_p, recursive, name, method_name, method_control) |
| |
| subroutine | field_manager_mod::concat_strings (str1, str2) |
| |
| integer function, public | field_manager_mod::fm_copy_list (list_name, suffix, create) |
| |
| logical function, public | field_manager_mod::fm_find_methods (list_name, methods, control) |
| |
| recursive logical function | field_manager_mod::find_method (list_p, recursive, num_meth, method, control) |
| |
| subroutine, public | field_manager_mod::fm_set_verbosity (verbosity) |
| |
| program | test |
| |
|
| logical | field_manager_mod::module_is_initialized = .false. |
| |
| integer, parameter, public | field_manager_mod::fm_field_name_len = 48 |
| |
| integer, parameter, public | field_manager_mod::fm_path_name_len = 512 |
| |
| integer, parameter, public | field_manager_mod::fm_string_len = 128 |
| |
| integer, parameter, public | field_manager_mod::fm_type_name_len = 8 |
| |
| integer, parameter, public | field_manager_mod::num_models = 5 |
| |
| integer, parameter, public | field_manager_mod::no_field = -1 |
| |
| integer, parameter, public | field_manager_mod::model_atmos = 1 |
| |
| integer, parameter, public | field_manager_mod::model_ocean = 2 |
| |
| integer, parameter, public | field_manager_mod::model_land = 3 |
| |
| integer, parameter, public | field_manager_mod::model_ice = 4 |
| |
| integer, parameter, public | field_manager_mod::model_coupler = 5 |
| |
| character(len=11), dimension(num_models), parameter, public | field_manager_mod::model_names =(/'atmospheric','oceanic ','land ','ice ','coupler '/) |
| |
| type(method_type), public | field_manager_mod::default_method |
| |
| character(len=17), parameter | field_manager_mod::module_name = 'field_manager_mod' |
| |
| character(len=1), parameter | field_manager_mod::bracket_left = '[' |
| |
| character(len=1), parameter | field_manager_mod::bracket_right = ']' |
| |
| character(len=1), parameter | field_manager_mod::comma = "," |
| |
| character(len=1), parameter | field_manager_mod::comment = '#' |
| |
| character(len=1), parameter | field_manager_mod::dquote = '"' |
| |
| character(len=1), parameter | field_manager_mod::equal = '=' |
| |
| character(len=1), parameter | field_manager_mod::list_sep = '/' |
| |
| character(len=1), parameter | field_manager_mod::space = ' ' |
| |
| character(len=1), parameter | field_manager_mod::squote = "'" |
| |
| character(len=1), parameter | field_manager_mod::tab = char(9) |
| |
| integer, parameter | field_manager_mod::null_type = 0 |
| |
| integer, parameter | field_manager_mod::integer_type = 1 |
| |
| integer, parameter | field_manager_mod::list_type = 2 |
| |
| integer, parameter | field_manager_mod::logical_type = 3 |
| |
| integer, parameter | field_manager_mod::real_type = 4 |
| |
| integer, parameter | field_manager_mod::string_type = 5 |
| |
| integer, parameter | field_manager_mod::num_types = 5 |
| |
| integer, parameter | field_manager_mod::line_len = 256 |
| |
| integer, parameter | field_manager_mod::array_increment = 10 |
| |
| integer, parameter | field_manager_mod::max_fields = MAXFIELDS_ |
| |
| integer, parameter | field_manager_mod::max_field_methods = MAXFIELDMETHODS_ |
| |
| type(field_mgr_type), dimension(max_fields), private | field_manager_mod::fields |
| |
| character(len=fm_path_name_len) | field_manager_mod::loop_list |
| |
| character(len=fm_type_name_len), dimension(num_types) | field_manager_mod::field_type_name |
| |
| character(len=fm_field_name_len) | field_manager_mod::save_root_name |
| |
| character(len=52) | field_manager_mod::set = "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz" |
| |
| character(len=50) | field_manager_mod::set_nonexp = "ABCDFGHIJKLMNOPQRSTUVWXYZabcdfghijklmnopqrstuvwxyz" |
| |
| character(len=13) | field_manager_mod::setnum = "0123456789+-." |
| |
| integer | field_manager_mod::num_fields = 0 |
| |
| integer | field_manager_mod::verb = 0 |
| |
| integer | field_manager_mod::verb_level_warn = 0 |
| |
| integer | field_manager_mod::verb_level_note = 0 |
| |
| integer | field_manager_mod::default_verbosity = 0 |
| |
| integer | field_manager_mod::max_verbosity = 1 |
| |
| type(field_def), pointer | field_manager_mod::loop_list_p => NULL() |
| |
| type(field_def), pointer | field_manager_mod::current_list_p => NULL() |
| |
| type(field_def), pointer | field_manager_mod::root_p => NULL() |
| |
| type(field_def), pointer | field_manager_mod::save_root_parent_p => NULL() |
| |
| type(field_def), target, save | field_manager_mod::root |
| |