Commit fe64b32b1e7ad5e7b47ede2e3400a14d51ee5fd1
1 parent
981a5185
Exists in
master
and in
3 other branches
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 | ! | ... | ... |