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
Too many changes.
To preserve performance only 100 of 105 files displayed.
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 | ... | ... |