thincurr_f.F90 File Reference

#include "local.h"

Modules
module	thincurr_f
	Fortran part of Python wrapper for ThinCurr thin-wall eddy current functionality.

Functions/Subroutines
subroutine	thincurr_apply_lmat (tw_ptr, vals, hodlr_ptr)
	Apply inductance matrix to a ThinCurr field.
subroutine	thincurr_bmat (tw_ptr, hodlr_ptr, bmat_ptr, bdr_ptr, cache_file, error_str)
	Compute magnetic field reconstruction operators for a ThinCurr model.
subroutine	thincurr_cross_coupling (tw_ptr1, tw_ptr2, mmat, cache_file, error_str)
	Compute the mutual inductance between this and another ThinCurr model.
subroutine	thincurr_cross_eval (tw_ptr1, tw_ptr2, nrhs, vec1, vec2, error_str)
	Evaluate inductances on one model due to currents from another model.
subroutine	thincurr_curr_regmat (tw_ptr, rmat, error_str)
	Compute the current regularization matrix for a ThinCurr model.
subroutine	thincurr_eigenvalues (tw_ptr, direct, neigs, eig_vals, eig_vec, hodlr_ptr, error_str)
	Compute eigenmodes (L/R times and current structures) of a ThinCurr model.
subroutine	thincurr_freq_response (tw_ptr, direct, fr_limit, freq, fr_driver, hodlr_ptr, error_str)
	Compute frequence response of a ThinCurr model to given driver voltages.
subroutine	thincurr_get_eta (tw_ptr, eta_ptr, error_str)
	Get model surface resistivity values.
subroutine	thincurr_get_eta_vol (tw_ptr, eta_ptr, error_str)
	Get model volumetric resistivity values.
subroutine	thincurr_get_sensor_name (sensor_ptr, sensor_ind, sensor_name, error_str)
	Get the name of a given sensor.
subroutine	thincurr_get_thickness (tw_ptr, thickness_ptr, error_str)
	Return the thickness of the regions as an array of length nreg. If thickness is not set, return -1 for all regions.
subroutine	thincurr_lmat (tw_ptr, use_hodlr, lmat_ptr, cache_file, error_str)
	Compute the self-inductance matrix for a ThinCurr model.
subroutine	thincurr_mcoil (tw_ptr, mc_ptr, cache_file, error_str)
	Compute the mutual inductance between passive (mesh+Vcoils) and active elements (Icoils).
subroutine	thincurr_msensor (tw_ptr, sensor_file, ms_ptr, msc_ptr, nsensors, njumpers, sensor_ptr, cache_file, error_str)
	Compute the mutual inductance between model and sensors.
subroutine	thincurr_recon_curr (tw_ptr, vals, curr, format)
	Reconstruct current field on mesh.
subroutine	thincurr_recon_field (tw_ptr, pot, coils, field, hodlr_ptr)
	Reconstruct magnetic field on mesh.
subroutine	thincurr_reduce_model (tw_ptr, filename, nbasis, basis_vecs, compute_b, sensor_ptr, hodlr_ptr, error_str)
	Needs docs.
subroutine	thincurr_rmat (tw_ptr, kr_ptr, lc_ptr, mat_ptr, error_str)
	Compute the resistance matrix for a ThinCurr model.
subroutine	thincurr_save_field (tw_ptr, vals, fieldname)
	Save current field from ThinCurr to plot files.
subroutine	thincurr_save_scalar (tw_ptr, vals, fieldname)
	Save scalar field to plot files.
subroutine	thincurr_scale_va (tw_ptr, vals, div_flag)
	Scale a vertex array by vertex areas (eg. B_n -> flux).
subroutine	thincurr_set_eta (tw_ptr, eta_surf_ptr, eta_vol_ptr, thickness_ptr, error_str)
	Set resistivity and thickness values with automatic derivation of missing parameter. Accepts eta_surf alone, or any two of (eta_surf, eta_vol, thickness), and derives the missing value(s). If all three are provided, eta_surf is recomputed from eta_vol and thickness.
subroutine	thincurr_setup (mesh_file, np, r_loc, nc, lc_loc, reg_loc, pmap_loc, jumper_start_in, tw_ptr, sizes, error_str, xml_ptr)
	Setup ThinCurr model.
subroutine	thincurr_setup_io (tw_ptr, basepath, save_debug, legacy_hdf5, error_str)
	Setup I/O and plotting for ThinCurr model.
subroutine	thincurr_time_domain (tw_ptr, direct, dt, nsteps, cg_atol, cg_rtol, timestep_cn, nstatus, nplot, vec_ic, sensor_ptr, ncurr, curr_ptr, nvolt, volt_ptr, volts_full, sensor_vals_ptr, hodlr_ptr, error_str)
	Perform a time-domain simulation.
subroutine	thincurr_time_domain_plot (tw_ptr, compute_b, rebuild_sensors, nsteps, nplot, sensor_ptr, sensor_vals_ptr, nsensor, hodlr_ptr, error_str)
	Generate plot files for a time domain simulation that has already been run.

Variables
integer(i4), dimension(:,:), pointer	lc_plot
	Needs docs.
real(r8), dimension(:,:), pointer	r_plot
	Needs docs.
integer(i4), dimension(:), pointer	reg_plot
	Needs docs.