Skip to content
New issue

Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.

By clicking “Sign up for GitHub”, you agree to our terms of service and privacy statement. We’ll occasionally send you account related emails.

Already on GitHub? Sign in to your account

Fix Tao command. #942

Merged
merged 8 commits into from
May 2, 2024
7 changes: 4 additions & 3 deletions tao/code/tao_python_cmd.f90
Original file line number Diff line number Diff line change
Expand Up @@ -13,9 +13,10 @@
!
! {type} is the type of the parameter and is one of:
! INT ! Integer number
! INT_ARR ! Integer array.
! REAL ! Real number
! COMPLEX ! Complex number (Re;Im)
! REAL_ARR ! Real array
! COMPLEX ! Complex number (Re;Im)
! LOGIC ! Logical: "T" or "F".
! INUM ! Integer whose allowed values can be obtained using the "python inum" command.
! ENUM ! String whose allowed values can be obtained using the "python enum" command.
Expand Down Expand Up @@ -6792,8 +6793,8 @@ subroutine tao_python_cmd (input_str)
nl=incr(nl); write(li(nl), rmt) 'lsc_sigma_cutoff;REAL;T;', space_charge_com%lsc_sigma_cutoff
nl=incr(nl); write(li(nl), rmt) 'particle_sigma_cutoff;REAL;T;', space_charge_com%particle_sigma_cutoff

nl=incr(nl); write(li(nl), imt) 'space_charge_mesh_size;INT;T;', space_charge_com%space_charge_mesh_size
nl=incr(nl); write(li(nl), imt) 'csr3d_mesh_size;INT;T;', space_charge_com%csr3d_mesh_size
nl=incr(nl); write(li(nl), '(a, 3(a, i0))') 'space_charge_mesh_size;INT_ARR;T', (';', space_charge_com%space_charge_mesh_size(j), j = 1, 3)
nl=incr(nl); write(li(nl), '(a, 3(a, i0))') 'csr3d_mesh_size;INT_ARR;T', (';', space_charge_com%csr3d_mesh_size(j), j = 1, 3)
nl=incr(nl); write(li(nl), imt) 'n_bin;INT;T;', space_charge_com%n_bin
nl=incr(nl); write(li(nl), imt) 'particle_bin_span;INT;T;', space_charge_com%particle_bin_span
nl=incr(nl); write(li(nl), imt) 'n_shield_images;INT;T;', space_charge_com%n_shield_images
Expand Down