Commit fe64b32b1e7ad5e7b47ede2e3400a14d51ee5fd1

Authored by Chris Smartt
1 parent 981a5185

Update file header information

Showing 105 changed files with 352 additions and 234 deletions   Show diff stats
SRC/BUNDLE_DOMAIN_CREATION/bundle_domain_creation.F90
1 1 !
2   -! This file is part of SACAMOS, State of the Art CAble MOdels in Spice.
  2 +! This file is part of SACAMOS, State of the Art CAble MOdels for Spice.
3 3 ! It was developed by the University of Nottingham and the Netherlands Aerospace
4 4 ! Centre (NLR) for ESA under contract number 4000112765/14/NL/HK.
5 5 !
6   -! Copyright (C) 2016-2017 University of Nottingham
  6 +! Copyright (C) 2016-2018 University of Nottingham
7 7 !
8 8 ! SACAMOS is free software: you can redistribute it and/or modify it under the
9 9 ! terms of the GNU General Public License as published by the Free Software
... ... @@ -25,6 +25,7 @@
25 25 !
26 26 ! The University of Nottingham can be contacted at: ggiemr@nottingham.ac.uk
27 27 !
  28 +!
28 29 ! File Contents:
29 30 ! MODULE bundle_domain_creation
30 31 ! CONTAINS
... ...
SRC/BUNDLE_DOMAIN_CREATION/create_global_domain_structure.F90
1 1 !
2   -! This file is part of SACAMOS, State of the Art CAble MOdels in Spice.
  2 +! This file is part of SACAMOS, State of the Art CAble MOdels for Spice.
3 3 ! It was developed by the University of Nottingham and the Netherlands Aerospace
4 4 ! Centre (NLR) for ESA under contract number 4000112765/14/NL/HK.
5 5 !
6   -! Copyright (C) 2016-2017 University of Nottingham
  6 +! Copyright (C) 2016-2018 University of Nottingham
7 7 !
8 8 ! SACAMOS is free software: you can redistribute it and/or modify it under the
9 9 ! terms of the GNU General Public License as published by the Free Software
... ... @@ -25,6 +25,7 @@
25 25 !
26 26 ! The University of Nottingham can be contacted at: ggiemr@nottingham.ac.uk
27 27 !
  28 +!
28 29 ! NAME
29 30 ! SUBROUTINE create_global_domain_structure
30 31 !
... ...
SRC/BUNDLE_DOMAIN_CREATION/plot_bundle_cross_section.F90
1 1 !
2   -! This file is part of SACAMOS, State of the Art CAble MOdels in Spice.
  2 +! This file is part of SACAMOS, State of the Art CAble MOdels for Spice.
3 3 ! It was developed by the University of Nottingham and the Netherlands Aerospace
4 4 ! Centre (NLR) for ESA under contract number 4000112765/14/NL/HK.
5 5 !
6   -! Copyright (C) 2016-2017 University of Nottingham
  6 +! Copyright (C) 2016-2018 University of Nottingham
7 7 !
8 8 ! SACAMOS is free software: you can redistribute it and/or modify it under the
9 9 ! terms of the GNU General Public License as published by the Free Software
... ... @@ -25,6 +25,7 @@
25 25 !
26 26 ! The University of Nottingham can be contacted at: ggiemr@nottingham.ac.uk
27 27 !
  28 +!
28 29 ! FILE CONTENTS:
29 30 !SUBROUTINE plot_bundle_cross_section
30 31 !
... ...
SRC/BUNDLE_DOMAIN_CREATION/set_conductor_positions_for_Einc.F90
1 1 !
2   -! This file is part of SACAMOS, State of the Art CAble MOdels in Spice.
  2 +! This file is part of SACAMOS, State of the Art CAble MOdels for Spice.
3 3 ! It was developed by the University of Nottingham and the Netherlands Aerospace
4 4 ! Centre (NLR) for ESA under contract number 4000112765/14/NL/HK.
5 5 !
6   -! Copyright (C) 2016-2017 University of Nottingham
  6 +! Copyright (C) 2016-2018 University of Nottingham
7 7 !
8 8 ! SACAMOS is free software: you can redistribute it and/or modify it under the
9 9 ! terms of the GNU General Public License as published by the Free Software
... ... @@ -25,6 +25,7 @@
25 25 !
26 26 ! The University of Nottingham can be contacted at: ggiemr@nottingham.ac.uk
27 27 !
  28 +!
28 29 ! FILE CONTENTS:
29 30 !SUBROUTINE set_conductor_positions_for_Einc
30 31 !
... ...
SRC/CABLE_BUNDLE_MODULES/cable_bundle_module.F90
1 1 !
2   -! This file is part of SACAMOS, State of the Art CAble MOdels in Spice.
  2 +! This file is part of SACAMOS, State of the Art CAble MOdels for Spice.
3 3 ! It was developed by the University of Nottingham and the Netherlands Aerospace
4 4 ! Centre (NLR) for ESA under contract number 4000112765/14/NL/HK.
5 5 !
6   -! Copyright (C) 2016-2017 University of Nottingham
  6 +! Copyright (C) 2016-2018 University of Nottingham
7 7 !
8 8 ! SACAMOS is free software: you can redistribute it and/or modify it under the
9 9 ! terms of the GNU General Public License as published by the Free Software
... ... @@ -25,6 +25,7 @@
25 25 !
26 26 ! The University of Nottingham can be contacted at: ggiemr@nottingham.ac.uk
27 27 !
  28 +!
28 29 ! File Contents:
29 30 ! MODULE cable_bundle_module
30 31 ! CONTAINS
... ...
SRC/CABLE_MODULES/Dconnector.F90
1 1 !
2   -! This file is part of SACAMOS, State of the Art CAble MOdels in Spice.
  2 +! This file is part of SACAMOS, State of the Art CAble MOdels for Spice.
3 3 ! It was developed by the University of Nottingham and the Netherlands Aerospace
4 4 ! Centre (NLR) for ESA under contract number 4000112765/14/NL/HK.
5 5 !
6   -! Copyright (C) 2016-2017 University of Nottingham
  6 +! Copyright (C) 2016-2018 University of Nottingham
7 7 !
8 8 ! SACAMOS is free software: you can redistribute it and/or modify it under the
9 9 ! terms of the GNU General Public License as published by the Free Software
... ... @@ -25,6 +25,7 @@
25 25 !
26 26 ! The University of Nottingham can be contacted at: ggiemr@nottingham.ac.uk
27 27 !
  28 +!
28 29 ! File Contents:
29 30 ! SUBROUTINE Dconnector_set_parameters
30 31 ! SUBROUTINE Dconnector_set_internal_domain_information
... ...
SRC/CABLE_MODULES/ML_flex_cable.F90
1 1 !
2   -! This file is part of SACAMOS, State of the Art CAble MOdels in Spice.
  2 +! This file is part of SACAMOS, State of the Art CAble MOdels for Spice.
3 3 ! It was developed by the University of Nottingham and the Netherlands Aerospace
4 4 ! Centre (NLR) for ESA under contract number 4000112765/14/NL/HK.
5 5 !
6   -! Copyright (C) 2016-2017 University of Nottingham
  6 +! Copyright (C) 2016-2018 University of Nottingham
7 7 !
8 8 ! SACAMOS is free software: you can redistribute it and/or modify it under the
9 9 ! terms of the GNU General Public License as published by the Free Software
... ... @@ -25,6 +25,7 @@
25 25 !
26 26 ! The University of Nottingham can be contacted at: ggiemr@nottingham.ac.uk
27 27 !
  28 +!
28 29 ! File Contents:
29 30 ! SUBROUTINE ML_flex_cable_set_parameters
30 31 ! SUBROUTINE ML_flex_cable_set_internal_domain_information
... ...
SRC/CABLE_MODULES/cable_checks.F90
1 1 !
2   -! This file is part of SACAMOS, State of the Art CAble MOdels in Spice.
  2 +! This file is part of SACAMOS, State of the Art CAble MOdels for Spice.
3 3 ! It was developed by the University of Nottingham and the Netherlands Aerospace
4 4 ! Centre (NLR) for ESA under contract number 4000112765/14/NL/HK.
5 5 !
6   -! Copyright (C) 2016-2017 University of Nottingham
  6 +! Copyright (C) 2016-2018 University of Nottingham
7 7 !
8 8 ! SACAMOS is free software: you can redistribute it and/or modify it under the
9 9 ! terms of the GNU General Public License as published by the Free Software
... ... @@ -25,6 +25,7 @@
25 25 !
26 26 ! The University of Nottingham can be contacted at: ggiemr@nottingham.ac.uk
27 27 !
  28 +!
28 29 ! File Contents:
29 30 ! SUBROUTINE gt_zero_check(p,cable_spec_error,cable_name,message)
30 31 ! SUBROUTINE cylindrical_check(r,cable_spec_error,cable_name,message)
... ...
SRC/CABLE_MODULES/cable_module.F90
1 1 !
2   -! This file is part of SACAMOS, State of the Art CAble MOdels in Spice.
  2 +! This file is part of SACAMOS, State of the Art CAble MOdels for Spice.
3 3 ! It was developed by the University of Nottingham and the Netherlands Aerospace
4 4 ! Centre (NLR) for ESA under contract number 4000112765/14/NL/HK.
5 5 !
6   -! Copyright (C) 2016-2017 University of Nottingham
  6 +! Copyright (C) 2016-2018 University of Nottingham
7 7 !
8 8 ! SACAMOS is free software: you can redistribute it and/or modify it under the
9 9 ! terms of the GNU General Public License as published by the Free Software
... ... @@ -25,6 +25,7 @@
25 25 !
26 26 ! The University of Nottingham can be contacted at: ggiemr@nottingham.ac.uk
27 27 !
  28 +!
28 29 ! File Contents:
29 30 ! MODULE cable_module
30 31 ! CONTAINS
... ...
SRC/CABLE_MODULES/coax.F90
1 1 !
2   -! This file is part of SACAMOS, State of the Art CAble MOdels in Spice.
  2 +! This file is part of SACAMOS, State of the Art CAble MOdels for Spice.
3 3 ! It was developed by the University of Nottingham and the Netherlands Aerospace
4 4 ! Centre (NLR) for ESA under contract number 4000112765/14/NL/HK.
5 5 !
6   -! Copyright (C) 2016-2017 University of Nottingham
  6 +! Copyright (C) 2016-2018 University of Nottingham
7 7 !
8 8 ! SACAMOS is free software: you can redistribute it and/or modify it under the
9 9 ! terms of the GNU General Public License as published by the Free Software
... ... @@ -25,6 +25,7 @@
25 25 !
26 26 ! The University of Nottingham can be contacted at: ggiemr@nottingham.ac.uk
27 27 !
  28 +!
28 29 ! File Contents:
29 30 ! SUBROUTINE coax_set_parameters
30 31 ! SUBROUTINE coax_set_internal_domain_information
... ...
SRC/CABLE_MODULES/conductor_impedance_model.F90
1 1 !
2   -! This file is part of SACAMOS, State of the Art CAble MOdels in Spice.
  2 +! This file is part of SACAMOS, State of the Art CAble MOdels for Spice.
3 3 ! It was developed by the University of Nottingham and the Netherlands Aerospace
4 4 ! Centre (NLR) for ESA under contract number 4000112765/14/NL/HK.
5 5 !
6   -! Copyright (C) 2016-2017 University of Nottingham
  6 +! Copyright (C) 2016-2018 University of Nottingham
7 7 !
8 8 ! SACAMOS is free software: you can redistribute it and/or modify it under the
9 9 ! terms of the GNU General Public License as published by the Free Software
... ... @@ -25,6 +25,7 @@
25 25 !
26 26 ! The University of Nottingham can be contacted at: ggiemr@nottingham.ac.uk
27 27 !
  28 +!
28 29 ! OVERALL DESCRIPTION
29 30 ! These subroutines perform processes related to the conductor impedance models available
30 31 !
... ...
SRC/CABLE_MODULES/cylindrical.F90
1 1 !
2   -! This file is part of SACAMOS, State of the Art CAble MOdels in Spice.
  2 +! This file is part of SACAMOS, State of the Art CAble MOdels for Spice.
3 3 ! It was developed by the University of Nottingham and the Netherlands Aerospace
4 4 ! Centre (NLR) for ESA under contract number 4000112765/14/NL/HK.
5 5 !
6   -! Copyright (C) 2016-2017 University of Nottingham
  6 +! Copyright (C) 2016-2018 University of Nottingham
7 7 !
8 8 ! SACAMOS is free software: you can redistribute it and/or modify it under the
9 9 ! terms of the GNU General Public License as published by the Free Software
... ... @@ -25,6 +25,7 @@
25 25 !
26 26 ! The University of Nottingham can be contacted at: ggiemr@nottingham.ac.uk
27 27 !
  28 +!
28 29 ! File Contents:
29 30 ! SUBROUTINE cylindrical_set_parameters
30 31 ! SUBROUTINE cylindrical_set_internal_domain_information
... ...
SRC/CABLE_MODULES/flex_cable.F90
1 1 !
2   -! This file is part of SACAMOS, State of the Art CAble MOdels in Spice.
  2 +! This file is part of SACAMOS, State of the Art CAble MOdels for Spice.
3 3 ! It was developed by the University of Nottingham and the Netherlands Aerospace
4 4 ! Centre (NLR) for ESA under contract number 4000112765/14/NL/HK.
5 5 !
6   -! Copyright (C) 2016-2017 University of Nottingham
  6 +! Copyright (C) 2016-2018 University of Nottingham
7 7 !
8 8 ! SACAMOS is free software: you can redistribute it and/or modify it under the
9 9 ! terms of the GNU General Public License as published by the Free Software
... ... @@ -25,6 +25,7 @@
25 25 !
26 26 ! The University of Nottingham can be contacted at: ggiemr@nottingham.ac.uk
27 27 !
  28 +!
28 29 ! File Contents:
29 30 ! SUBROUTINE flex_cable_set_parameters
30 31 ! SUBROUTINE flex_cable_set_internal_domain_information
... ...
SRC/CABLE_MODULES/ground_plane.F90
1 1 !
2   -! This file is part of SACAMOS, State of the Art CAble MOdels in Spice.
  2 +! This file is part of SACAMOS, State of the Art CAble MOdels for Spice.
3 3 ! It was developed by the University of Nottingham and the Netherlands Aerospace
4 4 ! Centre (NLR) for ESA under contract number 4000112765/14/NL/HK.
5 5 !
6   -! Copyright (C) 2016-2017 University of Nottingham
  6 +! Copyright (C) 2016-2018 University of Nottingham
7 7 !
8 8 ! SACAMOS is free software: you can redistribute it and/or modify it under the
9 9 ! terms of the GNU General Public License as published by the Free Software
... ... @@ -25,6 +25,7 @@
25 25 !
26 26 ! The University of Nottingham can be contacted at: ggiemr@nottingham.ac.uk
27 27 !
  28 +!
28 29 ! File Contents:
29 30 ! SUBROUTINE ground_plane_set_parameters
30 31 ! SUBROUTINE ground_plane_set_internal_domain_information
... ...
SRC/CABLE_MODULES/overshield.F90
1 1 !
2   -! This file is part of SACAMOS, State of the Art CAble MOdels in Spice.
  2 +! This file is part of SACAMOS, State of the Art CAble MOdels for Spice.
3 3 ! It was developed by the University of Nottingham and the Netherlands Aerospace
4 4 ! Centre (NLR) for ESA under contract number 4000112765/14/NL/HK.
5 5 !
6   -! Copyright (C) 2016-2017 University of Nottingham
  6 +! Copyright (C) 2016-2018 University of Nottingham
7 7 !
8 8 ! SACAMOS is free software: you can redistribute it and/or modify it under the
9 9 ! terms of the GNU General Public License as published by the Free Software
... ... @@ -25,6 +25,7 @@
25 25 !
26 26 ! The University of Nottingham can be contacted at: ggiemr@nottingham.ac.uk
27 27 !
  28 +!
28 29 ! File Contents:
29 30 ! SUBROUTINE overshield_set_parameters
30 31 !
... ...
SRC/CABLE_MODULES/shielded_twisted_pair.F90
1 1 !
2   -! This file is part of SACAMOS, State of the Art CAble MOdels in Spice.
  2 +! This file is part of SACAMOS, State of the Art CAble MOdels for Spice.
3 3 ! It was developed by the University of Nottingham and the Netherlands Aerospace
4 4 ! Centre (NLR) for ESA under contract number 4000112765/14/NL/HK.
5 5 !
6   -! Copyright (C) 2016-2017 University of Nottingham
  6 +! Copyright (C) 2016-2018 University of Nottingham
7 7 !
8 8 ! SACAMOS is free software: you can redistribute it and/or modify it under the
9 9 ! terms of the GNU General Public License as published by the Free Software
... ... @@ -25,6 +25,7 @@
25 25 !
26 26 ! The University of Nottingham can be contacted at: ggiemr@nottingham.ac.uk
27 27 !
  28 +!
28 29 ! File Contents:
29 30 ! SUBROUTINE shielded_twisted_pair_set_parameters
30 31 ! SUBROUTINE shielded_twisted_pair_set_internal_domain_information
... ...
SRC/CABLE_MODULES/shielded_twisted_pair_cm_dm_parameter_calculation.F90
1 1 !
2   -! This file is part of SACAMOS, State of the Art CAble MOdels in Spice.
  2 +! This file is part of SACAMOS, State of the Art CAble MOdels for Spice.
3 3 ! It was developed by the University of Nottingham and the Netherlands Aerospace
4 4 ! Centre (NLR) for ESA under contract number 4000112765/14/NL/HK.
5 5 !
6   -! Copyright (C) 2016-2017 University of Nottingham
  6 +! Copyright (C) 2016-2018 University of Nottingham
7 7 !
8 8 ! SACAMOS is free software: you can redistribute it and/or modify it under the
9 9 ! terms of the GNU General Public License as published by the Free Software
... ... @@ -25,6 +25,7 @@
25 25 !
26 26 ! The University of Nottingham can be contacted at: ggiemr@nottingham.ac.uk
27 27 !
  28 +!
28 29 ! File Contents:
29 30 ! SUBROUTINE shielded_twisted_pair_cm_dm_parameter_calculation
30 31 !
... ...
SRC/CABLE_MODULES/spacewire.F90
1 1 !
2   -! This file is part of SACAMOS, State of the Art CAble MOdels in Spice.
  2 +! This file is part of SACAMOS, State of the Art CAble MOdels for Spice.
3 3 ! It was developed by the University of Nottingham and the Netherlands Aerospace
4 4 ! Centre (NLR) for ESA under contract number 4000112765/14/NL/HK.
5 5 !
6   -! Copyright (C) 2016-2017 University of Nottingham
  6 +! Copyright (C) 2016-2018 University of Nottingham
7 7 !
8 8 ! SACAMOS is free software: you can redistribute it and/or modify it under the
9 9 ! terms of the GNU General Public License as published by the Free Software
... ... @@ -25,6 +25,7 @@
25 25 !
26 26 ! The University of Nottingham can be contacted at: ggiemr@nottingham.ac.uk
27 27 !
  28 +!
28 29 ! File Contents:
29 30 ! SUBROUTINE spacewire_set_parameters
30 31 ! SUBROUTINE spacewire_set_internal_domain_information
... ...
SRC/CABLE_MODULES/twinax.F90
1 1 !
2   -! This file is part of SACAMOS, State of the Art CAble MOdels in Spice.
  2 +! This file is part of SACAMOS, State of the Art CAble MOdels for Spice.
3 3 ! It was developed by the University of Nottingham and the Netherlands Aerospace
4 4 ! Centre (NLR) for ESA under contract number 4000112765/14/NL/HK.
5 5 !
6   -! Copyright (C) 2016-2017 University of Nottingham
  6 +! Copyright (C) 2016-2018 University of Nottingham
7 7 !
8 8 ! SACAMOS is free software: you can redistribute it and/or modify it under the
9 9 ! terms of the GNU General Public License as published by the Free Software
... ... @@ -25,6 +25,7 @@
25 25 !
26 26 ! The University of Nottingham can be contacted at: ggiemr@nottingham.ac.uk
27 27 !
  28 +!
28 29 ! File Contents:
29 30 ! SUBROUTINE twinax_set_parameters
30 31 ! SUBROUTINE twinax_set_internal_domain_information
... ...
SRC/CABLE_MODULES/twisted_pair.F90
1 1 !
2   -! This file is part of SACAMOS, State of the Art CAble MOdels in Spice.
  2 +! This file is part of SACAMOS, State of the Art CAble MOdels for Spice.
3 3 ! It was developed by the University of Nottingham and the Netherlands Aerospace
4 4 ! Centre (NLR) for ESA under contract number 4000112765/14/NL/HK.
5 5 !
6   -! Copyright (C) 2016-2017 University of Nottingham
  6 +! Copyright (C) 2016-2018 University of Nottingham
7 7 !
8 8 ! SACAMOS is free software: you can redistribute it and/or modify it under the
9 9 ! terms of the GNU General Public License as published by the Free Software
... ... @@ -25,6 +25,7 @@
25 25 !
26 26 ! The University of Nottingham can be contacted at: ggiemr@nottingham.ac.uk
27 27 !
  28 +!
28 29 ! File Contents:
29 30 ! SUBROUTINE twisted_pair_set_parameters
30 31 ! SUBROUTINE twisted_pair_set_internal_domain_information
... ...
SRC/CREATE_SPICE_CIRCUIT_MODEL/create_new_node.F90
1   -
2   -! This file is part of SACAMOS, State of the Art CAble MOdels in Spice.
  1 +!
  2 +! This file is part of SACAMOS, State of the Art CAble MOdels for Spice.
3 3 ! It was developed by the University of Nottingham and the Netherlands Aerospace
4 4 ! Centre (NLR) for ESA under contract number 4000112765/14/NL/HK.
5 5 !
6   -! Copyright (C) 2016-2017 University of Nottingham
  6 +! Copyright (C) 2016-2018 University of Nottingham
7 7 !
8 8 ! SACAMOS is free software: you can redistribute it and/or modify it under the
9 9 ! terms of the GNU General Public License as published by the Free Software
... ... @@ -25,6 +25,7 @@
25 25 !
26 26 ! The University of Nottingham can be contacted at: ggiemr@nottingham.ac.uk
27 27 !
  28 +!
28 29 ! File Contents:
29 30 ! SUBROUTINE create_new_node
30 31 !
... ...
SRC/CREATE_SPICE_CIRCUIT_MODEL/create_spice_model.F90
1   -
2   -! This file is part of SACAMOS, State of the Art CAble MOdels in Spice.
  1 +!
  2 +! This file is part of SACAMOS, State of the Art CAble MOdels for Spice.
3 3 ! It was developed by the University of Nottingham and the Netherlands Aerospace
4 4 ! Centre (NLR) for ESA under contract number 4000112765/14/NL/HK.
5 5 !
6   -! Copyright (C) 2016-2017 University of Nottingham
  6 +! Copyright (C) 2016-2018 University of Nottingham
7 7 !
8 8 ! SACAMOS is free software: you can redistribute it and/or modify it under the
9 9 ! terms of the GNU General Public License as published by the Free Software
... ... @@ -25,6 +25,7 @@
25 25 !
26 26 ! The University of Nottingham can be contacted at: ggiemr@nottingham.ac.uk
27 27 !
  28 +!
28 29 ! FILE CONTAINS (within include files):
29 30 !
30 31 !create_new_node.F90: SUBROUTINE create_new_node
... ...
SRC/CREATE_SPICE_CIRCUIT_MODEL/create_spice_subcircuit_model.F90
1   -
2   -! This file is part of SACAMOS, State of the Art CAble MOdels in Spice.
  1 +!
  2 +! This file is part of SACAMOS, State of the Art CAble MOdels for Spice.
3 3 ! It was developed by the University of Nottingham and the Netherlands Aerospace
4 4 ! Centre (NLR) for ESA under contract number 4000112765/14/NL/HK.
5 5 !
6   -! Copyright (C) 2016-2017 University of Nottingham
  6 +! Copyright (C) 2016-2018 University of Nottingham
7 7 !
8 8 ! SACAMOS is free software: you can redistribute it and/or modify it under the
9 9 ! terms of the GNU General Public License as published by the Free Software
... ... @@ -25,6 +25,7 @@
25 25 !
26 26 ! The University of Nottingham can be contacted at: ggiemr@nottingham.ac.uk
27 27 !
  28 +!
28 29 ! File Contents:
29 30 ! SUBROUTINE create_spice_subcircuit_model
30 31 !
... ...
SRC/CREATE_SPICE_CIRCUIT_MODEL/create_spice_subcircuit_symbol.F90
1   -
2   -! This file is part of SACAMOS, State of the Art CAble MOdels in Spice.
  1 +!
  2 +! This file is part of SACAMOS, State of the Art CAble MOdels for Spice.
3 3 ! It was developed by the University of Nottingham and the Netherlands Aerospace
4 4 ! Centre (NLR) for ESA under contract number 4000112765/14/NL/HK.
5 5 !
6   -! Copyright (C) 2016-2017 University of Nottingham
  6 +! Copyright (C) 2016-2018 University of Nottingham
7 7 !
8 8 ! SACAMOS is free software: you can redistribute it and/or modify it under the
9 9 ! terms of the GNU General Public License as published by the Free Software
... ... @@ -25,6 +25,7 @@
25 25 !
26 26 ! The University of Nottingham can be contacted at: ggiemr@nottingham.ac.uk
27 27 !
  28 +!
28 29 ! File Contents:
29 30 ! SUBROUTINE create_spice_subcircuit_symbol_NGspice
30 31 ! SUBROUTINE create_spice_subcircuit_symbol_LTspice
... ...
SRC/CREATE_SPICE_CIRCUIT_MODEL/create_spice_validation_test_circuit.F90
1   -
2   -! This file is part of SACAMOS, State of the Art CAble MOdels in Spice.
  1 +!
  2 +! This file is part of SACAMOS, State of the Art CAble MOdels for Spice.
3 3 ! It was developed by the University of Nottingham and the Netherlands Aerospace
4 4 ! Centre (NLR) for ESA under contract number 4000112765/14/NL/HK.
5 5 !
6   -! Copyright (C) 2016-2017 University of Nottingham
  6 +! Copyright (C) 2016-2018 University of Nottingham
7 7 !
8 8 ! SACAMOS is free software: you can redistribute it and/or modify it under the
9 9 ! terms of the GNU General Public License as published by the Free Software
... ... @@ -25,6 +25,7 @@
25 25 !
26 26 ! The University of Nottingham can be contacted at: ggiemr@nottingham.ac.uk
27 27 !
  28 +!
28 29 ! File Contents:
29 30 ! SUBROUTINE create_spice_validation_test_circuit
30 31 !
... ...
SRC/CREATE_SPICE_CIRCUIT_MODEL/write_ZT_incident_field_excitation_circuit.F90
1   -
2   -! This file is part of SACAMOS, State of the Art CAble MOdels in Spice.
  1 +!
  2 +! This file is part of SACAMOS, State of the Art CAble MOdels for Spice.
3 3 ! It was developed by the University of Nottingham and the Netherlands Aerospace
4 4 ! Centre (NLR) for ESA under contract number 4000112765/14/NL/HK.
5 5 !
6   -! Copyright (C) 2016-2017 University of Nottingham
  6 +! Copyright (C) 2016-2018 University of Nottingham
7 7 !
8 8 ! SACAMOS is free software: you can redistribute it and/or modify it under the
9 9 ! terms of the GNU General Public License as published by the Free Software
... ... @@ -25,6 +25,7 @@
25 25 !
26 26 ! The University of Nottingham can be contacted at: ggiemr@nottingham.ac.uk
27 27 !
  28 +!
28 29 ! File Contents:
29 30 ! SUBROUTINE write_ZT_incident_field_circuit
30 31 !
... ...
SRC/CREATE_SPICE_CIRCUIT_MODEL/write_delay_line.F90
1   -
2   -! This file is part of SACAMOS, State of the Art CAble MOdels in Spice.
  1 +!
  2 +! This file is part of SACAMOS, State of the Art CAble MOdels for Spice.
3 3 ! It was developed by the University of Nottingham and the Netherlands Aerospace
4 4 ! Centre (NLR) for ESA under contract number 4000112765/14/NL/HK.
5 5 !
6   -! Copyright (C) 2016-2017 University of Nottingham
  6 +! Copyright (C) 2016-2018 University of Nottingham
7 7 !
8 8 ! SACAMOS is free software: you can redistribute it and/or modify it under the
9 9 ! terms of the GNU General Public License as published by the Free Software
... ... @@ -25,6 +25,7 @@
25 25 !
26 26 ! The University of Nottingham can be contacted at: ggiemr@nottingham.ac.uk
27 27 !
  28 +!
28 29 ! File Contents:
29 30 ! SUBROUTINE write_delay_line
30 31 !
... ...
SRC/CREATE_SPICE_CIRCUIT_MODEL/write_incident_field_excitation_circuit.F90
1   -
2   -! This file is part of SACAMOS, State of the Art CAble MOdels in Spice.
  1 +!
  2 +! This file is part of SACAMOS, State of the Art CAble MOdels for Spice.
3 3 ! It was developed by the University of Nottingham and the Netherlands Aerospace
4 4 ! Centre (NLR) for ESA under contract number 4000112765/14/NL/HK.
5 5 !
6   -! Copyright (C) 2016-2017 University of Nottingham
  6 +! Copyright (C) 2016-2018 University of Nottingham
7 7 !
8 8 ! SACAMOS is free software: you can redistribute it and/or modify it under the
9 9 ! terms of the GNU General Public License as published by the Free Software
... ... @@ -25,6 +25,7 @@
25 25 !
26 26 ! The University of Nottingham can be contacted at: ggiemr@nottingham.ac.uk
27 27 !
  28 +!
28 29 ! File Contents:
29 30 ! SUBROUTINE write_incident_field_circuit
30 31 !
... ...
SRC/CREATE_SPICE_CIRCUIT_MODEL/write_s_domain_controlled_voltage_source.F90
1   -
2   -! This file is part of SACAMOS, State of the Art CAble MOdels in Spice.
  1 +!
  2 +! This file is part of SACAMOS, State of the Art CAble MOdels for Spice.
3 3 ! It was developed by the University of Nottingham and the Netherlands Aerospace
4 4 ! Centre (NLR) for ESA under contract number 4000112765/14/NL/HK.
5 5 !
6   -! Copyright (C) 2016-2017 University of Nottingham
  6 +! Copyright (C) 2016-2018 University of Nottingham
7 7 !
8 8 ! SACAMOS is free software: you can redistribute it and/or modify it under the
9 9 ! terms of the GNU General Public License as published by the Free Software
... ... @@ -25,6 +25,7 @@
25 25 !
26 26 ! The University of Nottingham can be contacted at: ggiemr@nottingham.ac.uk
27 27 !
  28 +!
28 29 ! File Contents:
29 30 ! SUBROUTINE write_s_domain_controlled_voltage_source
30 31 ! SUBROUTINE write_filter_model
... ...
SRC/CREATE_SPICE_CIRCUIT_MODEL/write_spice_comment_line.F90
1   -
2   -! This file is part of SACAMOS, State of the Art CAble MOdels in Spice.
  1 +!
  2 +! This file is part of SACAMOS, State of the Art CAble MOdels for Spice.
3 3 ! It was developed by the University of Nottingham and the Netherlands Aerospace
4 4 ! Centre (NLR) for ESA under contract number 4000112765/14/NL/HK.
5 5 !
6   -! Copyright (C) 2016-2017 University of Nottingham
  6 +! Copyright (C) 2016-2018 University of Nottingham
7 7 !
8 8 ! SACAMOS is free software: you can redistribute it and/or modify it under the
9 9 ! terms of the GNU General Public License as published by the Free Software
... ... @@ -25,6 +25,7 @@
25 25 !
26 26 ! The University of Nottingham can be contacted at: ggiemr@nottingham.ac.uk
27 27 !
  28 +!
28 29 ! File Contents:
29 30 ! SUBROUTINE write_spice_comment
30 31 !
... ...
SRC/CREATE_SPICE_CIRCUIT_MODEL/write_spice_dc_resistances.F90
1   -
2   -! This file is part of SACAMOS, State of the Art CAble MOdels in Spice.
  1 +!
  2 +! This file is part of SACAMOS, State of the Art CAble MOdels for Spice.
3 3 ! It was developed by the University of Nottingham and the Netherlands Aerospace
4 4 ! Centre (NLR) for ESA under contract number 4000112765/14/NL/HK.
5 5 !
6   -! Copyright (C) 2016-2017 University of Nottingham
  6 +! Copyright (C) 2016-2018 University of Nottingham
7 7 !
8 8 ! SACAMOS is free software: you can redistribute it and/or modify it under the
9 9 ! terms of the GNU General Public License as published by the Free Software
... ... @@ -25,6 +25,7 @@
25 25 !
26 26 ! The University of Nottingham can be contacted at: ggiemr@nottingham.ac.uk
27 27 !
  28 +!
28 29 ! File Contents:
29 30 ! SUBROUTINE write_spice_dc_resistances
30 31 !
... ...
SRC/CREATE_SPICE_CIRCUIT_MODEL/write_spice_domain_decomposition_equivalent_circuit.F90
1   -
2   -! This file is part of SACAMOS, State of the Art CAble MOdels in Spice.
  1 +!
  2 +! This file is part of SACAMOS, State of the Art CAble MOdels for Spice.
3 3 ! It was developed by the University of Nottingham and the Netherlands Aerospace
4 4 ! Centre (NLR) for ESA under contract number 4000112765/14/NL/HK.
5 5 !
6   -! Copyright (C) 2016-2017 University of Nottingham
  6 +! Copyright (C) 2016-2018 University of Nottingham
7 7 !
8 8 ! SACAMOS is free software: you can redistribute it and/or modify it under the
9 9 ! terms of the GNU General Public License as published by the Free Software
... ... @@ -25,6 +25,7 @@
25 25 !
26 26 ! The University of Nottingham can be contacted at: ggiemr@nottingham.ac.uk
27 27 !
  28 +!
28 29 ! File Contents:
29 30 ! SUBROUTINE write_spice_domain_decomposition_equivalent_circuit
30 31 !
... ...
SRC/CREATE_SPICE_CIRCUIT_MODEL/write_spice_method_of_characteristics_equivalent_circuit.F90
1   -
2   -! This file is part of SACAMOS, State of the Art CAble MOdels in Spice.
  1 +!
  2 +! This file is part of SACAMOS, State of the Art CAble MOdels for Spice.
3 3 ! It was developed by the University of Nottingham and the Netherlands Aerospace
4 4 ! Centre (NLR) for ESA under contract number 4000112765/14/NL/HK.
5 5 !
6   -! Copyright (C) 2016-2017 University of Nottingham
  6 +! Copyright (C) 2016-2018 University of Nottingham
7 7 !
8 8 ! SACAMOS is free software: you can redistribute it and/or modify it under the
9 9 ! terms of the GNU General Public License as published by the Free Software
... ... @@ -25,6 +25,7 @@
25 25 !
26 26 ! The University of Nottingham can be contacted at: ggiemr@nottingham.ac.uk
27 27 !
  28 +!
28 29 ! File Contents:
29 30 ! SUBROUTINE write_spice_method_of_characteristics_equivalent_circuit
30 31 !
... ...
SRC/CREATE_SPICE_CIRCUIT_MODEL/write_spice_modal_decomposition_equivalent_circuit.F90
1   -
2   -! This file is part of SACAMOS, State of the Art CAble MOdels in Spice.
  1 +!
  2 +! This file is part of SACAMOS, State of the Art CAble MOdels for Spice.
3 3 ! It was developed by the University of Nottingham and the Netherlands Aerospace
4 4 ! Centre (NLR) for ESA under contract number 4000112765/14/NL/HK.
5 5 !
6   -! Copyright (C) 2016-2017 University of Nottingham
  6 +! Copyright (C) 2016-2018 University of Nottingham
7 7 !
8 8 ! SACAMOS is free software: you can redistribute it and/or modify it under the
9 9 ! terms of the GNU General Public License as published by the Free Software
... ... @@ -25,6 +25,7 @@
25 25 !
26 26 ! The University of Nottingham can be contacted at: ggiemr@nottingham.ac.uk
27 27 !
  28 +
28 29 ! File Contents:
29 30 ! SUBROUTINE write_spice_modal_decomposition_equivalent_circuit
30 31 !
... ...
SRC/CREATE_SPICE_CIRCUIT_MODEL/write_spice_subcircuit_header.F90
1   -
2   -! This file is part of SACAMOS, State of the Art CAble MOdels in Spice.
  1 +!
  2 +! This file is part of SACAMOS, State of the Art CAble MOdels for Spice.
3 3 ! It was developed by the University of Nottingham and the Netherlands Aerospace
4 4 ! Centre (NLR) for ESA under contract number 4000112765/14/NL/HK.
5 5 !
6   -! Copyright (C) 2016-2017 University of Nottingham
  6 +! Copyright (C) 2016-2018 University of Nottingham
7 7 !
8 8 ! SACAMOS is free software: you can redistribute it and/or modify it under the
9 9 ! terms of the GNU General Public License as published by the Free Software
... ... @@ -25,6 +25,7 @@
25 25 !
26 26 ! The University of Nottingham can be contacted at: ggiemr@nottingham.ac.uk
27 27 !
  28 +!
28 29 ! File Contents:
29 30 ! SUBROUTINE write_spice_subcircuit_header
30 31 !
... ...
SRC/CREATE_SPICE_CIRCUIT_MODEL/write_transfer_impedance_circuit.F90
1   -
2   -! This file is part of SACAMOS, State of the Art CAble MOdels in Spice.
  1 +!
  2 +! This file is part of SACAMOS, State of the Art CAble MOdels for Spice.
3 3 ! It was developed by the University of Nottingham and the Netherlands Aerospace
4 4 ! Centre (NLR) for ESA under contract number 4000112765/14/NL/HK.
5 5 !
6   -! Copyright (C) 2016-2017 University of Nottingham
  6 +! Copyright (C) 2016-2018 University of Nottingham
7 7 !
8 8 ! SACAMOS is free software: you can redistribute it and/or modify it under the
9 9 ! terms of the GNU General Public License as published by the Free Software
... ... @@ -25,6 +25,7 @@
25 25 !
26 26 ! The University of Nottingham can be contacted at: ggiemr@nottingham.ac.uk
27 27 !
  28 +!
28 29 ! File Contents:
29 30 ! SUBROUTINE write_transfer_impedance_circuit
30 31 !
... ...
SRC/GENERAL_MODULES/add_integer_to_string.F90
1 1 !
2   -! This file is part of SACAMOS, State of the Art CAble MOdels in Spice.
  2 +! This file is part of SACAMOS, State of the Art CAble MOdels for Spice.
3 3 ! It was developed by the University of Nottingham and the Netherlands Aerospace
4 4 ! Centre (NLR) for ESA under contract number 4000112765/14/NL/HK.
5 5 !
6   -! Copyright (C) 2016-2017 University of Nottingham
  6 +! Copyright (C) 2016-2018 University of Nottingham
7 7 !
8 8 ! SACAMOS is free software: you can redistribute it and/or modify it under the
9 9 ! terms of the GNU General Public License as published by the Free Software
... ... @@ -25,6 +25,7 @@
25 25 !
26 26 ! The University of Nottingham can be contacted at: ggiemr@nottingham.ac.uk
27 27 !
  28 +!
28 29 !SUBROUTINE add_integer_to_string
29 30 !
30 31 ! NAME
... ...
SRC/GENERAL_MODULES/build_component_name_strings.F90
1 1 !
2   -! This file is part of SACAMOS, State of the Art CAble MOdels in Spice.
  2 +! This file is part of SACAMOS, State of the Art CAble MOdels for Spice.
3 3 ! It was developed by the University of Nottingham and the Netherlands Aerospace
4 4 ! Centre (NLR) for ESA under contract number 4000112765/14/NL/HK.
5 5 !
6   -! Copyright (C) 2016-2017 University of Nottingham
  6 +! Copyright (C) 2016-2018 University of Nottingham
7 7 !
8 8 ! SACAMOS is free software: you can redistribute it and/or modify it under the
9 9 ! terms of the GNU General Public License as published by the Free Software
... ... @@ -25,6 +25,7 @@
25 25 !
26 26 ! The University of Nottingham can be contacted at: ggiemr@nottingham.ac.uk
27 27 !
  28 +!
28 29 ! File Contents:
29 30 !SUBROUTINE build_name_with_conductor_and_end
30 31 !SUBROUTINE build_name_with_conductor_domainConductor_and_end
... ...
SRC/GENERAL_MODULES/constants.F90
1 1 !
2   -! This file is part of SACAMOS, State of the Art CAble MOdels in Spice.
  2 +! This file is part of SACAMOS, State of the Art CAble MOdels for Spice.
3 3 ! It was developed by the University of Nottingham and the Netherlands Aerospace
4 4 ! Centre (NLR) for ESA under contract number 4000112765/14/NL/HK.
5 5 !
6   -! Copyright (C) 2016-2017 University of Nottingham
  6 +! Copyright (C) 2016-2018 University of Nottingham
7 7 !
8 8 ! SACAMOS is free software: you can redistribute it and/or modify it under the
9 9 ! terms of the GNU General Public License as published by the Free Software
... ... @@ -26,6 +26,7 @@
26 26 ! The University of Nottingham can be contacted at: ggiemr@nottingham.ac.uk
27 27 !
28 28 !
  29 +!
29 30 ! File Contents:
30 31 ! MODULE constants
31 32 !
... ... @@ -107,6 +108,8 @@ IMPLICIT NONE
107 108  
108 109 real(dp) :: max_mesh_edge_length=1d30 ! the maximum mesh edge length on internal boundaries
109 110  
  111 + real(dp) :: gp_edge_length=1d30 ! the edge length at the ground plane
  112 +
110 113 real(dp) :: cg_tol=1d-12 ! tolerance for conjugate gradient solution of Finite element Laplace matrix equation
111 114  
112 115 real(dp) :: Twisted_pair_equivalent_radius=1.5d0 ! The twisted pair commmon mode interaction is calculated by treating the
... ...
SRC/GENERAL_MODULES/convert_case.F90
1 1 !
2   -! This file is part of SACAMOS, State of the Art CAble MOdels in Spice.
  2 +! This file is part of SACAMOS, State of the Art CAble MOdels for Spice.
3 3 ! It was developed by the University of Nottingham and the Netherlands Aerospace
4 4 ! Centre (NLR) for ESA under contract number 4000112765/14/NL/HK.
5 5 !
6   -! Copyright (C) 2016-2017 University of Nottingham
  6 +! Copyright (C) 2016-2018 University of Nottingham
7 7 !
8 8 ! SACAMOS is free software: you can redistribute it and/or modify it under the
9 9 ! terms of the GNU General Public License as published by the Free Software
... ... @@ -25,6 +25,7 @@
25 25 !
26 26 ! The University of Nottingham can be contacted at: ggiemr@nottingham.ac.uk
27 27 !
  28 +!
28 29 ! NAME
29 30 ! convert_to_lower_case
30 31 !
... ...
SRC/GENERAL_MODULES/frequency_spec.F90
1 1 !
2   -! This file is part of SACAMOS, State of the Art CAble MOdels in Spice.
  2 +! This file is part of SACAMOS, State of the Art CAble MOdels for Spice.
3 3 ! It was developed by the University of Nottingham and the Netherlands Aerospace
4 4 ! Centre (NLR) for ESA under contract number 4000112765/14/NL/HK.
5 5 !
6   -! Copyright (C) 2016-2017 University of Nottingham
  6 +! Copyright (C) 2016-2018 University of Nottingham
7 7 !
8 8 ! SACAMOS is free software: you can redistribute it and/or modify it under the
9 9 ! terms of the GNU General Public License as published by the Free Software
... ... @@ -25,6 +25,7 @@
25 25 !
26 26 ! The University of Nottingham can be contacted at: ggiemr@nottingham.ac.uk
27 27 !
  28 +!
28 29 ! File Contents:
29 30 ! MODULE frequency_spec
30 31 ! SUBROUTINE read_and_set_up_frequency_specification
... ...
SRC/GENERAL_MODULES/general_module.F90
1 1 !
2   -! This file is part of SACAMOS, State of the Art CAble MOdels in Spice.
  2 +! This file is part of SACAMOS, State of the Art CAble MOdels for Spice.
3 3 ! It was developed by the University of Nottingham and the Netherlands Aerospace
4 4 ! Centre (NLR) for ESA under contract number 4000112765/14/NL/HK.
5 5 !
6   -! Copyright (C) 2016-2017 University of Nottingham
  6 +! Copyright (C) 2016-2018 University of Nottingham
7 7 !
8 8 ! SACAMOS is free software: you can redistribute it and/or modify it under the
9 9 ! terms of the GNU General Public License as published by the Free Software
... ... @@ -25,6 +25,7 @@
25 25 !
26 26 ! The University of Nottingham can be contacted at: ggiemr@nottingham.ac.uk
27 27 !
  28 +!
28 29 ! File Contents:
29 30 ! MODULE general_module
30 31 !
... ...
SRC/GENERAL_MODULES/generate_shapes.F90
1 1 !
2   -! This file is part of SACAMOS, State of the Art CAble MOdels in Spice.
  2 +! This file is part of SACAMOS, State of the Art CAble MOdels for Spice.
3 3 ! It was developed by the University of Nottingham and the Netherlands Aerospace
4 4 ! Centre (NLR) for ESA under contract number 4000112765/14/NL/HK.
5 5 !
6   -! Copyright (C) 2016-2017 University of Nottingham
  6 +! Copyright (C) 2016-2018 University of Nottingham
7 7 !
8 8 ! SACAMOS is free software: you can redistribute it and/or modify it under the
9 9 ! terms of the GNU General Public License as published by the Free Software
... ... @@ -25,6 +25,7 @@
25 25 !
26 26 ! The University of Nottingham can be contacted at: ggiemr@nottingham.ac.uk
27 27 !
  28 +!
28 29 ! FILE CONTENTS:
29 30 !SUBROUTINE generate_circle_points
30 31 !SUBROUTINE generate_rectangle_points
... ...
SRC/GENERAL_MODULES/plot_geometry.F90
1 1 !
2   -! This file is part of SACAMOS, State of the Art CAble MOdels in Spice.
  2 +! This file is part of SACAMOS, State of the Art CAble MOdels for Spice.
3 3 ! It was developed by the University of Nottingham and the Netherlands Aerospace
4 4 ! Centre (NLR) for ESA under contract number 4000112765/14/NL/HK.
5 5 !
6   -! Copyright (C) 2016-2017 University of Nottingham
  6 +! Copyright (C) 2016-2018 University of Nottingham
7 7 !
8 8 ! SACAMOS is free software: you can redistribute it and/or modify it under the
9 9 ! terms of the GNU General Public License as published by the Free Software
... ... @@ -25,6 +25,7 @@
25 25 !
26 26 ! The University of Nottingham can be contacted at: ggiemr@nottingham.ac.uk
27 27 !
  28 +!
28 29 ! FILE CONTENTS:
29 30 !SUBROUTINE write_circle
30 31 !SUBROUTINE write_rectangle
... ...
SRC/GENERAL_MODULES/program_status.F90
1 1 !
2   -! This file is part of SACAMOS, State of the Art CAble MOdels in Spice.
  2 +! This file is part of SACAMOS, State of the Art CAble MOdels for Spice.
3 3 ! It was developed by the University of Nottingham and the Netherlands Aerospace
4 4 ! Centre (NLR) for ESA under contract number 4000112765/14/NL/HK.
5 5 !
6   -! Copyright (C) 2016-2017 University of Nottingham
  6 +! Copyright (C) 2016-2018 University of Nottingham
7 7 !
8 8 ! SACAMOS is free software: you can redistribute it and/or modify it under the
9 9 ! terms of the GNU General Public License as published by the Free Software
... ... @@ -25,6 +25,7 @@
25 25 !
26 26 ! The University of Nottingham can be contacted at: ggiemr@nottingham.ac.uk
27 27 !
  28 +!
28 29 ! File Contents:
29 30 !
30 31 ! SUBROUTINE write_program_status
... ...
SRC/GENERAL_MODULES/read_version.F90
1 1 !
2   -! This file is part of SACAMOS, State of the Art CAble MOdels in Spice.
  2 +! This file is part of SACAMOS, State of the Art CAble MOdels for Spice.
3 3 ! It was developed by the University of Nottingham and the Netherlands Aerospace
4 4 ! Centre (NLR) for ESA under contract number 4000112765/14/NL/HK.
5 5 !
6   -! Copyright (C) 2016-2017 University of Nottingham
  6 +! Copyright (C) 2016-2018 University of Nottingham
7 7 !
8 8 ! SACAMOS is free software: you can redistribute it and/or modify it under the
9 9 ! terms of the GNU General Public License as published by the Free Software
... ... @@ -25,6 +25,7 @@
25 25 !
26 26 ! The University of Nottingham can be contacted at: ggiemr@nottingham.ac.uk
27 27 !
  28 +!
28 29 ! File Contents:
29 30 !
30 31 ! SUBROUTINE read_version
... ... @@ -52,9 +53,9 @@
52 53  
53 54 include '../compilation_date.inc' ! this file specifies the compilation date
54 55  
55   - write(*,*)'Version :',trim(SPICE_CABLE_MODEL_BUILDER_version)
56   - write(*,*)'Date :',trim(SPICE_CABLE_MODEL_BUILDER_date)
57   - write(*,*)'Compilation date:',trim(SPICE_CABLE_MODEL_BUILDER_compilation_date)
  56 + write(*,*)'Version: ',trim(SPICE_CABLE_MODEL_BUILDER_version)
  57 + write(*,*)'Date: ',trim(SPICE_CABLE_MODEL_BUILDER_date)
  58 + write(*,*)'Compilation date: ',trim(SPICE_CABLE_MODEL_BUILDER_compilation_date)
58 59  
59 60 END SUBROUTINE read_version
60 61  
... ...
SRC/GENERAL_MODULES/read_write_subroutines.F90
1 1 !
2   -! This file is part of SACAMOS, State of the Art CAble MOdels in Spice.
  2 +! This file is part of SACAMOS, State of the Art CAble MOdels for Spice.
3 3 ! It was developed by the University of Nottingham and the Netherlands Aerospace
4 4 ! Centre (NLR) for ESA under contract number 4000112765/14/NL/HK.
5 5 !
6   -! Copyright (C) 2016-2017 University of Nottingham
  6 +! Copyright (C) 2016-2018 University of Nottingham
7 7 !
8 8 ! SACAMOS is free software: you can redistribute it and/or modify it under the
9 9 ! terms of the GNU General Public License as published by the Free Software
... ... @@ -25,6 +25,7 @@
25 25 !
26 26 ! The University of Nottingham can be contacted at: ggiemr@nottingham.ac.uk
27 27 !
  28 +!
28 29 ! File Contents:
29 30 !SUBROUTINE write_license
30 31 !SUBROUTINE path_format
... ... @@ -55,11 +56,11 @@ IMPLICIT NONE
55 56 ! START
56 57  
57 58 write(*,*)''
58   - write(*,*)'This software is part of SACAMOS, State of the Art CAble MOdels in Spice.'
  59 + write(*,*)'This software is part of SACAMOS, State of the Art CAble MOdels for Spice.'
59 60 write(*,*)'It was developed by the University of Nottingham and the Netherlands Aerospace'
60 61 write(*,*)'Centre (NLR) for ESA under contract number 4000112765/14/NL/HK. '
61 62 write(*,*)' '
62   - write(*,*)'Copyright (C) 2016-2017 University of Nottingham '
  63 + write(*,*)'Copyright (C) 2016-2018 University of Nottingham '
63 64 write(*,*)' '
64 65 write(*,*)'SACAMOS is free software: you can redistribute it and/or modify it under the'
65 66 write(*,*)'terms of the GNU General Public License as published by the Free Software'
... ...
SRC/MATHS_MODULES/FFT.F90
1 1 !
2   -! This file is part of SACAMOS, State of the Art CAble MOdels in Spice.
  2 +! This file is part of SACAMOS, State of the Art CAble MOdels for Spice.
3 3 ! It was developed by the University of Nottingham and the Netherlands Aerospace
4 4 ! Centre (NLR) for ESA under contract number 4000112765/14/NL/HK.
5 5 !
6   -! Copyright (C) 2016-2017 University of Nottingham
  6 +! Copyright (C) 2016-2018 University of Nottingham
7 7 !
8 8 ! SACAMOS is free software: you can redistribute it and/or modify it under the
9 9 ! terms of the GNU General Public License as published by the Free Software
... ... @@ -25,6 +25,7 @@
25 25 !
26 26 ! The University of Nottingham can be contacted at: ggiemr@nottingham.ac.uk
27 27 !
  28 +!
28 29 ! File Contents:
29 30 ! SUBROUTINE FFT_TIME_TO_FREQ
30 31 ! SUBROUTINE FFT_FREQ_TO_TIME
... ...
SRC/MATHS_MODULES/cmatrix.F90
1 1 !
2   -! This file is part of SACAMOS, State of the Art CAble MOdels in Spice.
  2 +! This file is part of SACAMOS, State of the Art CAble MOdels for Spice.
3 3 ! It was developed by the University of Nottingham and the Netherlands Aerospace
4 4 ! Centre (NLR) for ESA under contract number 4000112765/14/NL/HK.
5 5 !
6   -! Copyright (C) 2016-2017 University of Nottingham
  6 +! Copyright (C) 2016-2018 University of Nottingham
7 7 !
8 8 ! SACAMOS is free software: you can redistribute it and/or modify it under the
9 9 ! terms of the GNU General Public License as published by the Free Software
... ... @@ -26,6 +26,7 @@
26 26 ! The University of Nottingham can be contacted at: ggiemr@nottingham.ac.uk
27 27 !
28 28 !
  29 +!
29 30 ! SUBROUTINE write_cmatrix(Mat,dim,unit)
30 31 ! SUBROUTINE write_cmatrix_re(Mat,dim,unit)
31 32 ! SUBROUTINE write_cmatrix_im(Mat,dim,unit)
... ...
SRC/MATHS_MODULES/dmatrix.F90
1 1 !
2   -! This file is part of SACAMOS, State of the Art CAble MOdels in Spice.
  2 +! This file is part of SACAMOS, State of the Art CAble MOdels for Spice.
3 3 ! It was developed by the University of Nottingham and the Netherlands Aerospace
4 4 ! Centre (NLR) for ESA under contract number 4000112765/14/NL/HK.
5 5 !
6   -! Copyright (C) 2016-2017 University of Nottingham
  6 +! Copyright (C) 2016-2018 University of Nottingham
7 7 !
8 8 ! SACAMOS is free software: you can redistribute it and/or modify it under the
9 9 ! terms of the GNU General Public License as published by the Free Software
... ... @@ -25,6 +25,7 @@
25 25 !
26 26 ! The University of Nottingham can be contacted at: ggiemr@nottingham.ac.uk
27 27 !
  28 +!
28 29 ! SUBROUTINE dwrite_matrix(a,ar,ac,dim,unit)
29 30 ! SUBROUTINE dread_matrix(a,ar,ac,dim,unit)
30 31 ! SUBROUTINE dinvert_Gauss_Jordan(A,ar,AI,dim)
... ...
SRC/MATHS_MODULES/maths.F90
1 1 !
2   -! This file is part of SACAMOS, State of the Art CAble MOdels in Spice.
  2 +! This file is part of SACAMOS, State of the Art CAble MOdels for Spice.
3 3 ! It was developed by the University of Nottingham and the Netherlands Aerospace
4 4 ! Centre (NLR) for ESA under contract number 4000112765/14/NL/HK.
5 5 !
6   -! Copyright (C) 2016-2017 University of Nottingham
  6 +! Copyright (C) 2016-2018 University of Nottingham
7 7 !
8 8 ! SACAMOS is free software: you can redistribute it and/or modify it under the
9 9 ! terms of the GNU General Public License as published by the Free Software
... ... @@ -25,6 +25,7 @@
25 25 !
26 26 ! The University of Nottingham can be contacted at: ggiemr@nottingham.ac.uk
27 27 !
  28 +!
28 29 ! Name
29 30 ! maths
30 31 !
... ...
SRC/MTL_ANALYTIC_SOLUTION/MTL_analytic_solution.F90
1 1 !
2   -! This file is part of SACAMOS, State of the Art CAble MOdels in Spice.
  2 +! This file is part of SACAMOS, State of the Art CAble MOdels for Spice.
3 3 ! It was developed by the University of Nottingham and the Netherlands Aerospace
4 4 ! Centre (NLR) for ESA under contract number 4000112765/14/NL/HK.
5 5 !
6   -! Copyright (C) 2016-2017 University of Nottingham
  6 +! Copyright (C) 2016-2018 University of Nottingham
7 7 !
8 8 ! SACAMOS is free software: you can redistribute it and/or modify it under the
9 9 ! terms of the GNU General Public License as published by the Free Software
... ... @@ -25,6 +25,7 @@
25 25 !
26 26 ! The University of Nottingham can be contacted at: ggiemr@nottingham.ac.uk
27 27 !
  28 +!
28 29 ! FILE CONTENTS (within include files)
29 30 !
30 31 !frequency_domain_analysis.F90: SUBROUTINE frequency_domain_analysis
... ...
SRC/MTL_ANALYTIC_SOLUTION/frequency_domain_MTL_solution.F90
1 1 !
2   -! This file is part of SACAMOS, State of the Art CAble MOdels in Spice.
  2 +! This file is part of SACAMOS, State of the Art CAble MOdels for Spice.
3 3 ! It was developed by the University of Nottingham and the Netherlands Aerospace
4 4 ! Centre (NLR) for ESA under contract number 4000112765/14/NL/HK.
5 5 !
6   -! Copyright (C) 2016-2017 University of Nottingham
  6 +! Copyright (C) 2016-2018 University of Nottingham
7 7 !
8 8 ! SACAMOS is free software: you can redistribute it and/or modify it under the
9 9 ! terms of the GNU General Public License as published by the Free Software
... ... @@ -25,6 +25,7 @@
25 25 !
26 26 ! The University of Nottingham can be contacted at: ggiemr@nottingham.ac.uk
27 27 !
  28 +!
28 29 ! File Contents:
29 30 ! SUBROUTINE frequency_domain_MTL_solution
30 31 ! SUBROUTINE frequency_domain_MTL_solution_V
... ...
SRC/MTL_ANALYTIC_SOLUTION/frequency_domain_analysis.F90
1 1 !
2   -! This file is part of SACAMOS, State of the Art CAble MOdels in Spice.
  2 +! This file is part of SACAMOS, State of the Art CAble MOdels for Spice.
3 3 ! It was developed by the University of Nottingham and the Netherlands Aerospace
4 4 ! Centre (NLR) for ESA under contract number 4000112765/14/NL/HK.
5 5 !
6   -! Copyright (C) 2016-2017 University of Nottingham
  6 +! Copyright (C) 2016-2018 University of Nottingham
7 7 !
8 8 ! SACAMOS is free software: you can redistribute it and/or modify it under the
9 9 ! terms of the GNU General Public License as published by the Free Software
... ... @@ -25,6 +25,7 @@
25 25 !
26 26 ! The University of Nottingham can be contacted at: ggiemr@nottingham.ac.uk
27 27 !
  28 +!
28 29 ! File Contents:
29 30 ! SUBROUTINE frequency_domain_analysis
30 31 !
... ...
SRC/MTL_ANALYTIC_SOLUTION/incident_field_excitation.F90
1 1 !
2   -! This file is part of SACAMOS, State of the Art CAble MOdels in Spice.
  2 +! This file is part of SACAMOS, State of the Art CAble MOdels for Spice.
3 3 ! It was developed by the University of Nottingham and the Netherlands Aerospace
4 4 ! Centre (NLR) for ESA under contract number 4000112765/14/NL/HK.
5 5 !
6   -! Copyright (C) 2016-2017 University of Nottingham
  6 +! Copyright (C) 2016-2018 University of Nottingham
7 7 !
8 8 ! SACAMOS is free software: you can redistribute it and/or modify it under the
9 9 ! terms of the GNU General Public License as published by the Free Software
... ... @@ -25,6 +25,7 @@
25 25 !
26 26 ! The University of Nottingham can be contacted at: ggiemr@nottingham.ac.uk
27 27 !
  28 +!
28 29 ! File Contents:
29 30 ! SUBROUTINE calc_incident_field_components
30 31 ! SUBROUTINE calculate_incident_field_sources
... ...
SRC/MTL_ANALYTIC_SOLUTION/modal_decomposition.F90
1 1 !
2   -! This file is part of SACAMOS, State of the Art CAble MOdels in Spice.
  2 +! This file is part of SACAMOS, State of the Art CAble MOdels for Spice.
3 3 ! It was developed by the University of Nottingham and the Netherlands Aerospace
4 4 ! Centre (NLR) for ESA under contract number 4000112765/14/NL/HK.
5 5 !
6   -! Copyright (C) 2016-2017 University of Nottingham
  6 +! Copyright (C) 2016-2018 University of Nottingham
7 7 !
8 8 ! SACAMOS is free software: you can redistribute it and/or modify it under the
9 9 ! terms of the GNU General Public License as published by the Free Software
... ... @@ -25,6 +25,7 @@
25 25 !
26 26 ! The University of Nottingham can be contacted at: ggiemr@nottingham.ac.uk
27 27 !
  28 +!
28 29 ! File Contents:
29 30 ! SUBROUTINE modal_decomposition_global
30 31 ! SUBROUTINE modal_decomposition_global_ZY
... ...
SRC/MTL_ANALYTIC_SOLUTION/modal_decomposition_LC.F90
1 1 !
2   -! This file is part of SACAMOS, State of the Art CAble MOdels in Spice.
  2 +! This file is part of SACAMOS, State of the Art CAble MOdels for Spice.
3 3 ! It was developed by the University of Nottingham and the Netherlands Aerospace
4 4 ! Centre (NLR) for ESA under contract number 4000112765/14/NL/HK.
5 5 !
6   -! Copyright (C) 2016-2017 University of Nottingham
  6 +! Copyright (C) 2016-2018 University of Nottingham
7 7 !
8 8 ! SACAMOS is free software: you can redistribute it and/or modify it under the
9 9 ! terms of the GNU General Public License as published by the Free Software
... ... @@ -25,6 +25,7 @@
25 25 !
26 26 ! The University of Nottingham can be contacted at: ggiemr@nottingham.ac.uk
27 27 !
  28 +!
28 29 ! File Contents:
29 30 ! SUBROUTINE modal_decomposition_LC
30 31 ! SUBROUTINE orthogonal_transformation
... ...
SRC/MTL_ANALYTIC_SOLUTION/propagation_correction_filters.F90
1 1 !
2   -! This file is part of SACAMOS, State of the Art CAble MOdels in Spice.
  2 +! This file is part of SACAMOS, State of the Art CAble MOdels for Spice.
3 3 ! It was developed by the University of Nottingham and the Netherlands Aerospace
4 4 ! Centre (NLR) for ESA under contract number 4000112765/14/NL/HK.
5 5 !
6   -! Copyright (C) 2016-2017 University of Nottingham
  6 +! Copyright (C) 2016-2018 University of Nottingham
7 7 !
8 8 ! SACAMOS is free software: you can redistribute it and/or modify it under the
9 9 ! terms of the GNU General Public License as published by the Free Software
... ... @@ -25,6 +25,7 @@
25 25 !
26 26 ! The University of Nottingham can be contacted at: ggiemr@nottingham.ac.uk
27 27 !
  28 +!
28 29 ! File Contents:
29 30 ! SUBROUTINE calculate_propagation_correction_filters
30 31 !
... ...
SRC/MTL_ANALYTIC_SOLUTION/time_domain_analysis.F90
1 1 !
2   -! This file is part of SACAMOS, State of the Art CAble MOdels in Spice.
  2 +! This file is part of SACAMOS, State of the Art CAble MOdels for Spice.
3 3 ! It was developed by the University of Nottingham and the Netherlands Aerospace
4 4 ! Centre (NLR) for ESA under contract number 4000112765/14/NL/HK.
5 5 !
6   -! Copyright (C) 2016-2017 University of Nottingham
  6 +! Copyright (C) 2016-2018 University of Nottingham
7 7 !
8 8 ! SACAMOS is free software: you can redistribute it and/or modify it under the
9 9 ! terms of the GNU General Public License as published by the Free Software
... ... @@ -25,6 +25,7 @@
25 25 !
26 26 ! The University of Nottingham can be contacted at: ggiemr@nottingham.ac.uk
27 27 !
  28 +!
28 29 ! File Contents:
29 30 ! SUBROUTINE time_domain_analysis
30 31 !
... ...
SRC/NETWORK_SYNTHESIS/include_BRUNE_test.F90
1 1 !
2   -! This file is part of SACAMOS, State of the Art CAble MOdels in Spice.
  2 +! This file is part of SACAMOS, State of the Art CAble MOdels for Spice.
3 3 ! It was developed by the University of Nottingham and the Netherlands Aerospace
4 4 ! Centre (NLR) for ESA under contract number 4000112765/14/NL/HK.
5 5 !
6   -! Copyright (C) 2016-2017 University of Nottingham
  6 +! Copyright (C) 2016-2018 University of Nottingham
7 7 !
8 8 ! SACAMOS is free software: you can redistribute it and/or modify it under the
9 9 ! terms of the GNU General Public License as published by the Free Software
... ... @@ -27,6 +27,7 @@
27 27 !
28 28 !
29 29 !
  30 +!
30 31 ! SUBROUTINE BRUNE_test(H,type,CFtype,R,L1out,C,L2out,K,found,HR,remainder_OK,remainder_zero)
31 32 ! SUBROUTINE LC_test_BRUNE(H_PR,L,C,found,HR,remainder_OK,remainder_zero)
32 33 ! SUBROUTINE L_test_BRUNE(H_PR,L,found,HR,remainder_OK,remainder_zero)
... ...
SRC/NETWORK_SYNTHESIS/include_C_test.F90
1 1 !
2   -! This file is part of SACAMOS, State of the Art CAble MOdels in Spice.
  2 +! This file is part of SACAMOS, State of the Art CAble MOdels for Spice.
3 3 ! It was developed by the University of Nottingham and the Netherlands Aerospace
4 4 ! Centre (NLR) for ESA under contract number 4000112765/14/NL/HK.
5 5 !
6   -! Copyright (C) 2016-2017 University of Nottingham
  6 +! Copyright (C) 2016-2018 University of Nottingham
7 7 !
8 8 ! SACAMOS is free software: you can redistribute it and/or modify it under the
9 9 ! terms of the GNU General Public License as published by the Free Software
... ... @@ -27,6 +27,7 @@
27 27 !
28 28 !
29 29 !
  30 +!
30 31 ! SUBROUTINE C_test(H_PR,type,CFtype,R,L,C,found,HR,remainder_OK,remainder_zero)
31 32 !
32 33 !
... ...
SRC/NETWORK_SYNTHESIS/include_LC_test.F90
1 1 !
2   -! This file is part of SACAMOS, State of the Art CAble MOdels in Spice.
  2 +! This file is part of SACAMOS, State of the Art CAble MOdels for Spice.
3 3 ! It was developed by the University of Nottingham and the Netherlands Aerospace
4 4 ! Centre (NLR) for ESA under contract number 4000112765/14/NL/HK.
5 5 !
6   -! Copyright (C) 2016-2017 University of Nottingham
  6 +! Copyright (C) 2016-2018 University of Nottingham
7 7 !
8 8 ! SACAMOS is free software: you can redistribute it and/or modify it under the
9 9 ! terms of the GNU General Public License as published by the Free Software
... ... @@ -25,6 +25,7 @@
25 25 !
26 26 ! The University of Nottingham can be contacted at: ggiemr@nottingham.ac.uk
27 27 !
  28 +!
28 29 ! SUBROUTINE LC_test(H_PR,type,CFtype,R,L,C,found,HR,remainder_OK,remainder_zero)
29 30 !
30 31 !
... ...
SRC/NETWORK_SYNTHESIS/include_L_test.F90
1 1 !
2   -! This file is part of SACAMOS, State of the Art CAble MOdels in Spice.
  2 +! This file is part of SACAMOS, State of the Art CAble MOdels for Spice.
3 3 ! It was developed by the University of Nottingham and the Netherlands Aerospace
4 4 ! Centre (NLR) for ESA under contract number 4000112765/14/NL/HK.
5 5 !
6   -! Copyright (C) 2016-2017 University of Nottingham
  6 +! Copyright (C) 2016-2018 University of Nottingham
7 7 !
8 8 ! SACAMOS is free software: you can redistribute it and/or modify it under the
9 9 ! terms of the GNU General Public License as published by the Free Software
... ... @@ -26,6 +26,7 @@
26 26 ! The University of Nottingham can be contacted at: ggiemr@nottingham.ac.uk
27 27 !
28 28 !
  29 +!
29 30 ! SUBROUTINE L_test(H_PR,type,CFtype,R,L,C,found,HR,remainder_OK,remainder_zero)
30 31 !
31 32 !
... ...
SRC/NETWORK_SYNTHESIS/include_R2_test.F90
1 1 !
2   -! This file is part of SACAMOS, State of the Art CAble MOdels in Spice.
  2 +! This file is part of SACAMOS, State of the Art CAble MOdels for Spice.
3 3 ! It was developed by the University of Nottingham and the Netherlands Aerospace
4 4 ! Centre (NLR) for ESA under contract number 4000112765/14/NL/HK.
5 5 !
6   -! Copyright (C) 2016-2017 University of Nottingham
  6 +! Copyright (C) 2016-2018 University of Nottingham
7 7 !
8 8 ! SACAMOS is free software: you can redistribute it and/or modify it under the
9 9 ! terms of the GNU General Public License as published by the Free Software
... ... @@ -26,6 +26,7 @@
26 26 ! The University of Nottingham can be contacted at: ggiemr@nottingham.ac.uk
27 27 !
28 28 !
  29 +!
29 30 ! SUBROUTINE R2_test(H_PR,type,CFtype,R,L,C,found,HR,remainder_OK,remainder_zero)
30 31 !
31 32 !
... ...
SRC/NETWORK_SYNTHESIS/include_RC_test.F90
1 1 !
2   -! This file is part of SACAMOS, State of the Art CAble MOdels in Spice.
  2 +! This file is part of SACAMOS, State of the Art CAble MOdels for Spice.
3 3 ! It was developed by the University of Nottingham and the Netherlands Aerospace
4 4 ! Centre (NLR) for ESA under contract number 4000112765/14/NL/HK.
5 5 !
6   -! Copyright (C) 2016-2017 University of Nottingham
  6 +! Copyright (C) 2016-2018 University of Nottingham
7 7 !
8 8 ! SACAMOS is free software: you can redistribute it and/or modify it under the
9 9 ! terms of the GNU General Public License as published by the Free Software
... ... @@ -26,6 +26,7 @@
26 26 ! The University of Nottingham can be contacted at: ggiemr@nottingham.ac.uk
27 27 !
28 28 !
  29 +!
29 30 ! SUBROUTINE RC_test(H_PR,type,CFtype,R,L,C,found,HR,remainder_OK,remainder_zero)
30 31 !
31 32 !
... ...
SRC/NETWORK_SYNTHESIS/include_RLC_test.F90
1 1 !
2   -! This file is part of SACAMOS, State of the Art CAble MOdels in Spice.
  2 +! This file is part of SACAMOS, State of the Art CAble MOdels for Spice.
3 3 ! It was developed by the University of Nottingham and the Netherlands Aerospace
4 4 ! Centre (NLR) for ESA under contract number 4000112765/14/NL/HK.
5 5 !
6   -! Copyright (C) 2016-2017 University of Nottingham
  6 +! Copyright (C) 2016-2018 University of Nottingham
7 7 !
8 8 ! SACAMOS is free software: you can redistribute it and/or modify it under the
9 9 ! terms of the GNU General Public License as published by the Free Software
... ... @@ -26,6 +26,7 @@
26 26 ! The University of Nottingham can be contacted at: ggiemr@nottingham.ac.uk
27 27 !
28 28 !
  29 +!
29 30 ! SUBROUTINE RLC_test(H_PR,type,CFtype,R,L,C,found,HR,remainder_OK,remainder_zero)
30 31 !
31 32 !
... ...
SRC/NETWORK_SYNTHESIS/include_RL_test.F90
1 1 !
2   -! This file is part of SACAMOS, State of the Art CAble MOdels in Spice.
  2 +! This file is part of SACAMOS, State of the Art CAble MOdels for Spice.
3 3 ! It was developed by the University of Nottingham and the Netherlands Aerospace
4 4 ! Centre (NLR) for ESA under contract number 4000112765/14/NL/HK.
5 5 !
6   -! Copyright (C) 2016-2017 University of Nottingham
  6 +! Copyright (C) 2016-2018 University of Nottingham
7 7 !
8 8 ! SACAMOS is free software: you can redistribute it and/or modify it under the
9 9 ! terms of the GNU General Public License as published by the Free Software
... ... @@ -25,6 +25,7 @@
25 25 !
26 26 ! The University of Nottingham can be contacted at: ggiemr@nottingham.ac.uk
27 27 !
  28 +!
28 29 ! SUBROUTINE RL_test(H_PR,type,CFtype,R,L,C,found,HR,remainder_OK,remainder_zero)
29 30 !
30 31 !
... ...
SRC/NETWORK_SYNTHESIS/include_R_test.F90
1 1 !
2   -! This file is part of SACAMOS, State of the Art CAble MOdels in Spice.
  2 +! This file is part of SACAMOS, State of the Art CAble MOdels for Spice.
3 3 ! It was developed by the University of Nottingham and the Netherlands Aerospace
4 4 ! Centre (NLR) for ESA under contract number 4000112765/14/NL/HK.
5 5 !
6   -! Copyright (C) 2016-2017 University of Nottingham
  6 +! Copyright (C) 2016-2018 University of Nottingham
7 7 !
8 8 ! SACAMOS is free software: you can redistribute it and/or modify it under the
9 9 ! terms of the GNU General Public License as published by the Free Software
... ... @@ -25,6 +25,7 @@
25 25 !
26 26 ! The University of Nottingham can be contacted at: ggiemr@nottingham.ac.uk
27 27 !
  28 +!
28 29 ! SUBROUTINE R_test(H_PR,type,CFtype,R,L,C,found,HR,remainder_OK,remainder_zero)
29 30 !
30 31 !
... ...
SRC/NETWORK_SYNTHESIS/include_local_filter_subroutines.F90
1 1 !
2   -! This file is part of SACAMOS, State of the Art CAble MOdels in Spice.
  2 +! This file is part of SACAMOS, State of the Art CAble MOdels for Spice.
3 3 ! It was developed by the University of Nottingham and the Netherlands Aerospace
4 4 ! Centre (NLR) for ESA under contract number 4000112765/14/NL/HK.
5 5 !
6   -! Copyright (C) 2016-2017 University of Nottingham
  6 +! Copyright (C) 2016-2018 University of Nottingham
7 7 !
8 8 ! SACAMOS is free software: you can redistribute it and/or modify it under the
9 9 ! terms of the GNU General Public License as published by the Free Software
... ... @@ -25,6 +25,7 @@
25 25 !
26 26 ! The University of Nottingham can be contacted at: ggiemr@nottingham.ac.uk
27 27 !
  28 +
28 29 !
29 30 ! Description
30 31 ! Local filter functions used specifically in the network synthesis processes
... ...
SRC/NETWORK_SYNTHESIS/include_minimum_resistance_function.F90
1 1 !
2   -! This file is part of SACAMOS, State of the Art CAble MOdels in Spice.
  2 +! This file is part of SACAMOS, State of the Art CAble MOdels for Spice.
3 3 ! It was developed by the University of Nottingham and the Netherlands Aerospace
4 4 ! Centre (NLR) for ESA under contract number 4000112765/14/NL/HK.
5 5 !
6   -! Copyright (C) 2016-2017 University of Nottingham
  6 +! Copyright (C) 2016-2018 University of Nottingham
7 7 !
8 8 ! SACAMOS is free software: you can redistribute it and/or modify it under the
9 9 ! terms of the GNU General Public License as published by the Free Software
... ... @@ -25,6 +25,7 @@
25 25 !
26 26 ! The University of Nottingham can be contacted at: ggiemr@nottingham.ac.uk
27 27 !
  28 +!
28 29 ! File Contents:
29 30 ! SUBROUTINE calculate_min_resistance_function(H,R,w0)
30 31 ! SUBROUTINE calculate_min_resistance_value(H,R,w0)
... ...
SRC/NETWORK_SYNTHESIS/include_pole_residue_test_functions.F90
1 1 !
2   -! This file is part of SACAMOS, State of the Art CAble MOdels in Spice.
  2 +! This file is part of SACAMOS, State of the Art CAble MOdels for Spice.
3 3 ! It was developed by the University of Nottingham and the Netherlands Aerospace
4 4 ! Centre (NLR) for ESA under contract number 4000112765/14/NL/HK.
5 5 !
6   -! Copyright (C) 2016-2017 University of Nottingham
  6 +! Copyright (C) 2016-2018 University of Nottingham
7 7 !
8 8 ! SACAMOS is free software: you can redistribute it and/or modify it under the
9 9 ! terms of the GNU General Public License as published by the Free Software
... ... @@ -25,6 +25,7 @@
25 25 !
26 26 ! The University of Nottingham can be contacted at: ggiemr@nottingham.ac.uk
27 27 !
  28 +!
28 29 ! FILE CONTAINS:
29 30 ! FUNCTION conjugate_pair
30 31 ! FUNCTION imaginary_pair
... ...
SRC/NETWORK_SYNTHESIS/include_test_positive_real.F90
1 1 !
2   -! This file is part of SACAMOS, State of the Art CAble MOdels in Spice.
  2 +! This file is part of SACAMOS, State of the Art CAble MOdels for Spice.
3 3 ! It was developed by the University of Nottingham and the Netherlands Aerospace
4 4 ! Centre (NLR) for ESA under contract number 4000112765/14/NL/HK.
5 5 !
6   -! Copyright (C) 2016-2017 University of Nottingham
  6 +! Copyright (C) 2016-2018 University of Nottingham
7 7 !
8 8 ! SACAMOS is free software: you can redistribute it and/or modify it under the
9 9 ! terms of the GNU General Public License as published by the Free Software
... ... @@ -25,6 +25,7 @@
25 25 !
26 26 ! The University of Nottingham can be contacted at: ggiemr@nottingham.ac.uk
27 27 !
  28 +!
28 29 ! SUBROUTINE test_filter_positive_real(H,stable,local_verbose)
29 30 !
30 31 !
... ...
SRC/NETWORK_SYNTHESIS/include_write_frequency_response.F90
1 1 !
2   -! This file is part of SACAMOS, State of the Art CAble MOdels in Spice.
  2 +! This file is part of SACAMOS, State of the Art CAble MOdels for Spice.
3 3 ! It was developed by the University of Nottingham and the Netherlands Aerospace
4 4 ! Centre (NLR) for ESA under contract number 4000112765/14/NL/HK.
5 5 !
6   -! Copyright (C) 2016-2017 University of Nottingham
  6 +! Copyright (C) 2016-2018 University of Nottingham
7 7 !
8 8 ! SACAMOS is free software: you can redistribute it and/or modify it under the
9 9 ! terms of the GNU General Public License as published by the Free Software
... ... @@ -26,6 +26,7 @@
26 26 ! The University of Nottingham can be contacted at: ggiemr@nottingham.ac.uk
27 27 !
28 28 !
  29 +!
29 30 ! Description
30 31 ! This is a fortran fragment which is included in network_synthesis.F90
31 32 ! It is used for testing that the equivalent circuit model reproduces the
... ...
SRC/NETWORK_SYNTHESIS/include_write_spice_model.F90
1 1 !
2   -! This file is part of SACAMOS, State of the Art CAble MOdels in Spice.
  2 +! This file is part of SACAMOS, State of the Art CAble MOdels for Spice.
3 3 ! It was developed by the University of Nottingham and the Netherlands Aerospace
4 4 ! Centre (NLR) for ESA under contract number 4000112765/14/NL/HK.
5 5 !
6   -! Copyright (C) 2016-2017 University of Nottingham
  6 +! Copyright (C) 2016-2018 University of Nottingham
7 7 !
8 8 ! SACAMOS is free software: you can redistribute it and/or modify it under the
9 9 ! terms of the GNU General Public License as published by the Free Software
... ... @@ -26,6 +26,7 @@
26 26 ! The University of Nottingham can be contacted at: ggiemr@nottingham.ac.uk
27 27 !
28 28 !
  29 +!
29 30 ! SUBROUTINE write_ladder_network(Hname,gain,CFterm,CFtype,CF_dim,max_order,R_add,nw,wmin,wmax, &
30 31 ! node_1_in,node_2_in,node_1_out,node_2_out,vref_node,next_free_node,unit)
31 32 !
... ...
SRC/NETWORK_SYNTHESIS/module_network_synthesis.F90
1   -! This file is part of SACAMOS, State of the Art CAble MOdels in Spice.
  1 +!
  2 +! This file is part of SACAMOS, State of the Art CAble MOdels for Spice.
2 3 ! It was developed by the University of Nottingham and the Netherlands Aerospace
3 4 ! Centre (NLR) for ESA under contract number 4000112765/14/NL/HK.
4 5 !
5   -! Copyright (C) 2016-2017 University of Nottingham
  6 +! Copyright (C) 2016-2018 University of Nottingham
6 7 !
7 8 ! SACAMOS is free software: you can redistribute it and/or modify it under the
8 9 ! terms of the GNU General Public License as published by the Free Software
... ... @@ -24,6 +25,7 @@
24 25 !
25 26 ! The University of Nottingham can be contacted at: ggiemr@nottingham.ac.uk
26 27 !
  28 +!
27 29 ! FILE CONTAINS (within include files):
28 30 ! SUBROUTINE BRUNE_test(H,type,CFtype,R,L1out,C,L2out,K,found,HR,remainder_OK,remainder_zero)
29 31 ! SUBROUTINE LC_test_BRUNE(H_PR,L,C,found,HR,remainder_OK,remainder_zero)
... ...
SRC/NETWORK_SYNTHESIS/network_synthesis.F90
1 1 !
2   -! This file is part of SACAMOS, State of the Art CAble MOdels in Spice.
  2 +! This file is part of SACAMOS, State of the Art CAble MOdels for Spice.
3 3 ! It was developed by the University of Nottingham and the Netherlands Aerospace
4 4 ! Centre (NLR) for ESA under contract number 4000112765/14/NL/HK.
5 5 !
6   -! Copyright (C) 2016-2017 University of Nottingham
  6 +! Copyright (C) 2016-2018 University of Nottingham
7 7 !
8 8 ! SACAMOS is free software: you can redistribute it and/or modify it under the
9 9 ! terms of the GNU General Public License as published by the Free Software
... ... @@ -25,6 +25,7 @@
25 25 !
26 26 ! The University of Nottingham can be contacted at: ggiemr@nottingham.ac.uk
27 27 !
  28 +!
28 29 ! File Contents:
29 30 ! SUBROUTINE network_synthesis
30 31 !
... ...
SRC/POLYNOMIAL_AND_FILTER_MODULES/filter_functions.F90
1 1 !
2   -! This file is part of SACAMOS, State of the Art CAble MOdels in Spice.
  2 +! This file is part of SACAMOS, State of the Art CAble MOdels for Spice.
3 3 ! It was developed by the University of Nottingham and the Netherlands Aerospace
4 4 ! Centre (NLR) for ESA under contract number 4000112765/14/NL/HK.
5 5 !
6   -! Copyright (C) 2016-2017 University of Nottingham
  6 +! Copyright (C) 2016-2018 University of Nottingham
7 7 !
8 8 ! SACAMOS is free software: you can redistribute it and/or modify it under the
9 9 ! terms of the GNU General Public License as published by the Free Software
... ... @@ -26,6 +26,7 @@
26 26 ! The University of Nottingham can be contacted at: ggiemr@nottingham.ac.uk
27 27 !
28 28 !
  29 +!
29 30 ! Description
30 31 ! functions related to rational function filter function representations
31 32 ! to be included in filter_module.F90
... ...
SRC/POLYNOMIAL_AND_FILTER_MODULES/filter_module.F90
1 1 !
2   -! This file is part of SACAMOS, State of the Art CAble MOdels in Spice.
  2 +! This file is part of SACAMOS, State of the Art CAble MOdels for Spice.
3 3 ! It was developed by the University of Nottingham and the Netherlands Aerospace
4 4 ! Centre (NLR) for ESA under contract number 4000112765/14/NL/HK.
5 5 !
6   -! Copyright (C) 2016-2017 University of Nottingham
  6 +! Copyright (C) 2016-2018 University of Nottingham
7 7 !
8 8 ! SACAMOS is free software: you can redistribute it and/or modify it under the
9 9 ! terms of the GNU General Public License as published by the Free Software
... ... @@ -26,6 +26,7 @@
26 26 ! The University of Nottingham can be contacted at: ggiemr@nottingham.ac.uk
27 27 !
28 28 !
  29 +!
29 30 ! Name
30 31 ! filter_module
31 32 !
... ...
SRC/POLYNOMIAL_AND_FILTER_MODULES/filter_operators.F90
1 1 !
2   -! This file is part of SACAMOS, State of the Art CAble MOdels in Spice.
  2 +! This file is part of SACAMOS, State of the Art CAble MOdels for Spice.
3 3 ! It was developed by the University of Nottingham and the Netherlands Aerospace
4 4 ! Centre (NLR) for ESA under contract number 4000112765/14/NL/HK.
5 5 !
6   -! Copyright (C) 2016-2017 University of Nottingham
  6 +! Copyright (C) 2016-2018 University of Nottingham
7 7 !
8 8 ! SACAMOS is free software: you can redistribute it and/or modify it under the
9 9 ! terms of the GNU General Public License as published by the Free Software
... ... @@ -26,6 +26,7 @@
26 26 ! The University of Nottingham can be contacted at: ggiemr@nottingham.ac.uk
27 27 !
28 28 !
  29 +!
29 30 !+
30 31 ! Name
31 32 ! filter_operators - overloading operators for filter functions
... ...
SRC/POLYNOMIAL_AND_FILTER_MODULES/filter_subroutines.F90
1 1 !
2   -! This file is part of SACAMOS, State of the Art CAble MOdels in Spice.
  2 +! This file is part of SACAMOS, State of the Art CAble MOdels for Spice.
3 3 ! It was developed by the University of Nottingham and the Netherlands Aerospace
4 4 ! Centre (NLR) for ESA under contract number 4000112765/14/NL/HK.
5 5 !
6   -! Copyright (C) 2016-2017 University of Nottingham
  6 +! Copyright (C) 2016-2018 University of Nottingham
7 7 !
8 8 ! SACAMOS is free software: you can redistribute it and/or modify it under the
9 9 ! terms of the GNU General Public License as published by the Free Software
... ... @@ -26,6 +26,7 @@
26 26 ! The University of Nottingham can be contacted at: ggiemr@nottingham.ac.uk
27 27 !
28 28 !
  29 +!
29 30 ! Description
30 31 ! subroutines related to rational function filter function representations
31 32 ! to be included in filter_module.F90
... ...
SRC/POLYNOMIAL_AND_FILTER_MODULES/filter_types.F90
1 1 !
2   -! This file is part of SACAMOS, State of the Art CAble MOdels in Spice.
  2 +! This file is part of SACAMOS, State of the Art CAble MOdels for Spice.
3 3 ! It was developed by the University of Nottingham and the Netherlands Aerospace
4 4 ! Centre (NLR) for ESA under contract number 4000112765/14/NL/HK.
5 5 !
6   -! Copyright (C) 2016-2017 University of Nottingham
  6 +! Copyright (C) 2016-2018 University of Nottingham
7 7 !
8 8 ! SACAMOS is free software: you can redistribute it and/or modify it under the
9 9 ! terms of the GNU General Public License as published by the Free Software
... ... @@ -25,6 +25,7 @@
25 25 !
26 26 ! The University of Nottingham can be contacted at: ggiemr@nottingham.ac.uk
27 27 !
  28 +!
28 29 ! Description
29 30 ! type definitions for rational function filter function representations
30 31 ! to be included in filter_module.F90
... ...
SRC/POLYNOMIAL_AND_FILTER_MODULES/findroots.F90
1 1 !
2   -! This file is part of SACAMOS, State of the Art CAble MOdels in Spice.
  2 +! This file is part of SACAMOS, State of the Art CAble MOdels for Spice.
3 3 ! It was developed by the University of Nottingham and the Netherlands Aerospace
4 4 ! Centre (NLR) for ESA under contract number 4000112765/14/NL/HK.
5 5 !
6   -! Copyright (C) 2016-2017 University of Nottingham
  6 +! Copyright (C) 2016-2018 University of Nottingham
7 7 !
8 8 ! SACAMOS is free software: you can redistribute it and/or modify it under the
9 9 ! terms of the GNU General Public License as published by the Free Software
... ... @@ -26,6 +26,7 @@
26 26 ! The University of Nottingham can be contacted at: ggiemr@nottingham.ac.uk
27 27 !
28 28 !
  29 +!
29 30 ! FILE CONTENTS
30 31 !
31 32 ! SUBROUTINE findroots(a,roots,poly_order)
... ...
SRC/POLYNOMIAL_AND_FILTER_MODULES/polynomial_functions.F90
1 1 !
2   -! This file is part of SACAMOS, State of the Art CAble MOdels in Spice.
  2 +! This file is part of SACAMOS, State of the Art CAble MOdels for Spice.
3 3 ! It was developed by the University of Nottingham and the Netherlands Aerospace
4 4 ! Centre (NLR) for ESA under contract number 4000112765/14/NL/HK.
5 5 !
6   -! Copyright (C) 2016-2017 University of Nottingham
  6 +! Copyright (C) 2016-2018 University of Nottingham
7 7 !
8 8 ! SACAMOS is free software: you can redistribute it and/or modify it under the
9 9 ! terms of the GNU General Public License as published by the Free Software
... ... @@ -26,6 +26,7 @@
26 26 ! The University of Nottingham can be contacted at: ggiemr@nottingham.ac.uk
27 27 !
28 28 !
  29 +!
29 30 ! NAME
30 31 ! polynomial_functions
31 32 !
... ...
SRC/POLYNOMIAL_AND_FILTER_MODULES/polynomial_operators.F90
1 1 !
2   -! This file is part of SACAMOS, State of the Art CAble MOdels in Spice.
  2 +! This file is part of SACAMOS, State of the Art CAble MOdels for Spice.
3 3 ! It was developed by the University of Nottingham and the Netherlands Aerospace
4 4 ! Centre (NLR) for ESA under contract number 4000112765/14/NL/HK.
5 5 !
6   -! Copyright (C) 2016-2017 University of Nottingham
  6 +! Copyright (C) 2016-2018 University of Nottingham
7 7 !
8 8 ! SACAMOS is free software: you can redistribute it and/or modify it under the
9 9 ! terms of the GNU General Public License as published by the Free Software
... ... @@ -25,6 +25,7 @@
25 25 !
26 26 ! The University of Nottingham can be contacted at: ggiemr@nottingham.ac.uk
27 27 !
  28 +!
28 29 !+
29 30 ! Name
30 31 ! Operators - overloading operators for polynomials
... ...
SRC/POLYNOMIAL_AND_FILTER_MODULES/polynomial_subroutines.F90
1 1 !
2   -! This file is part of SACAMOS, State of the Art CAble MOdels in Spice.
  2 +! This file is part of SACAMOS, State of the Art CAble MOdels for Spice.
3 3 ! It was developed by the University of Nottingham and the Netherlands Aerospace
4 4 ! Centre (NLR) for ESA under contract number 4000112765/14/NL/HK.
5 5 !
6   -! Copyright (C) 2016-2017 University of Nottingham
  6 +! Copyright (C) 2016-2018 University of Nottingham
7 7 !
8 8 ! SACAMOS is free software: you can redistribute it and/or modify it under the
9 9 ! terms of the GNU General Public License as published by the Free Software
... ... @@ -26,6 +26,7 @@
26 26 ! The University of Nottingham can be contacted at: ggiemr@nottingham.ac.uk
27 27 !
28 28 !
  29 +!
29 30 ! Description
30 31 ! subroutines related to polynomial data types
31 32 !
... ...
SRC/POLYNOMIAL_AND_FILTER_MODULES/polynomial_types.F90
1 1 !
2   -! This file is part of SACAMOS, State of the Art CAble MOdels in Spice.
  2 +! This file is part of SACAMOS, State of the Art CAble MOdels for Spice.
3 3 ! It was developed by the University of Nottingham and the Netherlands Aerospace
4 4 ! Centre (NLR) for ESA under contract number 4000112765/14/NL/HK.
5 5 !
6   -! Copyright (C) 2016-2017 University of Nottingham
  6 +! Copyright (C) 2016-2018 University of Nottingham
7 7 !
8 8 ! SACAMOS is free software: you can redistribute it and/or modify it under the
9 9 ! terms of the GNU General Public License as published by the Free Software
... ... @@ -25,6 +25,7 @@
25 25 !
26 26 ! The University of Nottingham can be contacted at: ggiemr@nottingham.ac.uk
27 27 !
  28 +!
28 29 ! Name
29 30 ! polynomial_types
30 31 !
... ...
SRC/PUL_PARAMETER_CALCULATION/Aprod.F90
1   -! This file is part of SACAMOS, State of the Art CAble MOdels in Spice.
  1 +!
  2 +! This file is part of SACAMOS, State of the Art CAble MOdels for Spice.
2 3 ! It was developed by the University of Nottingham and the Netherlands Aerospace
3 4 ! Centre (NLR) for ESA under contract number 4000112765/14/NL/HK.
4 5 !
5   -! Copyright (C) 2016-2017 University of Nottingham
  6 +! Copyright (C) 2016-2018 University of Nottingham
6 7 !
7 8 ! SACAMOS is free software: you can redistribute it and/or modify it under the
8 9 ! terms of the GNU General Public License as published by the Free Software
... ... @@ -24,6 +25,7 @@
24 25 !
25 26 ! The University of Nottingham can be contacted at: ggiemr@nottingham.ac.uk
26 27 !
  28 +!
27 29 ! File Contents:
28 30 !
29 31 ! SUBROUTINE Aprod
... ...
SRC/PUL_PARAMETER_CALCULATION/CG_solve.F90
1 1 !
2   -! This file is part of SACAMOS, State of the Art CAble MOdels in Spice.
  2 +! This file is part of SACAMOS, State of the Art CAble MOdels for Spice.
3 3 ! It was developed by the University of Nottingham and the Netherlands Aerospace
4 4 ! Centre (NLR) for ESA under contract number 4000112765/14/NL/HK.
5 5 !
6   -! Copyright (C) 2016-2017 University of Nottingham
  6 +! Copyright (C) 2016-2018 University of Nottingham
7 7 !
8 8 ! SACAMOS is free software: you can redistribute it and/or modify it under the
9 9 ! terms of the GNU General Public License as published by the Free Software
... ... @@ -25,9 +25,10 @@
25 25 !
26 26 ! The University of Nottingham can be contacted at: ggiemr@nottingham.ac.uk
27 27 !
  28 +!
28 29 ! SUBROUTINE solve_real_symm(n, b, x,tol,itmax)
29 30 ! SUBROUTINE dot ( n, x, y ,res)
30   -! SUBROUTINE solve_complex_symm(n, b, x,tolitmax)
  31 +! SUBROUTINE solve_complex_symm(n, b, x,tol,itmax)
31 32 ! SUBROUTINE zdot ( n, x, y ,res)
32 33 !
33 34 ! NAME
... ...
SRC/PUL_PARAMETER_CALCULATION/Laplace.F90
1 1 !
2   -! This file is part of SACAMOS, State of the Art CAble MOdels in Spice.
  2 +! This file is part of SACAMOS, State of the Art CAble MOdels for Spice.
3 3 ! It was developed by the University of Nottingham and the Netherlands Aerospace
4 4 ! Centre (NLR) for ESA under contract number 4000112765/14/NL/HK.
5 5 !
6   -! Copyright (C) 2016-2017 University of Nottingham
  6 +! Copyright (C) 2016-2018 University of Nottingham
7 7 !
8 8 ! SACAMOS is free software: you can redistribute it and/or modify it under the
9 9 ! terms of the GNU General Public License as published by the Free Software
... ... @@ -25,6 +25,7 @@
25 25 !
26 26 ! The University of Nottingham can be contacted at: ggiemr@nottingham.ac.uk
27 27 !
  28 +!
28 29 ! File Contents:
29 30 !
30 31 ! SUBROUTINE Laplace
... ... @@ -1098,6 +1099,7 @@ else if(.NOT.lossy_dielectric) then
1098 1099 v_tmp(1:n_known)=V(j1,j2,1:n_known)
1099 1100 b_tmp(1:N_unknown)=-matmul(K_rhs,v_tmp)
1100 1101 bt(1:N_unknown)=b_tmp(1:N_unknown)
  1102 + xt(1:N_unknown)=0d0 ! initial guess for xt
1101 1103  
1102 1104 ! conjugate gradient solution
1103 1105 CALL solve_real_symm(N_unknown, bt, xt, rtol, itnlim)
... ... @@ -1121,6 +1123,7 @@ else if (lossy_dielectric) then
1121 1123  
1122 1124 v_tmp(1:n_known)=V(j1,j2,1:n_known)
1123 1125 b_tmp(1:N_unknown)=-matmul(K_rhs,v_tmp)
  1126 + x_tmp(1:N_unknown)=(0d0,0d0) ! initial guess for x_tmp
1124 1127  
1125 1128 ! conjugate gradient solution
1126 1129 CALL solve_complex_symm(N_unknown, b_tmp, x_tmp, rtol,itnlim )
... ...
SRC/PUL_PARAMETER_CALCULATION/PUL_LC_Laplace.F90
1 1 !
2   -! This file is part of SACAMOS, State of the Art CAble MOdels in Spice.
  2 +! This file is part of SACAMOS, State of the Art CAble MOdels for Spice.
3 3 ! It was developed by the University of Nottingham and the Netherlands Aerospace
4 4 ! Centre (NLR) for ESA under contract number 4000112765/14/NL/HK.
5 5 !
6   -! Copyright (C) 2016-2017 University of Nottingham
  6 +! Copyright (C) 2016-2018 University of Nottingham
7 7 !
8 8 ! SACAMOS is free software: you can redistribute it and/or modify it under the
9 9 ! terms of the GNU General Public License as published by the Free Software
... ... @@ -25,6 +25,7 @@
25 25 !
26 26 ! The University of Nottingham can be contacted at: ggiemr@nottingham.ac.uk
27 27 !
  28 +!
28 29 ! File Contents:
29 30 !
30 31 ! SUBROUTINE PUL_LC_Laplace
... ... @@ -130,6 +131,8 @@ IMPLICIT NONE
130 131 real(dp),allocatable :: rtheta(:) ! rotation angle of conductor
131 132 real(dp),allocatable :: dl(:) ! edge length for the mesh on this shape
132 133 logical,allocatable :: conductor_has_dielectric(:) ! flag to indicate that a conductor has a dielectric around it
  134 +
  135 + real(dp) :: dl_gp ! edge length at the centre of the ground plane
133 136  
134 137 real(dp) :: dl_local ! edge length for the mesh at rectangle edge centre
135 138  
... ... @@ -449,6 +452,8 @@ IMPLICIT NONE
449 452 dl(1)=r(1)/(2*Laplace_surface_mesh_constant)
450 453 shape_to_region(1,inside) =0 ! inside is the dielectric region
451 454 shape_to_region(1,outside)=-1 ! no outside region
  455 +
  456 + dl_gp=min(gp_edge_length,dl(1))
452 457  
453 458 end if ! infinite ground plane
454 459  
... ... @@ -761,11 +766,11 @@ IMPLICIT NONE
761 766 CALL write_Dshape_gmsh(x(i),y(i),rw(i),rw2(i),rh(i),r(i),rox(i),roy(i),rtheta(i),dl(i),point,i,gmsh_geometry_file_unit)
762 767  
763 768 else if (shape_type(i).EQ.semicircle) then
764   -
  769 +
765 770 write(gmsh_geometry_file_unit,*)' // semicircle ',i
766 771 point=point+1
767 772 write(gmsh_geometry_file_unit,*)'Point(',point,' ) = {',x(i)-xc+rox(i),',' &
768   - ,y(i)-yc+roy(i),',',0.0,',' ,dl(i),' };'
  773 + ,y(i)-yc+roy(i),',',0.0,',' ,dl_gp,' };' ! middle of ground plane point
769 774 point=point+1
770 775 write(gmsh_geometry_file_unit,*)'Point(',point,' ) = {',x(i)-xc+rox(i)+r(i),',' &
771 776 ,y(i)-yc+roy(i),',',0.0,',',dl(i),' };'
... ...
SRC/PUL_PARAMETER_CALCULATION/PUL_analytic.F90
1 1 !
2   -! This file is part of SACAMOS, State of the Art CAble MOdels in Spice.
  2 +! This file is part of SACAMOS, State of the Art CAble MOdels for Spice.
3 3 ! It was developed by the University of Nottingham and the Netherlands Aerospace
4 4 ! Centre (NLR) for ESA under contract number 4000112765/14/NL/HK.
5 5 !
6   -! Copyright (C) 2016-2017 University of Nottingham
  6 +! Copyright (C) 2016-2018 University of Nottingham
7 7 !
8 8 ! SACAMOS is free software: you can redistribute it and/or modify it under the
9 9 ! terms of the GNU General Public License as published by the Free Software
... ... @@ -25,6 +25,7 @@
25 25 !
26 26 ! The University of Nottingham can be contacted at: ggiemr@nottingham.ac.uk
27 27 !
  28 +!
28 29 ! File Contents:
29 30 !
30 31 ! SUBROUTINE PUL_LC_calc_wide_separation_approximation
... ...
SRC/PUL_PARAMETER_CALCULATION/PUL_parameter_module.F90
1 1 !
2   -! This file is part of SACAMOS, State of the Art CAble MOdels in Spice.
  2 +! This file is part of SACAMOS, State of the Art CAble MOdels for Spice.
3 3 ! It was developed by the University of Nottingham and the Netherlands Aerospace
4 4 ! Centre (NLR) for ESA under contract number 4000112765/14/NL/HK.
5 5 !
6   -! Copyright (C) 2016-2017 University of Nottingham
  6 +! Copyright (C) 2016-2018 University of Nottingham
7 7 !
8 8 ! SACAMOS is free software: you can redistribute it and/or modify it under the
9 9 ! terms of the GNU General Public License as published by the Free Software
... ... @@ -25,6 +25,7 @@
25 25 !
26 26 ! The University of Nottingham can be contacted at: ggiemr@nottingham.ac.uk
27 27 !
  28 +!
28 29 ! File Contents:
29 30 ! MODULE PUL_parameter_module
30 31 ! CONTAINS
... ...
SRC/SFILTER_FIT/Calculate_Sfilter.F90
1 1 !
2   -! This file is part of SACAMOS, State of the Art CAble MOdels in Spice.
  2 +! This file is part of SACAMOS, State of the Art CAble MOdels for Spice.
3 3 ! It was developed by the University of Nottingham and the Netherlands Aerospace
4 4 ! Centre (NLR) for ESA under contract number 4000112765/14/NL/HK.
5 5 !
6   -! Copyright (C) 2016-2017 University of Nottingham
  6 +! Copyright (C) 2016-2018 University of Nottingham
7 7 !
8 8 ! SACAMOS is free software: you can redistribute it and/or modify it under the
9 9 ! terms of the GNU General Public License as published by the Free Software
... ... @@ -25,6 +25,7 @@
25 25 !
26 26 ! The University of Nottingham can be contacted at: ggiemr@nottingham.ac.uk
27 27 !
  28 +!
28 29 ! File contents:
29 30 ! SUBROUTINE Calculate_Sfilter
30 31 !
... ...
SRC/SFILTER_FIT/Sfilter_fit_module.F90
1 1 !
2   -! This file is part of SACAMOS, State of the Art CAble MOdels in Spice.
  2 +! This file is part of SACAMOS, State of the Art CAble MOdels for Spice.
3 3 ! It was developed by the University of Nottingham and the Netherlands Aerospace
4 4 ! Centre (NLR) for ESA under contract number 4000112765/14/NL/HK.
5 5 !
6   -! Copyright (C) 2016-2017 University of Nottingham
  6 +! Copyright (C) 2016-2018 University of Nottingham
7 7 !
8 8 ! SACAMOS is free software: you can redistribute it and/or modify it under the
9 9 ! terms of the GNU General Public License as published by the Free Software
... ... @@ -25,6 +25,7 @@
25 25 !
26 26 ! The University of Nottingham can be contacted at: ggiemr@nottingham.ac.uk
27 27 !
  28 +!
28 29 ! FILE CONTENTS (in include files)
29 30 !
30 31 ! SUBROUTINE Calculate_Sfilter
... ...
SRC/SFILTER_FIT/Weiner_Hopf.F90
1 1 !
2   -! This file is part of SACAMOS, State of the Art CAble MOdels in Spice.
  2 +! This file is part of SACAMOS, State of the Art CAble MOdels for Spice.
3 3 ! It was developed by the University of Nottingham and the Netherlands Aerospace
4 4 ! Centre (NLR) for ESA under contract number 4000112765/14/NL/HK.
5 5 !
6   -! Copyright (C) 2016-2017 University of Nottingham
  6 +! Copyright (C) 2016-2018 University of Nottingham
7 7 !
8 8 ! SACAMOS is free software: you can redistribute it and/or modify it under the
9 9 ! terms of the GNU General Public License as published by the Free Software
... ... @@ -25,6 +25,7 @@
25 25 !
26 26 ! The University of Nottingham can be contacted at: ggiemr@nottingham.ac.uk
27 27 !
  28 +!
28 29 ! File contents:
29 30 ! SUBROUTINE Weiner_Hopf
30 31 !
... ...
SRC/SFILTER_FIT/filter_MSE.F90
1 1 !
2   -! This file is part of SACAMOS, State of the Art CAble MOdels in Spice.
  2 +! This file is part of SACAMOS, State of the Art CAble MOdels for Spice.
3 3 ! It was developed by the University of Nottingham and the Netherlands Aerospace
4 4 ! Centre (NLR) for ESA under contract number 4000112765/14/NL/HK.
5 5 !
6   -! Copyright (C) 2016-2017 University of Nottingham
  6 +! Copyright (C) 2016-2018 University of Nottingham
7 7 !
8 8 ! SACAMOS is free software: you can redistribute it and/or modify it under the
9 9 ! terms of the GNU General Public License as published by the Free Software
... ... @@ -25,6 +25,7 @@
25 25 !
26 26 ! The University of Nottingham can be contacted at: ggiemr@nottingham.ac.uk
27 27 !
  28 +!
28 29 ! File contents:
29 30 ! SUBROUTINE filter_MSE
30 31 !
... ...
SRC/SPICE_CABLE_BUNDLE_MODULES/circuit_symbol_module.F90
1 1 !
2   -! This file is part of SACAMOS, State of the Art CAble MOdels in Spice.
  2 +! This file is part of SACAMOS, State of the Art CAble MOdels for Spice.
3 3 ! It was developed by the University of Nottingham and the Netherlands Aerospace
4 4 ! Centre (NLR) for ESA under contract number 4000112765/14/NL/HK.
5 5 !
6   -! Copyright (C) 2016-2017 University of Nottingham
  6 +! Copyright (C) 2016-2018 University of Nottingham
7 7 !
8 8 ! SACAMOS is free software: you can redistribute it and/or modify it under the
9 9 ! terms of the GNU General Public License as published by the Free Software
... ... @@ -25,6 +25,7 @@
25 25 !
26 26 ! The University of Nottingham can be contacted at: ggiemr@nottingham.ac.uk
27 27 !
  28 +!
28 29 ! File Contents:
29 30 ! MODULE circuit_symbol_module
30 31 !
... ...
SRC/SPICE_CABLE_BUNDLE_MODULES/spice_cable_bundle_module.F90
1 1 !
2   -! This file is part of SACAMOS, State of the Art CAble MOdels in Spice.
  2 +! This file is part of SACAMOS, State of the Art CAble MOdels for Spice.
3 3 ! It was developed by the University of Nottingham and the Netherlands Aerospace
4 4 ! Centre (NLR) for ESA under contract number 4000112765/14/NL/HK.
5 5 !
6   -! Copyright (C) 2016-2017 University of Nottingham
  6 +! Copyright (C) 2016-2018 University of Nottingham
7 7 !
8 8 ! SACAMOS is free software: you can redistribute it and/or modify it under the
9 9 ! terms of the GNU General Public License as published by the Free Software
... ... @@ -25,6 +25,7 @@
25 25 !
26 26 ! The University of Nottingham can be contacted at: ggiemr@nottingham.ac.uk
27 27 !
  28 +!
28 29 ! File Contents:
29 30 ! MODULE spice_cable_bundle_module
30 31 ! CONTAINSE
... ...
SRC/TYPE_SPECIFICATION_MODULE/type_specifications.F90
1 1 !
2   -! This file is part of SACAMOS, State of the Art CAble MOdels in Spice.
  2 +! This file is part of SACAMOS, State of the Art CAble MOdels for Spice.
3 3 ! It was developed by the University of Nottingham and the Netherlands Aerospace
4 4 ! Centre (NLR) for ESA under contract number 4000112765/14/NL/HK.
5 5 !
6   -! Copyright (C) 2016-2017 University of Nottingham
  6 +! Copyright (C) 2016-2018 University of Nottingham
7 7 !
8 8 ! SACAMOS is free software: you can redistribute it and/or modify it under the
9 9 ! terms of the GNU General Public License as published by the Free Software
... ... @@ -25,6 +25,7 @@
25 25 !
26 26 ! The University of Nottingham can be contacted at: ggiemr@nottingham.ac.uk
27 27 !
  28 +!
28 29 ! File Contents:
29 30 ! MODULE type_specifications
30 31 !
... ...
SRC/cable_bundle_model_builder.F90
1 1 !
2   -! This file is part of SACAMOS, State of the Art CAble MOdels in Spice.
  2 +! This file is part of SACAMOS, State of the Art CAble MOdels for Spice.
3 3 ! It was developed by the University of Nottingham and the Netherlands Aerospace
4 4 ! Centre (NLR) for ESA under contract number 4000112765/14/NL/HK.
5 5 !
6   -! Copyright (C) 2016-2017 University of Nottingham
  6 +! Copyright (C) 2016-2018 University of Nottingham
7 7 !
8 8 ! SACAMOS is free software: you can redistribute it and/or modify it under the
9 9 ! terms of the GNU General Public License as published by the Free Software
... ... @@ -26,6 +26,7 @@
26 26 ! The University of Nottingham can be contacted at: ggiemr@nottingham.ac.uk
27 27 !
28 28 !
  29 +!
29 30 ! File Contents:
30 31 ! PROGRAM cable_bundle_model_builder
31 32 !
... ... @@ -362,6 +363,10 @@ integer :: dim
362 363 read(bundle_spec_file_unit,*,END=9000,ERR=9000)max_mesh_edge_length
363 364 end if
364 365  
  366 + if (INDEX(line,'gp_edge_length').NE.0) then
  367 + read(bundle_spec_file_unit,*,END=9000,ERR=9000)gp_edge_length
  368 + end if
  369 +
365 370 if (INDEX(line,'cg_tol').NE.0) then
366 371 read(bundle_spec_file_unit,*,END=9000,ERR=9000)cg_tol
367 372 end if
... ...
SRC/cable_model_builder.F90
1 1 !
2   -! This file is part of SACAMOS, State of the Art CAble MOdels in Spice.
  2 +! This file is part of SACAMOS, State of the Art CAble MOdels for Spice.
3 3 ! It was developed by the University of Nottingham and the Netherlands Aerospace
4 4 ! Centre (NLR) for ESA under contract number 4000112765/14/NL/HK.
5 5 !
6   -! Copyright (C) 2016-2017 University of Nottingham
  6 +! Copyright (C) 2016-2018 University of Nottingham
7 7 !
8 8 ! SACAMOS is free software: you can redistribute it and/or modify it under the
9 9 ! terms of the GNU General Public License as published by the Free Software
... ...
SRC/compare_results.F90
1 1 !
2   -! This file is part of SACAMOS, State of the Art CAble MOdels in Spice.
  2 +! This file is part of SACAMOS, State of the Art CAble MOdels for Spice.
3 3 ! It was developed by the University of Nottingham and the Netherlands Aerospace
4 4 ! Centre (NLR) for ESA under contract number 4000112765/14/NL/HK.
5 5 !
6   -! Copyright (C) 2016-2017 University of Nottingham
  6 +! Copyright (C) 2016-2018 University of Nottingham
7 7 !
8 8 ! SACAMOS is free software: you can redistribute it and/or modify it under the
9 9 ! terms of the GNU General Public License as published by the Free Software
... ... @@ -26,6 +26,7 @@
26 26 ! The University of Nottingham can be contacted at: ggiemr@nottingham.ac.uk
27 27 !
28 28 !
  29 +!
29 30 ! File Contents:
30 31 !
31 32 ! MODULE compare_results_data
... ...
SRC/rational_function_fit.F90
1 1 !
2   -! This file is part of SACAMOS, State of the Art CAble MOdels in Spice.
  2 +! This file is part of SACAMOS, State of the Art CAble MOdels for Spice.
3 3 ! It was developed by the University of Nottingham and the Netherlands Aerospace
4 4 ! Centre (NLR) for ESA under contract number 4000112765/14/NL/HK.
5 5 !
6   -! Copyright (C) 2016-2017 University of Nottingham
  6 +! Copyright (C) 2016-2018 University of Nottingham
7 7 !
8 8 ! SACAMOS is free software: you can redistribute it and/or modify it under the
9 9 ! terms of the GNU General Public License as published by the Free Software
... ... @@ -25,6 +25,7 @@
25 25 !
26 26 ! The University of Nottingham can be contacted at: ggiemr@nottingham.ac.uk
27 27 !
  28 +!
28 29 ! File Contents:
29 30 ! PROGRAM rational_function_fit
30 31 !
... ...
SRC/shield_conductor_and_transfer_impedance_model_builder.F90
1 1 !
2   -! This file is part of SACAMOS, State of the Art CAble MOdels in Spice.
  2 +! This file is part of SACAMOS, State of the Art CAble MOdels for Spice.
3 3 ! It was developed by the University of Nottingham and the Netherlands Aerospace
4 4 ! Centre (NLR) for ESA under contract number 4000112765/14/NL/HK.
5 5 !
6   -! Copyright (C) 2016-2017 University of Nottingham
  6 +! Copyright (C) 2016-2018 University of Nottingham
7 7 !
8 8 ! SACAMOS is free software: you can redistribute it and/or modify it under the
9 9 ! terms of the GNU General Public License as published by the Free Software
... ... @@ -25,6 +25,7 @@
25 25 !
26 26 ! The University of Nottingham can be contacted at: ggiemr@nottingham.ac.uk
27 27 !
  28 +!
28 29 ! File Contents:
29 30 ! PROGRAM shield_conductor_and_transfer_impedance_model_builder
30 31 !
... ...
SRC/spice_cable_bundle_model_builder.F90
1 1 !
2   -! This file is part of SACAMOS, State of the Art CAble MOdels in Spice.
  2 +! This file is part of SACAMOS, State of the Art CAble MOdels for Spice.
3 3 ! It was developed by the University of Nottingham and the Netherlands Aerospace
4 4 ! Centre (NLR) for ESA under contract number 4000112765/14/NL/HK.
5 5 !
6   -! Copyright (C) 2016-2017 University of Nottingham
  6 +! Copyright (C) 2016-2018 University of Nottingham
7 7 !
8 8 ! SACAMOS is free software: you can redistribute it and/or modify it under the
9 9 ! terms of the GNU General Public License as published by the Free Software
... ... @@ -25,6 +25,7 @@
25 25 !
26 26 ! The University of Nottingham can be contacted at: ggiemr@nottingham.ac.uk
27 27 !
  28 +!
28 29 ! File Contents:
29 30 ! PROGRAM spice_cable_bundle_model_builder
30 31 !
... ...