diff --git a/404.html b/404.html
index a2ad107..9807a7e 100644
--- a/404.html
+++ b/404.html
@@ -1,2 +1,2 @@
-<!doctype html><html lang=en dir=ltr class="docs-wrapper plugin-docs plugin-id-default docs-version-current" data-has-hydrated=false><meta charset=UTF-8><meta name=generator content="Docusaurus v3.6.1"><title data-rh=true>Fortran Tutorial</title><meta data-rh=true property=og:title content="Fortran Tutorial"><meta data-rh=true name=viewport content="width=device-width,initial-scale=1.0"><meta data-rh=true name=twitter:card content=summary_large_image><meta data-rh=true property=og:url content=https://pranabdas.github.io/fortran/404.html><meta data-rh=true property=og:locale content=en><meta data-rh=true name=docusaurus_locale content=en><meta data-rh=true name=docsearch:language content=en><meta data-rh=true name=theme-color content=#06445c><meta data-rh=true name=docusaurus_version content=current><meta data-rh=true name=docusaurus_tag content=docs-default-current><meta data-rh=true name=docsearch:version content=current><meta data-rh=true name=docsearch:docusaurus_tag content=docs-default-current><link data-rh=true rel=icon href=/fortran/img/favicon.png><link data-rh=true rel=canonical href=https://pranabdas.github.io/fortran/404.html><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/404.html hreflang=en><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/404.html hreflang=x-default><link rel=stylesheet href=https://pranabdas.github.io/drive/webfonts/katex/katex.min.css><link rel=stylesheet href=/fortran/assets/css/styles.4de1c8a8.css><script src=/fortran/assets/js/runtime~main.866c090c.js defer></script><script src=/fortran/assets/js/main.ec888ba8.js defer></script><body class=navigation-with-keyboard><script>!function(){var t,e=function(){try{return new URLSearchParams(window.location.search).get("docusaurus-theme")}catch(t){}}()||function(){try{return window.localStorage.getItem("theme")}catch(t){}}();t=null!==e?e:window.matchMedia("(prefers-color-scheme: dark)").matches?"dark":(window.matchMedia("(prefers-color-scheme: light)").matches,"light"),document.documentElement.setAttribute("data-theme",t)}(),function(){try{for(var[t,e]of new URLSearchParams(window.location.search).entries())if(t.startsWith("docusaurus-data-")){var a=t.replace("docusaurus-data-","data-");document.documentElement.setAttribute(a,e)}}catch(t){}}()</script><div id=__docusaurus><div role=region aria-label="Skip to main content"><a class=skipToContent_fXgn href=#__docusaurus_skipToContent_fallback>Skip to main content</a></div><nav aria-label=Main class="navbar navbar--fixed-top navbarHideable_m1mJ"><div class=navbar__inner><div class=navbar__items><button aria-label="Toggle navigation bar" aria-expanded=false class="navbar__toggle clean-btn" type=button><svg width=30 height=30 viewBox="0 0 30 30" aria-hidden=true><path stroke=currentColor stroke-linecap=round stroke-miterlimit=10 stroke-width=2 d="M4 7h22M4 15h22M4 23h22"/></svg></button><a class=navbar__brand href=/fortran/><div class=navbar__logo><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--light_NVdE"><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--dark_xIcU"></div><b class="navbar__title text--truncate">Fortran</b></a><div class="navbar__item dropdown dropdown--hoverable"><a aria-current=page class="navbar__link active" aria-haspopup=true aria-expanded=false role=button href=/fortran/>Docs</a><ul class=dropdown__menu><li><a aria-current=page class="dropdown__link dropdown__link--active" href=/fortran/>Fortran Programming</a><li><a href=https://pranabdas.github.io/docs/ rel="noopener noreferrer" class=dropdown__link>~ ~ ~ Other Docs ~ ~ ~</a><li><a href=https://pranabdas.github.io/arpespythontools/ rel="noopener noreferrer" class=dropdown__link>ARPES Python Tools</a><li><a href=https://pranabdas.github.io/c-cpp/ rel="noopener noreferrer" class=dropdown__link>C and C++ Programming</a><li><a href=https://pranabdas.github.io/condmat-notes/ rel="noopener noreferrer" class=dropdown__link>Condensed Matter Notes</a><li><a href=https://pranabdas.github.io/javascript/ rel="noopener noreferrer" class=dropdown__link>Javascript Tutorial</a><li><a href=https://pranabdas.github.io/linux/ rel="noopener noreferrer" class=dropdown__link>Linux Tutorial</a><li><a href=https://pranabdas.github.io/machine-learning/ rel="noopener noreferrer" class=dropdown__link>Machine Learning Notes</a><li><a href=https://pranabdas.github.io/openmx/ rel="noopener noreferrer" class=dropdown__link>OpenMX tutorial</a><li><a href=https://pranabdas.github.io/python-tutorial/ rel="noopener noreferrer" class=dropdown__link>Python Tutorial</a><li><a href=https://pranabdas.github.io/espresso/ rel="noopener noreferrer" class=dropdown__link>Quantum Espresso Tutorial</a><li><a href=https://pranabdas.github.io/rust/ rel="noopener noreferrer" class=dropdown__link>Rust Programming</a><li><a href=https://pranabdas.github.io/arpes-manual/ rel="noopener noreferrer" class=dropdown__link>SUV ARPES Manual</a><li><a href=https://pranabdas.github.io/suvtools/ rel="noopener noreferrer" class=dropdown__link>SUV Python Tools</a></ul></div></div><div class="navbar__items navbar__items--right"><a href=https://github.com/pranabdas/fortran rel="noopener noreferrer" class="navbar__item navbar__link header-github-link" aria-label="GitHub repository" title="Visit project repository in GitHub"></a><a href=https://pranabdas.github.io rel="noopener noreferrer" class="navbar__item navbar__link header-homepage-link" aria-label="About me" title="Go to Pranab's Homepage"></a><div class="toggle_vylO colorModeToggle_DEke"><button class="clean-btn toggleButton_gllP toggleButtonDisabled_aARS" type=button disabled title="Switch between dark and light mode (currently light mode)" aria-label="Switch between dark and light mode (currently light mode)" aria-live=polite aria-pressed=false><svg viewBox="0 0 24 24" width=24 height=24 class=lightToggleIcon_pyhR><path fill=currentColor d="M12,9c1.65,0,3,1.35,3,3s-1.35,3-3,3s-3-1.35-3-3S10.35,9,12,9 M12,7c-2.76,0-5,2.24-5,5s2.24,5,5,5s5-2.24,5-5 S14.76,7,12,7L12,7z M2,13l2,0c0.55,0,1-0.45,1-1s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S1.45,13,2,13z M20,13l2,0c0.55,0,1-0.45,1-1 s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S19.45,13,20,13z M11,2v2c0,0.55,0.45,1,1,1s1-0.45,1-1V2c0-0.55-0.45-1-1-1S11,1.45,11,2z M11,20v2c0,0.55,0.45,1,1,1s1-0.45,1-1v-2c0-0.55-0.45-1-1-1C11.45,19,11,19.45,11,20z M5.99,4.58c-0.39-0.39-1.03-0.39-1.41,0 c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0s0.39-1.03,0-1.41L5.99,4.58z M18.36,16.95 c-0.39-0.39-1.03-0.39-1.41,0c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0c0.39-0.39,0.39-1.03,0-1.41 L18.36,16.95z M19.42,5.99c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06c-0.39,0.39-0.39,1.03,0,1.41 s1.03,0.39,1.41,0L19.42,5.99z M7.05,18.36c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06 c-0.39,0.39-0.39,1.03,0,1.41s1.03,0.39,1.41,0L7.05,18.36z"/></svg><svg viewBox="0 0 24 24" width=24 height=24 class=darkToggleIcon_wfgR><path fill=currentColor d="M9.37,5.51C9.19,6.15,9.1,6.82,9.1,7.5c0,4.08,3.32,7.4,7.4,7.4c0.68,0,1.35-0.09,1.99-0.27C17.45,17.19,14.93,19,12,19 c-3.86,0-7-3.14-7-7C5,9.07,6.81,6.55,9.37,5.51z M12,3c-4.97,0-9,4.03-9,9s4.03,9,9,9s9-4.03,9-9c0-0.46-0.04-0.92-0.1-1.36 c-0.98,1.37-2.58,2.26-4.4,2.26c-2.98,0-5.4-2.42-5.4-5.4c0-1.81,0.89-3.42,2.26-4.4C12.92,3.04,12.46,3,12,3L12,3z"/></svg></button></div><div class=navbarSearchContainer_Bca1><div class="navbar__search searchBarContainer_NW3z" dir=ltr><input placeholder=Search aria-label=Search class=navbar__search-input value=""><div class="loadingRing_RJI3 searchBarLoadingRing_YnHq"><div></div><div></div><div></div><div></div></div></div></div></div></div><div role=presentation class=navbar-sidebar__backdrop></div></nav><div id=__docusaurus_skipToContent_fallback class="main-wrapper mainWrapper_z2l0"><main class="container margin-vert--xl"><div class=row><div class="col col--6 col--offset-3"><h1 class=hero__title>Page Not Found</h1><p>We could not find what you were looking for.<p>Please contact the owner of the site that linked you to the original URL and let them know their link is broken.</div></div></main></div><footer class="footer footer--dark"><div class="container container-fluid"><div class="footer__bottom text--center"><div class=footer__copyright>Copyright © 2024 Pranab Das. All rights
+<!doctype html><html lang=en dir=ltr class="docs-wrapper plugin-docs plugin-id-default docs-version-current" data-has-hydrated=false><meta charset=UTF-8><meta name=generator content="Docusaurus v3.6.1"><title data-rh=true>Fortran Tutorial</title><meta data-rh=true property=og:title content="Fortran Tutorial"><meta data-rh=true name=viewport content="width=device-width,initial-scale=1.0"><meta data-rh=true name=twitter:card content=summary_large_image><meta data-rh=true property=og:url content=https://pranabdas.github.io/fortran/404.html><meta data-rh=true property=og:locale content=en><meta data-rh=true name=docusaurus_locale content=en><meta data-rh=true name=docsearch:language content=en><meta data-rh=true name=theme-color content=#06445c><meta data-rh=true name=docusaurus_version content=current><meta data-rh=true name=docusaurus_tag content=docs-default-current><meta data-rh=true name=docsearch:version content=current><meta data-rh=true name=docsearch:docusaurus_tag content=docs-default-current><link data-rh=true rel=icon href=/fortran/img/favicon.png><link data-rh=true rel=canonical href=https://pranabdas.github.io/fortran/404.html><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/404.html hreflang=en><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/404.html hreflang=x-default><link rel=stylesheet href=https://pranab.pages.dev/assets/fonts/katex/katex.min.css><link rel=stylesheet href=/fortran/assets/css/styles.4de1c8a8.css><script src=/fortran/assets/js/runtime~main.667e3c0f.js defer></script><script src=/fortran/assets/js/main.10795e8f.js defer></script><body class=navigation-with-keyboard><script>!function(){var t,e=function(){try{return new URLSearchParams(window.location.search).get("docusaurus-theme")}catch(t){}}()||function(){try{return window.localStorage.getItem("theme")}catch(t){}}();t=null!==e?e:window.matchMedia("(prefers-color-scheme: dark)").matches?"dark":(window.matchMedia("(prefers-color-scheme: light)").matches,"light"),document.documentElement.setAttribute("data-theme",t)}(),function(){try{for(var[t,e]of new URLSearchParams(window.location.search).entries())if(t.startsWith("docusaurus-data-")){var a=t.replace("docusaurus-data-","data-");document.documentElement.setAttribute(a,e)}}catch(t){}}()</script><div id=__docusaurus><div role=region aria-label="Skip to main content"><a class=skipToContent_fXgn href=#__docusaurus_skipToContent_fallback>Skip to main content</a></div><nav aria-label=Main class="navbar navbar--fixed-top navbarHideable_m1mJ"><div class=navbar__inner><div class=navbar__items><button aria-label="Toggle navigation bar" aria-expanded=false class="navbar__toggle clean-btn" type=button><svg width=30 height=30 viewBox="0 0 30 30" aria-hidden=true><path stroke=currentColor stroke-linecap=round stroke-miterlimit=10 stroke-width=2 d="M4 7h22M4 15h22M4 23h22"/></svg></button><a class=navbar__brand href=/fortran/><div class=navbar__logo><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--light_NVdE"><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--dark_xIcU"></div><b class="navbar__title text--truncate">Fortran</b></a><div class="navbar__item dropdown dropdown--hoverable"><a aria-current=page class="navbar__link active" aria-haspopup=true aria-expanded=false role=button href=/fortran/>Docs</a><ul class=dropdown__menu><li><a aria-current=page class="dropdown__link dropdown__link--active" href=/fortran/>Fortran Programming</a><li><a href=https://pranabdas.github.io/docs/ rel="noopener noreferrer" class=dropdown__link>~ ~ ~ Other Docs ~ ~ ~</a><li><a href=https://pranabdas.github.io/arpespythontools/ rel="noopener noreferrer" class=dropdown__link>ARPES Python Tools</a><li><a href=https://pranabdas.github.io/c-cpp/ rel="noopener noreferrer" class=dropdown__link>C and C++ Programming</a><li><a href=https://pranabdas.github.io/condmat-notes/ rel="noopener noreferrer" class=dropdown__link>Condensed Matter Notes</a><li><a href=https://pranabdas.github.io/javascript/ rel="noopener noreferrer" class=dropdown__link>Javascript Tutorial</a><li><a href=https://pranabdas.github.io/linux/ rel="noopener noreferrer" class=dropdown__link>Linux Tutorial</a><li><a href=https://pranabdas.github.io/machine-learning/ rel="noopener noreferrer" class=dropdown__link>Machine Learning Notes</a><li><a href=https://pranabdas.github.io/openmx/ rel="noopener noreferrer" class=dropdown__link>OpenMX tutorial</a><li><a href=https://pranabdas.github.io/python-tutorial/ rel="noopener noreferrer" class=dropdown__link>Python Tutorial</a><li><a href=https://pranabdas.github.io/espresso/ rel="noopener noreferrer" class=dropdown__link>Quantum Espresso Tutorial</a><li><a href=https://pranabdas.github.io/rust/ rel="noopener noreferrer" class=dropdown__link>Rust Programming</a><li><a href=https://pranabdas.github.io/arpes-manual/ rel="noopener noreferrer" class=dropdown__link>SUV ARPES Manual</a><li><a href=https://pranabdas.github.io/suvtools/ rel="noopener noreferrer" class=dropdown__link>SUV Python Tools</a></ul></div></div><div class="navbar__items navbar__items--right"><a href=https://github.com/pranabdas/fortran rel="noopener noreferrer" class="navbar__item navbar__link header-github-link" aria-label="GitHub repository" title="Visit project repository in GitHub"></a><a href=https://pranabdas.github.io rel="noopener noreferrer" class="navbar__item navbar__link header-homepage-link" aria-label="About me" title="Go to Pranab's Homepage"></a><div class="toggle_vylO colorModeToggle_DEke"><button class="clean-btn toggleButton_gllP toggleButtonDisabled_aARS" type=button disabled title="Switch between dark and light mode (currently light mode)" aria-label="Switch between dark and light mode (currently light mode)" aria-live=polite aria-pressed=false><svg viewBox="0 0 24 24" width=24 height=24 class=lightToggleIcon_pyhR><path fill=currentColor d="M12,9c1.65,0,3,1.35,3,3s-1.35,3-3,3s-3-1.35-3-3S10.35,9,12,9 M12,7c-2.76,0-5,2.24-5,5s2.24,5,5,5s5-2.24,5-5 S14.76,7,12,7L12,7z M2,13l2,0c0.55,0,1-0.45,1-1s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S1.45,13,2,13z M20,13l2,0c0.55,0,1-0.45,1-1 s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S19.45,13,20,13z M11,2v2c0,0.55,0.45,1,1,1s1-0.45,1-1V2c0-0.55-0.45-1-1-1S11,1.45,11,2z M11,20v2c0,0.55,0.45,1,1,1s1-0.45,1-1v-2c0-0.55-0.45-1-1-1C11.45,19,11,19.45,11,20z M5.99,4.58c-0.39-0.39-1.03-0.39-1.41,0 c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0s0.39-1.03,0-1.41L5.99,4.58z M18.36,16.95 c-0.39-0.39-1.03-0.39-1.41,0c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0c0.39-0.39,0.39-1.03,0-1.41 L18.36,16.95z M19.42,5.99c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06c-0.39,0.39-0.39,1.03,0,1.41 s1.03,0.39,1.41,0L19.42,5.99z M7.05,18.36c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06 c-0.39,0.39-0.39,1.03,0,1.41s1.03,0.39,1.41,0L7.05,18.36z"/></svg><svg viewBox="0 0 24 24" width=24 height=24 class=darkToggleIcon_wfgR><path fill=currentColor d="M9.37,5.51C9.19,6.15,9.1,6.82,9.1,7.5c0,4.08,3.32,7.4,7.4,7.4c0.68,0,1.35-0.09,1.99-0.27C17.45,17.19,14.93,19,12,19 c-3.86,0-7-3.14-7-7C5,9.07,6.81,6.55,9.37,5.51z M12,3c-4.97,0-9,4.03-9,9s4.03,9,9,9s9-4.03,9-9c0-0.46-0.04-0.92-0.1-1.36 c-0.98,1.37-2.58,2.26-4.4,2.26c-2.98,0-5.4-2.42-5.4-5.4c0-1.81,0.89-3.42,2.26-4.4C12.92,3.04,12.46,3,12,3L12,3z"/></svg></button></div><div class=navbarSearchContainer_Bca1><div class="navbar__search searchBarContainer_NW3z" dir=ltr><input placeholder=Search aria-label=Search class=navbar__search-input value=""><div class="loadingRing_RJI3 searchBarLoadingRing_YnHq"><div></div><div></div><div></div><div></div></div></div></div></div></div><div role=presentation class=navbar-sidebar__backdrop></div></nav><div id=__docusaurus_skipToContent_fallback class="main-wrapper mainWrapper_z2l0"><main class="container margin-vert--xl"><div class=row><div class="col col--6 col--offset-3"><h1 class=hero__title>Page Not Found</h1><p>We could not find what you were looking for.<p>Please contact the owner of the site that linked you to the original URL and let them know their link is broken.</div></div></main></div><footer class="footer footer--dark"><div class="container container-fluid"><div class="footer__bottom text--center"><div class=footer__copyright>Copyright © 2024 Pranab Das. All rights
       reserved.</div></div></div></footer></div>
\ No newline at end of file
diff --git a/abs-path/index.html b/abs-path/index.html
index b02b11a..64ae4a4 100644
--- a/abs-path/index.html
+++ b/abs-path/index.html
@@ -1,4 +1,4 @@
-<!doctype html><html lang=en dir=ltr class="docs-wrapper plugin-docs plugin-id-default docs-version-current docs-doc-page docs-doc-id-abs-path" data-has-hydrated=false><meta charset=UTF-8><meta name=generator content="Docusaurus v3.6.1"><title data-rh=true>Function: Get absolute path • Fortran Tutorial</title><meta data-rh=true name=viewport content="width=device-width,initial-scale=1.0"><meta data-rh=true name=twitter:card content=summary_large_image><meta data-rh=true property=og:url content=https://pranabdas.github.io/fortran/abs-path><meta data-rh=true property=og:locale content=en><meta data-rh=true name=docusaurus_locale content=en><meta data-rh=true name=docsearch:language content=en><meta data-rh=true name=theme-color content=#06445c><meta data-rh=true name=docusaurus_version content=current><meta data-rh=true name=docusaurus_tag content=docs-default-current><meta data-rh=true name=docsearch:version content=current><meta data-rh=true name=docsearch:docusaurus_tag content=docs-default-current><meta data-rh=true property=og:title content="Function: Get absolute path • Fortran Tutorial"><meta data-rh=true name=description content="Here is a function to convert filenames to their absolute path:"><meta data-rh=true property=og:description content="Here is a function to convert filenames to their absolute path:"><link data-rh=true rel=icon href=/fortran/img/favicon.png><link data-rh=true rel=canonical href=https://pranabdas.github.io/fortran/abs-path><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/abs-path hreflang=en><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/abs-path hreflang=x-default><link rel=stylesheet href=https://pranabdas.github.io/drive/webfonts/katex/katex.min.css><link rel=stylesheet href=/fortran/assets/css/styles.4de1c8a8.css><script src=/fortran/assets/js/runtime~main.866c090c.js defer></script><script src=/fortran/assets/js/main.ec888ba8.js defer></script><body class=navigation-with-keyboard><script>!function(){var t,e=function(){try{return new URLSearchParams(window.location.search).get("docusaurus-theme")}catch(t){}}()||function(){try{return window.localStorage.getItem("theme")}catch(t){}}();t=null!==e?e:window.matchMedia("(prefers-color-scheme: dark)").matches?"dark":(window.matchMedia("(prefers-color-scheme: light)").matches,"light"),document.documentElement.setAttribute("data-theme",t)}(),function(){try{for(var[t,e]of new URLSearchParams(window.location.search).entries())if(t.startsWith("docusaurus-data-")){var a=t.replace("docusaurus-data-","data-");document.documentElement.setAttribute(a,e)}}catch(t){}}()</script><div id=__docusaurus><div role=region aria-label="Skip to main content"><a class=skipToContent_fXgn href=#__docusaurus_skipToContent_fallback>Skip to main content</a></div><nav aria-label=Main class="navbar navbar--fixed-top navbarHideable_m1mJ"><div class=navbar__inner><div class=navbar__items><button aria-label="Toggle navigation bar" aria-expanded=false class="navbar__toggle clean-btn" type=button><svg width=30 height=30 viewBox="0 0 30 30" aria-hidden=true><path stroke=currentColor stroke-linecap=round stroke-miterlimit=10 stroke-width=2 d="M4 7h22M4 15h22M4 23h22"/></svg></button><a class=navbar__brand href=/fortran/><div class=navbar__logo><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--light_NVdE"><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--dark_xIcU"></div><b class="navbar__title text--truncate">Fortran</b></a><div class="navbar__item dropdown dropdown--hoverable"><a aria-current=page class="navbar__link active" aria-haspopup=true aria-expanded=false role=button href=/fortran/>Docs</a><ul class=dropdown__menu><li><a aria-current=page class="dropdown__link dropdown__link--active" href=/fortran/>Fortran Programming</a><li><a href=https://pranabdas.github.io/docs/ rel="noopener noreferrer" class=dropdown__link>~ ~ ~ Other Docs ~ ~ ~</a><li><a href=https://pranabdas.github.io/arpespythontools/ rel="noopener noreferrer" class=dropdown__link>ARPES Python Tools</a><li><a href=https://pranabdas.github.io/c-cpp/ rel="noopener noreferrer" class=dropdown__link>C and C++ Programming</a><li><a href=https://pranabdas.github.io/condmat-notes/ rel="noopener noreferrer" class=dropdown__link>Condensed Matter Notes</a><li><a href=https://pranabdas.github.io/javascript/ rel="noopener noreferrer" class=dropdown__link>Javascript Tutorial</a><li><a href=https://pranabdas.github.io/linux/ rel="noopener noreferrer" class=dropdown__link>Linux Tutorial</a><li><a href=https://pranabdas.github.io/machine-learning/ rel="noopener noreferrer" class=dropdown__link>Machine Learning Notes</a><li><a href=https://pranabdas.github.io/openmx/ rel="noopener noreferrer" class=dropdown__link>OpenMX tutorial</a><li><a href=https://pranabdas.github.io/python-tutorial/ rel="noopener noreferrer" class=dropdown__link>Python Tutorial</a><li><a href=https://pranabdas.github.io/espresso/ rel="noopener noreferrer" class=dropdown__link>Quantum Espresso Tutorial</a><li><a href=https://pranabdas.github.io/rust/ rel="noopener noreferrer" class=dropdown__link>Rust Programming</a><li><a href=https://pranabdas.github.io/arpes-manual/ rel="noopener noreferrer" class=dropdown__link>SUV ARPES Manual</a><li><a href=https://pranabdas.github.io/suvtools/ rel="noopener noreferrer" class=dropdown__link>SUV Python Tools</a></ul></div></div><div class="navbar__items navbar__items--right"><a href=https://github.com/pranabdas/fortran rel="noopener noreferrer" class="navbar__item navbar__link header-github-link" aria-label="GitHub repository" title="Visit project repository in GitHub"></a><a href=https://pranabdas.github.io rel="noopener noreferrer" class="navbar__item navbar__link header-homepage-link" aria-label="About me" title="Go to Pranab's Homepage"></a><div class="toggle_vylO colorModeToggle_DEke"><button class="clean-btn toggleButton_gllP toggleButtonDisabled_aARS" type=button disabled title="Switch between dark and light mode (currently light mode)" aria-label="Switch between dark and light mode (currently light mode)" aria-live=polite aria-pressed=false><svg viewBox="0 0 24 24" width=24 height=24 class=lightToggleIcon_pyhR><path fill=currentColor d="M12,9c1.65,0,3,1.35,3,3s-1.35,3-3,3s-3-1.35-3-3S10.35,9,12,9 M12,7c-2.76,0-5,2.24-5,5s2.24,5,5,5s5-2.24,5-5 S14.76,7,12,7L12,7z M2,13l2,0c0.55,0,1-0.45,1-1s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S1.45,13,2,13z M20,13l2,0c0.55,0,1-0.45,1-1 s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S19.45,13,20,13z M11,2v2c0,0.55,0.45,1,1,1s1-0.45,1-1V2c0-0.55-0.45-1-1-1S11,1.45,11,2z M11,20v2c0,0.55,0.45,1,1,1s1-0.45,1-1v-2c0-0.55-0.45-1-1-1C11.45,19,11,19.45,11,20z M5.99,4.58c-0.39-0.39-1.03-0.39-1.41,0 c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0s0.39-1.03,0-1.41L5.99,4.58z M18.36,16.95 c-0.39-0.39-1.03-0.39-1.41,0c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0c0.39-0.39,0.39-1.03,0-1.41 L18.36,16.95z M19.42,5.99c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06c-0.39,0.39-0.39,1.03,0,1.41 s1.03,0.39,1.41,0L19.42,5.99z M7.05,18.36c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06 c-0.39,0.39-0.39,1.03,0,1.41s1.03,0.39,1.41,0L7.05,18.36z"/></svg><svg viewBox="0 0 24 24" width=24 height=24 class=darkToggleIcon_wfgR><path fill=currentColor d="M9.37,5.51C9.19,6.15,9.1,6.82,9.1,7.5c0,4.08,3.32,7.4,7.4,7.4c0.68,0,1.35-0.09,1.99-0.27C17.45,17.19,14.93,19,12,19 c-3.86,0-7-3.14-7-7C5,9.07,6.81,6.55,9.37,5.51z M12,3c-4.97,0-9,4.03-9,9s4.03,9,9,9s9-4.03,9-9c0-0.46-0.04-0.92-0.1-1.36 c-0.98,1.37-2.58,2.26-4.4,2.26c-2.98,0-5.4-2.42-5.4-5.4c0-1.81,0.89-3.42,2.26-4.4C12.92,3.04,12.46,3,12,3L12,3z"/></svg></button></div><div class=navbarSearchContainer_Bca1><div class="navbar__search searchBarContainer_NW3z" dir=ltr><input placeholder=Search aria-label=Search class=navbar__search-input value=""><div class="loadingRing_RJI3 searchBarLoadingRing_YnHq"><div></div><div></div><div></div><div></div></div></div></div></div></div><div role=presentation class=navbar-sidebar__backdrop></div></nav><div id=__docusaurus_skipToContent_fallback class="main-wrapper mainWrapper_z2l0"><div class=docsWrapper_hBAB><button aria-label="Scroll back to top" class="clean-btn theme-back-to-top-button backToTopButton_sjWU" type=button></button><div class=docRoot_UBD9><aside class="theme-doc-sidebar-container docSidebarContainer_YfHR"><div class=sidebarViewport_aRkj><div class="sidebar_njMd sidebarWithHideableNavbar_wUlq"><a tabindex=-1 class=sidebarLogo_isFc href=/fortran/><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--light_NVdE"><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--dark_xIcU"><b>Fortran</b></a><nav aria-label="Docs sidebar" class="menu thin-scrollbar menu_SIkG"><ul class="theme-doc-sidebar-menu menu__list"><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/>Setup</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/basics>Basics</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/array>Array and Matrix</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/control>Logical control</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/loop>Loop</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/modules>Modules</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/procedures>Procedures</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/complex>Complex number</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/recursion>Recursion</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/types>Custom types</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/pointer>Pointer</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/file>File I/O</a><li class="theme-doc-sidebar-item-category theme-doc-sidebar-item-category-level-1 menu__list-item"><div class=menu__list-item-collapsible><a class="menu__link menu__link--sublist menu__link--active" href=/fortran/category/coding-practice>Coding practice</a><button aria-label="Collapse sidebar category 'Coding practice'" aria-expanded=true type=button class="clean-btn menu__caret"></button></div><ul style=display:block;overflow:visible;height:auto class=menu__list><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/swap>Swap two numbers</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class="menu__link menu__link--active" aria-current=page tabindex=0 href=/fortran/abs-path>Absolute path</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/hypotenuse>Calculate hypotenuse</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/integration>Numerical integration</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/haversine>Haversine formula</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/inner-product>Inner product</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/monte-carlo-pi>Monte Carlo method</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/monte-carlo-integration>Monte Carlo integration</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/time>Time</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/arg-parsing>Argument parsing</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/exec-command>External command</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/blas>BLAS</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/mpi>MPI Basics</a></ul><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/resources>Resources</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/license>License</a></ul></nav><button type=button title="Collapse sidebar" aria-label="Collapse sidebar" class="button button--secondary button--outline collapseSidebarButton_PEFL"><svg width=20 height=20 aria-hidden=true class=collapseSidebarButtonIcon_kv0_><g fill=#7a7a7a><path d="M9.992 10.023c0 .2-.062.399-.172.547l-4.996 7.492a.982.982 0 01-.828.454H1c-.55 0-1-.453-1-1 0-.2.059-.403.168-.551l4.629-6.942L.168 3.078A.939.939 0 010 2.528c0-.548.45-.997 1-.997h2.996c.352 0 .649.18.828.45L9.82 9.472c.11.148.172.347.172.55zm0 0"/><path d="M19.98 10.023c0 .2-.058.399-.168.547l-4.996 7.492a.987.987 0 01-.828.454h-3c-.547 0-.996-.453-.996-1 0-.2.059-.403.168-.551l4.625-6.942-4.625-6.945a.939.939 0 01-.168-.55 1 1 0 01.996-.997h3c.348 0 .649.18.828.45l4.996 7.492c.11.148.168.347.168.55zm0 0"/></g></svg></button></div></div></aside><main class=docMainContainer_TBSr><div class="container padding-top--md padding-bottom--lg"><div class=row><div class="col docItemCol_VOVn"><div class=docItemContainer_Djhp><article><nav class="theme-doc-breadcrumbs breadcrumbsContainer_Z_bl" aria-label=Breadcrumbs><ul class=breadcrumbs itemscope itemtype=https://schema.org/BreadcrumbList><li class=breadcrumbs__item><a aria-label="Home page" class=breadcrumbs__link href=/fortran/><svg viewBox="0 0 24 24" class=breadcrumbHomeIcon_YNFT><path d="M10 19v-5h4v5c0 .55.45 1 1 1h3c.55 0 1-.45 1-1v-7h1.7c.46 0 .68-.57.33-.87L12.67 3.6c-.38-.34-.96-.34-1.34 0l-8.36 7.53c-.34.3-.13.87.33.87H5v7c0 .55.45 1 1 1h3c.55 0 1-.45 1-1z" fill=currentColor /></svg></a><li itemscope itemprop=itemListElement itemtype=https://schema.org/ListItem class=breadcrumbs__item><a class=breadcrumbs__link itemprop=item href=/fortran/category/coding-practice><span itemprop=name>Coding practice</span></a><meta itemprop=position content=1><li itemscope itemprop=itemListElement itemtype=https://schema.org/ListItem class="breadcrumbs__item breadcrumbs__item--active"><span class=breadcrumbs__link itemprop=name>Absolute path</span><meta itemprop=position content=2></ul></nav><div class="theme-doc-markdown markdown"><header><h1>Function: Get absolute path</h1></header><p>Here is a function to convert filenames to their absolute path:</p>
+<!doctype html><html lang=en dir=ltr class="docs-wrapper plugin-docs plugin-id-default docs-version-current docs-doc-page docs-doc-id-abs-path" data-has-hydrated=false><meta charset=UTF-8><meta name=generator content="Docusaurus v3.6.1"><title data-rh=true>Function: Get absolute path • Fortran Tutorial</title><meta data-rh=true name=viewport content="width=device-width,initial-scale=1.0"><meta data-rh=true name=twitter:card content=summary_large_image><meta data-rh=true property=og:url content=https://pranabdas.github.io/fortran/abs-path><meta data-rh=true property=og:locale content=en><meta data-rh=true name=docusaurus_locale content=en><meta data-rh=true name=docsearch:language content=en><meta data-rh=true name=theme-color content=#06445c><meta data-rh=true name=docusaurus_version content=current><meta data-rh=true name=docusaurus_tag content=docs-default-current><meta data-rh=true name=docsearch:version content=current><meta data-rh=true name=docsearch:docusaurus_tag content=docs-default-current><meta data-rh=true property=og:title content="Function: Get absolute path • Fortran Tutorial"><meta data-rh=true name=description content="Here is a function to convert filenames to their absolute path:"><meta data-rh=true property=og:description content="Here is a function to convert filenames to their absolute path:"><link data-rh=true rel=icon href=/fortran/img/favicon.png><link data-rh=true rel=canonical href=https://pranabdas.github.io/fortran/abs-path><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/abs-path hreflang=en><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/abs-path hreflang=x-default><link rel=stylesheet href=https://pranab.pages.dev/assets/fonts/katex/katex.min.css><link rel=stylesheet href=/fortran/assets/css/styles.4de1c8a8.css><script src=/fortran/assets/js/runtime~main.667e3c0f.js defer></script><script src=/fortran/assets/js/main.10795e8f.js defer></script><body class=navigation-with-keyboard><script>!function(){var t,e=function(){try{return new URLSearchParams(window.location.search).get("docusaurus-theme")}catch(t){}}()||function(){try{return window.localStorage.getItem("theme")}catch(t){}}();t=null!==e?e:window.matchMedia("(prefers-color-scheme: dark)").matches?"dark":(window.matchMedia("(prefers-color-scheme: light)").matches,"light"),document.documentElement.setAttribute("data-theme",t)}(),function(){try{for(var[t,e]of new URLSearchParams(window.location.search).entries())if(t.startsWith("docusaurus-data-")){var a=t.replace("docusaurus-data-","data-");document.documentElement.setAttribute(a,e)}}catch(t){}}()</script><div id=__docusaurus><div role=region aria-label="Skip to main content"><a class=skipToContent_fXgn href=#__docusaurus_skipToContent_fallback>Skip to main content</a></div><nav aria-label=Main class="navbar navbar--fixed-top navbarHideable_m1mJ"><div class=navbar__inner><div class=navbar__items><button aria-label="Toggle navigation bar" aria-expanded=false class="navbar__toggle clean-btn" type=button><svg width=30 height=30 viewBox="0 0 30 30" aria-hidden=true><path stroke=currentColor stroke-linecap=round stroke-miterlimit=10 stroke-width=2 d="M4 7h22M4 15h22M4 23h22"/></svg></button><a class=navbar__brand href=/fortran/><div class=navbar__logo><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--light_NVdE"><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--dark_xIcU"></div><b class="navbar__title text--truncate">Fortran</b></a><div class="navbar__item dropdown dropdown--hoverable"><a aria-current=page class="navbar__link active" aria-haspopup=true aria-expanded=false role=button href=/fortran/>Docs</a><ul class=dropdown__menu><li><a aria-current=page class="dropdown__link dropdown__link--active" href=/fortran/>Fortran Programming</a><li><a href=https://pranabdas.github.io/docs/ rel="noopener noreferrer" class=dropdown__link>~ ~ ~ Other Docs ~ ~ ~</a><li><a href=https://pranabdas.github.io/arpespythontools/ rel="noopener noreferrer" class=dropdown__link>ARPES Python Tools</a><li><a href=https://pranabdas.github.io/c-cpp/ rel="noopener noreferrer" class=dropdown__link>C and C++ Programming</a><li><a href=https://pranabdas.github.io/condmat-notes/ rel="noopener noreferrer" class=dropdown__link>Condensed Matter Notes</a><li><a href=https://pranabdas.github.io/javascript/ rel="noopener noreferrer" class=dropdown__link>Javascript Tutorial</a><li><a href=https://pranabdas.github.io/linux/ rel="noopener noreferrer" class=dropdown__link>Linux Tutorial</a><li><a href=https://pranabdas.github.io/machine-learning/ rel="noopener noreferrer" class=dropdown__link>Machine Learning Notes</a><li><a href=https://pranabdas.github.io/openmx/ rel="noopener noreferrer" class=dropdown__link>OpenMX tutorial</a><li><a href=https://pranabdas.github.io/python-tutorial/ rel="noopener noreferrer" class=dropdown__link>Python Tutorial</a><li><a href=https://pranabdas.github.io/espresso/ rel="noopener noreferrer" class=dropdown__link>Quantum Espresso Tutorial</a><li><a href=https://pranabdas.github.io/rust/ rel="noopener noreferrer" class=dropdown__link>Rust Programming</a><li><a href=https://pranabdas.github.io/arpes-manual/ rel="noopener noreferrer" class=dropdown__link>SUV ARPES Manual</a><li><a href=https://pranabdas.github.io/suvtools/ rel="noopener noreferrer" class=dropdown__link>SUV Python Tools</a></ul></div></div><div class="navbar__items navbar__items--right"><a href=https://github.com/pranabdas/fortran rel="noopener noreferrer" class="navbar__item navbar__link header-github-link" aria-label="GitHub repository" title="Visit project repository in GitHub"></a><a href=https://pranabdas.github.io rel="noopener noreferrer" class="navbar__item navbar__link header-homepage-link" aria-label="About me" title="Go to Pranab's Homepage"></a><div class="toggle_vylO colorModeToggle_DEke"><button class="clean-btn toggleButton_gllP toggleButtonDisabled_aARS" type=button disabled title="Switch between dark and light mode (currently light mode)" aria-label="Switch between dark and light mode (currently light mode)" aria-live=polite aria-pressed=false><svg viewBox="0 0 24 24" width=24 height=24 class=lightToggleIcon_pyhR><path fill=currentColor d="M12,9c1.65,0,3,1.35,3,3s-1.35,3-3,3s-3-1.35-3-3S10.35,9,12,9 M12,7c-2.76,0-5,2.24-5,5s2.24,5,5,5s5-2.24,5-5 S14.76,7,12,7L12,7z M2,13l2,0c0.55,0,1-0.45,1-1s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S1.45,13,2,13z M20,13l2,0c0.55,0,1-0.45,1-1 s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S19.45,13,20,13z M11,2v2c0,0.55,0.45,1,1,1s1-0.45,1-1V2c0-0.55-0.45-1-1-1S11,1.45,11,2z M11,20v2c0,0.55,0.45,1,1,1s1-0.45,1-1v-2c0-0.55-0.45-1-1-1C11.45,19,11,19.45,11,20z M5.99,4.58c-0.39-0.39-1.03-0.39-1.41,0 c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0s0.39-1.03,0-1.41L5.99,4.58z M18.36,16.95 c-0.39-0.39-1.03-0.39-1.41,0c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0c0.39-0.39,0.39-1.03,0-1.41 L18.36,16.95z M19.42,5.99c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06c-0.39,0.39-0.39,1.03,0,1.41 s1.03,0.39,1.41,0L19.42,5.99z M7.05,18.36c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06 c-0.39,0.39-0.39,1.03,0,1.41s1.03,0.39,1.41,0L7.05,18.36z"/></svg><svg viewBox="0 0 24 24" width=24 height=24 class=darkToggleIcon_wfgR><path fill=currentColor d="M9.37,5.51C9.19,6.15,9.1,6.82,9.1,7.5c0,4.08,3.32,7.4,7.4,7.4c0.68,0,1.35-0.09,1.99-0.27C17.45,17.19,14.93,19,12,19 c-3.86,0-7-3.14-7-7C5,9.07,6.81,6.55,9.37,5.51z M12,3c-4.97,0-9,4.03-9,9s4.03,9,9,9s9-4.03,9-9c0-0.46-0.04-0.92-0.1-1.36 c-0.98,1.37-2.58,2.26-4.4,2.26c-2.98,0-5.4-2.42-5.4-5.4c0-1.81,0.89-3.42,2.26-4.4C12.92,3.04,12.46,3,12,3L12,3z"/></svg></button></div><div class=navbarSearchContainer_Bca1><div class="navbar__search searchBarContainer_NW3z" dir=ltr><input placeholder=Search aria-label=Search class=navbar__search-input value=""><div class="loadingRing_RJI3 searchBarLoadingRing_YnHq"><div></div><div></div><div></div><div></div></div></div></div></div></div><div role=presentation class=navbar-sidebar__backdrop></div></nav><div id=__docusaurus_skipToContent_fallback class="main-wrapper mainWrapper_z2l0"><div class=docsWrapper_hBAB><button aria-label="Scroll back to top" class="clean-btn theme-back-to-top-button backToTopButton_sjWU" type=button></button><div class=docRoot_UBD9><aside class="theme-doc-sidebar-container docSidebarContainer_YfHR"><div class=sidebarViewport_aRkj><div class="sidebar_njMd sidebarWithHideableNavbar_wUlq"><a tabindex=-1 class=sidebarLogo_isFc href=/fortran/><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--light_NVdE"><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--dark_xIcU"><b>Fortran</b></a><nav aria-label="Docs sidebar" class="menu thin-scrollbar menu_SIkG"><ul class="theme-doc-sidebar-menu menu__list"><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/>Setup</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/basics>Basics</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/array>Array and Matrix</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/control>Logical control</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/loop>Loop</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/modules>Modules</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/procedures>Procedures</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/complex>Complex number</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/recursion>Recursion</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/types>Custom types</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/pointer>Pointer</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/file>File I/O</a><li class="theme-doc-sidebar-item-category theme-doc-sidebar-item-category-level-1 menu__list-item"><div class=menu__list-item-collapsible><a class="menu__link menu__link--sublist menu__link--active" href=/fortran/category/coding-practice>Coding practice</a><button aria-label="Collapse sidebar category 'Coding practice'" aria-expanded=true type=button class="clean-btn menu__caret"></button></div><ul style=display:block;overflow:visible;height:auto class=menu__list><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/swap>Swap two numbers</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class="menu__link menu__link--active" aria-current=page tabindex=0 href=/fortran/abs-path>Absolute path</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/hypotenuse>Calculate hypotenuse</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/integration>Numerical integration</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/haversine>Haversine formula</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/inner-product>Inner product</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/monte-carlo-pi>Monte Carlo method</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/monte-carlo-integration>Monte Carlo integration</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/time>Time</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/arg-parsing>Argument parsing</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/exec-command>External command</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/blas>BLAS</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/mpi>MPI Basics</a></ul><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/resources>Resources</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/license>License</a></ul></nav><button type=button title="Collapse sidebar" aria-label="Collapse sidebar" class="button button--secondary button--outline collapseSidebarButton_PEFL"><svg width=20 height=20 aria-hidden=true class=collapseSidebarButtonIcon_kv0_><g fill=#7a7a7a><path d="M9.992 10.023c0 .2-.062.399-.172.547l-4.996 7.492a.982.982 0 01-.828.454H1c-.55 0-1-.453-1-1 0-.2.059-.403.168-.551l4.629-6.942L.168 3.078A.939.939 0 010 2.528c0-.548.45-.997 1-.997h2.996c.352 0 .649.18.828.45L9.82 9.472c.11.148.172.347.172.55zm0 0"/><path d="M19.98 10.023c0 .2-.058.399-.168.547l-4.996 7.492a.987.987 0 01-.828.454h-3c-.547 0-.996-.453-.996-1 0-.2.059-.403.168-.551l4.625-6.942-4.625-6.945a.939.939 0 01-.168-.55 1 1 0 01.996-.997h3c.348 0 .649.18.828.45l4.996 7.492c.11.148.168.347.168.55zm0 0"/></g></svg></button></div></div></aside><main class=docMainContainer_TBSr><div class="container padding-top--md padding-bottom--lg"><div class=row><div class="col docItemCol_VOVn"><div class=docItemContainer_Djhp><article><nav class="theme-doc-breadcrumbs breadcrumbsContainer_Z_bl" aria-label=Breadcrumbs><ul class=breadcrumbs itemscope itemtype=https://schema.org/BreadcrumbList><li class=breadcrumbs__item><a aria-label="Home page" class=breadcrumbs__link href=/fortran/><svg viewBox="0 0 24 24" class=breadcrumbHomeIcon_YNFT><path d="M10 19v-5h4v5c0 .55.45 1 1 1h3c.55 0 1-.45 1-1v-7h1.7c.46 0 .68-.57.33-.87L12.67 3.6c-.38-.34-.96-.34-1.34 0l-8.36 7.53c-.34.3-.13.87.33.87H5v7c0 .55.45 1 1 1h3c.55 0 1-.45 1-1z" fill=currentColor /></svg></a><li itemscope itemprop=itemListElement itemtype=https://schema.org/ListItem class=breadcrumbs__item><a class=breadcrumbs__link itemprop=item href=/fortran/category/coding-practice><span itemprop=name>Coding practice</span></a><meta itemprop=position content=1><li itemscope itemprop=itemListElement itemtype=https://schema.org/ListItem class="breadcrumbs__item breadcrumbs__item--active"><span class=breadcrumbs__link itemprop=name>Absolute path</span><meta itemprop=position content=2></ul></nav><div class="theme-doc-markdown markdown"><header><h1>Function: Get absolute path</h1></header><p>Here is a function to convert filenames to their absolute path:</p>
 <!-- -->
 <div class="language-fortran codeBlockContainer_Ckt0 theme-code-block" style=--prism-color:#393A34;--prism-background-color:#f6f8fa><div class=codeBlockTitle_Ktv7>src/15_get_abs_path.f90</div><div class=codeBlockContent_biex><pre tabindex=0 class="prism-code language-fortran codeBlock_bY9V thin-scrollbar" style=color:#393A34;background-color:#f6f8fa><code class="codeBlockLines_e6Vv codeBlockLinesWithNumbering_o6Pm"><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token keyword" style=color:#00009f>PROGRAM</span><span class="token plain"> print_abs_path</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">  </span><span class="token keyword" style=color:#00009f>IMPLICIT NONE</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">  </span><span class="token keyword" style=color:#00009f>CHARACTER</span><span class="token punctuation" style=color:#393A34>(</span><span class="token plain">LEN</span><span class="token operator" style=color:#393A34>=</span><span class="token number" style=color:#36acaa>128</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"> </span><span class="token operator" style=color:#393A34>::</span><span class="token plain"> input_path</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> abs_path</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> get_abs_path</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">  </span><span class="token keyword" style=color:#00009f>PRINT</span><span class="token plain"> </span><span class="token string" style=color:#e3116c>"(a,$)"</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> </span><span class="token string" style=color:#e3116c>'Enter file name: '</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">  </span><span class="token keyword" style=color:#00009f>READ</span><span class="token plain"> </span><span class="token punctuation" style=color:#393A34>(</span><span class="token operator" style=color:#393A34>*</span><span class="token punctuation" style=color:#393A34>,</span><span class="token string" style=color:#e3116c>"(a128)"</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"> input_path</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">  abs_path </span><span class="token operator" style=color:#393A34>=</span><span class="token plain"> get_abs_path</span><span class="token punctuation" style=color:#393A34>(</span><span class="token plain">input_path</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">  </span><span class="token keyword" style=color:#00009f>PRINT</span><span class="token plain"> </span><span class="token operator" style=color:#393A34>*</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> </span><span class="token string" style=color:#e3116c>'Absolute PATH: '</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> abs_path</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain"></span><span class="token keyword" style=color:#00009f>END PROGRAM</span><span class="token plain"> print_abs_path</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain"></span><span class="token keyword" style=color:#00009f>CHARACTER</span><span class="token punctuation" style=color:#393A34>(</span><span class="token plain">LEN</span><span class="token operator" style=color:#393A34>=</span><span class="token number" style=color:#36acaa>128</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"> </span><span class="token keyword" style=color:#00009f>FUNCTION</span><span class="token plain"> get_abs_path</span><span class="token punctuation" style=color:#393A34>(</span><span class="token plain">input_path</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">  </span><span class="token keyword" style=color:#00009f>IMPLICIT NONE</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">  </span><span class="token keyword" style=color:#00009f>CHARACTER</span><span class="token punctuation" style=color:#393A34>(</span><span class="token plain">LEN</span><span class="token operator" style=color:#393A34>=</span><span class="token number" style=color:#36acaa>128</span><span class="token punctuation" style=color:#393A34>)</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> </span><span class="token keyword" style=color:#00009f>INTENT</span><span class="token punctuation" style=color:#393A34>(</span><span class="token keyword" style=color:#00009f>IN</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"> </span><span class="token operator" style=color:#393A34>::</span><span class="token plain"> input_path</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">  </span><span class="token keyword" style=color:#00009f>CHARACTER</span><span class="token punctuation" style=color:#393A34>(</span><span class="token plain">LEN</span><span class="token operator" style=color:#393A34>=</span><span class="token number" style=color:#36acaa>128</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"> </span><span class="token operator" style=color:#393A34>::</span><span class="token plain"> PREFIX</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">  </span><span class="token keyword" style=color:#00009f>IF</span><span class="token plain"> </span><span class="token punctuation" style=color:#393A34>(</span><span class="token plain">input_path</span><span class="token punctuation" style=color:#393A34>(</span><span class="token number" style=color:#36acaa>1</span><span class="token punctuation" style=color:#393A34>:</span><span class="token number" style=color:#36acaa>1</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"> </span><span class="token operator" style=color:#393A34>==</span><span class="token plain"> </span><span class="token string" style=color:#e3116c>'/'</span><span class="token plain"> </span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"> </span><span class="token keyword" style=color:#00009f>THEN</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    get_abs_path </span><span class="token operator" style=color:#393A34>=</span><span class="token plain"> input_path</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">  </span><span class="token keyword" style=color:#00009f>ELSE</span><span class="token plain"> </span><span class="token keyword" style=color:#00009f>IF</span><span class="token plain"> </span><span class="token punctuation" style=color:#393A34>(</span><span class="token plain">input_path</span><span class="token punctuation" style=color:#393A34>(</span><span class="token number" style=color:#36acaa>1</span><span class="token punctuation" style=color:#393A34>:</span><span class="token number" style=color:#36acaa>2</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"> </span><span class="token operator" style=color:#393A34>==</span><span class="token plain"> </span><span class="token string" style=color:#e3116c>'~/'</span><span class="token plain"> </span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"> </span><span class="token keyword" style=color:#00009f>THEN</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>CALL</span><span class="token plain"> GETENV</span><span class="token punctuation" style=color:#393A34>(</span><span class="token string" style=color:#e3116c>'HOME'</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> PREFIX</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    get_abs_path </span><span class="token operator" style=color:#393A34>=</span><span class="token plain"> PREFIX</span><span class="token punctuation" style=color:#393A34>(</span><span class="token punctuation" style=color:#393A34>:</span><span class="token plain">LNBLNK</span><span class="token punctuation" style=color:#393A34>(</span><span class="token plain">PREFIX</span><span class="token punctuation" style=color:#393A34>)</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"> </span><span class="token operator" style=color:#393A34>//</span><span class="token plain"> input_path</span><span class="token punctuation" style=color:#393A34>(</span><span class="token number" style=color:#36acaa>2</span><span class="token punctuation" style=color:#393A34>:</span><span class="token plain">LNBLNK</span><span class="token punctuation" style=color:#393A34>(</span><span class="token plain">input_path</span><span class="token punctuation" style=color:#393A34>)</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">  </span><span class="token keyword" style=color:#00009f>ELSE</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>CALL</span><span class="token plain"> GETCWD</span><span class="token punctuation" style=color:#393A34>(</span><span class="token plain">PREFIX</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    get_abs_path </span><span class="token operator" style=color:#393A34>=</span><span class="token plain"> PREFIX</span><span class="token punctuation" style=color:#393A34>(</span><span class="token punctuation" style=color:#393A34>:</span><span class="token plain">LNBLNK</span><span class="token punctuation" style=color:#393A34>(</span><span class="token plain">PREFIX</span><span class="token punctuation" style=color:#393A34>)</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"> </span><span class="token operator" style=color:#393A34>//</span><span class="token plain"> </span><span class="token string" style=color:#e3116c>'/'</span><span class="token plain"> </span><span class="token operator" style=color:#393A34>//</span><span class="token plain"> input_path</span><span class="token punctuation" style=color:#393A34>(</span><span class="token punctuation" style=color:#393A34>:</span><span class="token plain">LNBLNK</span><span class="token punctuation" style=color:#393A34>(</span><span class="token plain">input_path</span><span class="token punctuation" style=color:#393A34>)</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">  </span><span class="token keyword" style=color:#00009f>ENDIF</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">  </span><span class="token keyword" style=color:#00009f>RETURN</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain"></span><span class="token keyword" style=color:#00009f>END FUNCTION</span><span class="token plain"> get_abs_path</span></span><br></span></code></pre><div class=buttonGroup__atx><button type=button aria-label="Copy code to clipboard" title=Copy class=clean-btn><span class=copyButtonIcons_eSgA aria-hidden=true><svg viewBox="0 0 24 24" class=copyButtonIcon_y97N><path fill=currentColor d="M19,21H8V7H19M19,5H8A2,2 0 0,0 6,7V21A2,2 0 0,0 8,23H19A2,2 0 0,0 21,21V7A2,2 0 0,0 19,5M16,1H4A2,2 0 0,0 2,3V17H4V3H16V1Z"/></svg><svg viewBox="0 0 24 24" class=copyButtonSuccessIcon_LjdS><path fill=currentColor d=M21,7L9,19L3.5,13.5L4.91,12.09L9,16.17L19.59,5.59L21,7Z /></svg></span></button></div></div></div></div><footer class="theme-doc-footer docusaurus-mt-lg"><div class="row margin-top--sm theme-doc-footer-edit-meta-row"><div class=col><a href=https://github.com/pranabdas/fortran/blob/main/docs/abs-path.mdx target=_blank rel="noopener noreferrer" class=theme-edit-this-page><svg fill=currentColor height=20 width=20 viewBox="0 0 40 40" class=iconEdit_Z9Sw aria-hidden=true><g><path d="m34.5 11.7l-3 3.1-6.3-6.3 3.1-3q0.5-0.5 1.2-0.5t1.1 0.5l3.9 3.9q0.5 0.4 0.5 1.1t-0.5 1.2z m-29.5 17.1l18.4-18.5 6.3 6.3-18.4 18.4h-6.3v-6.2z"/></g></svg>Edit this page</a></div><div class="col lastUpdated_JAkA"></div></div></footer></article><nav class="pagination-nav docusaurus-mt-lg" aria-label="Docs pages"><a class="pagination-nav__link pagination-nav__link--prev" href=/fortran/swap><div class=pagination-nav__sublabel>Previous</div><div class=pagination-nav__label>Swap two numbers</div></a><a class="pagination-nav__link pagination-nav__link--next" href=/fortran/hypotenuse><div class=pagination-nav__sublabel>Next</div><div class=pagination-nav__label>Calculate hypotenuse</div></a></nav></div></div></div></div></main></div></div></div><footer class="footer footer--dark"><div class="container container-fluid"><div class="footer__bottom text--center"><div class=footer__copyright>Copyright © 2024 Pranab Das. All rights
       reserved.</div></div></div></footer></div>
\ No newline at end of file
diff --git a/arg-parsing/index.html b/arg-parsing/index.html
index 4da389c..823e549 100644
--- a/arg-parsing/index.html
+++ b/arg-parsing/index.html
@@ -1,4 +1,4 @@
-<!doctype html><html lang=en dir=ltr class="docs-wrapper plugin-docs plugin-id-default docs-version-current docs-doc-page docs-doc-id-arg-parsing" data-has-hydrated=false><meta charset=UTF-8><meta name=generator content="Docusaurus v3.6.1"><title data-rh=true>Parsing command-line arguments • Fortran Tutorial</title><meta data-rh=true name=viewport content="width=device-width,initial-scale=1.0"><meta data-rh=true name=twitter:card content=summary_large_image><meta data-rh=true property=og:url content=https://pranabdas.github.io/fortran/arg-parsing><meta data-rh=true property=og:locale content=en><meta data-rh=true name=docusaurus_locale content=en><meta data-rh=true name=docsearch:language content=en><meta data-rh=true name=theme-color content=#06445c><meta data-rh=true name=docusaurus_version content=current><meta data-rh=true name=docusaurus_tag content=docs-default-current><meta data-rh=true name=docsearch:version content=current><meta data-rh=true name=docsearch:docusaurus_tag content=docs-default-current><meta data-rh=true property=og:title content="Parsing command-line arguments • Fortran Tutorial"><meta data-rh=true name=description content="We will use commandargumentcount and getcommandargument to parse command"><meta data-rh=true property=og:description content="We will use commandargumentcount and getcommandargument to parse command"><link data-rh=true rel=icon href=/fortran/img/favicon.png><link data-rh=true rel=canonical href=https://pranabdas.github.io/fortran/arg-parsing><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/arg-parsing hreflang=en><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/arg-parsing hreflang=x-default><link rel=stylesheet href=https://pranabdas.github.io/drive/webfonts/katex/katex.min.css><link rel=stylesheet href=/fortran/assets/css/styles.4de1c8a8.css><script src=/fortran/assets/js/runtime~main.866c090c.js defer></script><script src=/fortran/assets/js/main.ec888ba8.js defer></script><body class=navigation-with-keyboard><script>!function(){var t,e=function(){try{return new URLSearchParams(window.location.search).get("docusaurus-theme")}catch(t){}}()||function(){try{return window.localStorage.getItem("theme")}catch(t){}}();t=null!==e?e:window.matchMedia("(prefers-color-scheme: dark)").matches?"dark":(window.matchMedia("(prefers-color-scheme: light)").matches,"light"),document.documentElement.setAttribute("data-theme",t)}(),function(){try{for(var[t,e]of new URLSearchParams(window.location.search).entries())if(t.startsWith("docusaurus-data-")){var a=t.replace("docusaurus-data-","data-");document.documentElement.setAttribute(a,e)}}catch(t){}}()</script><div id=__docusaurus><div role=region aria-label="Skip to main content"><a class=skipToContent_fXgn href=#__docusaurus_skipToContent_fallback>Skip to main content</a></div><nav aria-label=Main class="navbar navbar--fixed-top navbarHideable_m1mJ"><div class=navbar__inner><div class=navbar__items><button aria-label="Toggle navigation bar" aria-expanded=false class="navbar__toggle clean-btn" type=button><svg width=30 height=30 viewBox="0 0 30 30" aria-hidden=true><path stroke=currentColor stroke-linecap=round stroke-miterlimit=10 stroke-width=2 d="M4 7h22M4 15h22M4 23h22"/></svg></button><a class=navbar__brand href=/fortran/><div class=navbar__logo><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--light_NVdE"><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--dark_xIcU"></div><b class="navbar__title text--truncate">Fortran</b></a><div class="navbar__item dropdown dropdown--hoverable"><a aria-current=page class="navbar__link active" aria-haspopup=true aria-expanded=false role=button href=/fortran/>Docs</a><ul class=dropdown__menu><li><a aria-current=page class="dropdown__link dropdown__link--active" href=/fortran/>Fortran Programming</a><li><a href=https://pranabdas.github.io/docs/ rel="noopener noreferrer" class=dropdown__link>~ ~ ~ Other Docs ~ ~ ~</a><li><a href=https://pranabdas.github.io/arpespythontools/ rel="noopener noreferrer" class=dropdown__link>ARPES Python Tools</a><li><a href=https://pranabdas.github.io/c-cpp/ rel="noopener noreferrer" class=dropdown__link>C and C++ Programming</a><li><a href=https://pranabdas.github.io/condmat-notes/ rel="noopener noreferrer" class=dropdown__link>Condensed Matter Notes</a><li><a href=https://pranabdas.github.io/javascript/ rel="noopener noreferrer" class=dropdown__link>Javascript Tutorial</a><li><a href=https://pranabdas.github.io/linux/ rel="noopener noreferrer" class=dropdown__link>Linux Tutorial</a><li><a href=https://pranabdas.github.io/machine-learning/ rel="noopener noreferrer" class=dropdown__link>Machine Learning Notes</a><li><a href=https://pranabdas.github.io/openmx/ rel="noopener noreferrer" class=dropdown__link>OpenMX tutorial</a><li><a href=https://pranabdas.github.io/python-tutorial/ rel="noopener noreferrer" class=dropdown__link>Python Tutorial</a><li><a href=https://pranabdas.github.io/espresso/ rel="noopener noreferrer" class=dropdown__link>Quantum Espresso Tutorial</a><li><a href=https://pranabdas.github.io/rust/ rel="noopener noreferrer" class=dropdown__link>Rust Programming</a><li><a href=https://pranabdas.github.io/arpes-manual/ rel="noopener noreferrer" class=dropdown__link>SUV ARPES Manual</a><li><a href=https://pranabdas.github.io/suvtools/ rel="noopener noreferrer" class=dropdown__link>SUV Python Tools</a></ul></div></div><div class="navbar__items navbar__items--right"><a href=https://github.com/pranabdas/fortran rel="noopener noreferrer" class="navbar__item navbar__link header-github-link" aria-label="GitHub repository" title="Visit project repository in GitHub"></a><a href=https://pranabdas.github.io rel="noopener noreferrer" class="navbar__item navbar__link header-homepage-link" aria-label="About me" title="Go to Pranab's Homepage"></a><div class="toggle_vylO colorModeToggle_DEke"><button class="clean-btn toggleButton_gllP toggleButtonDisabled_aARS" type=button disabled title="Switch between dark and light mode (currently light mode)" aria-label="Switch between dark and light mode (currently light mode)" aria-live=polite aria-pressed=false><svg viewBox="0 0 24 24" width=24 height=24 class=lightToggleIcon_pyhR><path fill=currentColor d="M12,9c1.65,0,3,1.35,3,3s-1.35,3-3,3s-3-1.35-3-3S10.35,9,12,9 M12,7c-2.76,0-5,2.24-5,5s2.24,5,5,5s5-2.24,5-5 S14.76,7,12,7L12,7z M2,13l2,0c0.55,0,1-0.45,1-1s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S1.45,13,2,13z M20,13l2,0c0.55,0,1-0.45,1-1 s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S19.45,13,20,13z M11,2v2c0,0.55,0.45,1,1,1s1-0.45,1-1V2c0-0.55-0.45-1-1-1S11,1.45,11,2z M11,20v2c0,0.55,0.45,1,1,1s1-0.45,1-1v-2c0-0.55-0.45-1-1-1C11.45,19,11,19.45,11,20z M5.99,4.58c-0.39-0.39-1.03-0.39-1.41,0 c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0s0.39-1.03,0-1.41L5.99,4.58z M18.36,16.95 c-0.39-0.39-1.03-0.39-1.41,0c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0c0.39-0.39,0.39-1.03,0-1.41 L18.36,16.95z M19.42,5.99c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06c-0.39,0.39-0.39,1.03,0,1.41 s1.03,0.39,1.41,0L19.42,5.99z M7.05,18.36c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06 c-0.39,0.39-0.39,1.03,0,1.41s1.03,0.39,1.41,0L7.05,18.36z"/></svg><svg viewBox="0 0 24 24" width=24 height=24 class=darkToggleIcon_wfgR><path fill=currentColor d="M9.37,5.51C9.19,6.15,9.1,6.82,9.1,7.5c0,4.08,3.32,7.4,7.4,7.4c0.68,0,1.35-0.09,1.99-0.27C17.45,17.19,14.93,19,12,19 c-3.86,0-7-3.14-7-7C5,9.07,6.81,6.55,9.37,5.51z M12,3c-4.97,0-9,4.03-9,9s4.03,9,9,9s9-4.03,9-9c0-0.46-0.04-0.92-0.1-1.36 c-0.98,1.37-2.58,2.26-4.4,2.26c-2.98,0-5.4-2.42-5.4-5.4c0-1.81,0.89-3.42,2.26-4.4C12.92,3.04,12.46,3,12,3L12,3z"/></svg></button></div><div class=navbarSearchContainer_Bca1><div class="navbar__search searchBarContainer_NW3z" dir=ltr><input placeholder=Search aria-label=Search class=navbar__search-input value=""><div class="loadingRing_RJI3 searchBarLoadingRing_YnHq"><div></div><div></div><div></div><div></div></div></div></div></div></div><div role=presentation class=navbar-sidebar__backdrop></div></nav><div id=__docusaurus_skipToContent_fallback class="main-wrapper mainWrapper_z2l0"><div class=docsWrapper_hBAB><button aria-label="Scroll back to top" class="clean-btn theme-back-to-top-button backToTopButton_sjWU" type=button></button><div class=docRoot_UBD9><aside class="theme-doc-sidebar-container docSidebarContainer_YfHR"><div class=sidebarViewport_aRkj><div class="sidebar_njMd sidebarWithHideableNavbar_wUlq"><a tabindex=-1 class=sidebarLogo_isFc href=/fortran/><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--light_NVdE"><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--dark_xIcU"><b>Fortran</b></a><nav aria-label="Docs sidebar" class="menu thin-scrollbar menu_SIkG"><ul class="theme-doc-sidebar-menu menu__list"><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/>Setup</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/basics>Basics</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/array>Array and Matrix</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/control>Logical control</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/loop>Loop</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/modules>Modules</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/procedures>Procedures</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/complex>Complex number</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/recursion>Recursion</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/types>Custom types</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/pointer>Pointer</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/file>File I/O</a><li class="theme-doc-sidebar-item-category theme-doc-sidebar-item-category-level-1 menu__list-item"><div class=menu__list-item-collapsible><a class="menu__link menu__link--sublist menu__link--active" href=/fortran/category/coding-practice>Coding practice</a><button aria-label="Collapse sidebar category 'Coding practice'" aria-expanded=true type=button class="clean-btn menu__caret"></button></div><ul style=display:block;overflow:visible;height:auto class=menu__list><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/swap>Swap two numbers</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/abs-path>Absolute path</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/hypotenuse>Calculate hypotenuse</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/integration>Numerical integration</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/haversine>Haversine formula</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/inner-product>Inner product</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/monte-carlo-pi>Monte Carlo method</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/monte-carlo-integration>Monte Carlo integration</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/time>Time</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class="menu__link menu__link--active" aria-current=page tabindex=0 href=/fortran/arg-parsing>Argument parsing</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/exec-command>External command</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/blas>BLAS</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/mpi>MPI Basics</a></ul><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/resources>Resources</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/license>License</a></ul></nav><button type=button title="Collapse sidebar" aria-label="Collapse sidebar" class="button button--secondary button--outline collapseSidebarButton_PEFL"><svg width=20 height=20 aria-hidden=true class=collapseSidebarButtonIcon_kv0_><g fill=#7a7a7a><path d="M9.992 10.023c0 .2-.062.399-.172.547l-4.996 7.492a.982.982 0 01-.828.454H1c-.55 0-1-.453-1-1 0-.2.059-.403.168-.551l4.629-6.942L.168 3.078A.939.939 0 010 2.528c0-.548.45-.997 1-.997h2.996c.352 0 .649.18.828.45L9.82 9.472c.11.148.172.347.172.55zm0 0"/><path d="M19.98 10.023c0 .2-.058.399-.168.547l-4.996 7.492a.987.987 0 01-.828.454h-3c-.547 0-.996-.453-.996-1 0-.2.059-.403.168-.551l4.625-6.942-4.625-6.945a.939.939 0 01-.168-.55 1 1 0 01.996-.997h3c.348 0 .649.18.828.45l4.996 7.492c.11.148.168.347.168.55zm0 0"/></g></svg></button></div></div></aside><main class=docMainContainer_TBSr><div class="container padding-top--md padding-bottom--lg"><div class=row><div class="col docItemCol_VOVn"><div class=docItemContainer_Djhp><article><nav class="theme-doc-breadcrumbs breadcrumbsContainer_Z_bl" aria-label=Breadcrumbs><ul class=breadcrumbs itemscope itemtype=https://schema.org/BreadcrumbList><li class=breadcrumbs__item><a aria-label="Home page" class=breadcrumbs__link href=/fortran/><svg viewBox="0 0 24 24" class=breadcrumbHomeIcon_YNFT><path d="M10 19v-5h4v5c0 .55.45 1 1 1h3c.55 0 1-.45 1-1v-7h1.7c.46 0 .68-.57.33-.87L12.67 3.6c-.38-.34-.96-.34-1.34 0l-8.36 7.53c-.34.3-.13.87.33.87H5v7c0 .55.45 1 1 1h3c.55 0 1-.45 1-1z" fill=currentColor /></svg></a><li itemscope itemprop=itemListElement itemtype=https://schema.org/ListItem class=breadcrumbs__item><a class=breadcrumbs__link itemprop=item href=/fortran/category/coding-practice><span itemprop=name>Coding practice</span></a><meta itemprop=position content=1><li itemscope itemprop=itemListElement itemtype=https://schema.org/ListItem class="breadcrumbs__item breadcrumbs__item--active"><span class=breadcrumbs__link itemprop=name>Argument parsing</span><meta itemprop=position content=2></ul></nav><div class="theme-doc-markdown markdown"><header><h1>Parsing command-line arguments</h1></header><p>We will use <code>command_argument_count</code> and <code>get_command_argument</code> to parse command
+<!doctype html><html lang=en dir=ltr class="docs-wrapper plugin-docs plugin-id-default docs-version-current docs-doc-page docs-doc-id-arg-parsing" data-has-hydrated=false><meta charset=UTF-8><meta name=generator content="Docusaurus v3.6.1"><title data-rh=true>Parsing command-line arguments • Fortran Tutorial</title><meta data-rh=true name=viewport content="width=device-width,initial-scale=1.0"><meta data-rh=true name=twitter:card content=summary_large_image><meta data-rh=true property=og:url content=https://pranabdas.github.io/fortran/arg-parsing><meta data-rh=true property=og:locale content=en><meta data-rh=true name=docusaurus_locale content=en><meta data-rh=true name=docsearch:language content=en><meta data-rh=true name=theme-color content=#06445c><meta data-rh=true name=docusaurus_version content=current><meta data-rh=true name=docusaurus_tag content=docs-default-current><meta data-rh=true name=docsearch:version content=current><meta data-rh=true name=docsearch:docusaurus_tag content=docs-default-current><meta data-rh=true property=og:title content="Parsing command-line arguments • Fortran Tutorial"><meta data-rh=true name=description content="We will use commandargumentcount and getcommandargument to parse command"><meta data-rh=true property=og:description content="We will use commandargumentcount and getcommandargument to parse command"><link data-rh=true rel=icon href=/fortran/img/favicon.png><link data-rh=true rel=canonical href=https://pranabdas.github.io/fortran/arg-parsing><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/arg-parsing hreflang=en><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/arg-parsing hreflang=x-default><link rel=stylesheet href=https://pranab.pages.dev/assets/fonts/katex/katex.min.css><link rel=stylesheet href=/fortran/assets/css/styles.4de1c8a8.css><script src=/fortran/assets/js/runtime~main.667e3c0f.js defer></script><script src=/fortran/assets/js/main.10795e8f.js defer></script><body class=navigation-with-keyboard><script>!function(){var t,e=function(){try{return new URLSearchParams(window.location.search).get("docusaurus-theme")}catch(t){}}()||function(){try{return window.localStorage.getItem("theme")}catch(t){}}();t=null!==e?e:window.matchMedia("(prefers-color-scheme: dark)").matches?"dark":(window.matchMedia("(prefers-color-scheme: light)").matches,"light"),document.documentElement.setAttribute("data-theme",t)}(),function(){try{for(var[t,e]of new URLSearchParams(window.location.search).entries())if(t.startsWith("docusaurus-data-")){var a=t.replace("docusaurus-data-","data-");document.documentElement.setAttribute(a,e)}}catch(t){}}()</script><div id=__docusaurus><div role=region aria-label="Skip to main content"><a class=skipToContent_fXgn href=#__docusaurus_skipToContent_fallback>Skip to main content</a></div><nav aria-label=Main class="navbar navbar--fixed-top navbarHideable_m1mJ"><div class=navbar__inner><div class=navbar__items><button aria-label="Toggle navigation bar" aria-expanded=false class="navbar__toggle clean-btn" type=button><svg width=30 height=30 viewBox="0 0 30 30" aria-hidden=true><path stroke=currentColor stroke-linecap=round stroke-miterlimit=10 stroke-width=2 d="M4 7h22M4 15h22M4 23h22"/></svg></button><a class=navbar__brand href=/fortran/><div class=navbar__logo><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--light_NVdE"><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--dark_xIcU"></div><b class="navbar__title text--truncate">Fortran</b></a><div class="navbar__item dropdown dropdown--hoverable"><a aria-current=page class="navbar__link active" aria-haspopup=true aria-expanded=false role=button href=/fortran/>Docs</a><ul class=dropdown__menu><li><a aria-current=page class="dropdown__link dropdown__link--active" href=/fortran/>Fortran Programming</a><li><a href=https://pranabdas.github.io/docs/ rel="noopener noreferrer" class=dropdown__link>~ ~ ~ Other Docs ~ ~ ~</a><li><a href=https://pranabdas.github.io/arpespythontools/ rel="noopener noreferrer" class=dropdown__link>ARPES Python Tools</a><li><a href=https://pranabdas.github.io/c-cpp/ rel="noopener noreferrer" class=dropdown__link>C and C++ Programming</a><li><a href=https://pranabdas.github.io/condmat-notes/ rel="noopener noreferrer" class=dropdown__link>Condensed Matter Notes</a><li><a href=https://pranabdas.github.io/javascript/ rel="noopener noreferrer" class=dropdown__link>Javascript Tutorial</a><li><a href=https://pranabdas.github.io/linux/ rel="noopener noreferrer" class=dropdown__link>Linux Tutorial</a><li><a href=https://pranabdas.github.io/machine-learning/ rel="noopener noreferrer" class=dropdown__link>Machine Learning Notes</a><li><a href=https://pranabdas.github.io/openmx/ rel="noopener noreferrer" class=dropdown__link>OpenMX tutorial</a><li><a href=https://pranabdas.github.io/python-tutorial/ rel="noopener noreferrer" class=dropdown__link>Python Tutorial</a><li><a href=https://pranabdas.github.io/espresso/ rel="noopener noreferrer" class=dropdown__link>Quantum Espresso Tutorial</a><li><a href=https://pranabdas.github.io/rust/ rel="noopener noreferrer" class=dropdown__link>Rust Programming</a><li><a href=https://pranabdas.github.io/arpes-manual/ rel="noopener noreferrer" class=dropdown__link>SUV ARPES Manual</a><li><a href=https://pranabdas.github.io/suvtools/ rel="noopener noreferrer" class=dropdown__link>SUV Python Tools</a></ul></div></div><div class="navbar__items navbar__items--right"><a href=https://github.com/pranabdas/fortran rel="noopener noreferrer" class="navbar__item navbar__link header-github-link" aria-label="GitHub repository" title="Visit project repository in GitHub"></a><a href=https://pranabdas.github.io rel="noopener noreferrer" class="navbar__item navbar__link header-homepage-link" aria-label="About me" title="Go to Pranab's Homepage"></a><div class="toggle_vylO colorModeToggle_DEke"><button class="clean-btn toggleButton_gllP toggleButtonDisabled_aARS" type=button disabled title="Switch between dark and light mode (currently light mode)" aria-label="Switch between dark and light mode (currently light mode)" aria-live=polite aria-pressed=false><svg viewBox="0 0 24 24" width=24 height=24 class=lightToggleIcon_pyhR><path fill=currentColor d="M12,9c1.65,0,3,1.35,3,3s-1.35,3-3,3s-3-1.35-3-3S10.35,9,12,9 M12,7c-2.76,0-5,2.24-5,5s2.24,5,5,5s5-2.24,5-5 S14.76,7,12,7L12,7z M2,13l2,0c0.55,0,1-0.45,1-1s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S1.45,13,2,13z M20,13l2,0c0.55,0,1-0.45,1-1 s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S19.45,13,20,13z M11,2v2c0,0.55,0.45,1,1,1s1-0.45,1-1V2c0-0.55-0.45-1-1-1S11,1.45,11,2z M11,20v2c0,0.55,0.45,1,1,1s1-0.45,1-1v-2c0-0.55-0.45-1-1-1C11.45,19,11,19.45,11,20z M5.99,4.58c-0.39-0.39-1.03-0.39-1.41,0 c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0s0.39-1.03,0-1.41L5.99,4.58z M18.36,16.95 c-0.39-0.39-1.03-0.39-1.41,0c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0c0.39-0.39,0.39-1.03,0-1.41 L18.36,16.95z M19.42,5.99c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06c-0.39,0.39-0.39,1.03,0,1.41 s1.03,0.39,1.41,0L19.42,5.99z M7.05,18.36c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06 c-0.39,0.39-0.39,1.03,0,1.41s1.03,0.39,1.41,0L7.05,18.36z"/></svg><svg viewBox="0 0 24 24" width=24 height=24 class=darkToggleIcon_wfgR><path fill=currentColor d="M9.37,5.51C9.19,6.15,9.1,6.82,9.1,7.5c0,4.08,3.32,7.4,7.4,7.4c0.68,0,1.35-0.09,1.99-0.27C17.45,17.19,14.93,19,12,19 c-3.86,0-7-3.14-7-7C5,9.07,6.81,6.55,9.37,5.51z M12,3c-4.97,0-9,4.03-9,9s4.03,9,9,9s9-4.03,9-9c0-0.46-0.04-0.92-0.1-1.36 c-0.98,1.37-2.58,2.26-4.4,2.26c-2.98,0-5.4-2.42-5.4-5.4c0-1.81,0.89-3.42,2.26-4.4C12.92,3.04,12.46,3,12,3L12,3z"/></svg></button></div><div class=navbarSearchContainer_Bca1><div class="navbar__search searchBarContainer_NW3z" dir=ltr><input placeholder=Search aria-label=Search class=navbar__search-input value=""><div class="loadingRing_RJI3 searchBarLoadingRing_YnHq"><div></div><div></div><div></div><div></div></div></div></div></div></div><div role=presentation class=navbar-sidebar__backdrop></div></nav><div id=__docusaurus_skipToContent_fallback class="main-wrapper mainWrapper_z2l0"><div class=docsWrapper_hBAB><button aria-label="Scroll back to top" class="clean-btn theme-back-to-top-button backToTopButton_sjWU" type=button></button><div class=docRoot_UBD9><aside class="theme-doc-sidebar-container docSidebarContainer_YfHR"><div class=sidebarViewport_aRkj><div class="sidebar_njMd sidebarWithHideableNavbar_wUlq"><a tabindex=-1 class=sidebarLogo_isFc href=/fortran/><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--light_NVdE"><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--dark_xIcU"><b>Fortran</b></a><nav aria-label="Docs sidebar" class="menu thin-scrollbar menu_SIkG"><ul class="theme-doc-sidebar-menu menu__list"><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/>Setup</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/basics>Basics</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/array>Array and Matrix</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/control>Logical control</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/loop>Loop</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/modules>Modules</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/procedures>Procedures</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/complex>Complex number</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/recursion>Recursion</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/types>Custom types</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/pointer>Pointer</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/file>File I/O</a><li class="theme-doc-sidebar-item-category theme-doc-sidebar-item-category-level-1 menu__list-item"><div class=menu__list-item-collapsible><a class="menu__link menu__link--sublist menu__link--active" href=/fortran/category/coding-practice>Coding practice</a><button aria-label="Collapse sidebar category 'Coding practice'" aria-expanded=true type=button class="clean-btn menu__caret"></button></div><ul style=display:block;overflow:visible;height:auto class=menu__list><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/swap>Swap two numbers</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/abs-path>Absolute path</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/hypotenuse>Calculate hypotenuse</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/integration>Numerical integration</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/haversine>Haversine formula</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/inner-product>Inner product</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/monte-carlo-pi>Monte Carlo method</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/monte-carlo-integration>Monte Carlo integration</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/time>Time</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class="menu__link menu__link--active" aria-current=page tabindex=0 href=/fortran/arg-parsing>Argument parsing</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/exec-command>External command</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/blas>BLAS</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/mpi>MPI Basics</a></ul><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/resources>Resources</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/license>License</a></ul></nav><button type=button title="Collapse sidebar" aria-label="Collapse sidebar" class="button button--secondary button--outline collapseSidebarButton_PEFL"><svg width=20 height=20 aria-hidden=true class=collapseSidebarButtonIcon_kv0_><g fill=#7a7a7a><path d="M9.992 10.023c0 .2-.062.399-.172.547l-4.996 7.492a.982.982 0 01-.828.454H1c-.55 0-1-.453-1-1 0-.2.059-.403.168-.551l4.629-6.942L.168 3.078A.939.939 0 010 2.528c0-.548.45-.997 1-.997h2.996c.352 0 .649.18.828.45L9.82 9.472c.11.148.172.347.172.55zm0 0"/><path d="M19.98 10.023c0 .2-.058.399-.168.547l-4.996 7.492a.987.987 0 01-.828.454h-3c-.547 0-.996-.453-.996-1 0-.2.059-.403.168-.551l4.625-6.942-4.625-6.945a.939.939 0 01-.168-.55 1 1 0 01.996-.997h3c.348 0 .649.18.828.45l4.996 7.492c.11.148.168.347.168.55zm0 0"/></g></svg></button></div></div></aside><main class=docMainContainer_TBSr><div class="container padding-top--md padding-bottom--lg"><div class=row><div class="col docItemCol_VOVn"><div class=docItemContainer_Djhp><article><nav class="theme-doc-breadcrumbs breadcrumbsContainer_Z_bl" aria-label=Breadcrumbs><ul class=breadcrumbs itemscope itemtype=https://schema.org/BreadcrumbList><li class=breadcrumbs__item><a aria-label="Home page" class=breadcrumbs__link href=/fortran/><svg viewBox="0 0 24 24" class=breadcrumbHomeIcon_YNFT><path d="M10 19v-5h4v5c0 .55.45 1 1 1h3c.55 0 1-.45 1-1v-7h1.7c.46 0 .68-.57.33-.87L12.67 3.6c-.38-.34-.96-.34-1.34 0l-8.36 7.53c-.34.3-.13.87.33.87H5v7c0 .55.45 1 1 1h3c.55 0 1-.45 1-1z" fill=currentColor /></svg></a><li itemscope itemprop=itemListElement itemtype=https://schema.org/ListItem class=breadcrumbs__item><a class=breadcrumbs__link itemprop=item href=/fortran/category/coding-practice><span itemprop=name>Coding practice</span></a><meta itemprop=position content=1><li itemscope itemprop=itemListElement itemtype=https://schema.org/ListItem class="breadcrumbs__item breadcrumbs__item--active"><span class=breadcrumbs__link itemprop=name>Argument parsing</span><meta itemprop=position content=2></ul></nav><div class="theme-doc-markdown markdown"><header><h1>Parsing command-line arguments</h1></header><p>We will use <code>command_argument_count</code> and <code>get_command_argument</code> to parse command
 line arguments:</p>
 <!-- -->
 <div class="language-fortran codeBlockContainer_Ckt0 theme-code-block" style=--prism-color:#393A34;--prism-background-color:#f6f8fa><div class=codeBlockTitle_Ktv7>src/26_arg_parsing.f90</div><div class=codeBlockContent_biex><pre tabindex=0 class="prism-code language-fortran codeBlock_bY9V thin-scrollbar" style=color:#393A34;background-color:#f6f8fa><code class="codeBlockLines_e6Vv codeBlockLinesWithNumbering_o6Pm"><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token keyword" style=color:#00009f>PROGRAM</span><span class="token plain"> MAIN</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>IMPLICIT NONE</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>INTEGER</span><span class="token plain"> no_of_commands</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> i</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>CHARACTER</span><span class="token punctuation" style=color:#393A34>(</span><span class="token plain">LEN</span><span class="token operator" style=color:#393A34>=</span><span class="token number" style=color:#36acaa>32</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"> </span><span class="token operator" style=color:#393A34>::</span><span class="token plain"> arg</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>REAL</span><span class="token plain"> </span><span class="token operator" style=color:#393A34>::</span><span class="token plain"> sum </span><span class="token operator" style=color:#393A34>=</span><span class="token plain"> </span><span class="token number" style=color:#36acaa>0.0</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> tmp</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    no_of_commands </span><span class="token operator" style=color:#393A34>=</span><span class="token plain"> command_argument_count</span><span class="token punctuation" style=color:#393A34>(</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>PRINT</span><span class="token plain"> </span><span class="token operator" style=color:#393A34>*</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> </span><span class="token string" style=color:#e3116c>"Number of arguments = "</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> no_of_commands</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>IF</span><span class="token plain"> </span><span class="token punctuation" style=color:#393A34>(</span><span class="token plain">no_of_commands </span><span class="token operator" style=color:#393A34>&lt;</span><span class="token plain"> </span><span class="token number" style=color:#36acaa>2</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"> </span><span class="token keyword" style=color:#00009f>THEN</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">        </span><span class="token keyword" style=color:#00009f>PRINT</span><span class="token plain"> </span><span class="token string" style=color:#e3116c>"(a,/,a)"</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> </span><span class="token string" style=color:#e3116c>"This program needs at least 2 arguments."</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> </span><span class="token punctuation" style=color:#393A34>&</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">                 </span><span class="token string" style=color:#e3116c>"Usage: program 4 3"</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">        </span><span class="token keyword" style=color:#00009f>STOP</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>END IF</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>DO</span><span class="token plain"> i </span><span class="token operator" style=color:#393A34>=</span><span class="token plain"> </span><span class="token number" style=color:#36acaa>1</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> no_of_commands</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">        </span><span class="token keyword" style=color:#00009f>CALL</span><span class="token plain"> get_command_argument</span><span class="token punctuation" style=color:#393A34>(</span><span class="token plain">i</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> arg</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">        </span><span class="token comment" style=color:#999988;font-style:italic>! if single argument is expected, use get_command(arg)</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">        </span><span class="token comment" style=color:#999988;font-style:italic>! IF (LEN_TRIM(arg) == 0) EXIT ! not required here</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">        arg </span><span class="token operator" style=color:#393A34>=</span><span class="token plain"> TRIM</span><span class="token punctuation" style=color:#393A34>(</span><span class="token plain">arg</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">        </span><span class="token keyword" style=color:#00009f>READ</span><span class="token punctuation" style=color:#393A34>(</span><span class="token plain">arg</span><span class="token punctuation" style=color:#393A34>,</span><span class="token operator" style=color:#393A34>*</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"> tmp </span><span class="token comment" style=color:#999988;font-style:italic>! read strings as real</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">        sum </span><span class="token operator" style=color:#393A34>=</span><span class="token plain"> sum </span><span class="token operator" style=color:#393A34>+</span><span class="token plain"> tmp</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>END DO</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>PRINT</span><span class="token plain"> </span><span class="token operator" style=color:#393A34>*</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> </span><span class="token string" style=color:#e3116c>"Total = "</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> sum</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain"></span><span class="token keyword" style=color:#00009f>END</span></span><br></span></code></pre><div class=buttonGroup__atx><button type=button aria-label="Copy code to clipboard" title=Copy class=clean-btn><span class=copyButtonIcons_eSgA aria-hidden=true><svg viewBox="0 0 24 24" class=copyButtonIcon_y97N><path fill=currentColor d="M19,21H8V7H19M19,5H8A2,2 0 0,0 6,7V21A2,2 0 0,0 8,23H19A2,2 0 0,0 21,21V7A2,2 0 0,0 19,5M16,1H4A2,2 0 0,0 2,3V17H4V3H16V1Z"/></svg><svg viewBox="0 0 24 24" class=copyButtonSuccessIcon_LjdS><path fill=currentColor d=M21,7L9,19L3.5,13.5L4.91,12.09L9,16.17L19.59,5.59L21,7Z /></svg></span></button></div></div></div></div><footer class="theme-doc-footer docusaurus-mt-lg"><div class="row margin-top--sm theme-doc-footer-edit-meta-row"><div class=col><a href=https://github.com/pranabdas/fortran/blob/main/docs/arg-parsing.mdx target=_blank rel="noopener noreferrer" class=theme-edit-this-page><svg fill=currentColor height=20 width=20 viewBox="0 0 40 40" class=iconEdit_Z9Sw aria-hidden=true><g><path d="m34.5 11.7l-3 3.1-6.3-6.3 3.1-3q0.5-0.5 1.2-0.5t1.1 0.5l3.9 3.9q0.5 0.4 0.5 1.1t-0.5 1.2z m-29.5 17.1l18.4-18.5 6.3 6.3-18.4 18.4h-6.3v-6.2z"/></g></svg>Edit this page</a></div><div class="col lastUpdated_JAkA"></div></div></footer></article><nav class="pagination-nav docusaurus-mt-lg" aria-label="Docs pages"><a class="pagination-nav__link pagination-nav__link--prev" href=/fortran/time><div class=pagination-nav__sublabel>Previous</div><div class=pagination-nav__label>Time</div></a><a class="pagination-nav__link pagination-nav__link--next" href=/fortran/exec-command><div class=pagination-nav__sublabel>Next</div><div class=pagination-nav__label>External command</div></a></nav></div></div></div></div></main></div></div></div><footer class="footer footer--dark"><div class="container container-fluid"><div class="footer__bottom text--center"><div class=footer__copyright>Copyright © 2024 Pranab Das. All rights
diff --git a/array/index.html b/array/index.html
index d4ae2e4..02b0110 100644
--- a/array/index.html
+++ b/array/index.html
@@ -1,4 +1,4 @@
-<!doctype html><html lang=en dir=ltr class="docs-wrapper plugin-docs plugin-id-default docs-version-current docs-doc-page docs-doc-id-array" data-has-hydrated=false><meta charset=UTF-8><meta name=generator content="Docusaurus v3.6.1"><title data-rh=true>Array and Matrix • Fortran Tutorial</title><meta data-rh=true name=viewport content="width=device-width,initial-scale=1.0"><meta data-rh=true name=twitter:card content=summary_large_image><meta data-rh=true property=og:url content=https://pranabdas.github.io/fortran/array><meta data-rh=true property=og:locale content=en><meta data-rh=true name=docusaurus_locale content=en><meta data-rh=true name=docsearch:language content=en><meta data-rh=true name=theme-color content=#06445c><meta data-rh=true name=docusaurus_version content=current><meta data-rh=true name=docusaurus_tag content=docs-default-current><meta data-rh=true name=docsearch:version content=current><meta data-rh=true name=docsearch:docusaurus_tag content=docs-default-current><meta data-rh=true property=og:title content="Array and Matrix • Fortran Tutorial"><meta data-rh=true name=description content="There is intrinsic SIZE function to determine the length of a vector, SIZE(vec)."><meta data-rh=true property=og:description content="There is intrinsic SIZE function to determine the length of a vector, SIZE(vec)."><link data-rh=true rel=icon href=/fortran/img/favicon.png><link data-rh=true rel=canonical href=https://pranabdas.github.io/fortran/array><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/array hreflang=en><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/array hreflang=x-default><link rel=stylesheet href=https://pranabdas.github.io/drive/webfonts/katex/katex.min.css><link rel=stylesheet href=/fortran/assets/css/styles.4de1c8a8.css><script src=/fortran/assets/js/runtime~main.866c090c.js defer></script><script src=/fortran/assets/js/main.ec888ba8.js defer></script><body class=navigation-with-keyboard><script>!function(){var t,e=function(){try{return new URLSearchParams(window.location.search).get("docusaurus-theme")}catch(t){}}()||function(){try{return window.localStorage.getItem("theme")}catch(t){}}();t=null!==e?e:window.matchMedia("(prefers-color-scheme: dark)").matches?"dark":(window.matchMedia("(prefers-color-scheme: light)").matches,"light"),document.documentElement.setAttribute("data-theme",t)}(),function(){try{for(var[t,e]of new URLSearchParams(window.location.search).entries())if(t.startsWith("docusaurus-data-")){var a=t.replace("docusaurus-data-","data-");document.documentElement.setAttribute(a,e)}}catch(t){}}()</script><div id=__docusaurus><div role=region aria-label="Skip to main content"><a class=skipToContent_fXgn href=#__docusaurus_skipToContent_fallback>Skip to main content</a></div><nav aria-label=Main class="navbar navbar--fixed-top navbarHideable_m1mJ"><div class=navbar__inner><div class=navbar__items><button aria-label="Toggle navigation bar" aria-expanded=false class="navbar__toggle clean-btn" type=button><svg width=30 height=30 viewBox="0 0 30 30" aria-hidden=true><path stroke=currentColor stroke-linecap=round stroke-miterlimit=10 stroke-width=2 d="M4 7h22M4 15h22M4 23h22"/></svg></button><a class=navbar__brand href=/fortran/><div class=navbar__logo><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--light_NVdE"><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--dark_xIcU"></div><b class="navbar__title text--truncate">Fortran</b></a><div class="navbar__item dropdown dropdown--hoverable"><a aria-current=page class="navbar__link active" aria-haspopup=true aria-expanded=false role=button href=/fortran/>Docs</a><ul class=dropdown__menu><li><a aria-current=page class="dropdown__link dropdown__link--active" href=/fortran/>Fortran Programming</a><li><a href=https://pranabdas.github.io/docs/ rel="noopener noreferrer" class=dropdown__link>~ ~ ~ Other Docs ~ ~ ~</a><li><a href=https://pranabdas.github.io/arpespythontools/ rel="noopener noreferrer" class=dropdown__link>ARPES Python Tools</a><li><a href=https://pranabdas.github.io/c-cpp/ rel="noopener noreferrer" class=dropdown__link>C and C++ Programming</a><li><a href=https://pranabdas.github.io/condmat-notes/ rel="noopener noreferrer" class=dropdown__link>Condensed Matter Notes</a><li><a href=https://pranabdas.github.io/javascript/ rel="noopener noreferrer" class=dropdown__link>Javascript Tutorial</a><li><a href=https://pranabdas.github.io/linux/ rel="noopener noreferrer" class=dropdown__link>Linux Tutorial</a><li><a href=https://pranabdas.github.io/machine-learning/ rel="noopener noreferrer" class=dropdown__link>Machine Learning Notes</a><li><a href=https://pranabdas.github.io/openmx/ rel="noopener noreferrer" class=dropdown__link>OpenMX tutorial</a><li><a href=https://pranabdas.github.io/python-tutorial/ rel="noopener noreferrer" class=dropdown__link>Python Tutorial</a><li><a href=https://pranabdas.github.io/espresso/ rel="noopener noreferrer" class=dropdown__link>Quantum Espresso Tutorial</a><li><a href=https://pranabdas.github.io/rust/ rel="noopener noreferrer" class=dropdown__link>Rust Programming</a><li><a href=https://pranabdas.github.io/arpes-manual/ rel="noopener noreferrer" class=dropdown__link>SUV ARPES Manual</a><li><a href=https://pranabdas.github.io/suvtools/ rel="noopener noreferrer" class=dropdown__link>SUV Python Tools</a></ul></div></div><div class="navbar__items navbar__items--right"><a href=https://github.com/pranabdas/fortran rel="noopener noreferrer" class="navbar__item navbar__link header-github-link" aria-label="GitHub repository" title="Visit project repository in GitHub"></a><a href=https://pranabdas.github.io rel="noopener noreferrer" class="navbar__item navbar__link header-homepage-link" aria-label="About me" title="Go to Pranab's Homepage"></a><div class="toggle_vylO colorModeToggle_DEke"><button class="clean-btn toggleButton_gllP toggleButtonDisabled_aARS" type=button disabled title="Switch between dark and light mode (currently light mode)" aria-label="Switch between dark and light mode (currently light mode)" aria-live=polite aria-pressed=false><svg viewBox="0 0 24 24" width=24 height=24 class=lightToggleIcon_pyhR><path fill=currentColor d="M12,9c1.65,0,3,1.35,3,3s-1.35,3-3,3s-3-1.35-3-3S10.35,9,12,9 M12,7c-2.76,0-5,2.24-5,5s2.24,5,5,5s5-2.24,5-5 S14.76,7,12,7L12,7z M2,13l2,0c0.55,0,1-0.45,1-1s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S1.45,13,2,13z M20,13l2,0c0.55,0,1-0.45,1-1 s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S19.45,13,20,13z M11,2v2c0,0.55,0.45,1,1,1s1-0.45,1-1V2c0-0.55-0.45-1-1-1S11,1.45,11,2z M11,20v2c0,0.55,0.45,1,1,1s1-0.45,1-1v-2c0-0.55-0.45-1-1-1C11.45,19,11,19.45,11,20z M5.99,4.58c-0.39-0.39-1.03-0.39-1.41,0 c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0s0.39-1.03,0-1.41L5.99,4.58z M18.36,16.95 c-0.39-0.39-1.03-0.39-1.41,0c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0c0.39-0.39,0.39-1.03,0-1.41 L18.36,16.95z M19.42,5.99c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06c-0.39,0.39-0.39,1.03,0,1.41 s1.03,0.39,1.41,0L19.42,5.99z M7.05,18.36c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06 c-0.39,0.39-0.39,1.03,0,1.41s1.03,0.39,1.41,0L7.05,18.36z"/></svg><svg viewBox="0 0 24 24" width=24 height=24 class=darkToggleIcon_wfgR><path fill=currentColor d="M9.37,5.51C9.19,6.15,9.1,6.82,9.1,7.5c0,4.08,3.32,7.4,7.4,7.4c0.68,0,1.35-0.09,1.99-0.27C17.45,17.19,14.93,19,12,19 c-3.86,0-7-3.14-7-7C5,9.07,6.81,6.55,9.37,5.51z M12,3c-4.97,0-9,4.03-9,9s4.03,9,9,9s9-4.03,9-9c0-0.46-0.04-0.92-0.1-1.36 c-0.98,1.37-2.58,2.26-4.4,2.26c-2.98,0-5.4-2.42-5.4-5.4c0-1.81,0.89-3.42,2.26-4.4C12.92,3.04,12.46,3,12,3L12,3z"/></svg></button></div><div class=navbarSearchContainer_Bca1><div class="navbar__search searchBarContainer_NW3z" dir=ltr><input placeholder=Search aria-label=Search class=navbar__search-input value=""><div class="loadingRing_RJI3 searchBarLoadingRing_YnHq"><div></div><div></div><div></div><div></div></div></div></div></div></div><div role=presentation class=navbar-sidebar__backdrop></div></nav><div id=__docusaurus_skipToContent_fallback class="main-wrapper mainWrapper_z2l0"><div class=docsWrapper_hBAB><button aria-label="Scroll back to top" class="clean-btn theme-back-to-top-button backToTopButton_sjWU" type=button></button><div class=docRoot_UBD9><aside class="theme-doc-sidebar-container docSidebarContainer_YfHR"><div class=sidebarViewport_aRkj><div class="sidebar_njMd sidebarWithHideableNavbar_wUlq"><a tabindex=-1 class=sidebarLogo_isFc href=/fortran/><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--light_NVdE"><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--dark_xIcU"><b>Fortran</b></a><nav aria-label="Docs sidebar" class="menu thin-scrollbar menu_SIkG"><ul class="theme-doc-sidebar-menu menu__list"><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/>Setup</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/basics>Basics</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class="menu__link menu__link--active" aria-current=page href=/fortran/array>Array and Matrix</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/control>Logical control</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/loop>Loop</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/modules>Modules</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/procedures>Procedures</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/complex>Complex number</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/recursion>Recursion</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/types>Custom types</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/pointer>Pointer</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/file>File I/O</a><li class="theme-doc-sidebar-item-category theme-doc-sidebar-item-category-level-1 menu__list-item menu__list-item--collapsed"><div class=menu__list-item-collapsible><a class="menu__link menu__link--sublist" href=/fortran/category/coding-practice>Coding practice</a><button aria-label="Expand sidebar category 'Coding practice'" aria-expanded=false type=button class="clean-btn menu__caret"></button></div><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/resources>Resources</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/license>License</a></ul></nav><button type=button title="Collapse sidebar" aria-label="Collapse sidebar" class="button button--secondary button--outline collapseSidebarButton_PEFL"><svg width=20 height=20 aria-hidden=true class=collapseSidebarButtonIcon_kv0_><g fill=#7a7a7a><path d="M9.992 10.023c0 .2-.062.399-.172.547l-4.996 7.492a.982.982 0 01-.828.454H1c-.55 0-1-.453-1-1 0-.2.059-.403.168-.551l4.629-6.942L.168 3.078A.939.939 0 010 2.528c0-.548.45-.997 1-.997h2.996c.352 0 .649.18.828.45L9.82 9.472c.11.148.172.347.172.55zm0 0"/><path d="M19.98 10.023c0 .2-.058.399-.168.547l-4.996 7.492a.987.987 0 01-.828.454h-3c-.547 0-.996-.453-.996-1 0-.2.059-.403.168-.551l4.625-6.942-4.625-6.945a.939.939 0 01-.168-.55 1 1 0 01.996-.997h3c.348 0 .649.18.828.45l4.996 7.492c.11.148.168.347.168.55zm0 0"/></g></svg></button></div></div></aside><main class=docMainContainer_TBSr><div class="container padding-top--md padding-bottom--lg"><div class=row><div class="col docItemCol_VOVn"><div class=docItemContainer_Djhp><article><nav class="theme-doc-breadcrumbs breadcrumbsContainer_Z_bl" aria-label=Breadcrumbs><ul class=breadcrumbs itemscope itemtype=https://schema.org/BreadcrumbList><li class=breadcrumbs__item><a aria-label="Home page" class=breadcrumbs__link href=/fortran/><svg viewBox="0 0 24 24" class=breadcrumbHomeIcon_YNFT><path d="M10 19v-5h4v5c0 .55.45 1 1 1h3c.55 0 1-.45 1-1v-7h1.7c.46 0 .68-.57.33-.87L12.67 3.6c-.38-.34-.96-.34-1.34 0l-8.36 7.53c-.34.3-.13.87.33.87H5v7c0 .55.45 1 1 1h3c.55 0 1-.45 1-1z" fill=currentColor /></svg></a><li itemscope itemprop=itemListElement itemtype=https://schema.org/ListItem class="breadcrumbs__item breadcrumbs__item--active"><span class=breadcrumbs__link itemprop=name>Array and Matrix</span><meta itemprop=position content=1></ul></nav><div class="theme-doc-markdown markdown"><header><h1>Array and Matrix</h1></header><div class="language-fortran codeBlockContainer_Ckt0 theme-code-block" style=--prism-color:#393A34;--prism-background-color:#f6f8fa><div class=codeBlockTitle_Ktv7>src/05_array.f90</div><div class=codeBlockContent_biex><pre tabindex=0 class="prism-code language-fortran codeBlock_bY9V thin-scrollbar" style=color:#393A34;background-color:#f6f8fa><code class="codeBlockLines_e6Vv codeBlockLinesWithNumbering_o6Pm"><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token comment" style=color:#999988;font-style:italic>! Program : Array</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain"></span><span class="token keyword" style=color:#00009f>PROGRAM</span><span class="token plain"> array</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">  </span><span class="token keyword" style=color:#00009f>IMPLICIT NONE</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">  </span><span class="token keyword" style=color:#00009f>INTEGER</span><span class="token plain"> </span><span class="token operator" style=color:#393A34>::</span><span class="token plain"> vec</span><span class="token punctuation" style=color:#393A34>(</span><span class="token number" style=color:#36acaa>10</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">  </span><span class="token keyword" style=color:#00009f>INTEGER</span><span class="token plain"> </span><span class="token operator" style=color:#393A34>::</span><span class="token plain"> ii</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">  OUTER_LOOP </span><span class="token punctuation" style=color:#393A34>:</span><span class="token plain"> </span><span class="token keyword" style=color:#00009f>DO</span><span class="token plain"> ii </span><span class="token operator" style=color:#393A34>=</span><span class="token plain"> </span><span class="token number" style=color:#36acaa>1</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> </span><span class="token number" style=color:#36acaa>10</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    vec</span><span class="token punctuation" style=color:#393A34>(</span><span class="token plain">ii</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"> </span><span class="token operator" style=color:#393A34>=</span><span class="token plain"> ii</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">  </span><span class="token keyword" style=color:#00009f>ENDDO</span><span class="token plain"> OUTER_LOOP</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">  </span><span class="token keyword" style=color:#00009f>DO</span><span class="token plain"> ii </span><span class="token operator" style=color:#393A34>=</span><span class="token plain"> </span><span class="token number" style=color:#36acaa>1</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> </span><span class="token number" style=color:#36acaa>10</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>PRINT</span><span class="token plain"> </span><span class="token string" style=color:#e3116c>'(i2)'</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> vec</span><span class="token punctuation" style=color:#393A34>(</span><span class="token plain">ii</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">  </span><span class="token keyword" style=color:#00009f>ENDDO</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain"></span><span class="token keyword" style=color:#00009f>END PROGRAM</span><span class="token plain"> array</span></span><br></span></code></pre><div class=buttonGroup__atx><button type=button aria-label="Copy code to clipboard" title=Copy class=clean-btn><span class=copyButtonIcons_eSgA aria-hidden=true><svg viewBox="0 0 24 24" class=copyButtonIcon_y97N><path fill=currentColor d="M19,21H8V7H19M19,5H8A2,2 0 0,0 6,7V21A2,2 0 0,0 8,23H19A2,2 0 0,0 21,21V7A2,2 0 0,0 19,5M16,1H4A2,2 0 0,0 2,3V17H4V3H16V1Z"/></svg><svg viewBox="0 0 24 24" class=copyButtonSuccessIcon_LjdS><path fill=currentColor d=M21,7L9,19L3.5,13.5L4.91,12.09L9,16.17L19.59,5.59L21,7Z /></svg></span></button></div></div></div>
+<!doctype html><html lang=en dir=ltr class="docs-wrapper plugin-docs plugin-id-default docs-version-current docs-doc-page docs-doc-id-array" data-has-hydrated=false><meta charset=UTF-8><meta name=generator content="Docusaurus v3.6.1"><title data-rh=true>Array and Matrix • Fortran Tutorial</title><meta data-rh=true name=viewport content="width=device-width,initial-scale=1.0"><meta data-rh=true name=twitter:card content=summary_large_image><meta data-rh=true property=og:url content=https://pranabdas.github.io/fortran/array><meta data-rh=true property=og:locale content=en><meta data-rh=true name=docusaurus_locale content=en><meta data-rh=true name=docsearch:language content=en><meta data-rh=true name=theme-color content=#06445c><meta data-rh=true name=docusaurus_version content=current><meta data-rh=true name=docusaurus_tag content=docs-default-current><meta data-rh=true name=docsearch:version content=current><meta data-rh=true name=docsearch:docusaurus_tag content=docs-default-current><meta data-rh=true property=og:title content="Array and Matrix • Fortran Tutorial"><meta data-rh=true name=description content="There is intrinsic SIZE function to determine the length of a vector, SIZE(vec)."><meta data-rh=true property=og:description content="There is intrinsic SIZE function to determine the length of a vector, SIZE(vec)."><link data-rh=true rel=icon href=/fortran/img/favicon.png><link data-rh=true rel=canonical href=https://pranabdas.github.io/fortran/array><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/array hreflang=en><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/array hreflang=x-default><link rel=stylesheet href=https://pranab.pages.dev/assets/fonts/katex/katex.min.css><link rel=stylesheet href=/fortran/assets/css/styles.4de1c8a8.css><script src=/fortran/assets/js/runtime~main.667e3c0f.js defer></script><script src=/fortran/assets/js/main.10795e8f.js defer></script><body class=navigation-with-keyboard><script>!function(){var t,e=function(){try{return new URLSearchParams(window.location.search).get("docusaurus-theme")}catch(t){}}()||function(){try{return window.localStorage.getItem("theme")}catch(t){}}();t=null!==e?e:window.matchMedia("(prefers-color-scheme: dark)").matches?"dark":(window.matchMedia("(prefers-color-scheme: light)").matches,"light"),document.documentElement.setAttribute("data-theme",t)}(),function(){try{for(var[t,e]of new URLSearchParams(window.location.search).entries())if(t.startsWith("docusaurus-data-")){var a=t.replace("docusaurus-data-","data-");document.documentElement.setAttribute(a,e)}}catch(t){}}()</script><div id=__docusaurus><div role=region aria-label="Skip to main content"><a class=skipToContent_fXgn href=#__docusaurus_skipToContent_fallback>Skip to main content</a></div><nav aria-label=Main class="navbar navbar--fixed-top navbarHideable_m1mJ"><div class=navbar__inner><div class=navbar__items><button aria-label="Toggle navigation bar" aria-expanded=false class="navbar__toggle clean-btn" type=button><svg width=30 height=30 viewBox="0 0 30 30" aria-hidden=true><path stroke=currentColor stroke-linecap=round stroke-miterlimit=10 stroke-width=2 d="M4 7h22M4 15h22M4 23h22"/></svg></button><a class=navbar__brand href=/fortran/><div class=navbar__logo><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--light_NVdE"><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--dark_xIcU"></div><b class="navbar__title text--truncate">Fortran</b></a><div class="navbar__item dropdown dropdown--hoverable"><a aria-current=page class="navbar__link active" aria-haspopup=true aria-expanded=false role=button href=/fortran/>Docs</a><ul class=dropdown__menu><li><a aria-current=page class="dropdown__link dropdown__link--active" href=/fortran/>Fortran Programming</a><li><a href=https://pranabdas.github.io/docs/ rel="noopener noreferrer" class=dropdown__link>~ ~ ~ Other Docs ~ ~ ~</a><li><a href=https://pranabdas.github.io/arpespythontools/ rel="noopener noreferrer" class=dropdown__link>ARPES Python Tools</a><li><a href=https://pranabdas.github.io/c-cpp/ rel="noopener noreferrer" class=dropdown__link>C and C++ Programming</a><li><a href=https://pranabdas.github.io/condmat-notes/ rel="noopener noreferrer" class=dropdown__link>Condensed Matter Notes</a><li><a href=https://pranabdas.github.io/javascript/ rel="noopener noreferrer" class=dropdown__link>Javascript Tutorial</a><li><a href=https://pranabdas.github.io/linux/ rel="noopener noreferrer" class=dropdown__link>Linux Tutorial</a><li><a href=https://pranabdas.github.io/machine-learning/ rel="noopener noreferrer" class=dropdown__link>Machine Learning Notes</a><li><a href=https://pranabdas.github.io/openmx/ rel="noopener noreferrer" class=dropdown__link>OpenMX tutorial</a><li><a href=https://pranabdas.github.io/python-tutorial/ rel="noopener noreferrer" class=dropdown__link>Python Tutorial</a><li><a href=https://pranabdas.github.io/espresso/ rel="noopener noreferrer" class=dropdown__link>Quantum Espresso Tutorial</a><li><a href=https://pranabdas.github.io/rust/ rel="noopener noreferrer" class=dropdown__link>Rust Programming</a><li><a href=https://pranabdas.github.io/arpes-manual/ rel="noopener noreferrer" class=dropdown__link>SUV ARPES Manual</a><li><a href=https://pranabdas.github.io/suvtools/ rel="noopener noreferrer" class=dropdown__link>SUV Python Tools</a></ul></div></div><div class="navbar__items navbar__items--right"><a href=https://github.com/pranabdas/fortran rel="noopener noreferrer" class="navbar__item navbar__link header-github-link" aria-label="GitHub repository" title="Visit project repository in GitHub"></a><a href=https://pranabdas.github.io rel="noopener noreferrer" class="navbar__item navbar__link header-homepage-link" aria-label="About me" title="Go to Pranab's Homepage"></a><div class="toggle_vylO colorModeToggle_DEke"><button class="clean-btn toggleButton_gllP toggleButtonDisabled_aARS" type=button disabled title="Switch between dark and light mode (currently light mode)" aria-label="Switch between dark and light mode (currently light mode)" aria-live=polite aria-pressed=false><svg viewBox="0 0 24 24" width=24 height=24 class=lightToggleIcon_pyhR><path fill=currentColor d="M12,9c1.65,0,3,1.35,3,3s-1.35,3-3,3s-3-1.35-3-3S10.35,9,12,9 M12,7c-2.76,0-5,2.24-5,5s2.24,5,5,5s5-2.24,5-5 S14.76,7,12,7L12,7z M2,13l2,0c0.55,0,1-0.45,1-1s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S1.45,13,2,13z M20,13l2,0c0.55,0,1-0.45,1-1 s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S19.45,13,20,13z M11,2v2c0,0.55,0.45,1,1,1s1-0.45,1-1V2c0-0.55-0.45-1-1-1S11,1.45,11,2z M11,20v2c0,0.55,0.45,1,1,1s1-0.45,1-1v-2c0-0.55-0.45-1-1-1C11.45,19,11,19.45,11,20z M5.99,4.58c-0.39-0.39-1.03-0.39-1.41,0 c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0s0.39-1.03,0-1.41L5.99,4.58z M18.36,16.95 c-0.39-0.39-1.03-0.39-1.41,0c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0c0.39-0.39,0.39-1.03,0-1.41 L18.36,16.95z M19.42,5.99c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06c-0.39,0.39-0.39,1.03,0,1.41 s1.03,0.39,1.41,0L19.42,5.99z M7.05,18.36c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06 c-0.39,0.39-0.39,1.03,0,1.41s1.03,0.39,1.41,0L7.05,18.36z"/></svg><svg viewBox="0 0 24 24" width=24 height=24 class=darkToggleIcon_wfgR><path fill=currentColor d="M9.37,5.51C9.19,6.15,9.1,6.82,9.1,7.5c0,4.08,3.32,7.4,7.4,7.4c0.68,0,1.35-0.09,1.99-0.27C17.45,17.19,14.93,19,12,19 c-3.86,0-7-3.14-7-7C5,9.07,6.81,6.55,9.37,5.51z M12,3c-4.97,0-9,4.03-9,9s4.03,9,9,9s9-4.03,9-9c0-0.46-0.04-0.92-0.1-1.36 c-0.98,1.37-2.58,2.26-4.4,2.26c-2.98,0-5.4-2.42-5.4-5.4c0-1.81,0.89-3.42,2.26-4.4C12.92,3.04,12.46,3,12,3L12,3z"/></svg></button></div><div class=navbarSearchContainer_Bca1><div class="navbar__search searchBarContainer_NW3z" dir=ltr><input placeholder=Search aria-label=Search class=navbar__search-input value=""><div class="loadingRing_RJI3 searchBarLoadingRing_YnHq"><div></div><div></div><div></div><div></div></div></div></div></div></div><div role=presentation class=navbar-sidebar__backdrop></div></nav><div id=__docusaurus_skipToContent_fallback class="main-wrapper mainWrapper_z2l0"><div class=docsWrapper_hBAB><button aria-label="Scroll back to top" class="clean-btn theme-back-to-top-button backToTopButton_sjWU" type=button></button><div class=docRoot_UBD9><aside class="theme-doc-sidebar-container docSidebarContainer_YfHR"><div class=sidebarViewport_aRkj><div class="sidebar_njMd sidebarWithHideableNavbar_wUlq"><a tabindex=-1 class=sidebarLogo_isFc href=/fortran/><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--light_NVdE"><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--dark_xIcU"><b>Fortran</b></a><nav aria-label="Docs sidebar" class="menu thin-scrollbar menu_SIkG"><ul class="theme-doc-sidebar-menu menu__list"><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/>Setup</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/basics>Basics</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class="menu__link menu__link--active" aria-current=page href=/fortran/array>Array and Matrix</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/control>Logical control</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/loop>Loop</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/modules>Modules</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/procedures>Procedures</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/complex>Complex number</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/recursion>Recursion</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/types>Custom types</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/pointer>Pointer</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/file>File I/O</a><li class="theme-doc-sidebar-item-category theme-doc-sidebar-item-category-level-1 menu__list-item menu__list-item--collapsed"><div class=menu__list-item-collapsible><a class="menu__link menu__link--sublist" href=/fortran/category/coding-practice>Coding practice</a><button aria-label="Expand sidebar category 'Coding practice'" aria-expanded=false type=button class="clean-btn menu__caret"></button></div><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/resources>Resources</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/license>License</a></ul></nav><button type=button title="Collapse sidebar" aria-label="Collapse sidebar" class="button button--secondary button--outline collapseSidebarButton_PEFL"><svg width=20 height=20 aria-hidden=true class=collapseSidebarButtonIcon_kv0_><g fill=#7a7a7a><path d="M9.992 10.023c0 .2-.062.399-.172.547l-4.996 7.492a.982.982 0 01-.828.454H1c-.55 0-1-.453-1-1 0-.2.059-.403.168-.551l4.629-6.942L.168 3.078A.939.939 0 010 2.528c0-.548.45-.997 1-.997h2.996c.352 0 .649.18.828.45L9.82 9.472c.11.148.172.347.172.55zm0 0"/><path d="M19.98 10.023c0 .2-.058.399-.168.547l-4.996 7.492a.987.987 0 01-.828.454h-3c-.547 0-.996-.453-.996-1 0-.2.059-.403.168-.551l4.625-6.942-4.625-6.945a.939.939 0 01-.168-.55 1 1 0 01.996-.997h3c.348 0 .649.18.828.45l4.996 7.492c.11.148.168.347.168.55zm0 0"/></g></svg></button></div></div></aside><main class=docMainContainer_TBSr><div class="container padding-top--md padding-bottom--lg"><div class=row><div class="col docItemCol_VOVn"><div class=docItemContainer_Djhp><article><nav class="theme-doc-breadcrumbs breadcrumbsContainer_Z_bl" aria-label=Breadcrumbs><ul class=breadcrumbs itemscope itemtype=https://schema.org/BreadcrumbList><li class=breadcrumbs__item><a aria-label="Home page" class=breadcrumbs__link href=/fortran/><svg viewBox="0 0 24 24" class=breadcrumbHomeIcon_YNFT><path d="M10 19v-5h4v5c0 .55.45 1 1 1h3c.55 0 1-.45 1-1v-7h1.7c.46 0 .68-.57.33-.87L12.67 3.6c-.38-.34-.96-.34-1.34 0l-8.36 7.53c-.34.3-.13.87.33.87H5v7c0 .55.45 1 1 1h3c.55 0 1-.45 1-1z" fill=currentColor /></svg></a><li itemscope itemprop=itemListElement itemtype=https://schema.org/ListItem class="breadcrumbs__item breadcrumbs__item--active"><span class=breadcrumbs__link itemprop=name>Array and Matrix</span><meta itemprop=position content=1></ul></nav><div class="theme-doc-markdown markdown"><header><h1>Array and Matrix</h1></header><div class="language-fortran codeBlockContainer_Ckt0 theme-code-block" style=--prism-color:#393A34;--prism-background-color:#f6f8fa><div class=codeBlockTitle_Ktv7>src/05_array.f90</div><div class=codeBlockContent_biex><pre tabindex=0 class="prism-code language-fortran codeBlock_bY9V thin-scrollbar" style=color:#393A34;background-color:#f6f8fa><code class="codeBlockLines_e6Vv codeBlockLinesWithNumbering_o6Pm"><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token comment" style=color:#999988;font-style:italic>! Program : Array</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain"></span><span class="token keyword" style=color:#00009f>PROGRAM</span><span class="token plain"> array</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">  </span><span class="token keyword" style=color:#00009f>IMPLICIT NONE</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">  </span><span class="token keyword" style=color:#00009f>INTEGER</span><span class="token plain"> </span><span class="token operator" style=color:#393A34>::</span><span class="token plain"> vec</span><span class="token punctuation" style=color:#393A34>(</span><span class="token number" style=color:#36acaa>10</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">  </span><span class="token keyword" style=color:#00009f>INTEGER</span><span class="token plain"> </span><span class="token operator" style=color:#393A34>::</span><span class="token plain"> ii</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">  OUTER_LOOP </span><span class="token punctuation" style=color:#393A34>:</span><span class="token plain"> </span><span class="token keyword" style=color:#00009f>DO</span><span class="token plain"> ii </span><span class="token operator" style=color:#393A34>=</span><span class="token plain"> </span><span class="token number" style=color:#36acaa>1</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> </span><span class="token number" style=color:#36acaa>10</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    vec</span><span class="token punctuation" style=color:#393A34>(</span><span class="token plain">ii</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"> </span><span class="token operator" style=color:#393A34>=</span><span class="token plain"> ii</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">  </span><span class="token keyword" style=color:#00009f>ENDDO</span><span class="token plain"> OUTER_LOOP</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">  </span><span class="token keyword" style=color:#00009f>DO</span><span class="token plain"> ii </span><span class="token operator" style=color:#393A34>=</span><span class="token plain"> </span><span class="token number" style=color:#36acaa>1</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> </span><span class="token number" style=color:#36acaa>10</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>PRINT</span><span class="token plain"> </span><span class="token string" style=color:#e3116c>'(i2)'</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> vec</span><span class="token punctuation" style=color:#393A34>(</span><span class="token plain">ii</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">  </span><span class="token keyword" style=color:#00009f>ENDDO</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain"></span><span class="token keyword" style=color:#00009f>END PROGRAM</span><span class="token plain"> array</span></span><br></span></code></pre><div class=buttonGroup__atx><button type=button aria-label="Copy code to clipboard" title=Copy class=clean-btn><span class=copyButtonIcons_eSgA aria-hidden=true><svg viewBox="0 0 24 24" class=copyButtonIcon_y97N><path fill=currentColor d="M19,21H8V7H19M19,5H8A2,2 0 0,0 6,7V21A2,2 0 0,0 8,23H19A2,2 0 0,0 21,21V7A2,2 0 0,0 19,5M16,1H4A2,2 0 0,0 2,3V17H4V3H16V1Z"/></svg><svg viewBox="0 0 24 24" class=copyButtonSuccessIcon_LjdS><path fill=currentColor d=M21,7L9,19L3.5,13.5L4.91,12.09L9,16.17L19.59,5.59L21,7Z /></svg></span></button></div></div></div>
 <p>There is intrinsic SIZE function to determine the length of a vector, SIZE(vec).
 Another example where we use implied DO loop to assign an array:</p>
 <!-- -->
diff --git a/assets/js/main.ec888ba8.js b/assets/js/main.10795e8f.js
similarity index 78%
rename from assets/js/main.ec888ba8.js
rename to assets/js/main.10795e8f.js
index 8840bad..7d9b935 100644
--- a/assets/js/main.ec888ba8.js
+++ b/assets/js/main.10795e8f.js
@@ -33,4 +33,4 @@ Please double-check the following navbar item (themeConfig.navbar.items) of your
 ${JSON.stringify(e,null,2)}`,{cause:t}),children:(0,r.jsx)(eM,{...e})},t))})}function e1(e){let{left:t,right:n}=e;return(0,r.jsxs)("div",{className:"navbar__inner",children:[(0,r.jsx)("div",{className:"navbar__items",children:t}),(0,r.jsx)("div",{className:"navbar__items navbar__items--right",children:n})]})}function e2(){let e=(0,P.e)(),t=(0,v.L)().navbar.items,[n,a]=function(e){function t(e){return(e.position??"right")==="left"}let n=e.filter(t);return[n,e.filter(e=>!t(e))]}(t),o=t.find(e=>"search"===e.type);return(0,r.jsx)(e1,{left:(0,r.jsxs)(r.Fragment,{children:[!e.disabled&&(0,r.jsx)(eX,{}),(0,r.jsx)(Q,{}),(0,r.jsx)(e0,{items:n})]}),right:(0,r.jsxs)(r.Fragment,{children:[(0,r.jsx)(e0,{items:a}),(0,r.jsx)(H,{className:eJ}),!o&&(0,r.jsx)(eA,{children:(0,r.jsx)(eN,{})})]})})}function e3(){return(0,r.jsx)(eQ,{children:(0,r.jsx)(e2,{})})}function e4(e){let{item:t}=e,{to:n,href:a,label:o,prependBaseUrlToHref:i,...l}=t,s=(0,q.ZP)(n),u=(0,q.ZP)(a,{forcePrependBaseUrl:!0});return(0,r.jsxs)(G.Z,{className:"footer__link-item",...a?{href:i?u:a}:{to:s},...l,children:[o,a&&!(0,Y.Z)(a)&&(0,r.jsx)(X.Z,{})]})}function e9(e){let{item:t}=e;return t.html?(0,r.jsx)("li",{className:"footer__item",dangerouslySetInnerHTML:{__html:t.html}}):(0,r.jsx)("li",{className:"footer__item",children:(0,r.jsx)(e4,{item:t})},t.href??t.to)}function e5(e){let{column:t}=e;return(0,r.jsxs)("div",{className:"col footer__col",children:[(0,r.jsx)("div",{className:"footer__title",children:t.title}),(0,r.jsx)("ul",{className:"footer__items clean-list",children:t.items.map((e,t)=>(0,r.jsx)(e9,{item:e},t))})]})}function e6(e){let{columns:t}=e;return(0,r.jsx)("div",{className:"row footer__links",children:t.map((e,t)=>(0,r.jsx)(e5,{column:e},t))})}function e8(){return(0,r.jsx)("span",{className:"footer__link-separator",children:"\xb7"})}function e7(e){let{item:t}=e;return t.html?(0,r.jsx)("span",{className:"footer__link-item",dangerouslySetInnerHTML:{__html:t.html}}):(0,r.jsx)(e4,{item:t})}function te(e){let{links:t}=e;return(0,r.jsx)("div",{className:"footer__links text--center",children:(0,r.jsx)("div",{className:"footer__links",children:t.map((e,n)=>(0,r.jsxs)(a.Fragment,{children:[(0,r.jsx)(e7,{item:e}),t.length!==n+1&&(0,r.jsx)(e8,{})]},n))})})}function tt(e){let{links:t}=e;return"title"in t[0]?(0,r.jsx)(e6,{columns:t}):(0,r.jsx)(te,{links:t})}var tn=n("6561");let tr={footerLogoLink:"footerLogoLink_BH7S"};function ta(e){let{logo:t}=e,{withBaseUrl:n}=(0,q.Cg)(),a={light:n(t.src),dark:n(t.srcDark??t.src)};return(0,r.jsx)(tn.Z,{className:(0,o.Z)("footer__logo",t.className),alt:t.alt,sources:a,width:t.width,height:t.height,style:t.style})}function to(e){let{logo:t}=e;return t.href?(0,r.jsx)(G.Z,{href:t.href,className:tr.footerLogoLink,target:t.target,children:(0,r.jsx)(ta,{logo:t})}):(0,r.jsx)(ta,{logo:t})}function ti(e){let{copyright:t}=e;return(0,r.jsx)("div",{className:"footer__copyright",dangerouslySetInnerHTML:{__html:t}})}function tl(e){let{style:t,links:n,logo:a,copyright:i}=e;return(0,r.jsx)("footer",{className:(0,o.Z)("footer",{"footer--dark":"dark"===t}),children:(0,r.jsxs)("div",{className:"container container-fluid",children:[n,(a||i)&&(0,r.jsxs)("div",{className:"footer__bottom text--center",children:[a&&(0,r.jsx)("div",{className:"margin-bottom--sm",children:a}),i]})]})})}let ts=a.memo(function(){let{footer:e}=(0,v.L)();if(!e)return null;let{copyright:t,links:n,logo:a,style:o}=e;return(0,r.jsx)(tl,{style:o,links:n&&n.length>0&&(0,r.jsx)(tt,{links:n}),logo:a&&(0,r.jsx)(to,{logo:a}),copyright:t&&(0,r.jsx)(ti,{copyright:t})})}),tu=(0,N.Qc)([F.S,x.p,O.OC,ej.L5,l.VC,function(e){let{children:t}=e;return(0,r.jsx)(L.n2,{children:(0,r.jsx)(P.M,{children:(0,r.jsx)(I,{children:t})})})}]);function tc(e){let{children:t}=e;return(0,r.jsx)(tu,{children:t})}var td=n("4403");function tf(e){let{error:t,tryAgain:n}=e;return(0,r.jsx)("main",{className:"container margin-vert--xl",children:(0,r.jsx)("div",{className:"row",children:(0,r.jsxs)("div",{className:"col col--6 col--offset-3",children:[(0,r.jsx)(td.Z,{as:"h1",className:"hero__title",children:(0,r.jsx)(u.Z,{id:"theme.ErrorPageContent.title",description:"The title of the fallback page when the page crashed",children:"This page crashed."})}),(0,r.jsx)("div",{className:"margin-vert--lg",children:(0,r.jsx)(eG,{onClick:n,className:"button button--primary shadow--lw"})}),(0,r.jsx)("hr",{}),(0,r.jsx)("div",{className:"margin-vert--md",children:(0,r.jsx)(eq,{error:t})})]})})})}let tp="mainWrapper_z2l0";function th(e){let{children:t,noFooter:n,wrapperClassName:a,title:s,description:u}=e;return(0,m.t)(),(0,r.jsxs)(tc,{children:[(0,r.jsx)(l.d,{title:s,description:u}),(0,r.jsx)(b,{}),(0,r.jsx)(C,{}),(0,r.jsx)(e3,{}),(0,r.jsx)("div",{id:d,className:(0,o.Z)(g.k.wrapper.main,tp,a),children:(0,r.jsx)(i.Z,{fallback:e=>(0,r.jsx)(tf,{...e}),children:t})}),!n&&(0,r.jsx)(ts,{})]})}},4987:function(e,t,n){"use strict";n.d(t,{Z:function(){return c}});var r=n(5893);n(7294);var a=n(3012),o=n(4757),i=n(2933),l=n(140),s=n(6561);function u(e){let{logo:t,alt:n,imageClassName:a}=e,i={light:(0,o.ZP)(t.src),dark:(0,o.ZP)(t.srcDark||t.src)},l=(0,r.jsx)(s.Z,{className:t.className,sources:i,height:t.height,width:t.width,alt:n,style:t.style});return a?(0,r.jsx)("div",{className:a,children:l}):l}function c(e){let{siteConfig:{title:t}}=(0,i.Z)(),{navbar:{title:n,logo:s}}=(0,l.L)(),{imageClassName:c,titleClassName:d,...f}=e,p=(0,o.ZP)(s?.href||"/"),h=s?.alt??(n?"":t);return(0,r.jsxs)(a.Z,{to:p,...f,...s?.target&&{target:s.target},children:[s&&(0,r.jsx)(u,{logo:s,alt:h,imageClassName:c}),null!=n&&(0,r.jsx)("b",{className:d,children:n})]})}},4315:function(e,t,n){"use strict";n.d(t,{Z:function(){return o}});var r=n(5893);n(7294);var a=n(4819);function o(e){let{locale:t,version:n,tag:o}=e;return(0,r.jsxs)(a.Z,{children:[t&&(0,r.jsx)("meta",{name:"docusaurus_locale",content:t}),n&&(0,r.jsx)("meta",{name:"docusaurus_version",content:n}),o&&(0,r.jsx)("meta",{name:"docusaurus_tag",content:o}),t&&(0,r.jsx)("meta",{name:"docsearch:language",content:t}),n&&(0,r.jsx)("meta",{name:"docsearch:version",content:n}),o&&(0,r.jsx)("meta",{name:"docsearch:docusaurus_tag",content:o})]})}},6561:function(e,t,n){"use strict";n.d(t,{Z:()=>c});var r=n("5893"),a=n("7294"),o=n("7026"),i=n("7227"),l=n("4239");let s={themedComponent:"themedComponent_mlkZ","themedComponent--light":"themedComponent--light_NVdE","themedComponent--dark":"themedComponent--dark_xIcU"};function u(e){let{className:t,children:n}=e,u=(0,i.Z)(),{colorMode:c}=(0,l.I)();return(0,r.jsx)(r.Fragment,{children:(u?"dark"===c?["dark"]:["light"]:["light","dark"]).map(e=>{let i=n({theme:e,className:(0,o.Z)(t,s.themedComponent,s[`themedComponent--${e}`])});return(0,r.jsx)(a.Fragment,{children:i},e)})})}function c(e){let{sources:t,className:n,alt:a,...o}=e;return(0,r.jsx)(u,{className:n,children:e=>{let{theme:n,className:i}=e;return(0,r.jsx)("img",{src:t[n],alt:a,className:i,...o})}})}},7455:function(e,t,n){"use strict";n.d(t,{u:function(){return s},z:function(){return h}});var r=n(5893),a=n(7294),o=n(7565),i=n(2e3),l=n(7504);function s(e){let{initialState:t}=e,[n,r]=(0,a.useState)(t??!1),o=(0,a.useCallback)(()=>{r(e=>!e)},[]);return{collapsed:n,setCollapsed:r,toggleCollapsed:o}}let u={display:"none",overflow:"hidden",height:"0px"},c={display:"block",overflow:"visible",height:"auto"};function d(e,t){let n=t?u:c;e.style.display=n.display,e.style.overflow=n.overflow,e.style.height=n.height}function f(e){let{as:t="div",collapsed:n,children:i,animation:s,onCollapseTransitionEnd:f,className:p,disableSSRStyle:h}=e,g=(0,a.useRef)(null);return!function(e){let{collapsibleRef:t,collapsed:n,animation:r}=e,o=(0,a.useRef)(!1);(0,a.useEffect)(()=>{let e=t.current;function a(){let t=function(){let t=e.scrollHeight,n=r?.duration??function(e){if((0,l.n)())return 1;let t=e/36;return Math.round((4+15*t**.25+t/5)*10)}(t),a=r?.easing??"ease-in-out";return{transition:`height ${n}ms ${a}`,height:`${t}px`}}();e.style.transition=t.transition,e.style.height=t.height}if(!o.current){d(e,n),o.current=!0;return}return e.style.willChange="height",function(){let t=requestAnimationFrame(()=>{n?(a(),requestAnimationFrame(()=>{e.style.height=u.height,e.style.overflow=u.overflow})):(e.style.display="block",requestAnimationFrame(()=>{a()}))});return()=>cancelAnimationFrame(t)}()},[t,n,r])}({collapsibleRef:g,collapsed:n,animation:s}),(0,r.jsx)(t,{ref:g,style:h?void 0:function(e){if(!o.Z.canUseDOM)return e?u:c}(n),onTransitionEnd:e=>{if("height"===e.propertyName)d(g.current,n),f?.(n)},className:p,children:i})}function p(e){let{collapsed:t,...n}=e,[o,l]=(0,a.useState)(!t),[s,u]=(0,a.useState)(t);return(0,i.Z)(()=>{!t&&l(!0)},[t]),(0,i.Z)(()=>{o&&u(t)},[o,t]),o?(0,r.jsx)(f,{...n,collapsed:s}):null}function h(e){let{lazy:t,...n}=e;return(0,r.jsx)(t?p:f,{...n})}},2093:function(e,t,n){"use strict";n.d(t,{n:function(){return g},p:function(){return h}});var r=n(5893),a=n(7294),o=n(7227),i=n(6009),l=n(5346),s=n(140);let u=(0,i.WA)("docusaurus.announcement.dismiss"),c=(0,i.WA)("docusaurus.announcement.id"),d=()=>"true"===u.get(),f=e=>u.set(String(e)),p=a.createContext(null);function h(e){let{children:t}=e,n=function(){let{announcementBar:e}=(0,s.L)(),t=(0,o.Z)(),[n,r]=(0,a.useState)(()=>!!t&&d());(0,a.useEffect)(()=>{r(d())},[]);let i=(0,a.useCallback)(()=>{f(!0),r(!0)},[]);return(0,a.useEffect)(()=>{if(!e)return;let{id:t}=e,n=c.get();"annoucement-bar"===n&&(n="announcement-bar");let a=t!==n;c.set(t),a&&f(!1),(a||!d())&&r(!1)},[e]),(0,a.useMemo)(()=>({isActive:!!e&&!n,close:i}),[e,n,i])}();return(0,r.jsx)(p.Provider,{value:n,children:t})}function g(){let e=(0,a.useContext)(p);if(!e)throw new l.i6("AnnouncementBarProvider");return e}},4239:function(e,t,n){"use strict";n.d(t,{I:function(){return y},S:function(){return m}});var r=n(5893),a=n(7294),o=n(7565),i=n(5346),l=n(6009),s=n(140);let u=a.createContext(void 0),c="theme",d=(0,l.WA)(c),f={light:"light",dark:"dark"},p=e=>e===f.dark?f.dark:f.light,h=e=>o.Z.canUseDOM?p(document.documentElement.getAttribute("data-theme")):p(e),g=e=>{d.set(p(e))};function m(e){let{children:t}=e,n=function(){let{colorMode:{defaultMode:e,disableSwitch:t,respectPrefersColorScheme:n}}=(0,s.L)(),[r,o]=(0,a.useState)(h(e));(0,a.useEffect)(()=>{t&&d.del()},[t]);let i=(0,a.useCallback)(function(t){let r=arguments.length>1&&void 0!==arguments[1]?arguments[1]:{},{persist:a=!0}=r;t?(o(t),a&&g(t)):(n?o(window.matchMedia("(prefers-color-scheme: dark)").matches?f.dark:f.light):o(e),d.del())},[n,e]);(0,a.useEffect)(()=>{document.documentElement.setAttribute("data-theme",p(r))},[r]),(0,a.useEffect)(()=>{if(t)return;let e=e=>{if(e.key!==c)return;let t=d.get();null!==t&&i(p(t))};return window.addEventListener("storage",e),()=>window.removeEventListener("storage",e)},[t,i]);let l=(0,a.useRef)(!1);return(0,a.useEffect)(()=>{if(t&&!n)return;let e=window.matchMedia("(prefers-color-scheme: dark)"),r=()=>{if(window.matchMedia("print").matches||l.current){l.current=window.matchMedia("print").matches;return}i(null)};return e.addListener(r),()=>e.removeListener(r)},[i,t,n]),(0,a.useMemo)(()=>({colorMode:r,setColorMode:i,get isDarkTheme(){return r===f.dark},setLightTheme(){i(f.light)},setDarkTheme(){i(f.dark)}}),[r,i])}();return(0,r.jsx)(u.Provider,{value:n,children:t})}function y(){let e=(0,a.useContext)(u);if(null==e)throw new i.i6("ColorModeProvider","Please see https://docusaurus.io/docs/api/themes/configuration#use-color-mode.");return e}},3780:function(e,t,n){"use strict";n.d(t,{M:()=>d,e:()=>f});var r=n("5893"),a=n("7294"),o=n("1179"),i=n("4704"),l=n("6550"),s=n("5346"),u=n("140");let c=a.createContext(void 0);function d(e){let{children:t}=e,n=function(){var e;let t=function(){let e=(0,o.HY)(),{items:t}=(0,u.L)().navbar;return 0===t.length&&!e.component}(),n=(0,i.i)(),r=!t&&"mobile"===n,[c,d]=(0,a.useState)(!1);e=()=>{if(c)return d(!1),!1},function(e){let t=(0,l.k6)(),n=(0,s.zX)(e);(0,a.useEffect)(()=>t.block((e,t)=>n(e,t)),[t,n])}((t,n)=>{if("POP"===n)return e(t,n)});let f=(0,a.useCallback)(()=>{d(e=>!e)},[]);return(0,a.useEffect)(()=>{"desktop"===n&&d(!1)},[n]),(0,a.useMemo)(()=>({disabled:t,shouldRender:r,toggle:f,shown:c}),[t,r,f,c])}();return(0,r.jsx)(c.Provider,{value:n,children:t})}function f(){let e=a.useContext(c);if(void 0===e)throw new s.i6("NavbarMobileSidebarProvider");return e}},1179:function(e,t,n){"use strict";n.d(t,{HY:function(){return s},Zo:function(){return u},n2:function(){return l}});var r=n(5893),a=n(7294),o=n(5346);let i=a.createContext(null);function l(e){let{children:t}=e,n=(0,a.useState)({component:null,props:null});return(0,r.jsx)(i.Provider,{value:n,children:t})}function s(){let e=(0,a.useContext)(i);if(!e)throw new o.i6("NavbarSecondaryMenuContentProvider");return e[0]}function u(e){let{component:t,props:n}=e,r=(0,a.useContext)(i);if(!r)throw new o.i6("NavbarSecondaryMenuContentProvider");let[,l]=r,s=(0,o.Ql)(n);return(0,a.useEffect)(()=>{l({component:t,props:s})},[l,t,s]),(0,a.useEffect)(()=>()=>l({component:null,props:null}),[l]),null}},6959:function(e,t,n){"use strict";n.d(t,{h:()=>a,t:()=>o});var r=n("7294");let a="navigation-with-keyboard";function o(){(0,r.useEffect)(()=>{function e(e){"keydown"===e.type&&"Tab"===e.key&&document.body.classList.add(a),"mousedown"===e.type&&document.body.classList.remove(a)}return document.addEventListener("keydown",e),document.addEventListener("mousedown",e),()=>{document.body.classList.remove(a),document.removeEventListener("keydown",e),document.removeEventListener("mousedown",e)}},[])}},4704:function(e,t,n){"use strict";n.d(t,{i:function(){return i}});var r=n(7294),a=n(7565);let o={desktop:"desktop",mobile:"mobile"};function i(){let{desktopBreakpoint:e=996}=arguments.length>0&&void 0!==arguments[0]?arguments[0]:{},[t,n]=(0,r.useState)(()=>"ssr");return(0,r.useEffect)(()=>{function t(){n(function(e){if(!a.Z.canUseDOM)throw Error("getWindowSize() should only be called after React hydration");return window.innerWidth>e?o.desktop:o.mobile}(e))}return t(),window.addEventListener("resize",t),()=>{window.removeEventListener("resize",t)}},[e]),t}},4681:function(e,t,n){"use strict";n.d(t,{k:function(){return r}});let r={page:{blogListPage:"blog-list-page",blogPostPage:"blog-post-page",blogTagsListPage:"blog-tags-list-page",blogTagPostListPage:"blog-tags-post-list-page",blogAuthorsListPage:"blog-authors-list-page",blogAuthorsPostsPage:"blog-authors-posts-page",docsDocPage:"docs-doc-page",docsTagsListPage:"docs-tags-list-page",docsTagDocListPage:"docs-tags-doc-list-page",mdxPage:"mdx-page"},wrapper:{main:"main-wrapper",blogPages:"blog-wrapper",docsPages:"docs-wrapper",mdxPages:"mdx-wrapper"},common:{editThisPage:"theme-edit-this-page",lastUpdated:"theme-last-updated",backToTopButton:"theme-back-to-top-button",codeBlock:"theme-code-block",admonition:"theme-admonition",unlistedBanner:"theme-unlisted-banner",draftBanner:"theme-draft-banner",admonitionType:e=>`theme-admonition-${e}`},layout:{},docs:{docVersionBanner:"theme-doc-version-banner",docVersionBadge:"theme-doc-version-badge",docBreadcrumbs:"theme-doc-breadcrumbs",docMarkdown:"theme-doc-markdown",docTocMobile:"theme-doc-toc-mobile",docTocDesktop:"theme-doc-toc-desktop",docFooter:"theme-doc-footer",docFooterTagsRow:"theme-doc-footer-tags-row",docFooterEditMetaRow:"theme-doc-footer-edit-meta-row",docSidebarContainer:"theme-doc-sidebar-container",docSidebarMenu:"theme-doc-sidebar-menu",docSidebarItemCategory:"theme-doc-sidebar-item-category",docSidebarItemLink:"theme-doc-sidebar-item-link",docSidebarItemCategoryLevel:e=>`theme-doc-sidebar-item-category-level-${e}`,docSidebarItemLinkLevel:e=>`theme-doc-sidebar-item-link-level-${e}`},blog:{blogFooterTagsRow:"theme-blog-footer-tags-row",blogFooterEditMetaRow:"theme-blog-footer-edit-meta-row"},pages:{pageFooterEditMetaRow:"theme-pages-footer-edit-meta-row"}}},7504:function(e,t,n){"use strict";function r(){return window.matchMedia("(prefers-reduced-motion: reduce)").matches}n.d(t,{n:function(){return r}})},4713:function(e,t,n){"use strict";n.d(t,{FG:()=>f,d:()=>c,VC:()=>p});var r=n("5893"),a=n("7294"),o=n("7026"),i=n("4819"),l=n("4879"),s=n("4757"),u=n("2933");function c(e){let{title:t,description:n,keywords:a,image:o,children:l}=e,c=function(e){let{siteConfig:t}=(0,u.Z)(),{title:n,titleDelimiter:r}=t;return e?.trim().length?`${e.trim()} ${r} ${n}`:n}(t),{withBaseUrl:d}=(0,s.Cg)(),f=o?d(o,{absolute:!0}):void 0;return(0,r.jsxs)(i.Z,{children:[t&&(0,r.jsx)("title",{children:c}),t&&(0,r.jsx)("meta",{property:"og:title",content:c}),n&&(0,r.jsx)("meta",{name:"description",content:n}),n&&(0,r.jsx)("meta",{property:"og:description",content:n}),a&&(0,r.jsx)("meta",{name:"keywords",content:Array.isArray(a)?a.join(","):a}),f&&(0,r.jsx)("meta",{property:"og:image",content:f}),f&&(0,r.jsx)("meta",{name:"twitter:image",content:f}),l]})}let d=a.createContext(void 0);function f(e){let{className:t,children:n}=e,l=a.useContext(d),s=(0,o.Z)(l,t);return(0,r.jsxs)(d.Provider,{value:s,children:[(0,r.jsx)(i.Z,{children:(0,r.jsx)("html",{className:s})}),n]})}function p(e){var t;let{children:n}=e,i=function(){let e=a.useContext(l._);if(!e)throw Error("Unexpected: no Docusaurus route context found");return e}();let s=(t=i.plugin.name,`plugin-${t.replace(/docusaurus-(?:plugin|theme)-(?:content-)?/gi,"")}`),u=`plugin-id-${i.plugin.id}`;return(0,r.jsx)(f,{className:(0,o.Z)(s,u),children:n})}},5346:function(e,t,n){"use strict";n.d(t,{D9:function(){return l},Qc:function(){return c},Ql:function(){return u},i6:function(){return s},zX:function(){return i}});var r=n(5893),a=n(7294),o=n(2e3);function i(e){let t=(0,a.useRef)(e);return(0,o.Z)(()=>{t.current=e},[e]),(0,a.useCallback)(function(){for(var e=arguments.length,n=Array(e),r=0;r<e;r++)n[r]=arguments[r];return t.current(...n)},[])}function l(e){let t=(0,a.useRef)();return(0,o.Z)(()=>{t.current=e}),t.current}class s extends Error{constructor(e,t){super(),this.name="ReactContextError",this.message=`Hook ${this.stack?.split("\n")[1]?.match(/at (?:\w+\.)?(?<name>\w+)/)?.groups.name??""} is called outside the <${e}>. ${t??""}`}}function u(e){let t=Object.entries(e);return t.sort((e,t)=>e[0].localeCompare(t[0])),(0,a.useMemo)(()=>e,t.flat())}function c(e){return t=>{let{children:n}=t;return(0,r.jsx)(r.Fragment,{children:e.reduceRight((e,t)=>(0,r.jsx)(t,{children:e}),n)})}}},9246:function(e,t,n){"use strict";n.d(t,{Mg:function(){return i},Ns:function(){return l}});var r=n(7294),a=n(4143),o=n(2933);function i(e,t){let n=e=>(!e||e.endsWith("/")?e:`${e}/`)?.toLowerCase();return n(e)===n(t)}function l(){let{baseUrl:e}=(0,o.Z)().siteConfig;return(0,r.useMemo)(()=>(function(e){let{baseUrl:t,routes:n}=e;function r(e){return e.path===t&&!0===e.exact}function a(e){return e.path===t&&!e.exact}return function e(t){if(0===t.length)return;let n=t.find(r);return n?n:e(t.filter(a).flatMap(e=>e.routes??[]))}(n)})({routes:a.Z,baseUrl:e}),[e])}},9599:function(e,t,n){"use strict";n.d(t,{Ct:function(){return f},OC:function(){return u},RF:function(){return d}});var r=n(5893),a=n(7294),o=n(7565),i=n(7227);n(2e3);var l=n(5346);let s=a.createContext(void 0);function u(e){let{children:t}=e,n=function(){let e=(0,a.useRef)(!0);return(0,a.useMemo)(()=>({scrollEventsEnabledRef:e,enableScrollEvents:()=>{e.current=!0},disableScrollEvents:()=>{e.current=!1}}),[])}();return(0,r.jsx)(s.Provider,{value:n,children:t})}let c=()=>o.Z.canUseDOM?{scrollX:window.pageXOffset,scrollY:window.pageYOffset}:null;function d(e){let t=arguments.length>1&&void 0!==arguments[1]?arguments[1]:[],{scrollEventsEnabledRef:n}=function(){let e=(0,a.useContext)(s);if(null==e)throw new l.i6("ScrollControllerProvider");return e}(),r=(0,a.useRef)(c()),o=(0,l.zX)(e);(0,a.useEffect)(()=>{let e=()=>{if(!n.current)return;let e=c();o(e,r.current),r.current=e},t={passive:!0};return e(),window.addEventListener("scroll",e,t),()=>window.removeEventListener("scroll",e,t)},[o,n,...t])}function f(){let e=(0,a.useRef)(null),t=(0,i.Z)()&&"smooth"===getComputedStyle(document.documentElement).scrollBehavior;return{startScroll:n=>{var r;e.current=t?(r=n,window.scrollTo({top:r,behavior:"smooth"}),()=>{}):function(e){let t=null,n=document.documentElement.scrollTop>e;return!function r(){let a=document.documentElement.scrollTop;(n&&a>e||!n&&a<e)&&(t=requestAnimationFrame(r),window.scrollTo(0,Math.floor((a-e)*.85)+e))}(),()=>t&&cancelAnimationFrame(t)}(n)},cancelScroll:()=>e.current?.()}}},6009:function(e,t,n){"use strict";n.d(t,{WA:()=>s}),n("7294");var r=JSON.parse('{"d":"localStorage","u":""}');let a=r.d;function o(e){let{key:t,oldValue:n,newValue:r,storage:a}=e;if(n===r)return;let o=document.createEvent("StorageEvent");o.initStorageEvent("storage",!1,!1,t,n,r,window.location.href,a),window.dispatchEvent(o)}let i=!1,l={get:()=>null,set:()=>{},del:()=>{},listen:()=>()=>{}};function s(e,t){var n;let s=(n=e,`${n}${r.u}`);if("undefined"==typeof window)return function(e){function t(){throw Error(`Illegal storage API usage for storage key "${e}".
 Docusaurus storage APIs are not supposed to be called on the server-rendering process.
 Please only call storage APIs in effects and event handlers.`)}return{get:t,set:t,del:t,listen:t}}(s);let u=function(){let e=arguments.length>0&&void 0!==arguments[0]?arguments[0]:a;if("undefined"==typeof window)throw Error("Browser storage is not available on Node.js/Docusaurus SSR process.");if("none"===e)return null;try{return window[e]}catch(e){return function(e){!i&&(console.warn(`Docusaurus browser storage is not available.
-Possible reasons: running Docusaurus in an iframe, in an incognito browser session, or using too strict browser privacy settings.`,e),i=!0)}(e),null}}(t?.persistence);return null===u?l:{get:()=>{try{return u.getItem(s)}catch(e){return console.error(`Docusaurus storage error, can't get key=${s}`,e),null}},set:e=>{try{let t=u.getItem(s);u.setItem(s,e),o({key:s,oldValue:t,newValue:e,storage:u})}catch(t){console.error(`Docusaurus storage error, can't set ${s}=${e}`,t)}},del:()=>{try{let e=u.getItem(s);u.removeItem(s),o({key:s,oldValue:e,newValue:null,storage:u})}catch(e){console.error(`Docusaurus storage error, can't delete key=${s}`,e)}},listen:e=>{try{let t=t=>{t.storageArea===u&&t.key===s&&e(t)};return window.addEventListener("storage",t),()=>window.removeEventListener("storage",t)}catch(e){return console.error(`Docusaurus storage error, can't listen for changes of key=${s}`,e),()=>{}}}}}},8910:function(e,t,n){"use strict";n.d(t,{l:function(){return i}});var r=n(2933),a=n(6550),o=n(8365);function i(){let{siteConfig:{baseUrl:e,url:t,trailingSlash:n},i18n:{defaultLocale:i,currentLocale:l}}=(0,r.Z)(),{pathname:s}=(0,a.TH)(),u=(0,o.applyTrailingSlash)(s,{trailingSlash:n,baseUrl:e}),c=l===i?e:e.replace(`/${l}/`,"/"),d=u.replace(e,"");return{createUrl:function(e){var n;let{locale:r,fullyQualified:a}=e;return`${a?t:""}${(n=r)===i?`${c}`:`${c}${n}/`}${d}`}}}},346:function(e,t,n){"use strict";n.d(t,{S:function(){return i}});var r=n(7294),a=n(6550),o=n(5346);function i(e){let t=(0,a.TH)(),n=(0,o.D9)(t),i=(0,o.zX)(e);(0,r.useEffect)(()=>{if(!!n)t!==n&&i({location:t,previousLocation:n})},[i,t,n])}},140:function(e,t,n){"use strict";n.d(t,{L:function(){return a}});var r=n(2933);function a(){return(0,r.Z)().siteConfig.themeConfig}},4994:function(e,t,n){"use strict";Object.defineProperty(t,"__esModule",{value:!0}),t.addTrailingSlash=a,t.default=function(e,t){var n;let{trailingSlash:r,baseUrl:i}=t;if(e.startsWith("#"))return e;if(void 0===r)return e;let[l]=e.split(/[#?]/);let s="/"===l||l===i?l:(n=l,r?a(n):o(n));return e.replace(l,s)},t.addLeadingSlash=function(e){return(0,r.addPrefix)(e,"/")},t.removeTrailingSlash=o;let r=n(8411);function a(e){return e.endsWith("/")?e:`${e}/`}function o(e){return(0,r.removeSuffix)(e,"/")}},4202:function(e,t){"use strict";Object.defineProperty(t,"__esModule",{value:!0}),t.getErrorCausalChain=function e(t){return t.cause?[t,...e(t.cause)]:[t]}},8365:function(e,t,n){"use strict";t.getErrorCausalChain=t.applyTrailingSlash=void 0;let r=n(8395);var a,o=n(4994);Object.defineProperty(t,"applyTrailingSlash",{enumerable:!0,get:function(){return r.__importDefault(o).default}}),n(8411);var i=n(4202);Object.defineProperty(t,"getErrorCausalChain",{enumerable:!0,get:function(){return i.getErrorCausalChain}})},8411:function(e,t){"use strict";Object.defineProperty(t,"__esModule",{value:!0}),t.addPrefix=function(e,t){return e.startsWith(t)?e:`${t}${e}`},t.removeSuffix=function(e,t){return""===t?e:e.endsWith(t)?e.slice(0,-t.length):e},t.addSuffix=function(e,t){return e.endsWith(t)?e:`${e}${t}`},t.removePrefix=function(e,t){return e.startsWith(t)?e.slice(t.length):e}},5792:function(e,t,n){"use strict";n.d(t,{Z:()=>i});var r=n("5893");n("7294");var a=n("1728");let o="loadingRing_RJI3";function i(e){let{className:t}=e;return(0,r.jsxs)("div",{className:(0,a.Z)(o,t),children:[(0,r.jsx)("div",{}),(0,r.jsx)("div",{}),(0,r.jsx)("div",{}),(0,r.jsx)("div",{})]})}},5103:function(e,t,n){"use strict";n.d(t,{w:function(){return l}});var r=n(1336),a=n.n(r),o=n(322);let i=new Map;function l(e,t){let n=`${e}${t}`,r=i.get(n);return!r&&(r=s(e,t),i.set(n,r)),r}async function s(e,t){{let n=`${e}${o.J.replace("{dir}",t?`-${t.replace(/\//g,"-")}`:"")}`;if(new URL(n,location.origin).origin!==location.origin)throw Error("Unexpected version url");let r=await (await fetch(n)).json(),i=r.map((e,t)=>{let{documents:n,index:r}=e;return{type:t,documents:n,index:a().Index.load(r)}});return{wrappedIndexes:i,zhDictionary:Array.from(r.reduce((e,t)=>{for(let n of t.index.invertedIndex)/\p{Unified_Ideograph}/u.test(n[0][0])&&e.add(n[0]);return e},new Set))}}}},3978:function(e,t,n){"use strict";n.d(t,{v:()=>c});var r=n("1336"),a=n.n(r);let o=6;var i=n("322");function l(e){return s(e).concat(s(e.filter(e=>{let t=e[e.length-1];return!t.trailing&&t.maybeTyping}),!0))}function s(e,t){return e.map(e=>({tokens:e.map(e=>e.value),term:e.map(e=>({value:e.value,presence:a().Query.presence.REQUIRED,wildcard:(t?e.trailing||e.maybeTyping:e.trailing)?a().Query.wildcard.TRAILING:a().Query.wildcard.NONE}))}))}var u=n("5528");function c(e,t,n){return function(r,s){var c;let d=function(e,t){if(1===t.length&&["ja","jp","th"].includes(t[0]))return a()[t[0]].tokenizer(e).map(e=>e.toString());let n=/[^-\s]+/g;return t.includes("zh")&&(n=/\w+|\p{Unified_Ideograph}+/gu),e.toLowerCase().match(n)||[]}(r,i.dK);if(0===d.length){s([]);return}let f=function(e,t){let n;let r=function(e,t){let n=e.map(e=>/\p{Unified_Ideograph}/u.test(e)?function(e,t){let n=[];return!function e(r,a){let o=0,i=!1;for(let l of t)if(r.substr(0,l.length)===l){let t={missed:a.missed,term:a.term.concat({value:l})};r.length>l.length?e(r.substr(l.length),t):n.push(t),i=!0}else for(let t=l.length-1;t>o;t-=1){let s=l.substr(0,t);if(r.substr(0,t)===s){o=t;let l={missed:a.missed,term:a.term.concat({value:s,trailing:!0})};r.length>t?e(r.substr(t),l):n.push(l),i=!0;break}}!i&&(r.length>0?e(r.substr(1),{missed:a.missed+1,term:a.term}):a.term.length>0&&n.push(a))}(e,{missed:0,term:[]}),n.sort((e,t)=>{let n=e.missed>0?1:0,r=t.missed>0?1:0;return n!==r?n-r:e.term.length-t.term.length}).map(e=>e.term)}(e,t):[{value:e}]).slice(0,12),r=n.filter(e=>e.length>1),a=1,i=!1;for(let e of r)if(i)e.splice(1,e.length-1);else{e.length>o&&e.splice(o,e.length-o);let t=a*e.length;if(t>=12){if(t>12){let t=Math.floor(12/a);e.splice(t,e.length-t),a*=t}else a=t;a>o&&(i=!0)}else a=t}let l=[];return!function e(t,r){if(t===n.length||r.length>=12){l.push(r.slice(0,12));return}for(let a of n[t])e(t+1,r.concat(a))}(0,[]),l}(e,t);if(0===r.length)return[{tokens:e,term:e.map(e=>({value:e,presence:a().Query.presence.REQUIRED,wildcard:a().Query.wildcard.LEADING|a().Query.wildcard.TRAILING}))}];for(let e of r)e[e.length-1].maybeTyping=!0;let s=[];for(let e of i.dK)if("en"===e)!i._k&&s.unshift(a().stopWordFilter);else{let t=a()[e];t.stopWordFilter&&s.unshift(t.stopWordFilter)}if(s.length>0){let e=e=>s.reduce((e,t)=>e.filter(e=>t(e.value)),e);n=[];let t=[];for(let a of r){let r=e(a);n.push(r),r.length<a.length&&r.length>0&&t.push(r)}r.push(...t)}else n=r.slice();let u=[];for(let e of n)if(e.length>2)for(let t=e.length-1;t>=0;t-=1)u.push(e.slice(0,t).concat(e.slice(t+1)));return l(r).concat(l(u))}(d,t),p=[];n:for(let{term:t,tokens:r}of f)for(let{documents:a,index:o,type:i}of e)if(p.push(...o.query(e=>{for(let n of t)e.term(n.value,{wildcard:n.wildcard,presence:n.presence})}).slice(0,n).filter(e=>!p.some(t=>t.document.i.toString()===e.ref)).slice(0,n-p.length).map(t=>{let n=a.find(e=>e.i.toString()===t.ref);return{document:n,type:i,page:i!==u.P.Title&&e[0].documents.find(e=>e.i===n.p),metadata:t.matchData.metadata,tokens:r,score:t.score}})),p.length>=n)break n;(c=p).forEach((e,t)=>{e.index=t}),c.sort((e,t)=>{let n=(e.type===u.P.Heading||e.type===u.P.Content||e.type===u.P.Description)&&e.page?c.findIndex(t=>t.document===e.page):e.index,r=(t.type===u.P.Heading||t.type===u.P.Content||t.type===u.P.Description)&&t.page?c.findIndex(e=>e.document===t.page):t.index;if(-1===n&&(n=e.index),-1===r&&(r=t.index),n===r){let n=(0===t.type?1:0)-(0===e.type?1:0);return 0===n?e.index-t.index:n}return n-r}),!function(e){e.forEach((t,n)=>{n>0&&t.page&&e.slice(0,n).some(e=>(e.type===u.P.Keywords?e.page:e.document)===t.page)&&(n<e.length-1&&e[n+1].page===t.page?t.isInterOfTree=!0:t.isLastOfTree=!0)})}(p),s(p)}}},7591:function(e,t,n){"use strict";function r(e){return e.join(" \u203A ")}n.d(t,{e:function(){return r}})},9863:function(e,t,n){"use strict";function r(e){return e.replace(/&/g,"&amp;").replace(/</g,"&lt;").replace(/>/g,"&gt;").replace(/"/g,"&quot;").replace(/'/g,"&#039;")}n.d(t,{X:function(){return r}})},7303:function(e,t,n){"use strict";function r(e,t){let n=[];for(let r of Object.values(e))r[t]&&n.push(...r[t].position);return n.sort((e,t)=>e[0]-t[0]||t[1]-e[1])}n.d(t,{m:function(){return r}})},5658:function(e,t,n){"use strict";n.d(t,{C:function(){return function e(t,n,a){let o=[];for(let a of n){let i=t.toLowerCase().indexOf(a);if(i>=0){i>0&&o.push(e(t.substr(0,i),n)),o.push(`<mark>${(0,r.X)(t.substr(i,a.length))}</mark>`);let l=i+a.length;l<t.length&&o.push(e(t.substr(l),n));break}}return 0===o.length?a?`<mark>${(0,r.X)(t)}</mark>`:(0,r.X)(t):o.join("")}}});var r=n(9863)},6810:function(e,t,n){"use strict";n.d(t,{o:()=>s});var r=n("9863"),a=n("5658");let o=/\w+|\p{Unified_Ideograph}/u;function i(e){let t=[],n=0,r=e;for(;r.length>0;){let a=r.match(o);if(!a){t.push(r);break}a.index>0&&t.push(r.substring(0,a.index)),t.push(a[0]),n+=a.index+a[0].length,r=e.substring(n)}return t}var l=n("322");function s(e,t,n){let o=arguments.length>3&&void 0!==arguments[3]?arguments[3]:l.Hk,{chunkIndex:s,chunks:u}=function(e,t,n){let o=[],l=0,s=0,u=-1;for(;l<t.length;){let[c,d]=t[l];if(l+=1,!(c<s)){if(c>s)for(let t of i(e.substring(s,c)).map(e=>({html:(0,r.X)(e),textLength:e.length})))o.push(t);-1===u&&(u=o.length),s=c+d,o.push({html:(0,a.C)(e.substring(c,s),n,!0),textLength:d})}}if(s<e.length)for(let t of i(e.substring(s)).map(e=>({html:(0,r.X)(e),textLength:e.length})))o.push(t);return{chunkIndex:u,chunks:o}}(e,t,n),c=u.slice(0,s),d=u[s],f=[d.html],p=u.slice(s+1),h=d.textLength,g=0,m=0,y=!1,b=!1;for(;h<o;)if((g<=m||0===p.length)&&c.length>0){let e=c.pop();h+e.textLength<=o?(f.unshift(e.html),g+=e.textLength,h+=e.textLength):(y=!0,c.length=0)}else if(p.length>0){let e=p.shift();h+e.textLength<=o?(f.push(e.html),m+=e.textLength,h+=e.textLength):(b=!0,p.length=0)}else break;return(y||c.length>0)&&f.unshift("\u2026"),(b||p.length>0)&&f.push("\u2026"),f.join("")}},4969:function(e,t,n){"use strict";function r(e,t){if("string"==typeof e)return{label:e,path:e};{let{label:n,path:r}=e;return"string"==typeof n?{label:n,path:r}:Object.prototype.hasOwnProperty.call(n,t)?{label:n[t],path:r}:{label:r,path:r}}}n.d(t,{_:function(){return r}})},322:function(e,t,n){"use strict";n.d(t,{t_:()=>f,Kc:()=>m,pQ:()=>b,J:()=>l,Hk:()=>u,qo:()=>s,hG:()=>y,l9:()=>g,dK:()=>o,_k:()=>i,vc:()=>a(),gQ:()=>h,H6:()=>c,pu:()=>p,AY:()=>d});var r=n("813"),a=n.n(r);let o=["en"],i=!1,l="search-index{dir}.json?_=4c969dca",s=8,u=50,c=!1,d=!0,f=!0,p="right",h=void 0,g=!0,m=null,y=!1,b=!1},5528:function(e,t,n){"use strict";var r,a;n.d(t,{P:function(){return r}}),(a=r||(r={}))[a.Title=0]="Title",a[a.Heading=1]="Heading",a[a.Description=2]="Description",a[a.Keywords=3]="Keywords",a[a.Content=4]="Content"},5150:function(e,t,n){"use strict";n.d(t,{Z:function(){return r}});let r={title:"Fortran Tutorial",tagline:"Learning Fortran Programming",url:"https://pranabdas.github.io",baseUrl:"/fortran/",onBrokenLinks:"throw",onBrokenMarkdownLinks:"warn",favicon:"img/favicon.png",organizationName:"pranabdas",projectName:"fortran",titleDelimiter:"\u2022",themeConfig:{metadata:[{name:"theme-color",content:"#06445c"}],prism:{theme:{plain:{color:"#393A34",backgroundColor:"#f6f8fa"},styles:[{types:["comment","prolog","doctype","cdata"],style:{color:"#999988",fontStyle:"italic"}},{types:["namespace"],style:{opacity:.7}},{types:["string","attr-value"],style:{color:"#e3116c"}},{types:["punctuation","operator"],style:{color:"#393A34"}},{types:["entity","url","symbol","number","boolean","variable","constant","property","regex","inserted"],style:{color:"#36acaa"}},{types:["atrule","keyword","attr-name","selector"],style:{color:"#00a4db"}},{types:["function","deleted","tag"],style:{color:"#d73a49"}},{types:["function-variable"],style:{color:"#6f42c1"}},{types:["tag","selector","keyword"],style:{color:"#00009f"}}]},darkTheme:{plain:{color:"#d6deeb",backgroundColor:"#011627"},styles:[{types:["changed"],style:{color:"rgb(162, 191, 252)",fontStyle:"italic"}},{types:["deleted"],style:{color:"rgba(239, 83, 80, 0.56)",fontStyle:"italic"}},{types:["inserted","attr-name"],style:{color:"rgb(173, 219, 103)",fontStyle:"italic"}},{types:["comment"],style:{color:"rgb(99, 119, 119)",fontStyle:"italic"}},{types:["string","url"],style:{color:"rgb(173, 219, 103)"}},{types:["variable"],style:{color:"rgb(214, 222, 235)"}},{types:["number"],style:{color:"rgb(247, 140, 108)"}},{types:["builtin","char","constant","function"],style:{color:"rgb(130, 170, 255)"}},{types:["punctuation"],style:{color:"rgb(199, 146, 234)"}},{types:["selector","doctype"],style:{color:"rgb(199, 146, 234)",fontStyle:"italic"}},{types:["class-name"],style:{color:"rgb(255, 203, 139)"}},{types:["tag","operator","keyword"],style:{color:"rgb(127, 219, 202)"}},{types:["boolean"],style:{color:"rgb(255, 88, 116)"}},{types:["property"],style:{color:"rgb(128, 203, 196)"}},{types:["namespace"],style:{color:"rgb(178, 204, 214)"}}]},additionalLanguages:["bash","fortran","docker"],magicComments:[{className:"theme-code-block-highlighted-line",line:"highlight-next-line",block:{start:"highlight-start",end:"highlight-end"}}]},docs:{sidebar:{hideable:!0,autoCollapseCategories:!0},versionPersistence:"localStorage"},colorMode:{respectPrefersColorScheme:!0,defaultMode:"light",disableSwitch:!1},navbar:{title:"Fortran",hideOnScroll:!0,logo:{alt:"Logo",src:"img/favicon.png"},items:[{to:"/",label:"Docs",position:"left",items:[{label:"Fortran Programming",to:"/",target:"_self"},{label:"~ ~ ~ Other Docs ~ ~ ~",to:"https://pranabdas.github.io/docs/",target:"_self"},{label:"ARPES Python Tools",to:"https://pranabdas.github.io/arpespythontools/",target:"_self"},{label:"C and C++ Programming",to:"https://pranabdas.github.io/c-cpp/",target:"_self"},{label:"Condensed Matter Notes",to:"https://pranabdas.github.io/condmat-notes/",target:"_self"},{label:"Javascript Tutorial",to:"https://pranabdas.github.io/javascript/",target:"_self"},{label:"Linux Tutorial",to:"https://pranabdas.github.io/linux/",target:"_self"},{label:"Machine Learning Notes",to:"https://pranabdas.github.io/machine-learning/",target:"_self"},{label:"OpenMX tutorial",to:"https://pranabdas.github.io/openmx/",target:"_self"},{label:"Python Tutorial",to:"https://pranabdas.github.io/python-tutorial/",target:"_self"},{label:"Quantum Espresso Tutorial",to:"https://pranabdas.github.io/espresso/",target:"_self"},{label:"Rust Programming",to:"https://pranabdas.github.io/rust/",target:"_self"},{label:"SUV ARPES Manual",to:"https://pranabdas.github.io/arpes-manual/",target:"_self"},{label:"SUV Python Tools",to:"https://pranabdas.github.io/suvtools/",target:"_self"}]},{href:"https://github.com/pranabdas/fortran",position:"right",className:"header-github-link","aria-label":"GitHub repository",title:"Visit project repository in GitHub",target:"_self"},{to:"https://pranabdas.github.io","aria-label":"About me",position:"right",target:"_self",className:"header-homepage-link",title:"Go to Pranab's Homepage"}]},footer:{style:"dark",copyright:"Copyright \xa9 2024 Pranab Das. All rights\n      reserved.",links:[]},blog:{sidebar:{groupByYear:!0}},tableOfContents:{minHeadingLevel:2,maxHeadingLevel:3}},presets:[["@docusaurus/preset-classic",{docs:{sidebarPath:"/home/runner/work/fortran/fortran/sidebars.js",routeBasePath:"/",editUrl:"https://github.com/pranabdas/fortran/blob/main/",remarkPlugins:[null],rehypePlugins:[null]},theme:{customCss:"/home/runner/work/fortran/fortran/src/css/custom.css"}}]],themes:[["/home/runner/work/fortran/fortran/node_modules/@easyops-cn/docusaurus-search-local/dist/server/server/index.js",{hashed:!0,docsRouteBasePath:"/",indexBlog:!1,indexPages:!0,highlightSearchTermsOnTargetPage:!0}]],stylesheets:[{href:"https://pranabdas.github.io/drive/webfonts/katex/katex.min.css",type:"text/css"}],future:{experimental_faster:{swcJsLoader:!0,swcJsMinimizer:!0,swcHtmlMinimizer:!0,lightningCssMinimizer:!0,mdxCrossCompilerCache:!0,rspackBundler:!0},experimental_storage:{type:"localStorage",namespace:!1},experimental_router:"browser"},baseUrlIssueBanner:!0,i18n:{defaultLocale:"en",path:"i18n",locales:["en"],localeConfigs:{}},onBrokenAnchors:"warn",onDuplicateRoutes:"warn",staticDirectories:["static"],customFields:{},plugins:[],scripts:[],headTags:[],clientModules:[],noIndex:!1,markdown:{format:"mdx",mermaid:!1,mdx1Compat:{comments:!0,admonitions:!0,headingIds:!0},anchors:{maintainCase:!1}}}},6019:function(e,t,n){"use strict";function r(){return(r=Object.assign?Object.assign.bind():function(e){for(var t=1;t<arguments.length;t++){var n=arguments[t];for(var r in n)({}).hasOwnProperty.call(n,r)&&(e[r]=n[r])}return e}).apply(null,arguments)}n.d(t,{Z:function(){return r}})},5091:function(e,t,n){"use strict";function r(e,t){return(r=Object.setPrototypeOf?Object.setPrototypeOf.bind():function(e,t){return e.__proto__=t,e})(e,t)}function a(e,t){e.prototype=Object.create(t.prototype),e.prototype.constructor=e,r(e,t)}n.d(t,{Z:()=>a})},443:function(e,t,n){"use strict";function r(e,t){if(null==e)return{};var n={};for(var r in e)if(({}).hasOwnProperty.call(e,r)){if(t.includes(r))continue;n[r]=e[r]}return n}n.d(t,{Z:function(){return r}})},7026:function(e,t,n){"use strict";n.d(t,{Z:function(){return r}});let r=function(){for(var e,t,n=0,r="",a=arguments.length;n<a;n++)(e=arguments[n])&&(t=function e(t){var n,r,a="";if("string"==typeof t||"number"==typeof t)a+=t;else if("object"==typeof t){if(Array.isArray(t)){var o=t.length;for(n=0;n<o;n++)t[n]&&(r=e(t[n]))&&(a&&(a+=" "),a+=r)}else for(r in t)t[r]&&(a&&(a+=" "),a+=r)}return a}(e))&&(r&&(r+=" "),r+=t);return r}},3229:function(e,t,n){"use strict";let r,a,o,i,l;n.d(t,{p1:function(){return K},y$:function(){return eM}});var s,u,c,d,f,p,h,g,m,y,b,v,x,w,k,S,E,_,T,C,P,O,N,L,A,I,R=n(7294),j=n(7026),F=Object.create,D=Object.defineProperty,M=Object.defineProperties,z=Object.getOwnPropertyDescriptor,B=Object.getOwnPropertyDescriptors,$=Object.getOwnPropertyNames,U=Object.getOwnPropertySymbols,H=Object.getPrototypeOf,Z=Object.prototype.hasOwnProperty,Q=Object.prototype.propertyIsEnumerable,W=(e,t,n)=>t in e?D(e,t,{enumerable:!0,configurable:!0,writable:!0,value:n}):e[t]=n,V=(e,t)=>{for(var n in t||(t={}))Z.call(t,n)&&W(e,n,t[n]);if(U)for(var n of U(t))Q.call(t,n)&&W(e,n,t[n]);return e},G=(e,t)=>M(e,B(t)),q=(e,t)=>{var n={};for(var r in e)Z.call(e,r)&&0>t.indexOf(r)&&(n[r]=e[r]);if(null!=e&&U)for(var r of U(e))0>t.indexOf(r)&&Q.call(e,r)&&(n[r]=e[r]);return n},Y=(e,t,n,r)=>{if(t&&"object"==typeof t||"function"==typeof t)for(let a of $(t))!Z.call(e,a)&&a!==n&&D(e,a,{get:()=>t[a],enumerable:!(r=z(t,a))||r.enumerable});return e};var K=(l=null!=(o=(r={"../../node_modules/.pnpm/prismjs@1.29.0_patch_hash=vrxx3pzkik6jpmgpayxfjunetu/node_modules/prismjs/prism.js"(e,t){var n=function(){var e=/(?:^|\s)lang(?:uage)?-([\w-]+)(?=\s|$)/i,t=0,n={},r={util:{encode:function e(t){return t instanceof a?new a(t.type,e(t.content),t.alias):Array.isArray(t)?t.map(e):t.replace(/&/g,"&amp;").replace(/</g,"&lt;").replace(/\u00a0/g," ")},type:function(e){return Object.prototype.toString.call(e).slice(8,-1)},objId:function(e){return e.__id||Object.defineProperty(e,"__id",{value:++t}),e.__id},clone:function e(t,n){var a,o;switch(n=n||{},r.util.type(t)){case"Object":if(n[o=r.util.objId(t)])return n[o];for(var i in a={},n[o]=a,t)t.hasOwnProperty(i)&&(a[i]=e(t[i],n));return a;case"Array":if(n[o=r.util.objId(t)])return n[o];return a=[],n[o]=a,t.forEach(function(t,r){a[r]=e(t,n)}),a;default:return t}},getLanguage:function(t){for(;t;){var n=e.exec(t.className);if(n)return n[1].toLowerCase();t=t.parentElement}return"none"},setLanguage:function(t,n){t.className=t.className.replace(RegExp(e,"gi"),""),t.classList.add("language-"+n)},isActive:function(e,t,n){for(var r="no-"+t;e;){var a=e.classList;if(a.contains(t))return!0;if(a.contains(r))return!1;e=e.parentElement}return!!n}},languages:{plain:n,plaintext:n,text:n,txt:n,extend:function(e,t){var n=r.util.clone(r.languages[e]);for(var a in t)n[a]=t[a];return n},insertBefore:function(e,t,n,a){var o=(a=a||r.languages)[e],i={};for(var l in o)if(o.hasOwnProperty(l)){if(l==t)for(var s in n)n.hasOwnProperty(s)&&(i[s]=n[s]);n.hasOwnProperty(l)||(i[l]=o[l])}var u=a[e];return a[e]=i,r.languages.DFS(r.languages,function(t,n){n===u&&t!=e&&(this[t]=i)}),i},DFS:function e(t,n,a,o){o=o||{};var i=r.util.objId;for(var l in t)if(t.hasOwnProperty(l)){n.call(t,l,t[l],a||l);var s=t[l],u=r.util.type(s);"Object"!==u||o[i(s)]?"Array"!==u||o[i(s)]||(o[i(s)]=!0,e(s,n,l,o)):(o[i(s)]=!0,e(s,n,null,o))}}},plugins:{},highlight:function(e,t,n){var o={code:e,grammar:t,language:n};if(r.hooks.run("before-tokenize",o),!o.grammar)throw Error('The language "'+o.language+'" has no grammar.');return o.tokens=r.tokenize(o.code,o.grammar),r.hooks.run("after-tokenize",o),a.stringify(r.util.encode(o.tokens),o.language)},tokenize:function(e,t){var n=t.rest;if(n){for(var s in n)t[s]=n[s];delete t.rest}var u=new i;return l(u,u.head,e),function e(t,n,i,s,u,c){for(var d in i){if(!!i.hasOwnProperty(d)&&!!i[d]){var f=i[d];f=Array.isArray(f)?f:[f];for(var p=0;p<f.length;++p){if(c&&c.cause==d+","+p)return;var h=f[p],g=h.inside,m=!!h.lookbehind,y=!!h.greedy,b=h.alias;if(y&&!h.pattern.global){var v=h.pattern.toString().match(/[imsuy]*$/)[0];h.pattern=RegExp(h.pattern.source,v+"g")}for(var x=h.pattern||h,w=s.next,k=u;w!==n.tail&&(!c||!(k>=c.reach));k+=w.value.length,w=w.next){;var S,E=w.value;if(n.length>t.length)return;if(!(E instanceof a)){var _=1;if(y){if(!(S=o(x,k,t,m))||S.index>=t.length)break;var T=S.index,C=S.index+S[0].length,P=k;for(P+=w.value.length;T>=P;)P+=(w=w.next).value.length;if(P-=w.value.length,k=P,w.value instanceof a)continue;for(var O=w;O!==n.tail&&(P<C||"string"==typeof O.value);O=O.next)_++,P+=O.value.length;_--,E=t.slice(k,P),S.index-=k}else if(!(S=o(x,0,E,m)))continue;var T=S.index,N=S[0],L=E.slice(0,T),A=E.slice(T+N.length),I=k+E.length;c&&I>c.reach&&(c.reach=I);var R=w.prev;if(L&&(R=l(n,R,L),k+=L.length),function(e,t,n){for(var r=t.next,a=0;a<n&&r!==e.tail;a++)r=r.next;t.next=r,r.prev=t,e.length-=a}(n,R,_),w=l(n,R,new a(d,g?r.tokenize(N,g):N,b,N)),A&&l(n,w,A),_>1){var j={cause:d+","+p,reach:I};e(t,n,i,w.prev,k,j),c&&j.reach>c.reach&&(c.reach=j.reach)}}}}}}}(e,u,t,u.head,0),function(e){for(var t=[],n=e.head.next;n!==e.tail;)t.push(n.value),n=n.next;return t}(u)},hooks:{all:{},add:function(e,t){var n=r.hooks.all;n[e]=n[e]||[],n[e].push(t)},run:function(e,t){var n=r.hooks.all[e];if(!!n&&!!n.length)for(var a,o=0;a=n[o++];)a(t)}},Token:a};function a(e,t,n,r){this.type=e,this.content=t,this.alias=n,this.length=0|(r||"").length}function o(e,t,n,r){e.lastIndex=t;var a=e.exec(n);if(a&&r&&a[1]){var o=a[1].length;a.index+=o,a[0]=a[0].slice(o)}return a}function i(){var e={value:null,prev:null,next:null},t={value:null,prev:e,next:null};e.next=t,this.head=e,this.tail=t,this.length=0}function l(e,t,n){var r=t.next,a={value:n,prev:t,next:r};return t.next=a,r.prev=a,e.length++,a}return a.stringify=function e(t,n){if("string"==typeof t)return t;if(Array.isArray(t)){var a="";return t.forEach(function(t){a+=e(t,n)}),a}var o={type:t.type,content:e(t.content,n),tag:"span",classes:["token",t.type],attributes:{},language:n},i=t.alias;i&&(Array.isArray(i)?Array.prototype.push.apply(o.classes,i):o.classes.push(i)),r.hooks.run("wrap",o);var l="";for(var s in o.attributes)l+=" "+s+'="'+(o.attributes[s]||"").replace(/"/g,"&quot;")+'"';return"<"+o.tag+' class="'+o.classes.join(" ")+'"'+l+">"+o.content+"</"+o.tag+">"},r}();t.exports=n,n.default=n}},function(){return a||(0,r[$(r)[0]])((a={exports:{}}).exports,a),a.exports})())?F(H(o)):{},Y(!i&&o&&o.__esModule?l:D(l,"default",{value:o,enumerable:!0}),o));K.languages.markup={comment:{pattern:/<!--(?:(?!<!--)[\s\S])*?-->/,greedy:!0},prolog:{pattern:/<\?[\s\S]+?\?>/,greedy:!0},doctype:{pattern:/<!DOCTYPE(?:[^>"'[\]]|"[^"]*"|'[^']*')+(?:\[(?:[^<"'\]]|"[^"]*"|'[^']*'|<(?!!--)|<!--(?:[^-]|-(?!->))*-->)*\]\s*)?>/i,greedy:!0,inside:{"internal-subset":{pattern:/(^[^\[]*\[)[\s\S]+(?=\]>$)/,lookbehind:!0,greedy:!0,inside:null},string:{pattern:/"[^"]*"|'[^']*'/,greedy:!0},punctuation:/^<!|>$|[[\]]/,"doctype-tag":/^DOCTYPE/i,name:/[^\s<>'"]+/}},cdata:{pattern:/<!\[CDATA\[[\s\S]*?\]\]>/i,greedy:!0},tag:{pattern:/<\/?(?!\d)[^\s>\/=$<%]+(?:\s(?:\s*[^\s>\/=]+(?:\s*=\s*(?:"[^"]*"|'[^']*'|[^\s'">=]+(?=[\s>]))|(?=[\s/>])))+)?\s*\/?>/,greedy:!0,inside:{tag:{pattern:/^<\/?[^\s>\/]+/,inside:{punctuation:/^<\/?/,namespace:/^[^\s>\/:]+:/}},"special-attr":[],"attr-value":{pattern:/=\s*(?:"[^"]*"|'[^']*'|[^\s'">=]+)/,inside:{punctuation:[{pattern:/^=/,alias:"attr-equals"},{pattern:/^(\s*)["']|["']$/,lookbehind:!0}]}},punctuation:/\/?>/,"attr-name":{pattern:/[^\s>\/]+/,inside:{namespace:/^[^\s>\/:]+:/}}}},entity:[{pattern:/&[\da-z]{1,8};/i,alias:"named-entity"},/&#x?[\da-f]{1,8};/i]},K.languages.markup.tag.inside["attr-value"].inside.entity=K.languages.markup.entity,K.languages.markup.doctype.inside["internal-subset"].inside=K.languages.markup,K.hooks.add("wrap",function(e){"entity"===e.type&&(e.attributes.title=e.content.replace(/&amp;/,"&"))}),Object.defineProperty(K.languages.markup.tag,"addInlined",{value:function(e,t){var n={},n=(n["language-"+t]={pattern:/(^<!\[CDATA\[)[\s\S]+?(?=\]\]>$)/i,lookbehind:!0,inside:K.languages[t]},n.cdata=/^<!\[CDATA\[|\]\]>$/i,{"included-cdata":{pattern:/<!\[CDATA\[[\s\S]*?\]\]>/i,inside:n}}),t=(n["language-"+t]={pattern:/[\s\S]+/,inside:K.languages[t]},{});t[e]={pattern:RegExp(/(<__[^>]*>)(?:<!\[CDATA\[(?:[^\]]|\](?!\]>))*\]\]>|(?!<!\[CDATA\[)[\s\S])*?(?=<\/__>)/.source.replace(/__/g,function(){return e}),"i"),lookbehind:!0,greedy:!0,inside:n},K.languages.insertBefore("markup","cdata",t)}}),Object.defineProperty(K.languages.markup.tag,"addAttribute",{value:function(e,t){K.languages.markup.tag.inside["special-attr"].push({pattern:RegExp(/(^|["'\s])/.source+"(?:"+e+")"+/\s*=\s*(?:"[^"]*"|'[^']*'|[^\s'">=]+(?=[\s>]))/.source,"i"),lookbehind:!0,inside:{"attr-name":/^[^\s=]+/,"attr-value":{pattern:/=[\s\S]+/,inside:{value:{pattern:/(^=\s*(["']|(?!["'])))\S[\s\S]*(?=\2$)/,lookbehind:!0,alias:[t,"language-"+t],inside:K.languages[t]},punctuation:[{pattern:/^=/,alias:"attr-equals"},/"|'/]}}}})}}),K.languages.html=K.languages.markup,K.languages.mathml=K.languages.markup,K.languages.svg=K.languages.markup,K.languages.xml=K.languages.extend("markup",{}),K.languages.ssml=K.languages.xml,K.languages.atom=K.languages.xml,K.languages.rss=K.languages.xml,s=K,u={pattern:/\\[\\(){}[\]^$+*?|.]/,alias:"escape"},d=RegExp((d="(?:[^\\\\-]|"+(c=/\\(?:x[\da-fA-F]{2}|u[\da-fA-F]{4}|u\{[\da-fA-F]+\}|0[0-7]{0,2}|[123][0-7]{2}|c[a-zA-Z]|.)/).source+")")+"-"+d),f={pattern:/(<|')[^<>']+(?=[>']$)/,lookbehind:!0,alias:"variable"},s.languages.regex={"char-class":{pattern:/((?:^|[^\\])(?:\\\\)*)\[(?:[^\\\]]|\\[\s\S])*\]/,lookbehind:!0,inside:{"char-class-negation":{pattern:/(^\[)\^/,lookbehind:!0,alias:"operator"},"char-class-punctuation":{pattern:/^\[|\]$/,alias:"punctuation"},range:{pattern:d,inside:{escape:c,"range-punctuation":{pattern:/-/,alias:"operator"}}},"special-escape":u,"char-set":{pattern:/\\[wsd]|\\p\{[^{}]+\}/i,alias:"class-name"},escape:c}},"special-escape":u,"char-set":{pattern:/\.|\\[wsd]|\\p\{[^{}]+\}/i,alias:"class-name"},backreference:[{pattern:/\\(?![123][0-7]{2})[1-9]/,alias:"keyword"},{pattern:/\\k<[^<>']+>/,alias:"keyword",inside:{"group-name":f}}],anchor:{pattern:/[$^]|\\[ABbGZz]/,alias:"function"},escape:c,group:[{pattern:/\((?:\?(?:<[^<>']+>|'[^<>']+'|[>:]|<?[=!]|[idmnsuxU]+(?:-[idmnsuxU]+)?:?))?/,alias:"punctuation",inside:{"group-name":f}},{pattern:/\)/,alias:"punctuation"}],quantifier:{pattern:/(?:[+*?]|\{\d+(?:,\d*)?\})[?+]?/,alias:"number"},alternation:{pattern:/\|/,alias:"keyword"}},K.languages.clike={comment:[{pattern:/(^|[^\\])\/\*[\s\S]*?(?:\*\/|$)/,lookbehind:!0,greedy:!0},{pattern:/(^|[^\\:])\/\/.*/,lookbehind:!0,greedy:!0}],string:{pattern:/(["'])(?:\\(?:\r\n|[\s\S])|(?!\1)[^\\\r\n])*\1/,greedy:!0},"class-name":{pattern:/(\b(?:class|extends|implements|instanceof|interface|new|trait)\s+|\bcatch\s+\()[\w.\\]+/i,lookbehind:!0,inside:{punctuation:/[.\\]/}},keyword:/\b(?:break|catch|continue|do|else|finally|for|function|if|in|instanceof|new|null|return|throw|try|while)\b/,boolean:/\b(?:false|true)\b/,function:/\b\w+(?=\()/,number:/\b0x[\da-f]+\b|(?:\b\d+(?:\.\d*)?|\B\.\d+)(?:e[+-]?\d+)?/i,operator:/[<>]=?|[!=]=?=?|--?|\+\+?|&&?|\|\|?|[?*/~^%]/,punctuation:/[{}[\];(),.:]/},K.languages.javascript=K.languages.extend("clike",{"class-name":[K.languages.clike["class-name"],{pattern:/(^|[^$\w\xA0-\uFFFF])(?!\s)[_$A-Z\xA0-\uFFFF](?:(?!\s)[$\w\xA0-\uFFFF])*(?=\.(?:constructor|prototype))/,lookbehind:!0}],keyword:[{pattern:/((?:^|\})\s*)catch\b/,lookbehind:!0},{pattern:/(^|[^.]|\.\.\.\s*)\b(?:as|assert(?=\s*\{)|async(?=\s*(?:function\b|\(|[$\w\xA0-\uFFFF]|$))|await|break|case|class|const|continue|debugger|default|delete|do|else|enum|export|extends|finally(?=\s*(?:\{|$))|for|from(?=\s*(?:['"]|$))|function|(?:get|set)(?=\s*(?:[#\[$\w\xA0-\uFFFF]|$))|if|implements|import|in|instanceof|interface|let|new|null|of|package|private|protected|public|return|static|super|switch|this|throw|try|typeof|undefined|var|void|while|with|yield)\b/,lookbehind:!0}],function:/#?(?!\s)[_$a-zA-Z\xA0-\uFFFF](?:(?!\s)[$\w\xA0-\uFFFF])*(?=\s*(?:\.\s*(?:apply|bind|call)\s*)?\()/,number:{pattern:RegExp(/(^|[^\w$])/.source+"(?:"+/NaN|Infinity/.source+"|"+/0[bB][01]+(?:_[01]+)*n?/.source+"|"+/0[oO][0-7]+(?:_[0-7]+)*n?/.source+"|"+/0[xX][\dA-Fa-f]+(?:_[\dA-Fa-f]+)*n?/.source+"|"+/\d+(?:_\d+)*n/.source+"|"+/(?:\d+(?:_\d+)*(?:\.(?:\d+(?:_\d+)*)?)?|\.\d+(?:_\d+)*)(?:[Ee][+-]?\d+(?:_\d+)*)?/.source+")"+/(?![\w$])/.source),lookbehind:!0},operator:/--|\+\+|\*\*=?|=>|&&=?|\|\|=?|[!=]==|<<=?|>>>?=?|[-+*/%&|^!=<>]=?|\.{3}|\?\?=?|\?\.?|[~:]/}),K.languages.javascript["class-name"][0].pattern=/(\b(?:class|extends|implements|instanceof|interface|new)\s+)[\w.\\]+/,K.languages.insertBefore("javascript","keyword",{regex:{pattern:RegExp(/((?:^|[^$\w\xA0-\uFFFF."'\])\s]|\b(?:return|yield))\s*)/.source+/\//.source+"(?:"+/(?:\[(?:[^\]\\\r\n]|\\.)*\]|\\.|[^/\\\[\r\n])+\/[dgimyus]{0,7}/.source+"|"+/(?:\[(?:[^[\]\\\r\n]|\\.|\[(?:[^[\]\\\r\n]|\\.|\[(?:[^[\]\\\r\n]|\\.)*\])*\])*\]|\\.|[^/\\\[\r\n])+\/[dgimyus]{0,7}v[dgimyus]{0,7}/.source+")"+/(?=(?:\s|\/\*(?:[^*]|\*(?!\/))*\*\/)*(?:$|[\r\n,.;:})\]]|\/\/))/.source),lookbehind:!0,greedy:!0,inside:{"regex-source":{pattern:/^(\/)[\s\S]+(?=\/[a-z]*$)/,lookbehind:!0,alias:"language-regex",inside:K.languages.regex},"regex-delimiter":/^\/|\/$/,"regex-flags":/^[a-z]+$/}},"function-variable":{pattern:/#?(?!\s)[_$a-zA-Z\xA0-\uFFFF](?:(?!\s)[$\w\xA0-\uFFFF])*(?=\s*[=:]\s*(?:async\s*)?(?:\bfunction\b|(?:\((?:[^()]|\([^()]*\))*\)|(?!\s)[_$a-zA-Z\xA0-\uFFFF](?:(?!\s)[$\w\xA0-\uFFFF])*)\s*=>))/,alias:"function"},parameter:[{pattern:/(function(?:\s+(?!\s)[_$a-zA-Z\xA0-\uFFFF](?:(?!\s)[$\w\xA0-\uFFFF])*)?\s*\(\s*)(?!\s)(?:[^()\s]|\s+(?![\s)])|\([^()]*\))+(?=\s*\))/,lookbehind:!0,inside:K.languages.javascript},{pattern:/(^|[^$\w\xA0-\uFFFF])(?!\s)[_$a-z\xA0-\uFFFF](?:(?!\s)[$\w\xA0-\uFFFF])*(?=\s*=>)/i,lookbehind:!0,inside:K.languages.javascript},{pattern:/(\(\s*)(?!\s)(?:[^()\s]|\s+(?![\s)])|\([^()]*\))+(?=\s*\)\s*=>)/,lookbehind:!0,inside:K.languages.javascript},{pattern:/((?:\b|\s|^)(?!(?:as|async|await|break|case|catch|class|const|continue|debugger|default|delete|do|else|enum|export|extends|finally|for|from|function|get|if|implements|import|in|instanceof|interface|let|new|null|of|package|private|protected|public|return|set|static|super|switch|this|throw|try|typeof|undefined|var|void|while|with|yield)(?![$\w\xA0-\uFFFF]))(?:(?!\s)[_$a-zA-Z\xA0-\uFFFF](?:(?!\s)[$\w\xA0-\uFFFF])*\s*)\(\s*|\]\s*\(\s*)(?!\s)(?:[^()\s]|\s+(?![\s)])|\([^()]*\))+(?=\s*\)\s*\{)/,lookbehind:!0,inside:K.languages.javascript}],constant:/\b[A-Z](?:[A-Z_]|\dx?)*\b/}),K.languages.insertBefore("javascript","string",{hashbang:{pattern:/^#!.*/,greedy:!0,alias:"comment"},"template-string":{pattern:/`(?:\\[\s\S]|\$\{(?:[^{}]|\{(?:[^{}]|\{[^}]*\})*\})+\}|(?!\$\{)[^\\`])*`/,greedy:!0,inside:{"template-punctuation":{pattern:/^`|`$/,alias:"string"},interpolation:{pattern:/((?:^|[^\\])(?:\\{2})*)\$\{(?:[^{}]|\{(?:[^{}]|\{[^}]*\})*\})+\}/,lookbehind:!0,inside:{"interpolation-punctuation":{pattern:/^\$\{|\}$/,alias:"punctuation"},rest:K.languages.javascript}},string:/[\s\S]+/}},"string-property":{pattern:/((?:^|[,{])[ \t]*)(["'])(?:\\(?:\r\n|[\s\S])|(?!\2)[^\\\r\n])*\2(?=\s*:)/m,lookbehind:!0,greedy:!0,alias:"property"}}),K.languages.insertBefore("javascript","operator",{"literal-property":{pattern:/((?:^|[,{])[ \t]*)(?!\s)[_$a-zA-Z\xA0-\uFFFF](?:(?!\s)[$\w\xA0-\uFFFF])*(?=\s*:)/m,lookbehind:!0,alias:"property"}}),K.languages.markup&&(K.languages.markup.tag.addInlined("script","javascript"),K.languages.markup.tag.addAttribute(/on(?:abort|blur|change|click|composition(?:end|start|update)|dblclick|error|focus(?:in|out)?|key(?:down|up)|load|mouse(?:down|enter|leave|move|out|over|up)|reset|resize|scroll|select|slotchange|submit|unload|wheel)/.source,"javascript")),K.languages.js=K.languages.javascript,K.languages.actionscript=K.languages.extend("javascript",{keyword:/\b(?:as|break|case|catch|class|const|default|delete|do|dynamic|each|else|extends|final|finally|for|function|get|if|implements|import|in|include|instanceof|interface|internal|is|namespace|native|new|null|override|package|private|protected|public|return|set|static|super|switch|this|throw|try|typeof|use|var|void|while|with)\b/,operator:/\+\+|--|(?:[+\-*\/%^]|&&?|\|\|?|<<?|>>?>?|[!=]=?)=?|[~?@]/}),K.languages.actionscript["class-name"].alias="function",delete K.languages.actionscript.parameter,delete K.languages.actionscript["literal-property"],K.languages.markup&&K.languages.insertBefore("actionscript","string",{xml:{pattern:/(^|[^.])<\/?\w+(?:\s+[^\s>\/=]+=("|')(?:\\[\s\S]|(?!\2)[^\\])*\2)*\s*\/?>/,lookbehind:!0,inside:K.languages.markup}}),h=/#(?!\{).+/,g={pattern:/#\{[^}]+\}/,alias:"variable"},(p=K).languages.coffeescript=p.languages.extend("javascript",{comment:h,string:[{pattern:/'(?:\\[\s\S]|[^\\'])*'/,greedy:!0},{pattern:/"(?:\\[\s\S]|[^\\"])*"/,greedy:!0,inside:{interpolation:g}}],keyword:/\b(?:and|break|by|catch|class|continue|debugger|delete|do|each|else|extend|extends|false|finally|for|if|in|instanceof|is|isnt|let|loop|namespace|new|no|not|null|of|off|on|or|own|return|super|switch|then|this|throw|true|try|typeof|undefined|unless|until|when|while|window|with|yes|yield)\b/,"class-member":{pattern:/@(?!\d)\w+/,alias:"variable"}}),p.languages.insertBefore("coffeescript","comment",{"multiline-comment":{pattern:/###[\s\S]+?###/,alias:"comment"},"block-regex":{pattern:/\/{3}[\s\S]*?\/{3}/,alias:"regex",inside:{comment:h,interpolation:g}}}),p.languages.insertBefore("coffeescript","string",{"inline-javascript":{pattern:/`(?:\\[\s\S]|[^\\`])*`/,inside:{delimiter:{pattern:/^`|`$/,alias:"punctuation"},script:{pattern:/[\s\S]+/,alias:"language-javascript",inside:p.languages.javascript}}},"multiline-string":[{pattern:/'''[\s\S]*?'''/,greedy:!0,alias:"string"},{pattern:/"""[\s\S]*?"""/,greedy:!0,alias:"string",inside:{interpolation:g}}]}),p.languages.insertBefore("coffeescript","keyword",{property:/(?!\d)\w+(?=\s*:(?!:))/}),delete p.languages.coffeescript["template-string"],p.languages.coffee=p.languages.coffeescript,Object.defineProperty(y=(m=K).languages.javadoclike={parameter:{pattern:/(^[\t ]*(?:\/{3}|\*|\/\*\*)\s*@(?:arg|arguments|param)\s+)\w+/m,lookbehind:!0},keyword:{pattern:/(^[\t ]*(?:\/{3}|\*|\/\*\*)\s*|\{)@[a-z][a-zA-Z-]+\b/m,lookbehind:!0},punctuation:/[{}]/},"addSupport",{value:function(e,t){(e="string"==typeof e?[e]:e).forEach(function(e){var n=function(e){e.inside||(e.inside={}),e.inside.rest=t},r="doc-comment";if(a=m.languages[e]){var a,o=a[r];if((o=o||(a=m.languages.insertBefore(e,"comment",{"doc-comment":{pattern:/(^|[^\\])\/\*\*[^/][\s\S]*?(?:\*\/|$)/,lookbehind:!0,alias:"comment"}}))[r])instanceof RegExp&&(o=a[r]={pattern:o}),Array.isArray(o))for(var i=0,l=o.length;i<l;i++)o[i]instanceof RegExp&&(o[i]={pattern:o[i]}),n(o[i]);else n(o)}})}}),y.addSupport(["java","javascript","php"],y),v=/(?:"(?:\\(?:\r\n|[\s\S])|[^"\\\r\n])*"|'(?:\\(?:\r\n|[\s\S])|[^'\\\r\n])*')/,(v=((b=K).languages.css={comment:/\/\*[\s\S]*?\*\//,atrule:{pattern:RegExp("@[\\w-](?:"+/[^;{\s"']|\s+(?!\s)/.source+"|"+v.source+")*?"+/(?:;|(?=\s*\{))/.source),inside:{rule:/^@[\w-]+/,"selector-function-argument":{pattern:/(\bselector\s*\(\s*(?![\s)]))(?:[^()\s]|\s+(?![\s)])|\((?:[^()]|\([^()]*\))*\))+(?=\s*\))/,lookbehind:!0,alias:"selector"},keyword:{pattern:/(^|[^\w-])(?:and|not|only|or)(?![\w-])/,lookbehind:!0}}},url:{pattern:RegExp("\\burl\\((?:"+v.source+"|"+/(?:[^\\\r\n()"']|\\[\s\S])*/.source+")\\)","i"),greedy:!0,inside:{function:/^url/i,punctuation:/^\(|\)$/,string:{pattern:RegExp("^"+v.source+"$"),alias:"url"}}},selector:{pattern:RegExp("(^|[{}\\s])[^{}\\s](?:[^{};\"'\\s]|\\s+(?![\\s{])|"+v.source+")*(?=\\s*\\{)"),lookbehind:!0},string:{pattern:v,greedy:!0},property:{pattern:/(^|[^-\w\xA0-\uFFFF])(?!\s)[-_a-z\xA0-\uFFFF](?:(?!\s)[-\w\xA0-\uFFFF])*(?=\s*:)/i,lookbehind:!0},important:/!important\b/i,function:{pattern:/(^|[^-a-z0-9])[-a-z0-9]+(?=\()/i,lookbehind:!0},punctuation:/[(){};:,]/},b.languages.css.atrule.inside.rest=b.languages.css,b.languages.markup))&&(v.tag.addInlined("style","css"),v.tag.addAttribute("style","css")),function(e){var t=/("|')(?:\\(?:\r\n|[\s\S])|(?!\1)[^\\\r\n])*\1/,t=(e.languages.css.selector={pattern:e.languages.css.selector.pattern,lookbehind:!0,inside:t={"pseudo-element":/:(?:after|before|first-letter|first-line|selection)|::[-\w]+/,"pseudo-class":/:[-\w]+/,class:/\.[-\w]+/,id:/#[-\w]+/,attribute:{pattern:RegExp("\\[(?:[^[\\]\"']|"+t.source+")*\\]"),greedy:!0,inside:{punctuation:/^\[|\]$/,"case-sensitivity":{pattern:/(\s)[si]$/i,lookbehind:!0,alias:"keyword"},namespace:{pattern:/^(\s*)(?:(?!\s)[-*\w\xA0-\uFFFF])*\|(?!=)/,lookbehind:!0,inside:{punctuation:/\|$/}},"attr-name":{pattern:/^(\s*)(?:(?!\s)[-\w\xA0-\uFFFF])+/,lookbehind:!0},"attr-value":[t,{pattern:/(=\s*)(?:(?!\s)[-\w\xA0-\uFFFF])+(?=\s*$)/,lookbehind:!0}],operator:/[|~*^$]?=/}},"n-th":[{pattern:/(\(\s*)[+-]?\d*[\dn](?:\s*[+-]\s*\d+)?(?=\s*\))/,lookbehind:!0,inside:{number:/[\dn]+/,operator:/[+-]/}},{pattern:/(\(\s*)(?:even|odd)(?=\s*\))/i,lookbehind:!0}],combinator:/>|\+|~|\|\|/,punctuation:/[(),]/}},e.languages.css.atrule.inside["selector-function-argument"].inside=t,e.languages.insertBefore("css","property",{variable:{pattern:/(^|[^-\w\xA0-\uFFFF])--(?!\s)[-_a-z\xA0-\uFFFF](?:(?!\s)[-\w\xA0-\uFFFF])*/i,lookbehind:!0}}),{pattern:/(\b\d+)(?:%|[a-z]+(?![\w-]))/,lookbehind:!0}),n={pattern:/(^|[^\w.-])-?(?:\d+(?:\.\d+)?|\.\d+)/,lookbehind:!0};e.languages.insertBefore("css","function",{operator:{pattern:/(\s)[+\-*\/](?=\s)/,lookbehind:!0},hexcode:{pattern:/\B#[\da-f]{3,8}\b/i,alias:"color"},color:[{pattern:/(^|[^\w-])(?:AliceBlue|AntiqueWhite|Aqua|Aquamarine|Azure|Beige|Bisque|Black|BlanchedAlmond|Blue|BlueViolet|Brown|BurlyWood|CadetBlue|Chartreuse|Chocolate|Coral|CornflowerBlue|Cornsilk|Crimson|Cyan|DarkBlue|DarkCyan|DarkGoldenRod|DarkGr[ae]y|DarkGreen|DarkKhaki|DarkMagenta|DarkOliveGreen|DarkOrange|DarkOrchid|DarkRed|DarkSalmon|DarkSeaGreen|DarkSlateBlue|DarkSlateGr[ae]y|DarkTurquoise|DarkViolet|DeepPink|DeepSkyBlue|DimGr[ae]y|DodgerBlue|FireBrick|FloralWhite|ForestGreen|Fuchsia|Gainsboro|GhostWhite|Gold|GoldenRod|Gr[ae]y|Green|GreenYellow|HoneyDew|HotPink|IndianRed|Indigo|Ivory|Khaki|Lavender|LavenderBlush|LawnGreen|LemonChiffon|LightBlue|LightCoral|LightCyan|LightGoldenRodYellow|LightGr[ae]y|LightGreen|LightPink|LightSalmon|LightSeaGreen|LightSkyBlue|LightSlateGr[ae]y|LightSteelBlue|LightYellow|Lime|LimeGreen|Linen|Magenta|Maroon|MediumAquaMarine|MediumBlue|MediumOrchid|MediumPurple|MediumSeaGreen|MediumSlateBlue|MediumSpringGreen|MediumTurquoise|MediumVioletRed|MidnightBlue|MintCream|MistyRose|Moccasin|NavajoWhite|Navy|OldLace|Olive|OliveDrab|Orange|OrangeRed|Orchid|PaleGoldenRod|PaleGreen|PaleTurquoise|PaleVioletRed|PapayaWhip|PeachPuff|Peru|Pink|Plum|PowderBlue|Purple|RebeccaPurple|Red|RosyBrown|RoyalBlue|SaddleBrown|Salmon|SandyBrown|SeaGreen|SeaShell|Sienna|Silver|SkyBlue|SlateBlue|SlateGr[ae]y|Snow|SpringGreen|SteelBlue|Tan|Teal|Thistle|Tomato|Transparent|Turquoise|Violet|Wheat|White|WhiteSmoke|Yellow|YellowGreen)(?![\w-])/i,lookbehind:!0},{pattern:/\b(?:hsl|rgb)\(\s*\d{1,3}\s*,\s*\d{1,3}%?\s*,\s*\d{1,3}%?\s*\)\B|\b(?:hsl|rgb)a\(\s*\d{1,3}\s*,\s*\d{1,3}%?\s*,\s*\d{1,3}%?\s*,\s*(?:0|0?\.\d+|1)\s*\)\B/i,inside:{unit:t,number:n,function:/[\w-]+(?=\()/,punctuation:/[(),]/}}],entity:/\\[\da-f]{1,8}/i,unit:t,number:n})}(K),function(e){var t=/[*&][^\s[\]{},]+/,n=/!(?:<[\w\-%#;/?:@&=+$,.!~*'()[\]]+>|(?:[a-zA-Z\d-]*!)?[\w\-%#;/?:@&=+$.~*'()]+)?/,r="(?:"+n.source+"(?:[ 	]+"+t.source+")?|"+t.source+"(?:[ 	]+"+n.source+")?)",a=/(?:[^\s\x00-\x08\x0e-\x1f!"#%&'*,\-:>?@[\]`{|}\x7f-\x84\x86-\x9f\ud800-\udfff\ufffe\uffff]|[?:-]<PLAIN>)(?:[ \t]*(?:(?![#:])<PLAIN>|:<PLAIN>))*/.source.replace(/<PLAIN>/g,function(){return/[^\s\x00-\x08\x0e-\x1f,[\]{}\x7f-\x84\x86-\x9f\ud800-\udfff\ufffe\uffff]/.source}),o=/"(?:[^"\\\r\n]|\\.)*"|'(?:[^'\\\r\n]|\\.)*'/.source;function i(e,t){return t=(t||"").replace(/m/g,"")+"m",RegExp(/([:\-,[{]\s*(?:\s<<prop>>[ \t]+)?)(?:<<value>>)(?=[ \t]*(?:$|,|\]|\}|(?:[\r\n]\s*)?#))/.source.replace(/<<prop>>/g,function(){return r}).replace(/<<value>>/g,function(){return e}),t)}e.languages.yaml={scalar:{pattern:RegExp(/([\-:]\s*(?:\s<<prop>>[ \t]+)?[|>])[ \t]*(?:((?:\r?\n|\r)[ \t]+)\S[^\r\n]*(?:\2[^\r\n]+)*)/.source.replace(/<<prop>>/g,function(){return r})),lookbehind:!0,alias:"string"},comment:/#.*/,key:{pattern:RegExp(/((?:^|[:\-,[{\r\n?])[ \t]*(?:<<prop>>[ \t]+)?)<<key>>(?=\s*:\s)/.source.replace(/<<prop>>/g,function(){return r}).replace(/<<key>>/g,function(){return"(?:"+a+"|"+o+")"})),lookbehind:!0,greedy:!0,alias:"atrule"},directive:{pattern:/(^[ \t]*)%.+/m,lookbehind:!0,alias:"important"},datetime:{pattern:i(/\d{4}-\d\d?-\d\d?(?:[tT]|[ \t]+)\d\d?:\d{2}:\d{2}(?:\.\d*)?(?:[ \t]*(?:Z|[-+]\d\d?(?::\d{2})?))?|\d{4}-\d{2}-\d{2}|\d\d?:\d{2}(?::\d{2}(?:\.\d*)?)?/.source),lookbehind:!0,alias:"number"},boolean:{pattern:i(/false|true/.source,"i"),lookbehind:!0,alias:"important"},null:{pattern:i(/null|~/.source,"i"),lookbehind:!0,alias:"important"},string:{pattern:i(o),lookbehind:!0,greedy:!0},number:{pattern:i(/[+-]?(?:0x[\da-f]+|0o[0-7]+|(?:\d+(?:\.\d*)?|\.\d+)(?:e[+-]?\d+)?|\.inf|\.nan)/.source,"i"),lookbehind:!0},tag:n,important:t,punctuation:/---|[:[\]{}\-,|>?]|\.\.\./},e.languages.yml=e.languages.yaml}(K),function(e){var t=/(?:\\.|[^\\\n\r]|(?:\n|\r\n?)(?![\r\n]))/.source;function n(e){return e=e.replace(/<inner>/g,function(){return t}),RegExp(/((?:^|[^\\])(?:\\{2})*)/.source+"(?:"+e+")")}var r=/(?:\\.|``(?:[^`\r\n]|`(?!`))+``|`[^`\r\n]+`|[^\\|\r\n`])+/.source,a=/\|?__(?:\|__)+\|?(?:(?:\n|\r\n?)|(?![\s\S]))/.source.replace(/__/g,function(){return r}),o=/\|?[ \t]*:?-{3,}:?[ \t]*(?:\|[ \t]*:?-{3,}:?[ \t]*)+\|?(?:\n|\r\n?)/.source,i=(e.languages.markdown=e.languages.extend("markup",{}),e.languages.insertBefore("markdown","prolog",{"front-matter-block":{pattern:/(^(?:\s*[\r\n])?)---(?!.)[\s\S]*?[\r\n]---(?!.)/,lookbehind:!0,greedy:!0,inside:{punctuation:/^---|---$/,"front-matter":{pattern:/\S+(?:\s+\S+)*/,alias:["yaml","language-yaml"],inside:e.languages.yaml}}},blockquote:{pattern:/^>(?:[\t ]*>)*/m,alias:"punctuation"},table:{pattern:RegExp("^"+a+o+"(?:"+a+")*","m"),inside:{"table-data-rows":{pattern:RegExp("^("+a+o+")(?:"+a+")*$"),lookbehind:!0,inside:{"table-data":{pattern:RegExp(r),inside:e.languages.markdown},punctuation:/\|/}},"table-line":{pattern:RegExp("^("+a+")"+o+"$"),lookbehind:!0,inside:{punctuation:/\||:?-{3,}:?/}},"table-header-row":{pattern:RegExp("^"+a+"$"),inside:{"table-header":{pattern:RegExp(r),alias:"important",inside:e.languages.markdown},punctuation:/\|/}}}},code:[{pattern:/((?:^|\n)[ \t]*\n|(?:^|\r\n?)[ \t]*\r\n?)(?: {4}|\t).+(?:(?:\n|\r\n?)(?: {4}|\t).+)*/,lookbehind:!0,alias:"keyword"},{pattern:/^```[\s\S]*?^```$/m,greedy:!0,inside:{"code-block":{pattern:/^(```.*(?:\n|\r\n?))[\s\S]+?(?=(?:\n|\r\n?)^```$)/m,lookbehind:!0},"code-language":{pattern:/^(```).+/,lookbehind:!0},punctuation:/```/}}],title:[{pattern:/\S.*(?:\n|\r\n?)(?:==+|--+)(?=[ \t]*$)/m,alias:"important",inside:{punctuation:/==+$|--+$/}},{pattern:/(^\s*)#.+/m,lookbehind:!0,alias:"important",inside:{punctuation:/^#+|#+$/}}],hr:{pattern:/(^\s*)([*-])(?:[\t ]*\2){2,}(?=\s*$)/m,lookbehind:!0,alias:"punctuation"},list:{pattern:/(^\s*)(?:[*+-]|\d+\.)(?=[\t ].)/m,lookbehind:!0,alias:"punctuation"},"url-reference":{pattern:/!?\[[^\]]+\]:[\t ]+(?:\S+|<(?:\\.|[^>\\])+>)(?:[\t ]+(?:"(?:\\.|[^"\\])*"|'(?:\\.|[^'\\])*'|\((?:\\.|[^)\\])*\)))?/,inside:{variable:{pattern:/^(!?\[)[^\]]+/,lookbehind:!0},string:/(?:"(?:\\.|[^"\\])*"|'(?:\\.|[^'\\])*'|\((?:\\.|[^)\\])*\))$/,punctuation:/^[\[\]!:]|[<>]/},alias:"url"},bold:{pattern:n(/\b__(?:(?!_)<inner>|_(?:(?!_)<inner>)+_)+__\b|\*\*(?:(?!\*)<inner>|\*(?:(?!\*)<inner>)+\*)+\*\*/.source),lookbehind:!0,greedy:!0,inside:{content:{pattern:/(^..)[\s\S]+(?=..$)/,lookbehind:!0,inside:{}},punctuation:/\*\*|__/}},italic:{pattern:n(/\b_(?:(?!_)<inner>|__(?:(?!_)<inner>)+__)+_\b|\*(?:(?!\*)<inner>|\*\*(?:(?!\*)<inner>)+\*\*)+\*/.source),lookbehind:!0,greedy:!0,inside:{content:{pattern:/(^.)[\s\S]+(?=.$)/,lookbehind:!0,inside:{}},punctuation:/[*_]/}},strike:{pattern:n(/(~~?)(?:(?!~)<inner>)+\2/.source),lookbehind:!0,greedy:!0,inside:{content:{pattern:/(^~~?)[\s\S]+(?=\1$)/,lookbehind:!0,inside:{}},punctuation:/~~?/}},"code-snippet":{pattern:/(^|[^\\`])(?:``[^`\r\n]+(?:`[^`\r\n]+)*``(?!`)|`[^`\r\n]+`(?!`))/,lookbehind:!0,greedy:!0,alias:["code","keyword"]},url:{pattern:n(/!?\[(?:(?!\])<inner>)+\](?:\([^\s)]+(?:[\t ]+"(?:\\.|[^"\\])*")?\)|[ \t]?\[(?:(?!\])<inner>)+\])/.source),lookbehind:!0,greedy:!0,inside:{operator:/^!/,content:{pattern:/(^\[)[^\]]+(?=\])/,lookbehind:!0,inside:{}},variable:{pattern:/(^\][ \t]?\[)[^\]]+(?=\]$)/,lookbehind:!0},url:{pattern:/(^\]\()[^\s)]+/,lookbehind:!0},string:{pattern:/(^[ \t]+)"(?:\\.|[^"\\])*"(?=\)$)/,lookbehind:!0}}}}),["url","bold","italic","strike"].forEach(function(t){["url","bold","italic","strike","code-snippet"].forEach(function(n){t!==n&&(e.languages.markdown[t].inside.content.inside[n]=e.languages.markdown[n])})}),e.hooks.add("after-tokenize",function(e){"markdown"!==e.language&&"md"!==e.language||function e(t){if(t&&"string"!=typeof t)for(var n=0,r=t.length;n<r;n++){var a,o=t[n];"code"!==o.type?e(o.content):(a=o.content[1],o=o.content[3],a&&o&&"code-language"===a.type&&"code-block"===o.type&&"string"==typeof a.content&&(a=a.content.replace(/\b#/g,"sharp").replace(/\b\+\+/g,"pp"),a="language-"+(a=(/[a-z][\w-]*/i.exec(a)||[""])[0].toLowerCase()),o.alias?"string"==typeof o.alias?o.alias=[o.alias,a]:o.alias.push(a):o.alias=[a]))}}(e.tokens)}),e.hooks.add("wrap",function(t){if("code-block"===t.type){for(var n,r="",a=0,o=t.classes.length;a<o;a++){var u=t.classes[a],u=/language-(.+)/.exec(u);if(u){r=u[1];break}}var c,d=e.languages[r];d?t.content=e.highlight(n=(n=(n=t.content).replace(i,"")).replace(/&(\w{1,8}|#x?[\da-f]{1,8});/gi,function(e,t){return"#"===(t=t.toLowerCase())[0]?s("x"===t[1]?parseInt(t.slice(2),16):Number(t.slice(1))):l[t]||e}),d,r):r&&"none"!==r&&e.plugins.autoloader&&(c="md-"+new Date().valueOf()+"-"+Math.floor(1e16*Math.random()),t.attributes.id=c,e.plugins.autoloader.loadLanguages(r,function(){var t=document.getElementById(c);t&&(t.innerHTML=e.highlight(t.textContent,e.languages[r],r))}))}}),RegExp(e.languages.markup.tag.pattern.source,"gi")),l={amp:"&",lt:"<",gt:">",quot:'"'},s=String.fromCodePoint||String.fromCharCode;e.languages.md=e.languages.markdown}(K),K.languages.graphql={comment:/#.*/,description:{pattern:/(?:"""(?:[^"]|(?!""")")*"""|"(?:\\.|[^\\"\r\n])*")(?=\s*[a-z_])/i,greedy:!0,alias:"string",inside:{"language-markdown":{pattern:/(^"(?:"")?)(?!\1)[\s\S]+(?=\1$)/,lookbehind:!0,inside:K.languages.markdown}}},string:{pattern:/"""(?:[^"]|(?!""")")*"""|"(?:\\.|[^\\"\r\n])*"/,greedy:!0},number:/(?:\B-|\b)\d+(?:\.\d+)?(?:e[+-]?\d+)?\b/i,boolean:/\b(?:false|true)\b/,variable:/\$[a-z_]\w*/i,directive:{pattern:/@[a-z_]\w*/i,alias:"function"},"attr-name":{pattern:/\b[a-z_]\w*(?=\s*(?:\((?:[^()"]|"(?:\\.|[^\\"\r\n])*")*\))?:)/i,greedy:!0},"atom-input":{pattern:/\b[A-Z]\w*Input\b/,alias:"class-name"},scalar:/\b(?:Boolean|Float|ID|Int|String)\b/,constant:/\b[A-Z][A-Z_\d]*\b/,"class-name":{pattern:/(\b(?:enum|implements|interface|on|scalar|type|union)\s+|&\s*|:\s*|\[)[A-Z_]\w*/,lookbehind:!0},fragment:{pattern:/(\bfragment\s+|\.{3}\s*(?!on\b))[a-zA-Z_]\w*/,lookbehind:!0,alias:"function"},"definition-mutation":{pattern:/(\bmutation\s+)[a-zA-Z_]\w*/,lookbehind:!0,alias:"function"},"definition-query":{pattern:/(\bquery\s+)[a-zA-Z_]\w*/,lookbehind:!0,alias:"function"},keyword:/\b(?:directive|enum|extend|fragment|implements|input|interface|mutation|on|query|repeatable|scalar|schema|subscription|type|union)\b/,operator:/[!=|&]|\.{3}/,"property-query":/\w+(?=\s*\()/,object:/\w+(?=\s*\{)/,punctuation:/[!(){}\[\]:=,]/,property:/\w+/},K.hooks.add("after-tokenize",function(e){if("graphql"===e.language)for(var t=e.tokens.filter(function(e){return"string"!=typeof e&&"comment"!==e.type&&"scalar"!==e.type}),n=0;n<t.length;){var r=t[n++];if("keyword"===r.type&&"mutation"===r.content){var a=[];if(d(["definition-mutation","punctuation"])&&"("===function(e){return t[n+e]}(1).content){n+=2;var o=f(/^\($/,/^\)$/);if(-1===o)continue;for(;n<o;n++){var i=function(e){return t[n+e]}(0);"variable"===i.type&&(p(i,"variable-input"),a.push(i.content))}n=o+1}if(d(["punctuation","property-query"])&&"{"===function(e){return t[n+e]}(0).content&&(n++,p(function(e){return t[n+e]}(0),"property-mutation"),0<a.length)){var l=f(/^\{$/,/^\}$/);if(-1!==l)for(var s=n;s<l;s++){var u=t[s];"variable"===u.type&&0<=a.indexOf(u.content)&&p(u,"variable-input")}}}}function c(e){return t[n+e]}function d(e,r){r=r||0;for(var a=0;a<e.length;a++){var o=t[n+(a+r)];if(!o||o.type!==e[a])return}return 1}function f(e,r){for(var a=1,o=n;o<t.length;o++){var i=t[o],l=i.content;if("punctuation"===i.type&&"string"==typeof l){if(e.test(l))a++;else if(r.test(l)&&0==--a)return o}}return -1}function p(e,t){var n=e.alias;n?Array.isArray(n)||(e.alias=n=[n]):e.alias=n=[],n.push(t)}}),K.languages.sql={comment:{pattern:/(^|[^\\])(?:\/\*[\s\S]*?\*\/|(?:--|\/\/|#).*)/,lookbehind:!0},variable:[{pattern:/@(["'`])(?:\\[\s\S]|(?!\1)[^\\])+\1/,greedy:!0},/@[\w.$]+/],string:{pattern:/(^|[^@\\])("|')(?:\\[\s\S]|(?!\2)[^\\]|\2\2)*\2/,greedy:!0,lookbehind:!0},identifier:{pattern:/(^|[^@\\])`(?:\\[\s\S]|[^`\\]|``)*`/,greedy:!0,lookbehind:!0,inside:{punctuation:/^`|`$/}},function:/\b(?:AVG|COUNT|FIRST|FORMAT|LAST|LCASE|LEN|MAX|MID|MIN|MOD|NOW|ROUND|SUM|UCASE)(?=\s*\()/i,keyword:/\b(?:ACTION|ADD|AFTER|ALGORITHM|ALL|ALTER|ANALYZE|ANY|APPLY|AS|ASC|AUTHORIZATION|AUTO_INCREMENT|BACKUP|BDB|BEGIN|BERKELEYDB|BIGINT|BINARY|BIT|BLOB|BOOL|BOOLEAN|BREAK|BROWSE|BTREE|BULK|BY|CALL|CASCADED?|CASE|CHAIN|CHAR(?:ACTER|SET)?|CHECK(?:POINT)?|CLOSE|CLUSTERED|COALESCE|COLLATE|COLUMNS?|COMMENT|COMMIT(?:TED)?|COMPUTE|CONNECT|CONSISTENT|CONSTRAINT|CONTAINS(?:TABLE)?|CONTINUE|CONVERT|CREATE|CROSS|CURRENT(?:_DATE|_TIME|_TIMESTAMP|_USER)?|CURSOR|CYCLE|DATA(?:BASES?)?|DATE(?:TIME)?|DAY|DBCC|DEALLOCATE|DEC|DECIMAL|DECLARE|DEFAULT|DEFINER|DELAYED|DELETE|DELIMITERS?|DENY|DESC|DESCRIBE|DETERMINISTIC|DISABLE|DISCARD|DISK|DISTINCT|DISTINCTROW|DISTRIBUTED|DO|DOUBLE|DROP|DUMMY|DUMP(?:FILE)?|DUPLICATE|ELSE(?:IF)?|ENABLE|ENCLOSED|END|ENGINE|ENUM|ERRLVL|ERRORS|ESCAPED?|EXCEPT|EXEC(?:UTE)?|EXISTS|EXIT|EXPLAIN|EXTENDED|FETCH|FIELDS|FILE|FILLFACTOR|FIRST|FIXED|FLOAT|FOLLOWING|FOR(?: EACH ROW)?|FORCE|FOREIGN|FREETEXT(?:TABLE)?|FROM|FULL|FUNCTION|GEOMETRY(?:COLLECTION)?|GLOBAL|GOTO|GRANT|GROUP|HANDLER|HASH|HAVING|HOLDLOCK|HOUR|IDENTITY(?:COL|_INSERT)?|IF|IGNORE|IMPORT|INDEX|INFILE|INNER|INNODB|INOUT|INSERT|INT|INTEGER|INTERSECT|INTERVAL|INTO|INVOKER|ISOLATION|ITERATE|JOIN|KEYS?|KILL|LANGUAGE|LAST|LEAVE|LEFT|LEVEL|LIMIT|LINENO|LINES|LINESTRING|LOAD|LOCAL|LOCK|LONG(?:BLOB|TEXT)|LOOP|MATCH(?:ED)?|MEDIUM(?:BLOB|INT|TEXT)|MERGE|MIDDLEINT|MINUTE|MODE|MODIFIES|MODIFY|MONTH|MULTI(?:LINESTRING|POINT|POLYGON)|NATIONAL|NATURAL|NCHAR|NEXT|NO|NONCLUSTERED|NULLIF|NUMERIC|OFF?|OFFSETS?|ON|OPEN(?:DATASOURCE|QUERY|ROWSET)?|OPTIMIZE|OPTION(?:ALLY)?|ORDER|OUT(?:ER|FILE)?|OVER|PARTIAL|PARTITION|PERCENT|PIVOT|PLAN|POINT|POLYGON|PRECEDING|PRECISION|PREPARE|PREV|PRIMARY|PRINT|PRIVILEGES|PROC(?:EDURE)?|PUBLIC|PURGE|QUICK|RAISERROR|READS?|REAL|RECONFIGURE|REFERENCES|RELEASE|RENAME|REPEAT(?:ABLE)?|REPLACE|REPLICATION|REQUIRE|RESIGNAL|RESTORE|RESTRICT|RETURN(?:ING|S)?|REVOKE|RIGHT|ROLLBACK|ROUTINE|ROW(?:COUNT|GUIDCOL|S)?|RTREE|RULE|SAVE(?:POINT)?|SCHEMA|SECOND|SELECT|SERIAL(?:IZABLE)?|SESSION(?:_USER)?|SET(?:USER)?|SHARE|SHOW|SHUTDOWN|SIMPLE|SMALLINT|SNAPSHOT|SOME|SONAME|SQL|START(?:ING)?|STATISTICS|STATUS|STRIPED|SYSTEM_USER|TABLES?|TABLESPACE|TEMP(?:ORARY|TABLE)?|TERMINATED|TEXT(?:SIZE)?|THEN|TIME(?:STAMP)?|TINY(?:BLOB|INT|TEXT)|TOP?|TRAN(?:SACTIONS?)?|TRIGGER|TRUNCATE|TSEQUAL|TYPES?|UNBOUNDED|UNCOMMITTED|UNDEFINED|UNION|UNIQUE|UNLOCK|UNPIVOT|UNSIGNED|UPDATE(?:TEXT)?|USAGE|USE|USER|USING|VALUES?|VAR(?:BINARY|CHAR|CHARACTER|YING)|VIEW|WAITFOR|WARNINGS|WHEN|WHERE|WHILE|WITH(?: ROLLUP|IN)?|WORK|WRITE(?:TEXT)?|YEAR)\b/i,boolean:/\b(?:FALSE|NULL|TRUE)\b/i,number:/\b0x[\da-f]+\b|\b\d+(?:\.\d*)?|\B\.\d+\b/i,operator:/[-+*\/=%^~]|&&?|\|\|?|!=?|<(?:=>?|<|>)?|>[>=]?|\b(?:AND|BETWEEN|DIV|ILIKE|IN|IS|LIKE|NOT|OR|REGEXP|RLIKE|SOUNDS LIKE|XOR)\b/i,punctuation:/[;[\]()`,.]/},function(e){var t=e.languages.javascript["template-string"],n=t.pattern.source,r=t.inside.interpolation,a=r.inside["interpolation-punctuation"],o=r.pattern.source;function i(t,r){if(e.languages[t])return{pattern:RegExp("((?:"+r+")\\s*)"+n),lookbehind:!0,greedy:!0,inside:{"template-punctuation":{pattern:/^`|`$/,alias:"string"},"embedded-code":{pattern:/[\s\S]+/,alias:t}}}}function l(t,n,r){return t={code:t,grammar:n,language:r},e.hooks.run("before-tokenize",t),t.tokens=e.tokenize(t.code,t.grammar),e.hooks.run("after-tokenize",t),t.tokens}e.languages.javascript["template-string"]=[i("css",/\b(?:styled(?:\([^)]*\))?(?:\s*\.\s*\w+(?:\([^)]*\))*)*|css(?:\s*\.\s*(?:global|resolve))?|createGlobalStyle|keyframes)/.source),i("html",/\bhtml|\.\s*(?:inner|outer)HTML\s*\+?=/.source),i("svg",/\bsvg/.source),i("markdown",/\b(?:markdown|md)/.source),i("graphql",/\b(?:gql|graphql(?:\s*\.\s*experimental)?)/.source),i("sql",/\bsql/.source),t].filter(Boolean);var s={javascript:!0,js:!0,typescript:!0,ts:!0,jsx:!0,tsx:!0};e.hooks.add("after-tokenize",function(t){t.language in s&&function t(n){for(var i=0,s=n.length;i<s;i++){var u,c,d,f=n[i];"string"!=typeof f&&(Array.isArray(u=f.content)?"template-string"===f.type?(f=u[1],3===u.length&&"string"!=typeof f&&"embedded-code"===f.type&&(c=function e(t){return"string"==typeof t?t:Array.isArray(t)?t.map(e).join(""):e(t.content)}(f),f=Array.isArray(f=f.alias)?f[0]:f,d=e.languages[f])&&(u[1]=function(t,n,i){var s=e.tokenize(t,{interpolation:{pattern:RegExp(o),lookbehind:!0}}),u=0,c={},s=l(s.map(function(e){if("string"==typeof e)return e;for(var n,r,e=e.content;-1!==t.indexOf((r=u++,n="___"+i.toUpperCase()+"_"+r+"___")););return c[n]=e,n}).join(""),n,i),d=Object.keys(c);return u=0,function t(n){for(var o=0;o<n.length;o++){if(u>=d.length)return;var i,s,f,p,h,g,m,y=n[o];"string"==typeof y||"string"==typeof y.content?(i=d[u],-1!==(m=(g="string"==typeof y?y:y.content).indexOf(i))&&(++u,s=g.substring(0,m),h=c[i],f=void 0,(p={})["interpolation-punctuation"]=a,3===(p=e.tokenize(h,p)).length&&((f=[1,1]).push.apply(f,l(p[1],e.languages.javascript,"javascript")),p.splice.apply(p,f)),f=new e.Token("interpolation",p,r.alias,h),p=g.substring(m+i.length),h=[],s&&h.push(s),h.push(f),p&&(t(g=[p]),h.push.apply(h,g)),"string"==typeof y?(n.splice.apply(n,[o,1].concat(h)),o+=h.length-1):y.content=h)):Array.isArray(m=y.content)?t(m):t([m])}}(s),new e.Token(i,s,"language-"+i,t)}(c,d,f))):t(u):"string"!=typeof u&&t([u]))}}(t.tokens)})}(K),(x=K).languages.typescript=x.languages.extend("javascript",{"class-name":{pattern:/(\b(?:class|extends|implements|instanceof|interface|new|type)\s+)(?!keyof\b)(?!\s)[_$a-zA-Z\xA0-\uFFFF](?:(?!\s)[$\w\xA0-\uFFFF])*(?:\s*<(?:[^<>]|<(?:[^<>]|<[^<>]*>)*>)*>)?/,lookbehind:!0,greedy:!0,inside:null},builtin:/\b(?:Array|Function|Promise|any|boolean|console|never|number|string|symbol|unknown)\b/}),x.languages.typescript.keyword.push(/\b(?:abstract|declare|is|keyof|readonly|require)\b/,/\b(?:asserts|infer|interface|module|namespace|type)\b(?=\s*(?:[{_$a-zA-Z\xA0-\uFFFF]|$))/,/\btype\b(?=\s*(?:[\{*]|$))/),delete x.languages.typescript.parameter,delete x.languages.typescript["literal-property"],w=x.languages.extend("typescript",{}),delete w["class-name"],x.languages.typescript["class-name"].inside=w,x.languages.insertBefore("typescript","function",{decorator:{pattern:/@[$\w\xA0-\uFFFF]+/,inside:{at:{pattern:/^@/,alias:"operator"},function:/^[\s\S]+/}},"generic-function":{pattern:/#?(?!\s)[_$a-zA-Z\xA0-\uFFFF](?:(?!\s)[$\w\xA0-\uFFFF])*\s*<(?:[^<>]|<(?:[^<>]|<[^<>]*>)*>)*>(?=\s*\()/,greedy:!0,inside:{function:/^#?(?!\s)[_$a-zA-Z\xA0-\uFFFF](?:(?!\s)[$\w\xA0-\uFFFF])*/,generic:{pattern:/<[\s\S]+/,alias:"class-name",inside:w}}}}),x.languages.ts=x.languages.typescript,S=(k=K).languages.javascript,_="(@(?:arg|argument|param|property)\\s+(?:"+(E=/\{(?:[^{}]|\{(?:[^{}]|\{[^{}]*\})*\})+\}/.source)+"\\s+)?)",k.languages.jsdoc=k.languages.extend("javadoclike",{parameter:{pattern:RegExp(_+/(?:(?!\s)[$\w\xA0-\uFFFF.])+(?=\s|$)/.source),lookbehind:!0,inside:{punctuation:/\./}}}),k.languages.insertBefore("jsdoc","keyword",{"optional-parameter":{pattern:RegExp(_+/\[(?:(?!\s)[$\w\xA0-\uFFFF.])+(?:=[^[\]]+)?\](?=\s|$)/.source),lookbehind:!0,inside:{parameter:{pattern:/(^\[)[$\w\xA0-\uFFFF\.]+/,lookbehind:!0,inside:{punctuation:/\./}},code:{pattern:/(=)[\s\S]*(?=\]$)/,lookbehind:!0,inside:S,alias:"language-javascript"},punctuation:/[=[\]]/}},"class-name":[{pattern:RegExp(/(@(?:augments|class|extends|interface|memberof!?|template|this|typedef)\s+(?:<TYPE>\s+)?)[A-Z]\w*(?:\.[A-Z]\w*)*/.source.replace(/<TYPE>/g,function(){return E})),lookbehind:!0,inside:{punctuation:/\./}},{pattern:RegExp("(@[a-z]+\\s+)"+E),lookbehind:!0,inside:{string:S.string,number:S.number,boolean:S.boolean,keyword:k.languages.typescript.keyword,operator:/=>|\.\.\.|[&|?:*]/,punctuation:/[.,;=<>{}()[\]]/}}],example:{pattern:/(@example\s+(?!\s))(?:[^@\s]|\s+(?!\s))+?(?=\s*(?:\*\s*)?(?:@\w|\*\/))/,lookbehind:!0,inside:{code:{pattern:/^([\t ]*(?:\*\s*)?)\S.*$/m,lookbehind:!0,inside:S,alias:"language-javascript"}}}}),k.languages.javadoclike.addSupport("javascript",k.languages.jsdoc),(T=K).languages.flow=T.languages.extend("javascript",{}),T.languages.insertBefore("flow","keyword",{type:[{pattern:/\b(?:[Bb]oolean|Function|[Nn]umber|[Ss]tring|[Ss]ymbol|any|mixed|null|void)\b/,alias:"class-name"}]}),T.languages.flow["function-variable"].pattern=/(?!\s)[_$a-z\xA0-\uFFFF](?:(?!\s)[$\w\xA0-\uFFFF])*(?=\s*=\s*(?:function\b|(?:\([^()]*\)(?:\s*:\s*\w+)?|(?!\s)[_$a-z\xA0-\uFFFF](?:(?!\s)[$\w\xA0-\uFFFF])*)\s*=>))/i,delete T.languages.flow.parameter,T.languages.insertBefore("flow","operator",{"flow-punctuation":{pattern:/\{\||\|\}/,alias:"punctuation"}}),Array.isArray(T.languages.flow.keyword)||(T.languages.flow.keyword=[T.languages.flow.keyword]),T.languages.flow.keyword.unshift({pattern:/(^|[^$]\b)(?:Class|declare|opaque|type)\b(?!\$)/,lookbehind:!0},{pattern:/(^|[^$]\B)\$(?:Diff|Enum|Exact|Keys|ObjMap|PropertyType|Record|Shape|Subtype|Supertype|await)\b(?!\$)/,lookbehind:!0}),K.languages.n4js=K.languages.extend("javascript",{keyword:/\b(?:Array|any|boolean|break|case|catch|class|const|constructor|continue|debugger|declare|default|delete|do|else|enum|export|extends|false|finally|for|from|function|get|if|implements|import|in|instanceof|interface|let|module|new|null|number|package|private|protected|public|return|set|static|string|super|switch|this|throw|true|try|typeof|var|void|while|with|yield)\b/}),K.languages.insertBefore("n4js","constant",{annotation:{pattern:/@+\w+/,alias:"operator"}}),K.languages.n4jsd=K.languages.n4js,function(e){function t(e,t){return RegExp(e.replace(/<ID>/g,function(){return/(?!\s)[_$a-zA-Z\xA0-\uFFFF](?:(?!\s)[$\w\xA0-\uFFFF])*/.source}),t)}e.languages.insertBefore("javascript","function-variable",{"method-variable":{pattern:RegExp("(\\.\\s*)"+e.languages.javascript["function-variable"].pattern.source),lookbehind:!0,alias:["function-variable","method","function","property-access"]}}),e.languages.insertBefore("javascript","function",{method:{pattern:RegExp("(\\.\\s*)"+e.languages.javascript.function.source),lookbehind:!0,alias:["function","property-access"]}}),e.languages.insertBefore("javascript","constant",{"known-class-name":[{pattern:/\b(?:(?:Float(?:32|64)|(?:Int|Uint)(?:8|16|32)|Uint8Clamped)?Array|ArrayBuffer|BigInt|Boolean|DataView|Date|Error|Function|Intl|JSON|(?:Weak)?(?:Map|Set)|Math|Number|Object|Promise|Proxy|Reflect|RegExp|String|Symbol|WebAssembly)\b/,alias:"class-name"},{pattern:/\b(?:[A-Z]\w*)Error\b/,alias:"class-name"}]}),e.languages.insertBefore("javascript","keyword",{imports:{pattern:t(/(\bimport\b\s*)(?:<ID>(?:\s*,\s*(?:\*\s*as\s+<ID>|\{[^{}]*\}))?|\*\s*as\s+<ID>|\{[^{}]*\})(?=\s*\bfrom\b)/.source),lookbehind:!0,inside:e.languages.javascript},exports:{pattern:t(/(\bexport\b\s*)(?:\*(?:\s*as\s+<ID>)?(?=\s*\bfrom\b)|\{[^{}]*\})/.source),lookbehind:!0,inside:e.languages.javascript}}),e.languages.javascript.keyword.unshift({pattern:/\b(?:as|default|export|from|import)\b/,alias:"module"},{pattern:/\b(?:await|break|catch|continue|do|else|finally|for|if|return|switch|throw|try|while|yield)\b/,alias:"control-flow"},{pattern:/\bnull\b/,alias:["null","nil"]},{pattern:/\bundefined\b/,alias:"nil"}),e.languages.insertBefore("javascript","operator",{spread:{pattern:/\.{3}/,alias:"operator"},arrow:{pattern:/=>/,alias:"operator"}}),e.languages.insertBefore("javascript","punctuation",{"property-access":{pattern:t(/(\.\s*)#?<ID>/.source),lookbehind:!0},"maybe-class-name":{pattern:/(^|[^$\w\xA0-\uFFFF])[A-Z][$\w\xA0-\uFFFF]+/,lookbehind:!0},dom:{pattern:/\b(?:document|(?:local|session)Storage|location|navigator|performance|window)\b/,alias:"variable"},console:{pattern:/\bconsole(?=\s*\.)/,alias:"class-name"}});for(var n=["function","function-variable","method","method-variable","property-access"],r=0;r<n.length;r++){var a=n[r],o=e.languages.javascript[a],a=(o="RegExp"===e.util.type(o)?e.languages.javascript[a]={pattern:o}:o).inside||{};(o.inside=a)["maybe-class-name"]=/^[A-Z][\s\S]*/}}(K),function(e){var t=e.util.clone(e.languages.javascript),n=/(?:\s|\/\/.*(?!.)|\/\*(?:[^*]|\*(?!\/))\*\/)/.source,r=/(?:\{(?:\{(?:\{[^{}]*\}|[^{}])*\}|[^{}])*\})/.source,a=/(?:\{<S>*\.{3}(?:[^{}]|<BRACES>)*\})/.source;function o(e,t){return RegExp(e=e.replace(/<S>/g,function(){return n}).replace(/<BRACES>/g,function(){return r}).replace(/<SPREAD>/g,function(){return a}),t)}a=o(a).source,e.languages.jsx=e.languages.extend("markup",t),e.languages.jsx.tag.pattern=o(/<\/?(?:[\w.:-]+(?:<S>+(?:[\w.:$-]+(?:=(?:"(?:\\[\s\S]|[^\\"])*"|'(?:\\[\s\S]|[^\\'])*'|[^\s{'"/>=]+|<BRACES>))?|<SPREAD>))*<S>*\/?)?>/.source),e.languages.jsx.tag.inside.tag.pattern=/^<\/?[^\s>\/]*/,e.languages.jsx.tag.inside["attr-value"].pattern=/=(?!\{)(?:"(?:\\[\s\S]|[^\\"])*"|'(?:\\[\s\S]|[^\\'])*'|[^\s'">]+)/,e.languages.jsx.tag.inside.tag.inside["class-name"]=/^[A-Z]\w*(?:\.[A-Z]\w*)*$/,e.languages.jsx.tag.inside.comment=t.comment,e.languages.insertBefore("inside","attr-name",{spread:{pattern:o(/<SPREAD>/.source),inside:e.languages.jsx}},e.languages.jsx.tag),e.languages.insertBefore("inside","special-attr",{script:{pattern:o(/=<BRACES>/.source),alias:"language-javascript",inside:{"script-punctuation":{pattern:/^=(?=\{)/,alias:"punctuation"},rest:e.languages.jsx}}},e.languages.jsx.tag);var i=function(e){return e?"string"==typeof e?e:"string"==typeof e.content?e.content:e.content.map(i).join(""):""};e.hooks.add("after-tokenize",function(t){"jsx"!==t.language&&"tsx"!==t.language||function t(n){for(var r=[],a=0;a<n.length;a++){var o=n[a],l=!1;"string"!=typeof o&&("tag"===o.type&&o.content[0]&&"tag"===o.content[0].type?"</"===o.content[0].content[0].content?0<r.length&&r[r.length-1].tagName===i(o.content[0].content[1])&&r.pop():"/>"!==o.content[o.content.length-1].content&&r.push({tagName:i(o.content[0].content[1]),openedBraces:0}):0<r.length&&"punctuation"===o.type&&"{"===o.content?r[r.length-1].openedBraces++:0<r.length&&0<r[r.length-1].openedBraces&&"punctuation"===o.type&&"}"===o.content?r[r.length-1].openedBraces--:l=!0),(l||"string"==typeof o)&&0<r.length&&0===r[r.length-1].openedBraces&&(l=i(o),a<n.length-1&&("string"==typeof n[a+1]||"plain-text"===n[a+1].type)&&(l+=i(n[a+1]),n.splice(a+1,1)),0<a&&("string"==typeof n[a-1]||"plain-text"===n[a-1].type)&&(l=i(n[a-1])+l,n.splice(a-1,1),a--),n[a]=new e.Token("plain-text",l,null,l)),o.content&&"string"!=typeof o.content&&t(o.content)}}(t.tokens)})}(K),P=(C=K).util.clone(C.languages.typescript),(P=(C.languages.tsx=C.languages.extend("jsx",P),delete C.languages.tsx.parameter,delete C.languages.tsx["literal-property"],C.languages.tsx.tag)).pattern=RegExp(/(^|[^\w$]|(?=<\/))/.source+"(?:"+P.pattern.source+")",P.pattern.flags),P.lookbehind=!0,K.languages.swift={comment:{pattern:/(^|[^\\:])(?:\/\/.*|\/\*(?:[^/*]|\/(?!\*)|\*(?!\/)|\/\*(?:[^*]|\*(?!\/))*\*\/)*\*\/)/,lookbehind:!0,greedy:!0},"string-literal":[{pattern:RegExp(/(^|[^"#])/.source+"(?:"+/"(?:\\(?:\((?:[^()]|\([^()]*\))*\)|\r\n|[^(])|[^\\\r\n"])*"/.source+"|"+/"""(?:\\(?:\((?:[^()]|\([^()]*\))*\)|[^(])|[^\\"]|"(?!""))*"""/.source+")"+/(?!["#])/.source),lookbehind:!0,greedy:!0,inside:{interpolation:{pattern:/(\\\()(?:[^()]|\([^()]*\))*(?=\))/,lookbehind:!0,inside:null},"interpolation-punctuation":{pattern:/^\)|\\\($/,alias:"punctuation"},punctuation:/\\(?=[\r\n])/,string:/[\s\S]+/}},{pattern:RegExp(/(^|[^"#])(#+)/.source+"(?:"+/"(?:\\(?:#+\((?:[^()]|\([^()]*\))*\)|\r\n|[^#])|[^\\\r\n])*?"/.source+"|"+/"""(?:\\(?:#+\((?:[^()]|\([^()]*\))*\)|[^#])|[^\\])*?"""/.source+")\\2"),lookbehind:!0,greedy:!0,inside:{interpolation:{pattern:/(\\#+\()(?:[^()]|\([^()]*\))*(?=\))/,lookbehind:!0,inside:null},"interpolation-punctuation":{pattern:/^\)|\\#+\($/,alias:"punctuation"},string:/[\s\S]+/}}],directive:{pattern:RegExp(/#/.source+"(?:"+/(?:elseif|if)\b/.source+"(?:[ 	]*"+/(?:![ \t]*)?(?:\b\w+\b(?:[ \t]*\((?:[^()]|\([^()]*\))*\))?|\((?:[^()]|\([^()]*\))*\))(?:[ \t]*(?:&&|\|\|))?/.source+")+|"+/(?:else|endif)\b/.source+")"),alias:"property",inside:{"directive-name":/^#\w+/,boolean:/\b(?:false|true)\b/,number:/\b\d+(?:\.\d+)*\b/,operator:/!|&&|\|\||[<>]=?/,punctuation:/[(),]/}},literal:{pattern:/#(?:colorLiteral|column|dsohandle|file(?:ID|Literal|Path)?|function|imageLiteral|line)\b/,alias:"constant"},"other-directive":{pattern:/#\w+\b/,alias:"property"},attribute:{pattern:/@\w+/,alias:"atrule"},"function-definition":{pattern:/(\bfunc\s+)\w+/,lookbehind:!0,alias:"function"},label:{pattern:/\b(break|continue)\s+\w+|\b[a-zA-Z_]\w*(?=\s*:\s*(?:for|repeat|while)\b)/,lookbehind:!0,alias:"important"},keyword:/\b(?:Any|Protocol|Self|Type|actor|as|assignment|associatedtype|associativity|async|await|break|case|catch|class|continue|convenience|default|defer|deinit|didSet|do|dynamic|else|enum|extension|fallthrough|fileprivate|final|for|func|get|guard|higherThan|if|import|in|indirect|infix|init|inout|internal|is|isolated|lazy|left|let|lowerThan|mutating|none|nonisolated|nonmutating|open|operator|optional|override|postfix|precedencegroup|prefix|private|protocol|public|repeat|required|rethrows|return|right|safe|self|set|some|static|struct|subscript|super|switch|throw|throws|try|typealias|unowned|unsafe|var|weak|where|while|willSet)\b/,boolean:/\b(?:false|true)\b/,nil:{pattern:/\bnil\b/,alias:"constant"},"short-argument":/\$\d+\b/,omit:{pattern:/\b_\b/,alias:"keyword"},number:/\b(?:[\d_]+(?:\.[\de_]+)?|0x[a-f0-9_]+(?:\.[a-f0-9p_]+)?|0b[01_]+|0o[0-7_]+)\b/i,"class-name":/\b[A-Z](?:[A-Z_\d]*[a-z]\w*)?\b/,function:/\b[a-z_]\w*(?=\s*\()/i,constant:/\b(?:[A-Z_]{2,}|k[A-Z][A-Za-z_]+)\b/,operator:/[-+*/%=!<>&|^~?]+|\.[.\-+*/%=!<>&|^~?]+/,punctuation:/[{}[\]();,.:\\]/},K.languages.swift["string-literal"].forEach(function(e){e.inside.interpolation.inside=K.languages.swift}),(O=K).languages.kotlin=O.languages.extend("clike",{keyword:{pattern:/(^|[^.])\b(?:abstract|actual|annotation|as|break|by|catch|class|companion|const|constructor|continue|crossinline|data|do|dynamic|else|enum|expect|external|final|finally|for|fun|get|if|import|in|infix|init|inline|inner|interface|internal|is|lateinit|noinline|null|object|open|operator|out|override|package|private|protected|public|reified|return|sealed|set|super|suspend|tailrec|this|throw|to|try|typealias|val|var|vararg|when|where|while)\b/,lookbehind:!0},function:[{pattern:/(?:`[^\r\n`]+`|\b\w+)(?=\s*\()/,greedy:!0},{pattern:/(\.)(?:`[^\r\n`]+`|\w+)(?=\s*\{)/,lookbehind:!0,greedy:!0}],number:/\b(?:0[xX][\da-fA-F]+(?:_[\da-fA-F]+)*|0[bB][01]+(?:_[01]+)*|\d+(?:_\d+)*(?:\.\d+(?:_\d+)*)?(?:[eE][+-]?\d+(?:_\d+)*)?[fFL]?)\b/,operator:/\+[+=]?|-[-=>]?|==?=?|!(?:!|==?)?|[\/*%<>]=?|[?:]:?|\.\.|&&|\|\||\b(?:and|inv|or|shl|shr|ushr|xor)\b/}),delete O.languages.kotlin["class-name"],N={"interpolation-punctuation":{pattern:/^\$\{?|\}$/,alias:"punctuation"},expression:{pattern:/[\s\S]+/,inside:O.languages.kotlin}},O.languages.insertBefore("kotlin","string",{"string-literal":[{pattern:/"""(?:[^$]|\$(?:(?!\{)|\{[^{}]*\}))*?"""/,alias:"multiline",inside:{interpolation:{pattern:/\$(?:[a-z_]\w*|\{[^{}]*\})/i,inside:N},string:/[\s\S]+/}},{pattern:/"(?:[^"\\\r\n$]|\\.|\$(?:(?!\{)|\{[^{}]*\}))*"/,alias:"singleline",inside:{interpolation:{pattern:/((?:^|[^\\])(?:\\{2})*)\$(?:[a-z_]\w*|\{[^{}]*\})/i,lookbehind:!0,inside:N},string:/[\s\S]+/}}],char:{pattern:/'(?:[^'\\\r\n]|\\(?:.|u[a-fA-F0-9]{0,4}))'/,greedy:!0}}),delete O.languages.kotlin.string,O.languages.insertBefore("kotlin","keyword",{annotation:{pattern:/\B@(?:\w+:)?(?:[A-Z]\w*|\[[^\]]+\])/,alias:"builtin"}}),O.languages.insertBefore("kotlin","function",{label:{pattern:/\b\w+@|@\w+\b/,alias:"symbol"}}),O.languages.kt=O.languages.kotlin,O.languages.kts=O.languages.kotlin,K.languages.c=K.languages.extend("clike",{comment:{pattern:/\/\/(?:[^\r\n\\]|\\(?:\r\n?|\n|(?![\r\n])))*|\/\*[\s\S]*?(?:\*\/|$)/,greedy:!0},string:{pattern:/"(?:\\(?:\r\n|[\s\S])|[^"\\\r\n])*"/,greedy:!0},"class-name":{pattern:/(\b(?:enum|struct)\s+(?:__attribute__\s*\(\([\s\S]*?\)\)\s*)?)\w+|\b[a-z]\w*_t\b/,lookbehind:!0},keyword:/\b(?:_Alignas|_Alignof|_Atomic|_Bool|_Complex|_Generic|_Imaginary|_Noreturn|_Static_assert|_Thread_local|__attribute__|asm|auto|break|case|char|const|continue|default|do|double|else|enum|extern|float|for|goto|if|inline|int|long|register|return|short|signed|sizeof|static|struct|switch|typedef|typeof|union|unsigned|void|volatile|while)\b/,function:/\b[a-z_]\w*(?=\s*\()/i,number:/(?:\b0x(?:[\da-f]+(?:\.[\da-f]*)?|\.[\da-f]+)(?:p[+-]?\d+)?|(?:\b\d+(?:\.\d*)?|\B\.\d+)(?:e[+-]?\d+)?)[ful]{0,4}/i,operator:/>>=?|<<=?|->|([-+&|:])\1|[?:~]|[-+*/%&|^!=<>]=?/}),K.languages.insertBefore("c","string",{char:{pattern:/'(?:\\(?:\r\n|[\s\S])|[^'\\\r\n]){0,32}'/,greedy:!0}}),K.languages.insertBefore("c","string",{macro:{pattern:/(^[\t ]*)#\s*[a-z](?:[^\r\n\\/]|\/(?!\*)|\/\*(?:[^*]|\*(?!\/))*\*\/|\\(?:\r\n|[\s\S]))*/im,lookbehind:!0,greedy:!0,alias:"property",inside:{string:[{pattern:/^(#\s*include\s*)<[^>]+>/,lookbehind:!0},K.languages.c.string],char:K.languages.c.char,comment:K.languages.c.comment,"macro-name":[{pattern:/(^#\s*define\s+)\w+\b(?!\()/i,lookbehind:!0},{pattern:/(^#\s*define\s+)\w+\b(?=\()/i,lookbehind:!0,alias:"function"}],directive:{pattern:/^(#\s*)[a-z]+/,lookbehind:!0,alias:"keyword"},"directive-hash":/^#/,punctuation:/##|\\(?=[\r\n])/,expression:{pattern:/\S[\s\S]*/,inside:K.languages.c}}}}),K.languages.insertBefore("c","function",{constant:/\b(?:EOF|NULL|SEEK_CUR|SEEK_END|SEEK_SET|__DATE__|__FILE__|__LINE__|__TIMESTAMP__|__TIME__|__func__|stderr|stdin|stdout)\b/}),delete K.languages.c.boolean,K.languages.objectivec=K.languages.extend("c",{string:{pattern:/@?"(?:\\(?:\r\n|[\s\S])|[^"\\\r\n])*"/,greedy:!0},keyword:/\b(?:asm|auto|break|case|char|const|continue|default|do|double|else|enum|extern|float|for|goto|if|in|inline|int|long|register|return|self|short|signed|sizeof|static|struct|super|switch|typedef|typeof|union|unsigned|void|volatile|while)\b|(?:@interface|@end|@implementation|@protocol|@class|@public|@protected|@private|@property|@try|@catch|@finally|@throw|@synthesize|@dynamic|@selector)\b/,operator:/-[->]?|\+\+?|!=?|<<?=?|>>?=?|==?|&&?|\|\|?|[~^%?*\/@]/}),delete K.languages.objectivec["class-name"],K.languages.objc=K.languages.objectivec,K.languages.reason=K.languages.extend("clike",{string:{pattern:/"(?:\\(?:\r\n|[\s\S])|[^\\\r\n"])*"/,greedy:!0},"class-name":/\b[A-Z]\w*/,keyword:/\b(?:and|as|assert|begin|class|constraint|do|done|downto|else|end|exception|external|for|fun|function|functor|if|in|include|inherit|initializer|lazy|let|method|module|mutable|new|nonrec|object|of|open|or|private|rec|sig|struct|switch|then|to|try|type|val|virtual|when|while|with)\b/,operator:/\.{3}|:[:=]|\|>|->|=(?:==?|>)?|<=?|>=?|[|^?'#!~`]|[+\-*\/]\.?|\b(?:asr|land|lor|lsl|lsr|lxor|mod)\b/}),K.languages.insertBefore("reason","class-name",{char:{pattern:/'(?:\\x[\da-f]{2}|\\o[0-3][0-7][0-7]|\\\d{3}|\\.|[^'\\\r\n])'/,greedy:!0},constructor:/\b[A-Z]\w*\b(?!\s*\.)/,label:{pattern:/\b[a-z]\w*(?=::)/,alias:"symbol"}}),delete K.languages.reason.function,function(e){for(var t=/\/\*(?:[^*/]|\*(?!\/)|\/(?!\*)|<self>)*\*\//.source,n=0;n<2;n++)t=t.replace(/<self>/g,function(){return t});t=t.replace(/<self>/g,function(){return/[^\s\S]/.source}),e.languages.rust={comment:[{pattern:RegExp(/(^|[^\\])/.source+t),lookbehind:!0,greedy:!0},{pattern:/(^|[^\\:])\/\/.*/,lookbehind:!0,greedy:!0}],string:{pattern:/b?"(?:\\[\s\S]|[^\\"])*"|b?r(#*)"(?:[^"]|"(?!\1))*"\1/,greedy:!0},char:{pattern:/b?'(?:\\(?:x[0-7][\da-fA-F]|u\{(?:[\da-fA-F]_*){1,6}\}|.)|[^\\\r\n\t'])'/,greedy:!0},attribute:{pattern:/#!?\[(?:[^\[\]"]|"(?:\\[\s\S]|[^\\"])*")*\]/,greedy:!0,alias:"attr-name",inside:{string:null}},"closure-params":{pattern:/([=(,:]\s*|\bmove\s*)\|[^|]*\||\|[^|]*\|(?=\s*(?:\{|->))/,lookbehind:!0,greedy:!0,inside:{"closure-punctuation":{pattern:/^\||\|$/,alias:"punctuation"},rest:null}},"lifetime-annotation":{pattern:/'\w+/,alias:"symbol"},"fragment-specifier":{pattern:/(\$\w+:)[a-z]+/,lookbehind:!0,alias:"punctuation"},variable:/\$\w+/,"function-definition":{pattern:/(\bfn\s+)\w+/,lookbehind:!0,alias:"function"},"type-definition":{pattern:/(\b(?:enum|struct|trait|type|union)\s+)\w+/,lookbehind:!0,alias:"class-name"},"module-declaration":[{pattern:/(\b(?:crate|mod)\s+)[a-z][a-z_\d]*/,lookbehind:!0,alias:"namespace"},{pattern:/(\b(?:crate|self|super)\s*)::\s*[a-z][a-z_\d]*\b(?:\s*::(?:\s*[a-z][a-z_\d]*\s*::)*)?/,lookbehind:!0,alias:"namespace",inside:{punctuation:/::/}}],keyword:[/\b(?:Self|abstract|as|async|await|become|box|break|const|continue|crate|do|dyn|else|enum|extern|final|fn|for|if|impl|in|let|loop|macro|match|mod|move|mut|override|priv|pub|ref|return|self|static|struct|super|trait|try|type|typeof|union|unsafe|unsized|use|virtual|where|while|yield)\b/,/\b(?:bool|char|f(?:32|64)|[ui](?:8|16|32|64|128|size)|str)\b/],function:/\b[a-z_]\w*(?=\s*(?:::\s*<|\())/,macro:{pattern:/\b\w+!/,alias:"property"},constant:/\b[A-Z_][A-Z_\d]+\b/,"class-name":/\b[A-Z]\w*\b/,namespace:{pattern:/(?:\b[a-z][a-z_\d]*\s*::\s*)*\b[a-z][a-z_\d]*\s*::(?!\s*<)/,inside:{punctuation:/::/}},number:/\b(?:0x[\dA-Fa-f](?:_?[\dA-Fa-f])*|0o[0-7](?:_?[0-7])*|0b[01](?:_?[01])*|(?:(?:\d(?:_?\d)*)?\.)?\d(?:_?\d)*(?:[Ee][+-]?\d+)?)(?:_?(?:f32|f64|[iu](?:8|16|32|64|size)?))?\b/,boolean:/\b(?:false|true)\b/,punctuation:/->|\.\.=|\.{1,3}|::|[{}[\];(),:]/,operator:/[-+*\/%!^]=?|=[=>]?|&[&=]?|\|[|=]?|<<?=?|>>?=?|[@?]/},e.languages.rust["closure-params"].inside.rest=e.languages.rust,e.languages.rust.attribute.inside.string=e.languages.rust.string}(K),K.languages.go=K.languages.extend("clike",{string:{pattern:/(^|[^\\])"(?:\\.|[^"\\\r\n])*"|`[^`]*`/,lookbehind:!0,greedy:!0},keyword:/\b(?:break|case|chan|const|continue|default|defer|else|fallthrough|for|func|go(?:to)?|if|import|interface|map|package|range|return|select|struct|switch|type|var)\b/,boolean:/\b(?:_|false|iota|nil|true)\b/,number:[/\b0(?:b[01_]+|o[0-7_]+)i?\b/i,/\b0x(?:[a-f\d_]+(?:\.[a-f\d_]*)?|\.[a-f\d_]+)(?:p[+-]?\d+(?:_\d+)*)?i?(?!\w)/i,/(?:\b\d[\d_]*(?:\.[\d_]*)?|\B\.\d[\d_]*)(?:e[+-]?[\d_]+)?i?(?!\w)/i],operator:/[*\/%^!=]=?|\+[=+]?|-[=-]?|\|[=|]?|&(?:=|&|\^=?)?|>(?:>=?|=)?|<(?:<=?|=|-)?|:=|\.\.\./,builtin:/\b(?:append|bool|byte|cap|close|complex|complex(?:64|128)|copy|delete|error|float(?:32|64)|u?int(?:8|16|32|64)?|imag|len|make|new|panic|print(?:ln)?|real|recover|rune|string|uintptr)\b/}),K.languages.insertBefore("go","string",{char:{pattern:/'(?:\\.|[^'\\\r\n]){0,10}'/,greedy:!0}}),delete K.languages.go["class-name"],L=K,A=/\b(?:alignas|alignof|asm|auto|bool|break|case|catch|char|char16_t|char32_t|char8_t|class|co_await|co_return|co_yield|compl|concept|const|const_cast|consteval|constexpr|constinit|continue|decltype|default|delete|do|double|dynamic_cast|else|enum|explicit|export|extern|final|float|for|friend|goto|if|import|inline|int|int16_t|int32_t|int64_t|int8_t|long|module|mutable|namespace|new|noexcept|nullptr|operator|override|private|protected|public|register|reinterpret_cast|requires|return|short|signed|sizeof|static|static_assert|static_cast|struct|switch|template|this|thread_local|throw|try|typedef|typeid|typename|uint16_t|uint32_t|uint64_t|uint8_t|union|unsigned|using|virtual|void|volatile|wchar_t|while)\b/,I=/\b(?!<keyword>)\w+(?:\s*\.\s*\w+)*\b/.source.replace(/<keyword>/g,function(){return A.source}),L.languages.cpp=L.languages.extend("c",{"class-name":[{pattern:RegExp(/(\b(?:class|concept|enum|struct|typename)\s+)(?!<keyword>)\w+/.source.replace(/<keyword>/g,function(){return A.source})),lookbehind:!0},/\b[A-Z]\w*(?=\s*::\s*\w+\s*\()/,/\b[A-Z_]\w*(?=\s*::\s*~\w+\s*\()/i,/\b\w+(?=\s*<(?:[^<>]|<(?:[^<>]|<[^<>]*>)*>)*>\s*::\s*\w+\s*\()/],keyword:A,number:{pattern:/(?:\b0b[01']+|\b0x(?:[\da-f']+(?:\.[\da-f']*)?|\.[\da-f']+)(?:p[+-]?[\d']+)?|(?:\b[\d']+(?:\.[\d']*)?|\B\.[\d']+)(?:e[+-]?[\d']+)?)[ful]{0,4}/i,greedy:!0},operator:/>>=?|<<=?|->|--|\+\+|&&|\|\||[?:~]|<=>|[-+*/%&|^!=<>]=?|\b(?:and|and_eq|bitand|bitor|not|not_eq|or|or_eq|xor|xor_eq)\b/,boolean:/\b(?:false|true)\b/}),L.languages.insertBefore("cpp","string",{module:{pattern:RegExp(/(\b(?:import|module)\s+)/.source+"(?:"+/"(?:\\(?:\r\n|[\s\S])|[^"\\\r\n])*"|<[^<>\r\n]*>/.source+"|"+/<mod-name>(?:\s*:\s*<mod-name>)?|:\s*<mod-name>/.source.replace(/<mod-name>/g,function(){return I})+")"),lookbehind:!0,greedy:!0,inside:{string:/^[<"][\s\S]+/,operator:/:/,punctuation:/\./}},"raw-string":{pattern:/R"([^()\\ ]{0,16})\([\s\S]*?\)\1"/,alias:"string",greedy:!0}}),L.languages.insertBefore("cpp","keyword",{"generic-function":{pattern:/\b(?!operator\b)[a-z_]\w*\s*<(?:[^<>]|<[^<>]*>)*>(?=\s*\()/i,inside:{function:/^\w+/,generic:{pattern:/<[\s\S]+/,alias:"class-name",inside:L.languages.cpp}}}}),L.languages.insertBefore("cpp","operator",{"double-colon":{pattern:/::/,alias:"punctuation"}}),L.languages.insertBefore("cpp","class-name",{"base-clause":{pattern:/(\b(?:class|struct)\s+\w+\s*:\s*)[^;{}"'\s]+(?:\s+[^;{}"'\s]+)*(?=\s*[;{])/,lookbehind:!0,greedy:!0,inside:L.languages.extend("cpp",{})}}),L.languages.insertBefore("inside","double-colon",{"class-name":/\b[a-z_]\w*\b(?!\s*::)/i},L.languages.cpp["base-clause"]),K.languages.python={comment:{pattern:/(^|[^\\])#.*/,lookbehind:!0,greedy:!0},"string-interpolation":{pattern:/(?:f|fr|rf)(?:("""|''')[\s\S]*?\1|("|')(?:\\.|(?!\2)[^\\\r\n])*\2)/i,greedy:!0,inside:{interpolation:{pattern:/((?:^|[^{])(?:\{\{)*)\{(?!\{)(?:[^{}]|\{(?!\{)(?:[^{}]|\{(?!\{)(?:[^{}])+\})+\})+\}/,lookbehind:!0,inside:{"format-spec":{pattern:/(:)[^:(){}]+(?=\}$)/,lookbehind:!0},"conversion-option":{pattern:/![sra](?=[:}]$)/,alias:"punctuation"},rest:null}},string:/[\s\S]+/}},"triple-quoted-string":{pattern:/(?:[rub]|br|rb)?("""|''')[\s\S]*?\1/i,greedy:!0,alias:"string"},string:{pattern:/(?:[rub]|br|rb)?("|')(?:\\.|(?!\1)[^\\\r\n])*\1/i,greedy:!0},function:{pattern:/((?:^|\s)def[ \t]+)[a-zA-Z_]\w*(?=\s*\()/g,lookbehind:!0},"class-name":{pattern:/(\bclass\s+)\w+/i,lookbehind:!0},decorator:{pattern:/(^[\t ]*)@\w+(?:\.\w+)*/m,lookbehind:!0,alias:["annotation","punctuation"],inside:{punctuation:/\./}},keyword:/\b(?:_(?=\s*:)|and|as|assert|async|await|break|case|class|continue|def|del|elif|else|except|exec|finally|for|from|global|if|import|in|is|lambda|match|nonlocal|not|or|pass|print|raise|return|try|while|with|yield)\b/,builtin:/\b(?:__import__|abs|all|any|apply|ascii|basestring|bin|bool|buffer|bytearray|bytes|callable|chr|classmethod|cmp|coerce|compile|complex|delattr|dict|dir|divmod|enumerate|eval|execfile|file|filter|float|format|frozenset|getattr|globals|hasattr|hash|help|hex|id|input|int|intern|isinstance|issubclass|iter|len|list|locals|long|map|max|memoryview|min|next|object|oct|open|ord|pow|property|range|raw_input|reduce|reload|repr|reversed|round|set|setattr|slice|sorted|staticmethod|str|sum|super|tuple|type|unichr|unicode|vars|xrange|zip)\b/,boolean:/\b(?:False|None|True)\b/,number:/\b0(?:b(?:_?[01])+|o(?:_?[0-7])+|x(?:_?[a-f0-9])+)\b|(?:\b\d+(?:_\d+)*(?:\.(?:\d+(?:_\d+)*)?)?|\B\.\d+(?:_\d+)*)(?:e[+-]?\d+(?:_\d+)*)?j?(?!\w)/i,operator:/[-+%=]=?|!=|:=|\*\*?=?|\/\/?=?|<[<=>]?|>[=>]?|[&|^~]/,punctuation:/[{}[\];(),.:]/},K.languages.python["string-interpolation"].inside.interpolation.inside.rest=K.languages.python,K.languages.py=K.languages.python,K.languages.json={property:{pattern:/(^|[^\\])"(?:\\.|[^\\"\r\n])*"(?=\s*:)/,lookbehind:!0,greedy:!0},string:{pattern:/(^|[^\\])"(?:\\.|[^\\"\r\n])*"(?!\s*:)/,lookbehind:!0,greedy:!0},comment:{pattern:/\/\/.*|\/\*[\s\S]*?(?:\*\/|$)/,greedy:!0},number:/-?\b\d+(?:\.\d+)?(?:e[+-]?\d+)?\b/i,punctuation:/[{}[\],]/,operator:/:/,boolean:/\b(?:false|true)\b/,null:{pattern:/\bnull\b/,alias:"keyword"}},K.languages.webmanifest=K.languages.json;((e,t)=>{for(var n in t)D(e,n,{get:t[n],enumerable:!0})})({},{dracula:()=>X,duotoneDark:()=>J,duotoneLight:()=>ee,github:()=>et,gruvboxMaterialDark:()=>eT,gruvboxMaterialLight:()=>eC,jettwaveDark:()=>ek,jettwaveLight:()=>eS,nightOwl:()=>en,nightOwlLight:()=>er,oceanicNext:()=>eh,okaidia:()=>eg,oneDark:()=>eE,oneLight:()=>e_,palenight:()=>em,shadesOfPurple:()=>ey,synthwave84:()=>eb,ultramin:()=>ev,vsDark:()=>ex,vsLight:()=>ew});var X={plain:{color:"#F8F8F2",backgroundColor:"#282A36"},styles:[{types:["prolog","constant","builtin"],style:{color:"rgb(189, 147, 249)"}},{types:["inserted","function"],style:{color:"rgb(80, 250, 123)"}},{types:["deleted"],style:{color:"rgb(255, 85, 85)"}},{types:["changed"],style:{color:"rgb(255, 184, 108)"}},{types:["punctuation","symbol"],style:{color:"rgb(248, 248, 242)"}},{types:["string","char","tag","selector"],style:{color:"rgb(255, 121, 198)"}},{types:["keyword","variable"],style:{color:"rgb(189, 147, 249)",fontStyle:"italic"}},{types:["comment"],style:{color:"rgb(98, 114, 164)"}},{types:["attr-name"],style:{color:"rgb(241, 250, 140)"}}]},J={plain:{backgroundColor:"#2a2734",color:"#9a86fd"},styles:[{types:["comment","prolog","doctype","cdata","punctuation"],style:{color:"#6c6783"}},{types:["namespace"],style:{opacity:.7}},{types:["tag","operator","number"],style:{color:"#e09142"}},{types:["property","function"],style:{color:"#9a86fd"}},{types:["tag-id","selector","atrule-id"],style:{color:"#eeebff"}},{types:["attr-name"],style:{color:"#c4b9fe"}},{types:["boolean","string","entity","url","attr-value","keyword","control","directive","unit","statement","regex","atrule","placeholder","variable"],style:{color:"#ffcc99"}},{types:["deleted"],style:{textDecorationLine:"line-through"}},{types:["inserted"],style:{textDecorationLine:"underline"}},{types:["italic"],style:{fontStyle:"italic"}},{types:["important","bold"],style:{fontWeight:"bold"}},{types:["important"],style:{color:"#c4b9fe"}}]},ee={plain:{backgroundColor:"#faf8f5",color:"#728fcb"},styles:[{types:["comment","prolog","doctype","cdata","punctuation"],style:{color:"#b6ad9a"}},{types:["namespace"],style:{opacity:.7}},{types:["tag","operator","number"],style:{color:"#063289"}},{types:["property","function"],style:{color:"#b29762"}},{types:["tag-id","selector","atrule-id"],style:{color:"#2d2006"}},{types:["attr-name"],style:{color:"#896724"}},{types:["boolean","string","entity","url","attr-value","keyword","control","directive","unit","statement","regex","atrule"],style:{color:"#728fcb"}},{types:["placeholder","variable"],style:{color:"#93abdc"}},{types:["deleted"],style:{textDecorationLine:"line-through"}},{types:["inserted"],style:{textDecorationLine:"underline"}},{types:["italic"],style:{fontStyle:"italic"}},{types:["important","bold"],style:{fontWeight:"bold"}},{types:["important"],style:{color:"#896724"}}]},et={plain:{color:"#393A34",backgroundColor:"#f6f8fa"},styles:[{types:["comment","prolog","doctype","cdata"],style:{color:"#999988",fontStyle:"italic"}},{types:["namespace"],style:{opacity:.7}},{types:["string","attr-value"],style:{color:"#e3116c"}},{types:["punctuation","operator"],style:{color:"#393A34"}},{types:["entity","url","symbol","number","boolean","variable","constant","property","regex","inserted"],style:{color:"#36acaa"}},{types:["atrule","keyword","attr-name","selector"],style:{color:"#00a4db"}},{types:["function","deleted","tag"],style:{color:"#d73a49"}},{types:["function-variable"],style:{color:"#6f42c1"}},{types:["tag","selector","keyword"],style:{color:"#00009f"}}]},en={plain:{color:"#d6deeb",backgroundColor:"#011627"},styles:[{types:["changed"],style:{color:"rgb(162, 191, 252)",fontStyle:"italic"}},{types:["deleted"],style:{color:"rgba(239, 83, 80, 0.56)",fontStyle:"italic"}},{types:["inserted","attr-name"],style:{color:"rgb(173, 219, 103)",fontStyle:"italic"}},{types:["comment"],style:{color:"rgb(99, 119, 119)",fontStyle:"italic"}},{types:["string","url"],style:{color:"rgb(173, 219, 103)"}},{types:["variable"],style:{color:"rgb(214, 222, 235)"}},{types:["number"],style:{color:"rgb(247, 140, 108)"}},{types:["builtin","char","constant","function"],style:{color:"rgb(130, 170, 255)"}},{types:["punctuation"],style:{color:"rgb(199, 146, 234)"}},{types:["selector","doctype"],style:{color:"rgb(199, 146, 234)",fontStyle:"italic"}},{types:["class-name"],style:{color:"rgb(255, 203, 139)"}},{types:["tag","operator","keyword"],style:{color:"rgb(127, 219, 202)"}},{types:["boolean"],style:{color:"rgb(255, 88, 116)"}},{types:["property"],style:{color:"rgb(128, 203, 196)"}},{types:["namespace"],style:{color:"rgb(178, 204, 214)"}}]},er={plain:{color:"#403f53",backgroundColor:"#FBFBFB"},styles:[{types:["changed"],style:{color:"rgb(162, 191, 252)",fontStyle:"italic"}},{types:["deleted"],style:{color:"rgba(239, 83, 80, 0.56)",fontStyle:"italic"}},{types:["inserted","attr-name"],style:{color:"rgb(72, 118, 214)",fontStyle:"italic"}},{types:["comment"],style:{color:"rgb(152, 159, 177)",fontStyle:"italic"}},{types:["string","builtin","char","constant","url"],style:{color:"rgb(72, 118, 214)"}},{types:["variable"],style:{color:"rgb(201, 103, 101)"}},{types:["number"],style:{color:"rgb(170, 9, 130)"}},{types:["punctuation"],style:{color:"rgb(153, 76, 195)"}},{types:["function","selector","doctype"],style:{color:"rgb(153, 76, 195)",fontStyle:"italic"}},{types:["class-name"],style:{color:"rgb(17, 17, 17)"}},{types:["tag"],style:{color:"rgb(153, 76, 195)"}},{types:["operator","property","keyword","namespace"],style:{color:"rgb(12, 150, 155)"}},{types:["boolean"],style:{color:"rgb(188, 84, 84)"}}]},ea="#D8DEE9",eo="#999999",ei="#c5a5c5",el="#5a9bcf",es="#8dc891",eu="#d7deea",ec="#ff8b50",ed="#fc929e",ef="#79b6f2",ep="#FAC863",eh={plain:{backgroundColor:"#282c34",color:"#ffffff"},styles:[{types:["attr-name"],style:{color:ei}},{types:["attr-value"],style:{color:es}},{types:["comment","block-comment","prolog","doctype","cdata","shebang"],style:{color:eo}},{types:["property","number","function-name","constant","symbol","deleted"],style:{color:el}},{types:["boolean"],style:{color:ec}},{types:["tag"],style:{color:ed}},{types:["string"],style:{color:es}},{types:["punctuation"],style:{color:es}},{types:["selector","char","builtin","inserted"],style:{color:ea}},{types:["function"],style:{color:ef}},{types:["operator","entity","url","variable"],style:{color:eu}},{types:["keyword"],style:{color:ei}},{types:["atrule","class-name"],style:{color:ep}},{types:["important"],style:{fontWeight:"400"}},{types:["bold"],style:{fontWeight:"bold"}},{types:["italic"],style:{fontStyle:"italic"}},{types:["namespace"],style:{opacity:.7}}]},eg={plain:{color:"#f8f8f2",backgroundColor:"#272822"},styles:[{types:["changed"],style:{color:"rgb(162, 191, 252)",fontStyle:"italic"}},{types:["deleted"],style:{color:"#f92672",fontStyle:"italic"}},{types:["inserted"],style:{color:"rgb(173, 219, 103)",fontStyle:"italic"}},{types:["comment"],style:{color:"#8292a2",fontStyle:"italic"}},{types:["string","url"],style:{color:"#a6e22e"}},{types:["variable"],style:{color:"#f8f8f2"}},{types:["number"],style:{color:"#ae81ff"}},{types:["builtin","char","constant","function","class-name"],style:{color:"#e6db74"}},{types:["punctuation"],style:{color:"#f8f8f2"}},{types:["selector","doctype"],style:{color:"#a6e22e",fontStyle:"italic"}},{types:["tag","operator","keyword"],style:{color:"#66d9ef"}},{types:["boolean"],style:{color:"#ae81ff"}},{types:["namespace"],style:{color:"rgb(178, 204, 214)",opacity:.7}},{types:["tag","property"],style:{color:"#f92672"}},{types:["attr-name"],style:{color:"#a6e22e !important"}},{types:["doctype"],style:{color:"#8292a2"}},{types:["rule"],style:{color:"#e6db74"}}]},em={plain:{color:"#bfc7d5",backgroundColor:"#292d3e"},styles:[{types:["comment"],style:{color:"rgb(105, 112, 152)",fontStyle:"italic"}},{types:["string","inserted"],style:{color:"rgb(195, 232, 141)"}},{types:["number"],style:{color:"rgb(247, 140, 108)"}},{types:["builtin","char","constant","function"],style:{color:"rgb(130, 170, 255)"}},{types:["punctuation","selector"],style:{color:"rgb(199, 146, 234)"}},{types:["variable"],style:{color:"rgb(191, 199, 213)"}},{types:["class-name","attr-name"],style:{color:"rgb(255, 203, 107)"}},{types:["tag","deleted"],style:{color:"rgb(255, 85, 114)"}},{types:["operator"],style:{color:"rgb(137, 221, 255)"}},{types:["boolean"],style:{color:"rgb(255, 88, 116)"}},{types:["keyword"],style:{fontStyle:"italic"}},{types:["doctype"],style:{color:"rgb(199, 146, 234)",fontStyle:"italic"}},{types:["namespace"],style:{color:"rgb(178, 204, 214)"}},{types:["url"],style:{color:"rgb(221, 221, 221)"}}]},ey={plain:{color:"#9EFEFF",backgroundColor:"#2D2A55"},styles:[{types:["changed"],style:{color:"rgb(255, 238, 128)"}},{types:["deleted"],style:{color:"rgba(239, 83, 80, 0.56)"}},{types:["inserted"],style:{color:"rgb(173, 219, 103)"}},{types:["comment"],style:{color:"rgb(179, 98, 255)",fontStyle:"italic"}},{types:["punctuation"],style:{color:"rgb(255, 255, 255)"}},{types:["constant"],style:{color:"rgb(255, 98, 140)"}},{types:["string","url"],style:{color:"rgb(165, 255, 144)"}},{types:["variable"],style:{color:"rgb(255, 238, 128)"}},{types:["number","boolean"],style:{color:"rgb(255, 98, 140)"}},{types:["attr-name"],style:{color:"rgb(255, 180, 84)"}},{types:["keyword","operator","property","namespace","tag","selector","doctype"],style:{color:"rgb(255, 157, 0)"}},{types:["builtin","char","constant","function","class-name"],style:{color:"rgb(250, 208, 0)"}}]},eb={plain:{backgroundColor:"linear-gradient(to bottom, #2a2139 75%, #34294f)",backgroundImage:"#34294f",color:"#f92aad",textShadow:"0 0 2px #100c0f, 0 0 5px #dc078e33, 0 0 10px #fff3"},styles:[{types:["comment","block-comment","prolog","doctype","cdata"],style:{color:"#495495",fontStyle:"italic"}},{types:["punctuation"],style:{color:"#ccc"}},{types:["tag","attr-name","namespace","number","unit","hexcode","deleted"],style:{color:"#e2777a"}},{types:["property","selector"],style:{color:"#72f1b8",textShadow:"0 0 2px #100c0f, 0 0 10px #257c5575, 0 0 35px #21272475"}},{types:["function-name"],style:{color:"#6196cc"}},{types:["boolean","selector-id","function"],style:{color:"#fdfdfd",textShadow:"0 0 2px #001716, 0 0 3px #03edf975, 0 0 5px #03edf975, 0 0 8px #03edf975"}},{types:["class-name","maybe-class-name","builtin"],style:{color:"#fff5f6",textShadow:"0 0 2px #000, 0 0 10px #fc1f2c75, 0 0 5px #fc1f2c75, 0 0 25px #fc1f2c75"}},{types:["constant","symbol"],style:{color:"#f92aad",textShadow:"0 0 2px #100c0f, 0 0 5px #dc078e33, 0 0 10px #fff3"}},{types:["important","atrule","keyword","selector-class"],style:{color:"#f4eee4",textShadow:"0 0 2px #393a33, 0 0 8px #f39f0575, 0 0 2px #f39f0575"}},{types:["string","char","attr-value","regex","variable"],style:{color:"#f87c32"}},{types:["parameter"],style:{fontStyle:"italic"}},{types:["entity","url"],style:{color:"#67cdcc"}},{types:["operator"],style:{color:"ffffffee"}},{types:["important","bold"],style:{fontWeight:"bold"}},{types:["italic"],style:{fontStyle:"italic"}},{types:["entity"],style:{cursor:"help"}},{types:["inserted"],style:{color:"green"}}]},ev={plain:{color:"#282a2e",backgroundColor:"#ffffff"},styles:[{types:["comment"],style:{color:"rgb(197, 200, 198)"}},{types:["string","number","builtin","variable"],style:{color:"rgb(150, 152, 150)"}},{types:["class-name","function","tag","attr-name"],style:{color:"rgb(40, 42, 46)"}}]},ex={plain:{color:"#9CDCFE",backgroundColor:"#1E1E1E"},styles:[{types:["prolog"],style:{color:"rgb(0, 0, 128)"}},{types:["comment"],style:{color:"rgb(106, 153, 85)"}},{types:["builtin","changed","keyword","interpolation-punctuation"],style:{color:"rgb(86, 156, 214)"}},{types:["number","inserted"],style:{color:"rgb(181, 206, 168)"}},{types:["constant"],style:{color:"rgb(100, 102, 149)"}},{types:["attr-name","variable"],style:{color:"rgb(156, 220, 254)"}},{types:["deleted","string","attr-value","template-punctuation"],style:{color:"rgb(206, 145, 120)"}},{types:["selector"],style:{color:"rgb(215, 186, 125)"}},{types:["tag"],style:{color:"rgb(78, 201, 176)"}},{types:["tag"],languages:["markup"],style:{color:"rgb(86, 156, 214)"}},{types:["punctuation","operator"],style:{color:"rgb(212, 212, 212)"}},{types:["punctuation"],languages:["markup"],style:{color:"#808080"}},{types:["function"],style:{color:"rgb(220, 220, 170)"}},{types:["class-name"],style:{color:"rgb(78, 201, 176)"}},{types:["char"],style:{color:"rgb(209, 105, 105)"}}]},ew={plain:{color:"#000000",backgroundColor:"#ffffff"},styles:[{types:["comment"],style:{color:"rgb(0, 128, 0)"}},{types:["builtin"],style:{color:"rgb(0, 112, 193)"}},{types:["number","variable","inserted"],style:{color:"rgb(9, 134, 88)"}},{types:["operator"],style:{color:"rgb(0, 0, 0)"}},{types:["constant","char"],style:{color:"rgb(129, 31, 63)"}},{types:["tag"],style:{color:"rgb(128, 0, 0)"}},{types:["attr-name"],style:{color:"rgb(255, 0, 0)"}},{types:["deleted","string"],style:{color:"rgb(163, 21, 21)"}},{types:["changed","punctuation"],style:{color:"rgb(4, 81, 165)"}},{types:["function","keyword"],style:{color:"rgb(0, 0, 255)"}},{types:["class-name"],style:{color:"rgb(38, 127, 153)"}}]},ek={plain:{color:"#f8fafc",backgroundColor:"#011627"},styles:[{types:["prolog"],style:{color:"#000080"}},{types:["comment"],style:{color:"#6A9955"}},{types:["builtin","changed","keyword","interpolation-punctuation"],style:{color:"#569CD6"}},{types:["number","inserted"],style:{color:"#B5CEA8"}},{types:["constant"],style:{color:"#f8fafc"}},{types:["attr-name","variable"],style:{color:"#9CDCFE"}},{types:["deleted","string","attr-value","template-punctuation"],style:{color:"#cbd5e1"}},{types:["selector"],style:{color:"#D7BA7D"}},{types:["tag"],style:{color:"#0ea5e9"}},{types:["tag"],languages:["markup"],style:{color:"#0ea5e9"}},{types:["punctuation","operator"],style:{color:"#D4D4D4"}},{types:["punctuation"],languages:["markup"],style:{color:"#808080"}},{types:["function"],style:{color:"#7dd3fc"}},{types:["class-name"],style:{color:"#0ea5e9"}},{types:["char"],style:{color:"#D16969"}}]},eS={plain:{color:"#0f172a",backgroundColor:"#f1f5f9"},styles:[{types:["prolog"],style:{color:"#000080"}},{types:["comment"],style:{color:"#6A9955"}},{types:["builtin","changed","keyword","interpolation-punctuation"],style:{color:"#0c4a6e"}},{types:["number","inserted"],style:{color:"#B5CEA8"}},{types:["constant"],style:{color:"#0f172a"}},{types:["attr-name","variable"],style:{color:"#0c4a6e"}},{types:["deleted","string","attr-value","template-punctuation"],style:{color:"#64748b"}},{types:["selector"],style:{color:"#D7BA7D"}},{types:["tag"],style:{color:"#0ea5e9"}},{types:["tag"],languages:["markup"],style:{color:"#0ea5e9"}},{types:["punctuation","operator"],style:{color:"#475569"}},{types:["punctuation"],languages:["markup"],style:{color:"#808080"}},{types:["function"],style:{color:"#0e7490"}},{types:["class-name"],style:{color:"#0ea5e9"}},{types:["char"],style:{color:"#D16969"}}]},eE={plain:{backgroundColor:"hsl(220, 13%, 18%)",color:"hsl(220, 14%, 71%)",textShadow:"0 1px rgba(0, 0, 0, 0.3)"},styles:[{types:["comment","prolog","cdata"],style:{color:"hsl(220, 10%, 40%)"}},{types:["doctype","punctuation","entity"],style:{color:"hsl(220, 14%, 71%)"}},{types:["attr-name","class-name","maybe-class-name","boolean","constant","number","atrule"],style:{color:"hsl(29, 54%, 61%)"}},{types:["keyword"],style:{color:"hsl(286, 60%, 67%)"}},{types:["property","tag","symbol","deleted","important"],style:{color:"hsl(355, 65%, 65%)"}},{types:["selector","string","char","builtin","inserted","regex","attr-value"],style:{color:"hsl(95, 38%, 62%)"}},{types:["variable","operator","function"],style:{color:"hsl(207, 82%, 66%)"}},{types:["url"],style:{color:"hsl(187, 47%, 55%)"}},{types:["deleted"],style:{textDecorationLine:"line-through"}},{types:["inserted"],style:{textDecorationLine:"underline"}},{types:["italic"],style:{fontStyle:"italic"}},{types:["important","bold"],style:{fontWeight:"bold"}},{types:["important"],style:{color:"hsl(220, 14%, 71%)"}}]},e_={plain:{backgroundColor:"hsl(230, 1%, 98%)",color:"hsl(230, 8%, 24%)"},styles:[{types:["comment","prolog","cdata"],style:{color:"hsl(230, 4%, 64%)"}},{types:["doctype","punctuation","entity"],style:{color:"hsl(230, 8%, 24%)"}},{types:["attr-name","class-name","boolean","constant","number","atrule"],style:{color:"hsl(35, 99%, 36%)"}},{types:["keyword"],style:{color:"hsl(301, 63%, 40%)"}},{types:["property","tag","symbol","deleted","important"],style:{color:"hsl(5, 74%, 59%)"}},{types:["selector","string","char","builtin","inserted","regex","attr-value","punctuation"],style:{color:"hsl(119, 34%, 47%)"}},{types:["variable","operator","function"],style:{color:"hsl(221, 87%, 60%)"}},{types:["url"],style:{color:"hsl(198, 99%, 37%)"}},{types:["deleted"],style:{textDecorationLine:"line-through"}},{types:["inserted"],style:{textDecorationLine:"underline"}},{types:["italic"],style:{fontStyle:"italic"}},{types:["important","bold"],style:{fontWeight:"bold"}},{types:["important"],style:{color:"hsl(230, 8%, 24%)"}}]},eT={plain:{color:"#ebdbb2",backgroundColor:"#292828"},styles:[{types:["imports","class-name","maybe-class-name","constant","doctype","builtin","function"],style:{color:"#d8a657"}},{types:["property-access"],style:{color:"#7daea3"}},{types:["tag"],style:{color:"#e78a4e"}},{types:["attr-name","char","url","regex"],style:{color:"#a9b665"}},{types:["attr-value","string"],style:{color:"#89b482"}},{types:["comment","prolog","cdata","operator","inserted"],style:{color:"#a89984"}},{types:["delimiter","boolean","keyword","selector","important","atrule","property","variable","deleted"],style:{color:"#ea6962"}},{types:["entity","number","symbol"],style:{color:"#d3869b"}}]},eC={plain:{color:"#654735",backgroundColor:"#f9f5d7"},styles:[{types:["delimiter","boolean","keyword","selector","important","atrule","property","variable","deleted"],style:{color:"#af2528"}},{types:["imports","class-name","maybe-class-name","constant","doctype","builtin"],style:{color:"#b4730e"}},{types:["string","attr-value"],style:{color:"#477a5b"}},{types:["property-access"],style:{color:"#266b79"}},{types:["function","attr-name","char","url"],style:{color:"#72761e"}},{types:["tag"],style:{color:"#b94c07"}},{types:["comment","prolog","cdata","operator","inserted"],style:{color:"#a89984"}},{types:["entity","number","symbol"],style:{color:"#924f79"}}]},eP=(e,t)=>{let{plain:n}=e,r=e.styles.reduce((e,n)=>{let{languages:r,style:a}=n;return r&&!r.includes(t)?e:(n.types.forEach(t=>{let n=V(V({},e[t]),a);e[t]=n}),e)},{});return r.root=n,r.plain=G(V({},n),{backgroundColor:void 0}),r},eO=(e,t)=>{let[n,r]=(0,R.useState)(eP(t,e)),a=(0,R.useRef)(),o=(0,R.useRef)();return(0,R.useEffect)(()=>{(t!==a.current||e!==o.current)&&(a.current=t,o.current=e,r(eP(t,e)))},[e,t]),n},eN=e=>(0,R.useCallback)(t=>{var{className:n,style:r,line:a}=t;let o=G(V({},q(t,["className","style","line"])),{className:(0,j.Z)("token-line",n)});return"object"==typeof e&&"plain"in e&&(o.style=e.plain),"object"==typeof r&&(o.style=V(V({},o.style||{}),r)),o},[e]),eL=e=>{let t=(0,R.useCallback)(({types:t,empty:n})=>{if(null!=e){if(1===t.length&&"plain"===t[0])return null!=n?{display:"inline-block"}:void 0;if(1===t.length&&null!=n)return e[t[0]];return Object.assign(null!=n?{display:"inline-block"}:{},...t.map(t=>e[t]))}},[e]);return(0,R.useCallback)(e=>{var{token:n,className:r,style:a}=e;let o=G(V({},q(e,["token","className","style"])),{className:(0,j.Z)("token",...n.types,r),children:n.content,style:t(n)});return null!=a&&(o.style=V(V({},o.style||{}),a)),o},[t])},eA=/\r\n|\r|\n/,eI=e=>{0===e.length?e.push({types:["plain"],content:"\n",empty:!0}):1===e.length&&""===e[0].content&&(e[0].content="\n",e[0].empty=!0)},eR=(e,t)=>{let n=e.length;return n>0&&e[n-1]===t?e:e.concat(t)},ej=e=>{let t=[[]],n=[e],r=[0],a=[e.length],o=0,i=0,l=[],s=[l];for(;i>-1;){for(;(o=r[i]++)<a[i];){let e;let u=t[i],c=n[i][o];if("string"==typeof c?(u=i>0?u:["plain"],e=c):(u=eR(u,c.type),c.alias&&(u=eR(u,c.alias)),e=c.content),"string"!=typeof e){i++,t.push(u),n.push(e),r.push(0),a.push(e.length);continue}let d=e.split(eA),f=d.length;l.push({types:u,content:d[0]});for(let e=1;e<f;e++)eI(l),s.push(l=[]),l.push({types:u,content:d[e]})}i--,t.pop(),n.pop(),r.pop(),a.pop()}return eI(l),s},eF=({prism:e,code:t,grammar:n,language:r})=>{let a=(0,R.useRef)(e);return(0,R.useMemo)(()=>{if(null==n)return ej([t]);let e={code:t,grammar:n,language:r,tokens:[]};return a.current.hooks.run("before-tokenize",e),e.tokens=a.current.tokenize(t,n),a.current.hooks.run("after-tokenize",e),ej(e.tokens)},[t,n,r])},eD=({children:e,language:t,code:n,theme:r,prism:a})=>{let o=t.toLowerCase(),i=eO(o,r),l=eN(i),s=eL(i),u=a.languages[o];return e({tokens:eF({prism:a,language:o,code:n,grammar:u}),className:`prism-code language-${o}`,style:null!=i?i.root:{},getLineProps:l,getTokenProps:s})},eM=e=>(0,R.createElement)(eD,G(V({},e),{prism:e.prism||K,theme:e.theme||ex,code:e.code,language:e.language}))},1835:function(e,t,n){"use strict";n.d(t,{Z:function(){return a}});var r="Invariant failed";function a(e,t){var n;if(!e)throw Error(r)}},8395:function(e,t,n){"use strict";n.r(t),n.d(t,{__addDisposableResource:function(){return j},__assign:function(){return o},__asyncDelegator:function(){return _},__asyncGenerator:function(){return E},__asyncValues:function(){return T},__await:function(){return S},__awaiter:function(){return h},__classPrivateFieldGet:function(){return A},__classPrivateFieldIn:function(){return R},__classPrivateFieldSet:function(){return I},__createBinding:function(){return m},__decorate:function(){return l},__disposeResources:function(){return D},__esDecorate:function(){return u},__exportStar:function(){return y},__extends:function(){return a},__generator:function(){return g},__importDefault:function(){return L},__importStar:function(){return N},__makeTemplateObject:function(){return C},__metadata:function(){return p},__param:function(){return s},__propKey:function(){return d},__read:function(){return v},__rest:function(){return i},__rewriteRelativeImportExtension:function(){return M},__runInitializers:function(){return c},__setFunctionName:function(){return f},__spread:function(){return x},__spreadArray:function(){return k},__spreadArrays:function(){return w},__values:function(){return b},default:function(){return z}});var r=function(e,t){return(r=Object.setPrototypeOf||({__proto__:[]})instanceof Array&&function(e,t){e.__proto__=t}||function(e,t){for(var n in t)Object.prototype.hasOwnProperty.call(t,n)&&(e[n]=t[n])})(e,t)};function a(e,t){if("function"!=typeof t&&null!==t)throw TypeError("Class extends value "+String(t)+" is not a constructor or null");function n(){this.constructor=e}r(e,t),e.prototype=null===t?Object.create(t):(n.prototype=t.prototype,new n)}var o=function(){return(o=Object.assign||function(e){for(var t,n=1,r=arguments.length;n<r;n++)for(var a in t=arguments[n],t)Object.prototype.hasOwnProperty.call(t,a)&&(e[a]=t[a]);return e}).apply(this,arguments)};function i(e,t){var n={};for(var r in e)Object.prototype.hasOwnProperty.call(e,r)&&0>t.indexOf(r)&&(n[r]=e[r]);if(null!=e&&"function"==typeof Object.getOwnPropertySymbols)for(var a=0,r=Object.getOwnPropertySymbols(e);a<r.length;a++)0>t.indexOf(r[a])&&Object.prototype.propertyIsEnumerable.call(e,r[a])&&(n[r[a]]=e[r[a]]);return n}function l(e,t,n,r){var a,o=arguments.length,i=o<3?t:null===r?r=Object.getOwnPropertyDescriptor(t,n):r;if("object"==typeof Reflect&&"function"==typeof Reflect.decorate)i=Reflect.decorate(e,t,n,r);else for(var l=e.length-1;l>=0;l--)(a=e[l])&&(i=(o<3?a(i):o>3?a(t,n,i):a(t,n))||i);return o>3&&i&&Object.defineProperty(t,n,i),i}function s(e,t){return function(n,r){t(n,r,e)}}function u(e,t,n,r,a,o){function i(e){if(void 0!==e&&"function"!=typeof e)throw TypeError("Function expected");return e}for(var l=r.kind,s="getter"===l?"get":"setter"===l?"set":"value",u=!t&&e?r.static?e:e.prototype:null,c=t||(u?Object.getOwnPropertyDescriptor(u,r.name):{}),d,f=!1,p=n.length-1;p>=0;p--){var h={};for(var g in r)h[g]="access"===g?{}:r[g];for(var g in r.access)h.access[g]=r.access[g];h.addInitializer=function(e){if(f)throw TypeError("Cannot add initializers after decoration has completed");o.push(i(e||null))};var m=(0,n[p])("accessor"===l?{get:c.get,set:c.set}:c[s],h);if("accessor"===l){if(void 0===m)continue;if(null===m||"object"!=typeof m)throw TypeError("Object expected");(d=i(m.get))&&(c.get=d),(d=i(m.set))&&(c.set=d),(d=i(m.init))&&a.unshift(d)}else(d=i(m))&&("field"===l?a.unshift(d):c[s]=d)}u&&Object.defineProperty(u,r.name,c),f=!0}function c(e,t,n){for(var r=arguments.length>2,a=0;a<t.length;a++)n=r?t[a].call(e,n):t[a].call(e);return r?n:void 0}function d(e){return"symbol"==typeof e?e:"".concat(e)}function f(e,t,n){return"symbol"==typeof t&&(t=t.description?"[".concat(t.description,"]"):""),Object.defineProperty(e,"name",{configurable:!0,value:n?"".concat(n," ",t):t})}function p(e,t){if("object"==typeof Reflect&&"function"==typeof Reflect.metadata)return Reflect.metadata(e,t)}function h(e,t,n,r){return new(n||(n=Promise))(function(a,o){function i(e){try{s(r.next(e))}catch(e){o(e)}}function l(e){try{s(r.throw(e))}catch(e){o(e)}}function s(e){var t;e.done?a(e.value):((t=e.value)instanceof n?t:new n(function(e){e(t)})).then(i,l)}s((r=r.apply(e,t||[])).next())})}function g(e,t){var n,r,a,o={label:0,sent:function(){if(1&a[0])throw a[1];return a[1]},trys:[],ops:[]},i=Object.create(("function"==typeof Iterator?Iterator:Object).prototype);return i.next=l(0),i.throw=l(1),i.return=l(2),"function"==typeof Symbol&&(i[Symbol.iterator]=function(){return this}),i;function l(l){return function(s){return function(l){if(n)throw TypeError("Generator is already executing.");for(;i&&(i=0,l[0]&&(o=0)),o;)try{if(n=1,r&&(a=2&l[0]?r.return:l[0]?r.throw||((a=r.return)&&a.call(r),0):r.next)&&!(a=a.call(r,l[1])).done)return a;switch(r=0,a&&(l=[2&l[0],a.value]),l[0]){case 0:case 1:a=l;break;case 4:return o.label++,{value:l[1],done:!1};case 5:o.label++,r=l[1],l=[0];continue;case 7:l=o.ops.pop(),o.trys.pop();continue;default:if(!(a=(a=o.trys).length>0&&a[a.length-1])&&(6===l[0]||2===l[0])){o=0;continue}if(3===l[0]&&(!a||l[1]>a[0]&&l[1]<a[3])){o.label=l[1];break}if(6===l[0]&&o.label<a[1]){o.label=a[1],a=l;break}if(a&&o.label<a[2]){o.label=a[2],o.ops.push(l);break}a[2]&&o.ops.pop(),o.trys.pop();continue}l=t.call(e,o)}catch(e){l=[6,e],r=0}finally{n=a=0}if(5&l[0])throw l[1];return{value:l[0]?l[1]:void 0,done:!0}}([l,s])}}}var m=Object.create?function(e,t,n,r){void 0===r&&(r=n);var a=Object.getOwnPropertyDescriptor(t,n);(!a||("get"in a?!t.__esModule:a.writable||a.configurable))&&(a={enumerable:!0,get:function(){return t[n]}}),Object.defineProperty(e,r,a)}:function(e,t,n,r){void 0===r&&(r=n),e[r]=t[n]};function y(e,t){for(var n in e)"default"!==n&&!Object.prototype.hasOwnProperty.call(t,n)&&m(t,e,n)}function b(e){var t="function"==typeof Symbol&&Symbol.iterator,n=t&&e[t],r=0;if(n)return n.call(e);if(e&&"number"==typeof e.length)return{next:function(){return e&&r>=e.length&&(e=void 0),{value:e&&e[r++],done:!e}}};throw TypeError(t?"Object is not iterable.":"Symbol.iterator is not defined.")}function v(e,t){var n="function"==typeof Symbol&&e[Symbol.iterator];if(!n)return e;var r,a,o=n.call(e),i=[];try{for(;(void 0===t||t-- >0)&&!(r=o.next()).done;)i.push(r.value)}catch(e){a={error:e}}finally{try{r&&!r.done&&(n=o.return)&&n.call(o)}finally{if(a)throw a.error}}return i}function x(){for(var e=[],t=0;t<arguments.length;t++)e=e.concat(v(arguments[t]));return e}function w(){for(var e=0,t=0,n=arguments.length;t<n;t++)e+=arguments[t].length;for(var r=Array(e),a=0,t=0;t<n;t++)for(var o=arguments[t],i=0,l=o.length;i<l;i++,a++)r[a]=o[i];return r}function k(e,t,n){if(n||2==arguments.length)for(var r,a=0,o=t.length;a<o;a++)(r||!(a in t))&&(!r&&(r=Array.prototype.slice.call(t,0,a)),r[a]=t[a]);return e.concat(r||Array.prototype.slice.call(t))}function S(e){return this instanceof S?(this.v=e,this):new S(e)}function E(e,t,n){if(!Symbol.asyncIterator)throw TypeError("Symbol.asyncIterator is not defined.");var r,a=n.apply(e,t||[]),o=[];return r=Object.create(("function"==typeof AsyncIterator?AsyncIterator:Object).prototype),i("next"),i("throw"),i("return",function(e){return function(t){return Promise.resolve(t).then(e,u)}}),r[Symbol.asyncIterator]=function(){return this},r;function i(e,t){a[e]&&(r[e]=function(t){return new Promise(function(n,r){o.push([e,t,n,r])>1||l(e,t)})},t&&(r[e]=t(r[e])))}function l(e,t){try{(function(e){e.value instanceof S?Promise.resolve(e.value.v).then(s,u):c(o[0][2],e)})(a[e](t))}catch(e){c(o[0][3],e)}}function s(e){l("next",e)}function u(e){l("throw",e)}function c(e,t){e(t),o.shift(),o.length&&l(o[0][0],o[0][1])}}function _(e){var t,n;return t={},r("next"),r("throw",function(e){throw e}),r("return"),t[Symbol.iterator]=function(){return this},t;function r(r,a){t[r]=e[r]?function(t){return(n=!n)?{value:S(e[r](t)),done:!1}:a?a(t):t}:a}}function T(e){if(!Symbol.asyncIterator)throw TypeError("Symbol.asyncIterator is not defined.");var t,n=e[Symbol.asyncIterator];return n?n.call(e):(e=b(e),t={},r("next"),r("throw"),r("return"),t[Symbol.asyncIterator]=function(){return this},t);function r(n){t[n]=e[n]&&function(t){return new Promise(function(r,a){(function(e,t,n,r){Promise.resolve(r).then(function(t){e({value:t,done:n})},t)})(r,a,(t=e[n](t)).done,t.value)})}}}function C(e,t){return Object.defineProperty?Object.defineProperty(e,"raw",{value:t}):e.raw=t,e}var P=Object.create?function(e,t){Object.defineProperty(e,"default",{enumerable:!0,value:t})}:function(e,t){e.default=t},O=function(e){return(O=Object.getOwnPropertyNames||function(e){var t=[];for(var n in e)Object.prototype.hasOwnProperty.call(e,n)&&(t[t.length]=n);return t})(e)};function N(e){if(e&&e.__esModule)return e;var t={};if(null!=e)for(var n=O(e),r=0;r<n.length;r++)"default"!==n[r]&&m(t,e,n[r]);return P(t,e),t}function L(e){return e&&e.__esModule?e:{default:e}}function A(e,t,n,r){if("a"===n&&!r)throw TypeError("Private accessor was defined without a getter");if("function"==typeof t?e!==t||!r:!t.has(e))throw TypeError("Cannot read private member from an object whose class did not declare it");return"m"===n?r:"a"===n?r.call(e):r?r.value:t.get(e)}function I(e,t,n,r,a){if("m"===r)throw TypeError("Private method is not writable");if("a"===r&&!a)throw TypeError("Private accessor was defined without a setter");if("function"==typeof t?e!==t||!a:!t.has(e))throw TypeError("Cannot write private member to an object whose class did not declare it");return"a"===r?a.call(e,n):a?a.value=n:t.set(e,n),n}function R(e,t){if(null===t||"object"!=typeof t&&"function"!=typeof t)throw TypeError("Cannot use 'in' operator on non-object");return"function"==typeof e?t===e:e.has(t)}function j(e,t,n){if(null!=t){var r,a;if("object"!=typeof t&&"function"!=typeof t)throw TypeError("Object expected.");if(n){if(!Symbol.asyncDispose)throw TypeError("Symbol.asyncDispose is not defined.");r=t[Symbol.asyncDispose]}if(void 0===r){if(!Symbol.dispose)throw TypeError("Symbol.dispose is not defined.");r=t[Symbol.dispose],n&&(a=r)}if("function"!=typeof r)throw TypeError("Object not disposable.");a&&(r=function(){try{a.call(this)}catch(e){return Promise.reject(e)}}),e.stack.push({value:t,dispose:r,async:n})}else n&&e.stack.push({async:!0});return t}var F="function"==typeof SuppressedError?SuppressedError:function(e,t,n){var r=Error(n);return r.name="SuppressedError",r.error=e,r.suppressed=t,r};function D(e){function t(t){e.error=e.hasError?new F(t,e.error,"An error was suppressed during disposal."):t,e.hasError=!0}var n,r=0;return function a(){for(;n=e.stack.pop();)try{if(!n.async&&1===r)return r=0,e.stack.push(n),Promise.resolve().then(a);if(n.dispose){var o=n.dispose.call(n.value);if(n.async)return r|=2,Promise.resolve(o).then(a,function(e){return t(e),a()})}else r|=1}catch(e){t(e)}if(1===r)return e.hasError?Promise.reject(e.error):Promise.resolve();if(e.hasError)throw e.error}()}function M(e,t){return"string"==typeof e&&/^\.\.?\//.test(e)?e.replace(/\.(tsx)$|((?:\.d)?)((?:\.[^./]+?)?)\.([cm]?)ts$/i,function(e,n,r,a,o){return n?t?".jsx":".js":!r||a&&o?r+a+"."+o.toLowerCase()+"js":e}):e}let z={__extends:a,__assign:o,__rest:i,__decorate:l,__param:s,__esDecorate:u,__runInitializers:c,__propKey:d,__setFunctionName:f,__metadata:p,__awaiter:h,__generator:g,__createBinding:m,__exportStar:y,__values:b,__read:v,__spread:x,__spreadArrays:w,__spreadArray:k,__await:S,__asyncGenerator:E,__asyncDelegator:_,__asyncValues:T,__makeTemplateObject:C,__importStar:N,__importDefault:L,__classPrivateFieldGet:A,__classPrivateFieldSet:I,__classPrivateFieldIn:R,__addDisposableResource:j,__disposeResources:D,__rewriteRelativeImportExtension:M}},2627:function(e){"use strict";e.exports={}},7138:function(e){"use strict";e.exports=JSON.parse('{"/fortran/search-397":{"__comp":"1a4e3797","__context":{"plugin":"138e0e15"}},"/fortran/-d4e":{"__comp":"5e95c892","__context":{"plugin":"aba21aa0"}},"/fortran/-91f":{"__comp":"a7bd4aaa","__props":"59d59f3e"},"/fortran/-b55":{"__comp":"a94703ab"},"/fortran/abs-path-a28":{"__comp":"17896441","content":"f7a8d7e4"},"/fortran/arg-parsing-92b":{"__comp":"17896441","content":"f7cc7224"},"/fortran/array-e55":{"__comp":"17896441","content":"db3cc5ec"},"/fortran/basics-a02":{"__comp":"17896441","content":"dfb2590f"},"/fortran/blas-c79":{"__comp":"17896441","content":"7cc2b576"},"/fortran/category/coding-practice-69e":{"__comp":"14eb3368","__props":"10e376e2"},"/fortran/coarray-15b":{"__comp":"17896441","content":"7c7ecee8"},"/fortran/complex-303":{"__comp":"17896441","content":"6d493ad8"},"/fortran/control-77b":{"__comp":"17896441","content":"6cf698e2"},"/fortran/exec-command-a7e":{"__comp":"17896441","content":"b9589125"},"/fortran/file-492":{"__comp":"17896441","content":"1c39b14f"},"/fortran/haversine-135":{"__comp":"17896441","content":"0b49818d"},"/fortran/hypotenuse-723":{"__comp":"17896441","content":"f8ccda63"},"/fortran/inner-product-ded":{"__comp":"17896441","content":"13f533b7"},"/fortran/integration-ce0":{"__comp":"17896441","content":"858ebe90"},"/fortran/license-dcb":{"__comp":"17896441","content":"ac5280f2"},"/fortran/loop-bd1":{"__comp":"17896441","content":"37e61803"},"/fortran/modules-693":{"__comp":"17896441","content":"d1eb9fd4"},"/fortran/monte-carlo-integration-f13":{"__comp":"17896441","content":"6386618c"},"/fortran/monte-carlo-pi-244":{"__comp":"17896441","content":"fefe6209"},"/fortran/mpi-225":{"__comp":"17896441","content":"d9067e83"},"/fortran/pointer-796":{"__comp":"17896441","content":"53ac9137"},"/fortran/procedures-636":{"__comp":"17896441","content":"af036c34"},"/fortran/recursion-919":{"__comp":"17896441","content":"41a4ba7f"},"/fortran/resources-643":{"__comp":"17896441","content":"d92a3c43"},"/fortran/swap-780":{"__comp":"17896441","content":"d98862a9"},"/fortran/time-b2a":{"__comp":"17896441","content":"31c8d1c8"},"/fortran/types-187":{"__comp":"17896441","content":"d19ccb42"},"/fortran/-89e":{"__comp":"17896441","content":"3847b3ea"}}')}},function(e){e.O(0,["212"],function(){return e(e.s="2465")}),e.O()}]);
\ No newline at end of file
+Possible reasons: running Docusaurus in an iframe, in an incognito browser session, or using too strict browser privacy settings.`,e),i=!0)}(e),null}}(t?.persistence);return null===u?l:{get:()=>{try{return u.getItem(s)}catch(e){return console.error(`Docusaurus storage error, can't get key=${s}`,e),null}},set:e=>{try{let t=u.getItem(s);u.setItem(s,e),o({key:s,oldValue:t,newValue:e,storage:u})}catch(t){console.error(`Docusaurus storage error, can't set ${s}=${e}`,t)}},del:()=>{try{let e=u.getItem(s);u.removeItem(s),o({key:s,oldValue:e,newValue:null,storage:u})}catch(e){console.error(`Docusaurus storage error, can't delete key=${s}`,e)}},listen:e=>{try{let t=t=>{t.storageArea===u&&t.key===s&&e(t)};return window.addEventListener("storage",t),()=>window.removeEventListener("storage",t)}catch(e){return console.error(`Docusaurus storage error, can't listen for changes of key=${s}`,e),()=>{}}}}}},8910:function(e,t,n){"use strict";n.d(t,{l:function(){return i}});var r=n(2933),a=n(6550),o=n(8365);function i(){let{siteConfig:{baseUrl:e,url:t,trailingSlash:n},i18n:{defaultLocale:i,currentLocale:l}}=(0,r.Z)(),{pathname:s}=(0,a.TH)(),u=(0,o.applyTrailingSlash)(s,{trailingSlash:n,baseUrl:e}),c=l===i?e:e.replace(`/${l}/`,"/"),d=u.replace(e,"");return{createUrl:function(e){var n;let{locale:r,fullyQualified:a}=e;return`${a?t:""}${(n=r)===i?`${c}`:`${c}${n}/`}${d}`}}}},346:function(e,t,n){"use strict";n.d(t,{S:function(){return i}});var r=n(7294),a=n(6550),o=n(5346);function i(e){let t=(0,a.TH)(),n=(0,o.D9)(t),i=(0,o.zX)(e);(0,r.useEffect)(()=>{if(!!n)t!==n&&i({location:t,previousLocation:n})},[i,t,n])}},140:function(e,t,n){"use strict";n.d(t,{L:function(){return a}});var r=n(2933);function a(){return(0,r.Z)().siteConfig.themeConfig}},4994:function(e,t,n){"use strict";Object.defineProperty(t,"__esModule",{value:!0}),t.addTrailingSlash=a,t.default=function(e,t){var n;let{trailingSlash:r,baseUrl:i}=t;if(e.startsWith("#"))return e;if(void 0===r)return e;let[l]=e.split(/[#?]/);let s="/"===l||l===i?l:(n=l,r?a(n):o(n));return e.replace(l,s)},t.addLeadingSlash=function(e){return(0,r.addPrefix)(e,"/")},t.removeTrailingSlash=o;let r=n(8411);function a(e){return e.endsWith("/")?e:`${e}/`}function o(e){return(0,r.removeSuffix)(e,"/")}},4202:function(e,t){"use strict";Object.defineProperty(t,"__esModule",{value:!0}),t.getErrorCausalChain=function e(t){return t.cause?[t,...e(t.cause)]:[t]}},8365:function(e,t,n){"use strict";t.getErrorCausalChain=t.applyTrailingSlash=void 0;let r=n(8395);var a,o=n(4994);Object.defineProperty(t,"applyTrailingSlash",{enumerable:!0,get:function(){return r.__importDefault(o).default}}),n(8411);var i=n(4202);Object.defineProperty(t,"getErrorCausalChain",{enumerable:!0,get:function(){return i.getErrorCausalChain}})},8411:function(e,t){"use strict";Object.defineProperty(t,"__esModule",{value:!0}),t.addPrefix=function(e,t){return e.startsWith(t)?e:`${t}${e}`},t.removeSuffix=function(e,t){return""===t?e:e.endsWith(t)?e.slice(0,-t.length):e},t.addSuffix=function(e,t){return e.endsWith(t)?e:`${e}${t}`},t.removePrefix=function(e,t){return e.startsWith(t)?e.slice(t.length):e}},5792:function(e,t,n){"use strict";n.d(t,{Z:()=>i});var r=n("5893");n("7294");var a=n("1728");let o="loadingRing_RJI3";function i(e){let{className:t}=e;return(0,r.jsxs)("div",{className:(0,a.Z)(o,t),children:[(0,r.jsx)("div",{}),(0,r.jsx)("div",{}),(0,r.jsx)("div",{}),(0,r.jsx)("div",{})]})}},5103:function(e,t,n){"use strict";n.d(t,{w:function(){return l}});var r=n(1336),a=n.n(r),o=n(322);let i=new Map;function l(e,t){let n=`${e}${t}`,r=i.get(n);return!r&&(r=s(e,t),i.set(n,r)),r}async function s(e,t){{let n=`${e}${o.J.replace("{dir}",t?`-${t.replace(/\//g,"-")}`:"")}`;if(new URL(n,location.origin).origin!==location.origin)throw Error("Unexpected version url");let r=await (await fetch(n)).json(),i=r.map((e,t)=>{let{documents:n,index:r}=e;return{type:t,documents:n,index:a().Index.load(r)}});return{wrappedIndexes:i,zhDictionary:Array.from(r.reduce((e,t)=>{for(let n of t.index.invertedIndex)/\p{Unified_Ideograph}/u.test(n[0][0])&&e.add(n[0]);return e},new Set))}}}},3978:function(e,t,n){"use strict";n.d(t,{v:()=>c});var r=n("1336"),a=n.n(r);let o=6;var i=n("322");function l(e){return s(e).concat(s(e.filter(e=>{let t=e[e.length-1];return!t.trailing&&t.maybeTyping}),!0))}function s(e,t){return e.map(e=>({tokens:e.map(e=>e.value),term:e.map(e=>({value:e.value,presence:a().Query.presence.REQUIRED,wildcard:(t?e.trailing||e.maybeTyping:e.trailing)?a().Query.wildcard.TRAILING:a().Query.wildcard.NONE}))}))}var u=n("5528");function c(e,t,n){return function(r,s){var c;let d=function(e,t){if(1===t.length&&["ja","jp","th"].includes(t[0]))return a()[t[0]].tokenizer(e).map(e=>e.toString());let n=/[^-\s]+/g;return t.includes("zh")&&(n=/\w+|\p{Unified_Ideograph}+/gu),e.toLowerCase().match(n)||[]}(r,i.dK);if(0===d.length){s([]);return}let f=function(e,t){let n;let r=function(e,t){let n=e.map(e=>/\p{Unified_Ideograph}/u.test(e)?function(e,t){let n=[];return!function e(r,a){let o=0,i=!1;for(let l of t)if(r.substr(0,l.length)===l){let t={missed:a.missed,term:a.term.concat({value:l})};r.length>l.length?e(r.substr(l.length),t):n.push(t),i=!0}else for(let t=l.length-1;t>o;t-=1){let s=l.substr(0,t);if(r.substr(0,t)===s){o=t;let l={missed:a.missed,term:a.term.concat({value:s,trailing:!0})};r.length>t?e(r.substr(t),l):n.push(l),i=!0;break}}!i&&(r.length>0?e(r.substr(1),{missed:a.missed+1,term:a.term}):a.term.length>0&&n.push(a))}(e,{missed:0,term:[]}),n.sort((e,t)=>{let n=e.missed>0?1:0,r=t.missed>0?1:0;return n!==r?n-r:e.term.length-t.term.length}).map(e=>e.term)}(e,t):[{value:e}]).slice(0,12),r=n.filter(e=>e.length>1),a=1,i=!1;for(let e of r)if(i)e.splice(1,e.length-1);else{e.length>o&&e.splice(o,e.length-o);let t=a*e.length;if(t>=12){if(t>12){let t=Math.floor(12/a);e.splice(t,e.length-t),a*=t}else a=t;a>o&&(i=!0)}else a=t}let l=[];return!function e(t,r){if(t===n.length||r.length>=12){l.push(r.slice(0,12));return}for(let a of n[t])e(t+1,r.concat(a))}(0,[]),l}(e,t);if(0===r.length)return[{tokens:e,term:e.map(e=>({value:e,presence:a().Query.presence.REQUIRED,wildcard:a().Query.wildcard.LEADING|a().Query.wildcard.TRAILING}))}];for(let e of r)e[e.length-1].maybeTyping=!0;let s=[];for(let e of i.dK)if("en"===e)!i._k&&s.unshift(a().stopWordFilter);else{let t=a()[e];t.stopWordFilter&&s.unshift(t.stopWordFilter)}if(s.length>0){let e=e=>s.reduce((e,t)=>e.filter(e=>t(e.value)),e);n=[];let t=[];for(let a of r){let r=e(a);n.push(r),r.length<a.length&&r.length>0&&t.push(r)}r.push(...t)}else n=r.slice();let u=[];for(let e of n)if(e.length>2)for(let t=e.length-1;t>=0;t-=1)u.push(e.slice(0,t).concat(e.slice(t+1)));return l(r).concat(l(u))}(d,t),p=[];n:for(let{term:t,tokens:r}of f)for(let{documents:a,index:o,type:i}of e)if(p.push(...o.query(e=>{for(let n of t)e.term(n.value,{wildcard:n.wildcard,presence:n.presence})}).slice(0,n).filter(e=>!p.some(t=>t.document.i.toString()===e.ref)).slice(0,n-p.length).map(t=>{let n=a.find(e=>e.i.toString()===t.ref);return{document:n,type:i,page:i!==u.P.Title&&e[0].documents.find(e=>e.i===n.p),metadata:t.matchData.metadata,tokens:r,score:t.score}})),p.length>=n)break n;(c=p).forEach((e,t)=>{e.index=t}),c.sort((e,t)=>{let n=(e.type===u.P.Heading||e.type===u.P.Content||e.type===u.P.Description)&&e.page?c.findIndex(t=>t.document===e.page):e.index,r=(t.type===u.P.Heading||t.type===u.P.Content||t.type===u.P.Description)&&t.page?c.findIndex(e=>e.document===t.page):t.index;if(-1===n&&(n=e.index),-1===r&&(r=t.index),n===r){let n=(0===t.type?1:0)-(0===e.type?1:0);return 0===n?e.index-t.index:n}return n-r}),!function(e){e.forEach((t,n)=>{n>0&&t.page&&e.slice(0,n).some(e=>(e.type===u.P.Keywords?e.page:e.document)===t.page)&&(n<e.length-1&&e[n+1].page===t.page?t.isInterOfTree=!0:t.isLastOfTree=!0)})}(p),s(p)}}},7591:function(e,t,n){"use strict";function r(e){return e.join(" \u203A ")}n.d(t,{e:function(){return r}})},9863:function(e,t,n){"use strict";function r(e){return e.replace(/&/g,"&amp;").replace(/</g,"&lt;").replace(/>/g,"&gt;").replace(/"/g,"&quot;").replace(/'/g,"&#039;")}n.d(t,{X:function(){return r}})},7303:function(e,t,n){"use strict";function r(e,t){let n=[];for(let r of Object.values(e))r[t]&&n.push(...r[t].position);return n.sort((e,t)=>e[0]-t[0]||t[1]-e[1])}n.d(t,{m:function(){return r}})},5658:function(e,t,n){"use strict";n.d(t,{C:function(){return function e(t,n,a){let o=[];for(let a of n){let i=t.toLowerCase().indexOf(a);if(i>=0){i>0&&o.push(e(t.substr(0,i),n)),o.push(`<mark>${(0,r.X)(t.substr(i,a.length))}</mark>`);let l=i+a.length;l<t.length&&o.push(e(t.substr(l),n));break}}return 0===o.length?a?`<mark>${(0,r.X)(t)}</mark>`:(0,r.X)(t):o.join("")}}});var r=n(9863)},6810:function(e,t,n){"use strict";n.d(t,{o:()=>s});var r=n("9863"),a=n("5658");let o=/\w+|\p{Unified_Ideograph}/u;function i(e){let t=[],n=0,r=e;for(;r.length>0;){let a=r.match(o);if(!a){t.push(r);break}a.index>0&&t.push(r.substring(0,a.index)),t.push(a[0]),n+=a.index+a[0].length,r=e.substring(n)}return t}var l=n("322");function s(e,t,n){let o=arguments.length>3&&void 0!==arguments[3]?arguments[3]:l.Hk,{chunkIndex:s,chunks:u}=function(e,t,n){let o=[],l=0,s=0,u=-1;for(;l<t.length;){let[c,d]=t[l];if(l+=1,!(c<s)){if(c>s)for(let t of i(e.substring(s,c)).map(e=>({html:(0,r.X)(e),textLength:e.length})))o.push(t);-1===u&&(u=o.length),s=c+d,o.push({html:(0,a.C)(e.substring(c,s),n,!0),textLength:d})}}if(s<e.length)for(let t of i(e.substring(s)).map(e=>({html:(0,r.X)(e),textLength:e.length})))o.push(t);return{chunkIndex:u,chunks:o}}(e,t,n),c=u.slice(0,s),d=u[s],f=[d.html],p=u.slice(s+1),h=d.textLength,g=0,m=0,y=!1,b=!1;for(;h<o;)if((g<=m||0===p.length)&&c.length>0){let e=c.pop();h+e.textLength<=o?(f.unshift(e.html),g+=e.textLength,h+=e.textLength):(y=!0,c.length=0)}else if(p.length>0){let e=p.shift();h+e.textLength<=o?(f.push(e.html),m+=e.textLength,h+=e.textLength):(b=!0,p.length=0)}else break;return(y||c.length>0)&&f.unshift("\u2026"),(b||p.length>0)&&f.push("\u2026"),f.join("")}},4969:function(e,t,n){"use strict";function r(e,t){if("string"==typeof e)return{label:e,path:e};{let{label:n,path:r}=e;return"string"==typeof n?{label:n,path:r}:Object.prototype.hasOwnProperty.call(n,t)?{label:n[t],path:r}:{label:r,path:r}}}n.d(t,{_:function(){return r}})},322:function(e,t,n){"use strict";n.d(t,{t_:()=>f,Kc:()=>m,pQ:()=>b,J:()=>l,Hk:()=>u,qo:()=>s,hG:()=>y,l9:()=>g,dK:()=>o,_k:()=>i,vc:()=>a(),gQ:()=>h,H6:()=>c,pu:()=>p,AY:()=>d});var r=n("813"),a=n.n(r);let o=["en"],i=!1,l="search-index{dir}.json?_=4c969dca",s=8,u=50,c=!1,d=!0,f=!0,p="right",h=void 0,g=!0,m=null,y=!1,b=!1},5528:function(e,t,n){"use strict";var r,a;n.d(t,{P:function(){return r}}),(a=r||(r={}))[a.Title=0]="Title",a[a.Heading=1]="Heading",a[a.Description=2]="Description",a[a.Keywords=3]="Keywords",a[a.Content=4]="Content"},5150:function(e,t,n){"use strict";n.d(t,{Z:function(){return r}});let r={title:"Fortran Tutorial",tagline:"Learning Fortran Programming",url:"https://pranabdas.github.io",baseUrl:"/fortran/",onBrokenLinks:"throw",onBrokenMarkdownLinks:"warn",favicon:"img/favicon.png",organizationName:"pranabdas",projectName:"fortran",titleDelimiter:"\u2022",themeConfig:{metadata:[{name:"theme-color",content:"#06445c"}],prism:{theme:{plain:{color:"#393A34",backgroundColor:"#f6f8fa"},styles:[{types:["comment","prolog","doctype","cdata"],style:{color:"#999988",fontStyle:"italic"}},{types:["namespace"],style:{opacity:.7}},{types:["string","attr-value"],style:{color:"#e3116c"}},{types:["punctuation","operator"],style:{color:"#393A34"}},{types:["entity","url","symbol","number","boolean","variable","constant","property","regex","inserted"],style:{color:"#36acaa"}},{types:["atrule","keyword","attr-name","selector"],style:{color:"#00a4db"}},{types:["function","deleted","tag"],style:{color:"#d73a49"}},{types:["function-variable"],style:{color:"#6f42c1"}},{types:["tag","selector","keyword"],style:{color:"#00009f"}}]},darkTheme:{plain:{color:"#d6deeb",backgroundColor:"#011627"},styles:[{types:["changed"],style:{color:"rgb(162, 191, 252)",fontStyle:"italic"}},{types:["deleted"],style:{color:"rgba(239, 83, 80, 0.56)",fontStyle:"italic"}},{types:["inserted","attr-name"],style:{color:"rgb(173, 219, 103)",fontStyle:"italic"}},{types:["comment"],style:{color:"rgb(99, 119, 119)",fontStyle:"italic"}},{types:["string","url"],style:{color:"rgb(173, 219, 103)"}},{types:["variable"],style:{color:"rgb(214, 222, 235)"}},{types:["number"],style:{color:"rgb(247, 140, 108)"}},{types:["builtin","char","constant","function"],style:{color:"rgb(130, 170, 255)"}},{types:["punctuation"],style:{color:"rgb(199, 146, 234)"}},{types:["selector","doctype"],style:{color:"rgb(199, 146, 234)",fontStyle:"italic"}},{types:["class-name"],style:{color:"rgb(255, 203, 139)"}},{types:["tag","operator","keyword"],style:{color:"rgb(127, 219, 202)"}},{types:["boolean"],style:{color:"rgb(255, 88, 116)"}},{types:["property"],style:{color:"rgb(128, 203, 196)"}},{types:["namespace"],style:{color:"rgb(178, 204, 214)"}}]},additionalLanguages:["bash","fortran","docker"],magicComments:[{className:"theme-code-block-highlighted-line",line:"highlight-next-line",block:{start:"highlight-start",end:"highlight-end"}}]},docs:{sidebar:{hideable:!0,autoCollapseCategories:!0},versionPersistence:"localStorage"},colorMode:{respectPrefersColorScheme:!0,defaultMode:"light",disableSwitch:!1},navbar:{title:"Fortran",hideOnScroll:!0,logo:{alt:"Logo",src:"img/favicon.png"},items:[{to:"/",label:"Docs",position:"left",items:[{label:"Fortran Programming",to:"/",target:"_self"},{label:"~ ~ ~ Other Docs ~ ~ ~",to:"https://pranabdas.github.io/docs/",target:"_self"},{label:"ARPES Python Tools",to:"https://pranabdas.github.io/arpespythontools/",target:"_self"},{label:"C and C++ Programming",to:"https://pranabdas.github.io/c-cpp/",target:"_self"},{label:"Condensed Matter Notes",to:"https://pranabdas.github.io/condmat-notes/",target:"_self"},{label:"Javascript Tutorial",to:"https://pranabdas.github.io/javascript/",target:"_self"},{label:"Linux Tutorial",to:"https://pranabdas.github.io/linux/",target:"_self"},{label:"Machine Learning Notes",to:"https://pranabdas.github.io/machine-learning/",target:"_self"},{label:"OpenMX tutorial",to:"https://pranabdas.github.io/openmx/",target:"_self"},{label:"Python Tutorial",to:"https://pranabdas.github.io/python-tutorial/",target:"_self"},{label:"Quantum Espresso Tutorial",to:"https://pranabdas.github.io/espresso/",target:"_self"},{label:"Rust Programming",to:"https://pranabdas.github.io/rust/",target:"_self"},{label:"SUV ARPES Manual",to:"https://pranabdas.github.io/arpes-manual/",target:"_self"},{label:"SUV Python Tools",to:"https://pranabdas.github.io/suvtools/",target:"_self"}]},{href:"https://github.com/pranabdas/fortran",position:"right",className:"header-github-link","aria-label":"GitHub repository",title:"Visit project repository in GitHub",target:"_self"},{to:"https://pranabdas.github.io","aria-label":"About me",position:"right",target:"_self",className:"header-homepage-link",title:"Go to Pranab's Homepage"}]},footer:{style:"dark",copyright:"Copyright \xa9 2024 Pranab Das. All rights\n      reserved.",links:[]},blog:{sidebar:{groupByYear:!0}},tableOfContents:{minHeadingLevel:2,maxHeadingLevel:3}},presets:[["@docusaurus/preset-classic",{docs:{sidebarPath:"/home/runner/work/fortran/fortran/sidebars.js",routeBasePath:"/",editUrl:"https://github.com/pranabdas/fortran/blob/main/",remarkPlugins:[null],rehypePlugins:[null]},theme:{customCss:"/home/runner/work/fortran/fortran/src/css/custom.css"}}]],themes:[["/home/runner/work/fortran/fortran/node_modules/@easyops-cn/docusaurus-search-local/dist/server/server/index.js",{hashed:!0,docsRouteBasePath:"/",indexBlog:!1,indexPages:!0,highlightSearchTermsOnTargetPage:!0}]],stylesheets:[{href:"https://pranab.pages.dev/assets/fonts/katex/katex.min.css",type:"text/css"}],future:{experimental_faster:{swcJsLoader:!0,swcJsMinimizer:!0,swcHtmlMinimizer:!0,lightningCssMinimizer:!0,mdxCrossCompilerCache:!0,rspackBundler:!0},experimental_storage:{type:"localStorage",namespace:!1},experimental_router:"browser"},baseUrlIssueBanner:!0,i18n:{defaultLocale:"en",path:"i18n",locales:["en"],localeConfigs:{}},onBrokenAnchors:"warn",onDuplicateRoutes:"warn",staticDirectories:["static"],customFields:{},plugins:[],scripts:[],headTags:[],clientModules:[],noIndex:!1,markdown:{format:"mdx",mermaid:!1,mdx1Compat:{comments:!0,admonitions:!0,headingIds:!0},anchors:{maintainCase:!1}}}},6019:function(e,t,n){"use strict";function r(){return(r=Object.assign?Object.assign.bind():function(e){for(var t=1;t<arguments.length;t++){var n=arguments[t];for(var r in n)({}).hasOwnProperty.call(n,r)&&(e[r]=n[r])}return e}).apply(null,arguments)}n.d(t,{Z:function(){return r}})},5091:function(e,t,n){"use strict";function r(e,t){return(r=Object.setPrototypeOf?Object.setPrototypeOf.bind():function(e,t){return e.__proto__=t,e})(e,t)}function a(e,t){e.prototype=Object.create(t.prototype),e.prototype.constructor=e,r(e,t)}n.d(t,{Z:()=>a})},443:function(e,t,n){"use strict";function r(e,t){if(null==e)return{};var n={};for(var r in e)if(({}).hasOwnProperty.call(e,r)){if(t.includes(r))continue;n[r]=e[r]}return n}n.d(t,{Z:function(){return r}})},7026:function(e,t,n){"use strict";n.d(t,{Z:function(){return r}});let r=function(){for(var e,t,n=0,r="",a=arguments.length;n<a;n++)(e=arguments[n])&&(t=function e(t){var n,r,a="";if("string"==typeof t||"number"==typeof t)a+=t;else if("object"==typeof t){if(Array.isArray(t)){var o=t.length;for(n=0;n<o;n++)t[n]&&(r=e(t[n]))&&(a&&(a+=" "),a+=r)}else for(r in t)t[r]&&(a&&(a+=" "),a+=r)}return a}(e))&&(r&&(r+=" "),r+=t);return r}},3229:function(e,t,n){"use strict";let r,a,o,i,l;n.d(t,{p1:function(){return K},y$:function(){return eM}});var s,u,c,d,f,p,h,g,m,y,b,v,x,w,k,S,E,_,T,C,P,O,N,L,A,I,R=n(7294),j=n(7026),F=Object.create,D=Object.defineProperty,M=Object.defineProperties,z=Object.getOwnPropertyDescriptor,B=Object.getOwnPropertyDescriptors,$=Object.getOwnPropertyNames,U=Object.getOwnPropertySymbols,H=Object.getPrototypeOf,Z=Object.prototype.hasOwnProperty,Q=Object.prototype.propertyIsEnumerable,W=(e,t,n)=>t in e?D(e,t,{enumerable:!0,configurable:!0,writable:!0,value:n}):e[t]=n,V=(e,t)=>{for(var n in t||(t={}))Z.call(t,n)&&W(e,n,t[n]);if(U)for(var n of U(t))Q.call(t,n)&&W(e,n,t[n]);return e},G=(e,t)=>M(e,B(t)),q=(e,t)=>{var n={};for(var r in e)Z.call(e,r)&&0>t.indexOf(r)&&(n[r]=e[r]);if(null!=e&&U)for(var r of U(e))0>t.indexOf(r)&&Q.call(e,r)&&(n[r]=e[r]);return n},Y=(e,t,n,r)=>{if(t&&"object"==typeof t||"function"==typeof t)for(let a of $(t))!Z.call(e,a)&&a!==n&&D(e,a,{get:()=>t[a],enumerable:!(r=z(t,a))||r.enumerable});return e};var K=(l=null!=(o=(r={"../../node_modules/.pnpm/prismjs@1.29.0_patch_hash=vrxx3pzkik6jpmgpayxfjunetu/node_modules/prismjs/prism.js"(e,t){var n=function(){var e=/(?:^|\s)lang(?:uage)?-([\w-]+)(?=\s|$)/i,t=0,n={},r={util:{encode:function e(t){return t instanceof a?new a(t.type,e(t.content),t.alias):Array.isArray(t)?t.map(e):t.replace(/&/g,"&amp;").replace(/</g,"&lt;").replace(/\u00a0/g," ")},type:function(e){return Object.prototype.toString.call(e).slice(8,-1)},objId:function(e){return e.__id||Object.defineProperty(e,"__id",{value:++t}),e.__id},clone:function e(t,n){var a,o;switch(n=n||{},r.util.type(t)){case"Object":if(n[o=r.util.objId(t)])return n[o];for(var i in a={},n[o]=a,t)t.hasOwnProperty(i)&&(a[i]=e(t[i],n));return a;case"Array":if(n[o=r.util.objId(t)])return n[o];return a=[],n[o]=a,t.forEach(function(t,r){a[r]=e(t,n)}),a;default:return t}},getLanguage:function(t){for(;t;){var n=e.exec(t.className);if(n)return n[1].toLowerCase();t=t.parentElement}return"none"},setLanguage:function(t,n){t.className=t.className.replace(RegExp(e,"gi"),""),t.classList.add("language-"+n)},isActive:function(e,t,n){for(var r="no-"+t;e;){var a=e.classList;if(a.contains(t))return!0;if(a.contains(r))return!1;e=e.parentElement}return!!n}},languages:{plain:n,plaintext:n,text:n,txt:n,extend:function(e,t){var n=r.util.clone(r.languages[e]);for(var a in t)n[a]=t[a];return n},insertBefore:function(e,t,n,a){var o=(a=a||r.languages)[e],i={};for(var l in o)if(o.hasOwnProperty(l)){if(l==t)for(var s in n)n.hasOwnProperty(s)&&(i[s]=n[s]);n.hasOwnProperty(l)||(i[l]=o[l])}var u=a[e];return a[e]=i,r.languages.DFS(r.languages,function(t,n){n===u&&t!=e&&(this[t]=i)}),i},DFS:function e(t,n,a,o){o=o||{};var i=r.util.objId;for(var l in t)if(t.hasOwnProperty(l)){n.call(t,l,t[l],a||l);var s=t[l],u=r.util.type(s);"Object"!==u||o[i(s)]?"Array"!==u||o[i(s)]||(o[i(s)]=!0,e(s,n,l,o)):(o[i(s)]=!0,e(s,n,null,o))}}},plugins:{},highlight:function(e,t,n){var o={code:e,grammar:t,language:n};if(r.hooks.run("before-tokenize",o),!o.grammar)throw Error('The language "'+o.language+'" has no grammar.');return o.tokens=r.tokenize(o.code,o.grammar),r.hooks.run("after-tokenize",o),a.stringify(r.util.encode(o.tokens),o.language)},tokenize:function(e,t){var n=t.rest;if(n){for(var s in n)t[s]=n[s];delete t.rest}var u=new i;return l(u,u.head,e),function e(t,n,i,s,u,c){for(var d in i){if(!!i.hasOwnProperty(d)&&!!i[d]){var f=i[d];f=Array.isArray(f)?f:[f];for(var p=0;p<f.length;++p){if(c&&c.cause==d+","+p)return;var h=f[p],g=h.inside,m=!!h.lookbehind,y=!!h.greedy,b=h.alias;if(y&&!h.pattern.global){var v=h.pattern.toString().match(/[imsuy]*$/)[0];h.pattern=RegExp(h.pattern.source,v+"g")}for(var x=h.pattern||h,w=s.next,k=u;w!==n.tail&&(!c||!(k>=c.reach));k+=w.value.length,w=w.next){;var S,E=w.value;if(n.length>t.length)return;if(!(E instanceof a)){var _=1;if(y){if(!(S=o(x,k,t,m))||S.index>=t.length)break;var T=S.index,C=S.index+S[0].length,P=k;for(P+=w.value.length;T>=P;)P+=(w=w.next).value.length;if(P-=w.value.length,k=P,w.value instanceof a)continue;for(var O=w;O!==n.tail&&(P<C||"string"==typeof O.value);O=O.next)_++,P+=O.value.length;_--,E=t.slice(k,P),S.index-=k}else if(!(S=o(x,0,E,m)))continue;var T=S.index,N=S[0],L=E.slice(0,T),A=E.slice(T+N.length),I=k+E.length;c&&I>c.reach&&(c.reach=I);var R=w.prev;if(L&&(R=l(n,R,L),k+=L.length),function(e,t,n){for(var r=t.next,a=0;a<n&&r!==e.tail;a++)r=r.next;t.next=r,r.prev=t,e.length-=a}(n,R,_),w=l(n,R,new a(d,g?r.tokenize(N,g):N,b,N)),A&&l(n,w,A),_>1){var j={cause:d+","+p,reach:I};e(t,n,i,w.prev,k,j),c&&j.reach>c.reach&&(c.reach=j.reach)}}}}}}}(e,u,t,u.head,0),function(e){for(var t=[],n=e.head.next;n!==e.tail;)t.push(n.value),n=n.next;return t}(u)},hooks:{all:{},add:function(e,t){var n=r.hooks.all;n[e]=n[e]||[],n[e].push(t)},run:function(e,t){var n=r.hooks.all[e];if(!!n&&!!n.length)for(var a,o=0;a=n[o++];)a(t)}},Token:a};function a(e,t,n,r){this.type=e,this.content=t,this.alias=n,this.length=0|(r||"").length}function o(e,t,n,r){e.lastIndex=t;var a=e.exec(n);if(a&&r&&a[1]){var o=a[1].length;a.index+=o,a[0]=a[0].slice(o)}return a}function i(){var e={value:null,prev:null,next:null},t={value:null,prev:e,next:null};e.next=t,this.head=e,this.tail=t,this.length=0}function l(e,t,n){var r=t.next,a={value:n,prev:t,next:r};return t.next=a,r.prev=a,e.length++,a}return a.stringify=function e(t,n){if("string"==typeof t)return t;if(Array.isArray(t)){var a="";return t.forEach(function(t){a+=e(t,n)}),a}var o={type:t.type,content:e(t.content,n),tag:"span",classes:["token",t.type],attributes:{},language:n},i=t.alias;i&&(Array.isArray(i)?Array.prototype.push.apply(o.classes,i):o.classes.push(i)),r.hooks.run("wrap",o);var l="";for(var s in o.attributes)l+=" "+s+'="'+(o.attributes[s]||"").replace(/"/g,"&quot;")+'"';return"<"+o.tag+' class="'+o.classes.join(" ")+'"'+l+">"+o.content+"</"+o.tag+">"},r}();t.exports=n,n.default=n}},function(){return a||(0,r[$(r)[0]])((a={exports:{}}).exports,a),a.exports})())?F(H(o)):{},Y(!i&&o&&o.__esModule?l:D(l,"default",{value:o,enumerable:!0}),o));K.languages.markup={comment:{pattern:/<!--(?:(?!<!--)[\s\S])*?-->/,greedy:!0},prolog:{pattern:/<\?[\s\S]+?\?>/,greedy:!0},doctype:{pattern:/<!DOCTYPE(?:[^>"'[\]]|"[^"]*"|'[^']*')+(?:\[(?:[^<"'\]]|"[^"]*"|'[^']*'|<(?!!--)|<!--(?:[^-]|-(?!->))*-->)*\]\s*)?>/i,greedy:!0,inside:{"internal-subset":{pattern:/(^[^\[]*\[)[\s\S]+(?=\]>$)/,lookbehind:!0,greedy:!0,inside:null},string:{pattern:/"[^"]*"|'[^']*'/,greedy:!0},punctuation:/^<!|>$|[[\]]/,"doctype-tag":/^DOCTYPE/i,name:/[^\s<>'"]+/}},cdata:{pattern:/<!\[CDATA\[[\s\S]*?\]\]>/i,greedy:!0},tag:{pattern:/<\/?(?!\d)[^\s>\/=$<%]+(?:\s(?:\s*[^\s>\/=]+(?:\s*=\s*(?:"[^"]*"|'[^']*'|[^\s'">=]+(?=[\s>]))|(?=[\s/>])))+)?\s*\/?>/,greedy:!0,inside:{tag:{pattern:/^<\/?[^\s>\/]+/,inside:{punctuation:/^<\/?/,namespace:/^[^\s>\/:]+:/}},"special-attr":[],"attr-value":{pattern:/=\s*(?:"[^"]*"|'[^']*'|[^\s'">=]+)/,inside:{punctuation:[{pattern:/^=/,alias:"attr-equals"},{pattern:/^(\s*)["']|["']$/,lookbehind:!0}]}},punctuation:/\/?>/,"attr-name":{pattern:/[^\s>\/]+/,inside:{namespace:/^[^\s>\/:]+:/}}}},entity:[{pattern:/&[\da-z]{1,8};/i,alias:"named-entity"},/&#x?[\da-f]{1,8};/i]},K.languages.markup.tag.inside["attr-value"].inside.entity=K.languages.markup.entity,K.languages.markup.doctype.inside["internal-subset"].inside=K.languages.markup,K.hooks.add("wrap",function(e){"entity"===e.type&&(e.attributes.title=e.content.replace(/&amp;/,"&"))}),Object.defineProperty(K.languages.markup.tag,"addInlined",{value:function(e,t){var n={},n=(n["language-"+t]={pattern:/(^<!\[CDATA\[)[\s\S]+?(?=\]\]>$)/i,lookbehind:!0,inside:K.languages[t]},n.cdata=/^<!\[CDATA\[|\]\]>$/i,{"included-cdata":{pattern:/<!\[CDATA\[[\s\S]*?\]\]>/i,inside:n}}),t=(n["language-"+t]={pattern:/[\s\S]+/,inside:K.languages[t]},{});t[e]={pattern:RegExp(/(<__[^>]*>)(?:<!\[CDATA\[(?:[^\]]|\](?!\]>))*\]\]>|(?!<!\[CDATA\[)[\s\S])*?(?=<\/__>)/.source.replace(/__/g,function(){return e}),"i"),lookbehind:!0,greedy:!0,inside:n},K.languages.insertBefore("markup","cdata",t)}}),Object.defineProperty(K.languages.markup.tag,"addAttribute",{value:function(e,t){K.languages.markup.tag.inside["special-attr"].push({pattern:RegExp(/(^|["'\s])/.source+"(?:"+e+")"+/\s*=\s*(?:"[^"]*"|'[^']*'|[^\s'">=]+(?=[\s>]))/.source,"i"),lookbehind:!0,inside:{"attr-name":/^[^\s=]+/,"attr-value":{pattern:/=[\s\S]+/,inside:{value:{pattern:/(^=\s*(["']|(?!["'])))\S[\s\S]*(?=\2$)/,lookbehind:!0,alias:[t,"language-"+t],inside:K.languages[t]},punctuation:[{pattern:/^=/,alias:"attr-equals"},/"|'/]}}}})}}),K.languages.html=K.languages.markup,K.languages.mathml=K.languages.markup,K.languages.svg=K.languages.markup,K.languages.xml=K.languages.extend("markup",{}),K.languages.ssml=K.languages.xml,K.languages.atom=K.languages.xml,K.languages.rss=K.languages.xml,s=K,u={pattern:/\\[\\(){}[\]^$+*?|.]/,alias:"escape"},d=RegExp((d="(?:[^\\\\-]|"+(c=/\\(?:x[\da-fA-F]{2}|u[\da-fA-F]{4}|u\{[\da-fA-F]+\}|0[0-7]{0,2}|[123][0-7]{2}|c[a-zA-Z]|.)/).source+")")+"-"+d),f={pattern:/(<|')[^<>']+(?=[>']$)/,lookbehind:!0,alias:"variable"},s.languages.regex={"char-class":{pattern:/((?:^|[^\\])(?:\\\\)*)\[(?:[^\\\]]|\\[\s\S])*\]/,lookbehind:!0,inside:{"char-class-negation":{pattern:/(^\[)\^/,lookbehind:!0,alias:"operator"},"char-class-punctuation":{pattern:/^\[|\]$/,alias:"punctuation"},range:{pattern:d,inside:{escape:c,"range-punctuation":{pattern:/-/,alias:"operator"}}},"special-escape":u,"char-set":{pattern:/\\[wsd]|\\p\{[^{}]+\}/i,alias:"class-name"},escape:c}},"special-escape":u,"char-set":{pattern:/\.|\\[wsd]|\\p\{[^{}]+\}/i,alias:"class-name"},backreference:[{pattern:/\\(?![123][0-7]{2})[1-9]/,alias:"keyword"},{pattern:/\\k<[^<>']+>/,alias:"keyword",inside:{"group-name":f}}],anchor:{pattern:/[$^]|\\[ABbGZz]/,alias:"function"},escape:c,group:[{pattern:/\((?:\?(?:<[^<>']+>|'[^<>']+'|[>:]|<?[=!]|[idmnsuxU]+(?:-[idmnsuxU]+)?:?))?/,alias:"punctuation",inside:{"group-name":f}},{pattern:/\)/,alias:"punctuation"}],quantifier:{pattern:/(?:[+*?]|\{\d+(?:,\d*)?\})[?+]?/,alias:"number"},alternation:{pattern:/\|/,alias:"keyword"}},K.languages.clike={comment:[{pattern:/(^|[^\\])\/\*[\s\S]*?(?:\*\/|$)/,lookbehind:!0,greedy:!0},{pattern:/(^|[^\\:])\/\/.*/,lookbehind:!0,greedy:!0}],string:{pattern:/(["'])(?:\\(?:\r\n|[\s\S])|(?!\1)[^\\\r\n])*\1/,greedy:!0},"class-name":{pattern:/(\b(?:class|extends|implements|instanceof|interface|new|trait)\s+|\bcatch\s+\()[\w.\\]+/i,lookbehind:!0,inside:{punctuation:/[.\\]/}},keyword:/\b(?:break|catch|continue|do|else|finally|for|function|if|in|instanceof|new|null|return|throw|try|while)\b/,boolean:/\b(?:false|true)\b/,function:/\b\w+(?=\()/,number:/\b0x[\da-f]+\b|(?:\b\d+(?:\.\d*)?|\B\.\d+)(?:e[+-]?\d+)?/i,operator:/[<>]=?|[!=]=?=?|--?|\+\+?|&&?|\|\|?|[?*/~^%]/,punctuation:/[{}[\];(),.:]/},K.languages.javascript=K.languages.extend("clike",{"class-name":[K.languages.clike["class-name"],{pattern:/(^|[^$\w\xA0-\uFFFF])(?!\s)[_$A-Z\xA0-\uFFFF](?:(?!\s)[$\w\xA0-\uFFFF])*(?=\.(?:constructor|prototype))/,lookbehind:!0}],keyword:[{pattern:/((?:^|\})\s*)catch\b/,lookbehind:!0},{pattern:/(^|[^.]|\.\.\.\s*)\b(?:as|assert(?=\s*\{)|async(?=\s*(?:function\b|\(|[$\w\xA0-\uFFFF]|$))|await|break|case|class|const|continue|debugger|default|delete|do|else|enum|export|extends|finally(?=\s*(?:\{|$))|for|from(?=\s*(?:['"]|$))|function|(?:get|set)(?=\s*(?:[#\[$\w\xA0-\uFFFF]|$))|if|implements|import|in|instanceof|interface|let|new|null|of|package|private|protected|public|return|static|super|switch|this|throw|try|typeof|undefined|var|void|while|with|yield)\b/,lookbehind:!0}],function:/#?(?!\s)[_$a-zA-Z\xA0-\uFFFF](?:(?!\s)[$\w\xA0-\uFFFF])*(?=\s*(?:\.\s*(?:apply|bind|call)\s*)?\()/,number:{pattern:RegExp(/(^|[^\w$])/.source+"(?:"+/NaN|Infinity/.source+"|"+/0[bB][01]+(?:_[01]+)*n?/.source+"|"+/0[oO][0-7]+(?:_[0-7]+)*n?/.source+"|"+/0[xX][\dA-Fa-f]+(?:_[\dA-Fa-f]+)*n?/.source+"|"+/\d+(?:_\d+)*n/.source+"|"+/(?:\d+(?:_\d+)*(?:\.(?:\d+(?:_\d+)*)?)?|\.\d+(?:_\d+)*)(?:[Ee][+-]?\d+(?:_\d+)*)?/.source+")"+/(?![\w$])/.source),lookbehind:!0},operator:/--|\+\+|\*\*=?|=>|&&=?|\|\|=?|[!=]==|<<=?|>>>?=?|[-+*/%&|^!=<>]=?|\.{3}|\?\?=?|\?\.?|[~:]/}),K.languages.javascript["class-name"][0].pattern=/(\b(?:class|extends|implements|instanceof|interface|new)\s+)[\w.\\]+/,K.languages.insertBefore("javascript","keyword",{regex:{pattern:RegExp(/((?:^|[^$\w\xA0-\uFFFF."'\])\s]|\b(?:return|yield))\s*)/.source+/\//.source+"(?:"+/(?:\[(?:[^\]\\\r\n]|\\.)*\]|\\.|[^/\\\[\r\n])+\/[dgimyus]{0,7}/.source+"|"+/(?:\[(?:[^[\]\\\r\n]|\\.|\[(?:[^[\]\\\r\n]|\\.|\[(?:[^[\]\\\r\n]|\\.)*\])*\])*\]|\\.|[^/\\\[\r\n])+\/[dgimyus]{0,7}v[dgimyus]{0,7}/.source+")"+/(?=(?:\s|\/\*(?:[^*]|\*(?!\/))*\*\/)*(?:$|[\r\n,.;:})\]]|\/\/))/.source),lookbehind:!0,greedy:!0,inside:{"regex-source":{pattern:/^(\/)[\s\S]+(?=\/[a-z]*$)/,lookbehind:!0,alias:"language-regex",inside:K.languages.regex},"regex-delimiter":/^\/|\/$/,"regex-flags":/^[a-z]+$/}},"function-variable":{pattern:/#?(?!\s)[_$a-zA-Z\xA0-\uFFFF](?:(?!\s)[$\w\xA0-\uFFFF])*(?=\s*[=:]\s*(?:async\s*)?(?:\bfunction\b|(?:\((?:[^()]|\([^()]*\))*\)|(?!\s)[_$a-zA-Z\xA0-\uFFFF](?:(?!\s)[$\w\xA0-\uFFFF])*)\s*=>))/,alias:"function"},parameter:[{pattern:/(function(?:\s+(?!\s)[_$a-zA-Z\xA0-\uFFFF](?:(?!\s)[$\w\xA0-\uFFFF])*)?\s*\(\s*)(?!\s)(?:[^()\s]|\s+(?![\s)])|\([^()]*\))+(?=\s*\))/,lookbehind:!0,inside:K.languages.javascript},{pattern:/(^|[^$\w\xA0-\uFFFF])(?!\s)[_$a-z\xA0-\uFFFF](?:(?!\s)[$\w\xA0-\uFFFF])*(?=\s*=>)/i,lookbehind:!0,inside:K.languages.javascript},{pattern:/(\(\s*)(?!\s)(?:[^()\s]|\s+(?![\s)])|\([^()]*\))+(?=\s*\)\s*=>)/,lookbehind:!0,inside:K.languages.javascript},{pattern:/((?:\b|\s|^)(?!(?:as|async|await|break|case|catch|class|const|continue|debugger|default|delete|do|else|enum|export|extends|finally|for|from|function|get|if|implements|import|in|instanceof|interface|let|new|null|of|package|private|protected|public|return|set|static|super|switch|this|throw|try|typeof|undefined|var|void|while|with|yield)(?![$\w\xA0-\uFFFF]))(?:(?!\s)[_$a-zA-Z\xA0-\uFFFF](?:(?!\s)[$\w\xA0-\uFFFF])*\s*)\(\s*|\]\s*\(\s*)(?!\s)(?:[^()\s]|\s+(?![\s)])|\([^()]*\))+(?=\s*\)\s*\{)/,lookbehind:!0,inside:K.languages.javascript}],constant:/\b[A-Z](?:[A-Z_]|\dx?)*\b/}),K.languages.insertBefore("javascript","string",{hashbang:{pattern:/^#!.*/,greedy:!0,alias:"comment"},"template-string":{pattern:/`(?:\\[\s\S]|\$\{(?:[^{}]|\{(?:[^{}]|\{[^}]*\})*\})+\}|(?!\$\{)[^\\`])*`/,greedy:!0,inside:{"template-punctuation":{pattern:/^`|`$/,alias:"string"},interpolation:{pattern:/((?:^|[^\\])(?:\\{2})*)\$\{(?:[^{}]|\{(?:[^{}]|\{[^}]*\})*\})+\}/,lookbehind:!0,inside:{"interpolation-punctuation":{pattern:/^\$\{|\}$/,alias:"punctuation"},rest:K.languages.javascript}},string:/[\s\S]+/}},"string-property":{pattern:/((?:^|[,{])[ \t]*)(["'])(?:\\(?:\r\n|[\s\S])|(?!\2)[^\\\r\n])*\2(?=\s*:)/m,lookbehind:!0,greedy:!0,alias:"property"}}),K.languages.insertBefore("javascript","operator",{"literal-property":{pattern:/((?:^|[,{])[ \t]*)(?!\s)[_$a-zA-Z\xA0-\uFFFF](?:(?!\s)[$\w\xA0-\uFFFF])*(?=\s*:)/m,lookbehind:!0,alias:"property"}}),K.languages.markup&&(K.languages.markup.tag.addInlined("script","javascript"),K.languages.markup.tag.addAttribute(/on(?:abort|blur|change|click|composition(?:end|start|update)|dblclick|error|focus(?:in|out)?|key(?:down|up)|load|mouse(?:down|enter|leave|move|out|over|up)|reset|resize|scroll|select|slotchange|submit|unload|wheel)/.source,"javascript")),K.languages.js=K.languages.javascript,K.languages.actionscript=K.languages.extend("javascript",{keyword:/\b(?:as|break|case|catch|class|const|default|delete|do|dynamic|each|else|extends|final|finally|for|function|get|if|implements|import|in|include|instanceof|interface|internal|is|namespace|native|new|null|override|package|private|protected|public|return|set|static|super|switch|this|throw|try|typeof|use|var|void|while|with)\b/,operator:/\+\+|--|(?:[+\-*\/%^]|&&?|\|\|?|<<?|>>?>?|[!=]=?)=?|[~?@]/}),K.languages.actionscript["class-name"].alias="function",delete K.languages.actionscript.parameter,delete K.languages.actionscript["literal-property"],K.languages.markup&&K.languages.insertBefore("actionscript","string",{xml:{pattern:/(^|[^.])<\/?\w+(?:\s+[^\s>\/=]+=("|')(?:\\[\s\S]|(?!\2)[^\\])*\2)*\s*\/?>/,lookbehind:!0,inside:K.languages.markup}}),h=/#(?!\{).+/,g={pattern:/#\{[^}]+\}/,alias:"variable"},(p=K).languages.coffeescript=p.languages.extend("javascript",{comment:h,string:[{pattern:/'(?:\\[\s\S]|[^\\'])*'/,greedy:!0},{pattern:/"(?:\\[\s\S]|[^\\"])*"/,greedy:!0,inside:{interpolation:g}}],keyword:/\b(?:and|break|by|catch|class|continue|debugger|delete|do|each|else|extend|extends|false|finally|for|if|in|instanceof|is|isnt|let|loop|namespace|new|no|not|null|of|off|on|or|own|return|super|switch|then|this|throw|true|try|typeof|undefined|unless|until|when|while|window|with|yes|yield)\b/,"class-member":{pattern:/@(?!\d)\w+/,alias:"variable"}}),p.languages.insertBefore("coffeescript","comment",{"multiline-comment":{pattern:/###[\s\S]+?###/,alias:"comment"},"block-regex":{pattern:/\/{3}[\s\S]*?\/{3}/,alias:"regex",inside:{comment:h,interpolation:g}}}),p.languages.insertBefore("coffeescript","string",{"inline-javascript":{pattern:/`(?:\\[\s\S]|[^\\`])*`/,inside:{delimiter:{pattern:/^`|`$/,alias:"punctuation"},script:{pattern:/[\s\S]+/,alias:"language-javascript",inside:p.languages.javascript}}},"multiline-string":[{pattern:/'''[\s\S]*?'''/,greedy:!0,alias:"string"},{pattern:/"""[\s\S]*?"""/,greedy:!0,alias:"string",inside:{interpolation:g}}]}),p.languages.insertBefore("coffeescript","keyword",{property:/(?!\d)\w+(?=\s*:(?!:))/}),delete p.languages.coffeescript["template-string"],p.languages.coffee=p.languages.coffeescript,Object.defineProperty(y=(m=K).languages.javadoclike={parameter:{pattern:/(^[\t ]*(?:\/{3}|\*|\/\*\*)\s*@(?:arg|arguments|param)\s+)\w+/m,lookbehind:!0},keyword:{pattern:/(^[\t ]*(?:\/{3}|\*|\/\*\*)\s*|\{)@[a-z][a-zA-Z-]+\b/m,lookbehind:!0},punctuation:/[{}]/},"addSupport",{value:function(e,t){(e="string"==typeof e?[e]:e).forEach(function(e){var n=function(e){e.inside||(e.inside={}),e.inside.rest=t},r="doc-comment";if(a=m.languages[e]){var a,o=a[r];if((o=o||(a=m.languages.insertBefore(e,"comment",{"doc-comment":{pattern:/(^|[^\\])\/\*\*[^/][\s\S]*?(?:\*\/|$)/,lookbehind:!0,alias:"comment"}}))[r])instanceof RegExp&&(o=a[r]={pattern:o}),Array.isArray(o))for(var i=0,l=o.length;i<l;i++)o[i]instanceof RegExp&&(o[i]={pattern:o[i]}),n(o[i]);else n(o)}})}}),y.addSupport(["java","javascript","php"],y),v=/(?:"(?:\\(?:\r\n|[\s\S])|[^"\\\r\n])*"|'(?:\\(?:\r\n|[\s\S])|[^'\\\r\n])*')/,(v=((b=K).languages.css={comment:/\/\*[\s\S]*?\*\//,atrule:{pattern:RegExp("@[\\w-](?:"+/[^;{\s"']|\s+(?!\s)/.source+"|"+v.source+")*?"+/(?:;|(?=\s*\{))/.source),inside:{rule:/^@[\w-]+/,"selector-function-argument":{pattern:/(\bselector\s*\(\s*(?![\s)]))(?:[^()\s]|\s+(?![\s)])|\((?:[^()]|\([^()]*\))*\))+(?=\s*\))/,lookbehind:!0,alias:"selector"},keyword:{pattern:/(^|[^\w-])(?:and|not|only|or)(?![\w-])/,lookbehind:!0}}},url:{pattern:RegExp("\\burl\\((?:"+v.source+"|"+/(?:[^\\\r\n()"']|\\[\s\S])*/.source+")\\)","i"),greedy:!0,inside:{function:/^url/i,punctuation:/^\(|\)$/,string:{pattern:RegExp("^"+v.source+"$"),alias:"url"}}},selector:{pattern:RegExp("(^|[{}\\s])[^{}\\s](?:[^{};\"'\\s]|\\s+(?![\\s{])|"+v.source+")*(?=\\s*\\{)"),lookbehind:!0},string:{pattern:v,greedy:!0},property:{pattern:/(^|[^-\w\xA0-\uFFFF])(?!\s)[-_a-z\xA0-\uFFFF](?:(?!\s)[-\w\xA0-\uFFFF])*(?=\s*:)/i,lookbehind:!0},important:/!important\b/i,function:{pattern:/(^|[^-a-z0-9])[-a-z0-9]+(?=\()/i,lookbehind:!0},punctuation:/[(){};:,]/},b.languages.css.atrule.inside.rest=b.languages.css,b.languages.markup))&&(v.tag.addInlined("style","css"),v.tag.addAttribute("style","css")),function(e){var t=/("|')(?:\\(?:\r\n|[\s\S])|(?!\1)[^\\\r\n])*\1/,t=(e.languages.css.selector={pattern:e.languages.css.selector.pattern,lookbehind:!0,inside:t={"pseudo-element":/:(?:after|before|first-letter|first-line|selection)|::[-\w]+/,"pseudo-class":/:[-\w]+/,class:/\.[-\w]+/,id:/#[-\w]+/,attribute:{pattern:RegExp("\\[(?:[^[\\]\"']|"+t.source+")*\\]"),greedy:!0,inside:{punctuation:/^\[|\]$/,"case-sensitivity":{pattern:/(\s)[si]$/i,lookbehind:!0,alias:"keyword"},namespace:{pattern:/^(\s*)(?:(?!\s)[-*\w\xA0-\uFFFF])*\|(?!=)/,lookbehind:!0,inside:{punctuation:/\|$/}},"attr-name":{pattern:/^(\s*)(?:(?!\s)[-\w\xA0-\uFFFF])+/,lookbehind:!0},"attr-value":[t,{pattern:/(=\s*)(?:(?!\s)[-\w\xA0-\uFFFF])+(?=\s*$)/,lookbehind:!0}],operator:/[|~*^$]?=/}},"n-th":[{pattern:/(\(\s*)[+-]?\d*[\dn](?:\s*[+-]\s*\d+)?(?=\s*\))/,lookbehind:!0,inside:{number:/[\dn]+/,operator:/[+-]/}},{pattern:/(\(\s*)(?:even|odd)(?=\s*\))/i,lookbehind:!0}],combinator:/>|\+|~|\|\|/,punctuation:/[(),]/}},e.languages.css.atrule.inside["selector-function-argument"].inside=t,e.languages.insertBefore("css","property",{variable:{pattern:/(^|[^-\w\xA0-\uFFFF])--(?!\s)[-_a-z\xA0-\uFFFF](?:(?!\s)[-\w\xA0-\uFFFF])*/i,lookbehind:!0}}),{pattern:/(\b\d+)(?:%|[a-z]+(?![\w-]))/,lookbehind:!0}),n={pattern:/(^|[^\w.-])-?(?:\d+(?:\.\d+)?|\.\d+)/,lookbehind:!0};e.languages.insertBefore("css","function",{operator:{pattern:/(\s)[+\-*\/](?=\s)/,lookbehind:!0},hexcode:{pattern:/\B#[\da-f]{3,8}\b/i,alias:"color"},color:[{pattern:/(^|[^\w-])(?:AliceBlue|AntiqueWhite|Aqua|Aquamarine|Azure|Beige|Bisque|Black|BlanchedAlmond|Blue|BlueViolet|Brown|BurlyWood|CadetBlue|Chartreuse|Chocolate|Coral|CornflowerBlue|Cornsilk|Crimson|Cyan|DarkBlue|DarkCyan|DarkGoldenRod|DarkGr[ae]y|DarkGreen|DarkKhaki|DarkMagenta|DarkOliveGreen|DarkOrange|DarkOrchid|DarkRed|DarkSalmon|DarkSeaGreen|DarkSlateBlue|DarkSlateGr[ae]y|DarkTurquoise|DarkViolet|DeepPink|DeepSkyBlue|DimGr[ae]y|DodgerBlue|FireBrick|FloralWhite|ForestGreen|Fuchsia|Gainsboro|GhostWhite|Gold|GoldenRod|Gr[ae]y|Green|GreenYellow|HoneyDew|HotPink|IndianRed|Indigo|Ivory|Khaki|Lavender|LavenderBlush|LawnGreen|LemonChiffon|LightBlue|LightCoral|LightCyan|LightGoldenRodYellow|LightGr[ae]y|LightGreen|LightPink|LightSalmon|LightSeaGreen|LightSkyBlue|LightSlateGr[ae]y|LightSteelBlue|LightYellow|Lime|LimeGreen|Linen|Magenta|Maroon|MediumAquaMarine|MediumBlue|MediumOrchid|MediumPurple|MediumSeaGreen|MediumSlateBlue|MediumSpringGreen|MediumTurquoise|MediumVioletRed|MidnightBlue|MintCream|MistyRose|Moccasin|NavajoWhite|Navy|OldLace|Olive|OliveDrab|Orange|OrangeRed|Orchid|PaleGoldenRod|PaleGreen|PaleTurquoise|PaleVioletRed|PapayaWhip|PeachPuff|Peru|Pink|Plum|PowderBlue|Purple|RebeccaPurple|Red|RosyBrown|RoyalBlue|SaddleBrown|Salmon|SandyBrown|SeaGreen|SeaShell|Sienna|Silver|SkyBlue|SlateBlue|SlateGr[ae]y|Snow|SpringGreen|SteelBlue|Tan|Teal|Thistle|Tomato|Transparent|Turquoise|Violet|Wheat|White|WhiteSmoke|Yellow|YellowGreen)(?![\w-])/i,lookbehind:!0},{pattern:/\b(?:hsl|rgb)\(\s*\d{1,3}\s*,\s*\d{1,3}%?\s*,\s*\d{1,3}%?\s*\)\B|\b(?:hsl|rgb)a\(\s*\d{1,3}\s*,\s*\d{1,3}%?\s*,\s*\d{1,3}%?\s*,\s*(?:0|0?\.\d+|1)\s*\)\B/i,inside:{unit:t,number:n,function:/[\w-]+(?=\()/,punctuation:/[(),]/}}],entity:/\\[\da-f]{1,8}/i,unit:t,number:n})}(K),function(e){var t=/[*&][^\s[\]{},]+/,n=/!(?:<[\w\-%#;/?:@&=+$,.!~*'()[\]]+>|(?:[a-zA-Z\d-]*!)?[\w\-%#;/?:@&=+$.~*'()]+)?/,r="(?:"+n.source+"(?:[ 	]+"+t.source+")?|"+t.source+"(?:[ 	]+"+n.source+")?)",a=/(?:[^\s\x00-\x08\x0e-\x1f!"#%&'*,\-:>?@[\]`{|}\x7f-\x84\x86-\x9f\ud800-\udfff\ufffe\uffff]|[?:-]<PLAIN>)(?:[ \t]*(?:(?![#:])<PLAIN>|:<PLAIN>))*/.source.replace(/<PLAIN>/g,function(){return/[^\s\x00-\x08\x0e-\x1f,[\]{}\x7f-\x84\x86-\x9f\ud800-\udfff\ufffe\uffff]/.source}),o=/"(?:[^"\\\r\n]|\\.)*"|'(?:[^'\\\r\n]|\\.)*'/.source;function i(e,t){return t=(t||"").replace(/m/g,"")+"m",RegExp(/([:\-,[{]\s*(?:\s<<prop>>[ \t]+)?)(?:<<value>>)(?=[ \t]*(?:$|,|\]|\}|(?:[\r\n]\s*)?#))/.source.replace(/<<prop>>/g,function(){return r}).replace(/<<value>>/g,function(){return e}),t)}e.languages.yaml={scalar:{pattern:RegExp(/([\-:]\s*(?:\s<<prop>>[ \t]+)?[|>])[ \t]*(?:((?:\r?\n|\r)[ \t]+)\S[^\r\n]*(?:\2[^\r\n]+)*)/.source.replace(/<<prop>>/g,function(){return r})),lookbehind:!0,alias:"string"},comment:/#.*/,key:{pattern:RegExp(/((?:^|[:\-,[{\r\n?])[ \t]*(?:<<prop>>[ \t]+)?)<<key>>(?=\s*:\s)/.source.replace(/<<prop>>/g,function(){return r}).replace(/<<key>>/g,function(){return"(?:"+a+"|"+o+")"})),lookbehind:!0,greedy:!0,alias:"atrule"},directive:{pattern:/(^[ \t]*)%.+/m,lookbehind:!0,alias:"important"},datetime:{pattern:i(/\d{4}-\d\d?-\d\d?(?:[tT]|[ \t]+)\d\d?:\d{2}:\d{2}(?:\.\d*)?(?:[ \t]*(?:Z|[-+]\d\d?(?::\d{2})?))?|\d{4}-\d{2}-\d{2}|\d\d?:\d{2}(?::\d{2}(?:\.\d*)?)?/.source),lookbehind:!0,alias:"number"},boolean:{pattern:i(/false|true/.source,"i"),lookbehind:!0,alias:"important"},null:{pattern:i(/null|~/.source,"i"),lookbehind:!0,alias:"important"},string:{pattern:i(o),lookbehind:!0,greedy:!0},number:{pattern:i(/[+-]?(?:0x[\da-f]+|0o[0-7]+|(?:\d+(?:\.\d*)?|\.\d+)(?:e[+-]?\d+)?|\.inf|\.nan)/.source,"i"),lookbehind:!0},tag:n,important:t,punctuation:/---|[:[\]{}\-,|>?]|\.\.\./},e.languages.yml=e.languages.yaml}(K),function(e){var t=/(?:\\.|[^\\\n\r]|(?:\n|\r\n?)(?![\r\n]))/.source;function n(e){return e=e.replace(/<inner>/g,function(){return t}),RegExp(/((?:^|[^\\])(?:\\{2})*)/.source+"(?:"+e+")")}var r=/(?:\\.|``(?:[^`\r\n]|`(?!`))+``|`[^`\r\n]+`|[^\\|\r\n`])+/.source,a=/\|?__(?:\|__)+\|?(?:(?:\n|\r\n?)|(?![\s\S]))/.source.replace(/__/g,function(){return r}),o=/\|?[ \t]*:?-{3,}:?[ \t]*(?:\|[ \t]*:?-{3,}:?[ \t]*)+\|?(?:\n|\r\n?)/.source,i=(e.languages.markdown=e.languages.extend("markup",{}),e.languages.insertBefore("markdown","prolog",{"front-matter-block":{pattern:/(^(?:\s*[\r\n])?)---(?!.)[\s\S]*?[\r\n]---(?!.)/,lookbehind:!0,greedy:!0,inside:{punctuation:/^---|---$/,"front-matter":{pattern:/\S+(?:\s+\S+)*/,alias:["yaml","language-yaml"],inside:e.languages.yaml}}},blockquote:{pattern:/^>(?:[\t ]*>)*/m,alias:"punctuation"},table:{pattern:RegExp("^"+a+o+"(?:"+a+")*","m"),inside:{"table-data-rows":{pattern:RegExp("^("+a+o+")(?:"+a+")*$"),lookbehind:!0,inside:{"table-data":{pattern:RegExp(r),inside:e.languages.markdown},punctuation:/\|/}},"table-line":{pattern:RegExp("^("+a+")"+o+"$"),lookbehind:!0,inside:{punctuation:/\||:?-{3,}:?/}},"table-header-row":{pattern:RegExp("^"+a+"$"),inside:{"table-header":{pattern:RegExp(r),alias:"important",inside:e.languages.markdown},punctuation:/\|/}}}},code:[{pattern:/((?:^|\n)[ \t]*\n|(?:^|\r\n?)[ \t]*\r\n?)(?: {4}|\t).+(?:(?:\n|\r\n?)(?: {4}|\t).+)*/,lookbehind:!0,alias:"keyword"},{pattern:/^```[\s\S]*?^```$/m,greedy:!0,inside:{"code-block":{pattern:/^(```.*(?:\n|\r\n?))[\s\S]+?(?=(?:\n|\r\n?)^```$)/m,lookbehind:!0},"code-language":{pattern:/^(```).+/,lookbehind:!0},punctuation:/```/}}],title:[{pattern:/\S.*(?:\n|\r\n?)(?:==+|--+)(?=[ \t]*$)/m,alias:"important",inside:{punctuation:/==+$|--+$/}},{pattern:/(^\s*)#.+/m,lookbehind:!0,alias:"important",inside:{punctuation:/^#+|#+$/}}],hr:{pattern:/(^\s*)([*-])(?:[\t ]*\2){2,}(?=\s*$)/m,lookbehind:!0,alias:"punctuation"},list:{pattern:/(^\s*)(?:[*+-]|\d+\.)(?=[\t ].)/m,lookbehind:!0,alias:"punctuation"},"url-reference":{pattern:/!?\[[^\]]+\]:[\t ]+(?:\S+|<(?:\\.|[^>\\])+>)(?:[\t ]+(?:"(?:\\.|[^"\\])*"|'(?:\\.|[^'\\])*'|\((?:\\.|[^)\\])*\)))?/,inside:{variable:{pattern:/^(!?\[)[^\]]+/,lookbehind:!0},string:/(?:"(?:\\.|[^"\\])*"|'(?:\\.|[^'\\])*'|\((?:\\.|[^)\\])*\))$/,punctuation:/^[\[\]!:]|[<>]/},alias:"url"},bold:{pattern:n(/\b__(?:(?!_)<inner>|_(?:(?!_)<inner>)+_)+__\b|\*\*(?:(?!\*)<inner>|\*(?:(?!\*)<inner>)+\*)+\*\*/.source),lookbehind:!0,greedy:!0,inside:{content:{pattern:/(^..)[\s\S]+(?=..$)/,lookbehind:!0,inside:{}},punctuation:/\*\*|__/}},italic:{pattern:n(/\b_(?:(?!_)<inner>|__(?:(?!_)<inner>)+__)+_\b|\*(?:(?!\*)<inner>|\*\*(?:(?!\*)<inner>)+\*\*)+\*/.source),lookbehind:!0,greedy:!0,inside:{content:{pattern:/(^.)[\s\S]+(?=.$)/,lookbehind:!0,inside:{}},punctuation:/[*_]/}},strike:{pattern:n(/(~~?)(?:(?!~)<inner>)+\2/.source),lookbehind:!0,greedy:!0,inside:{content:{pattern:/(^~~?)[\s\S]+(?=\1$)/,lookbehind:!0,inside:{}},punctuation:/~~?/}},"code-snippet":{pattern:/(^|[^\\`])(?:``[^`\r\n]+(?:`[^`\r\n]+)*``(?!`)|`[^`\r\n]+`(?!`))/,lookbehind:!0,greedy:!0,alias:["code","keyword"]},url:{pattern:n(/!?\[(?:(?!\])<inner>)+\](?:\([^\s)]+(?:[\t ]+"(?:\\.|[^"\\])*")?\)|[ \t]?\[(?:(?!\])<inner>)+\])/.source),lookbehind:!0,greedy:!0,inside:{operator:/^!/,content:{pattern:/(^\[)[^\]]+(?=\])/,lookbehind:!0,inside:{}},variable:{pattern:/(^\][ \t]?\[)[^\]]+(?=\]$)/,lookbehind:!0},url:{pattern:/(^\]\()[^\s)]+/,lookbehind:!0},string:{pattern:/(^[ \t]+)"(?:\\.|[^"\\])*"(?=\)$)/,lookbehind:!0}}}}),["url","bold","italic","strike"].forEach(function(t){["url","bold","italic","strike","code-snippet"].forEach(function(n){t!==n&&(e.languages.markdown[t].inside.content.inside[n]=e.languages.markdown[n])})}),e.hooks.add("after-tokenize",function(e){"markdown"!==e.language&&"md"!==e.language||function e(t){if(t&&"string"!=typeof t)for(var n=0,r=t.length;n<r;n++){var a,o=t[n];"code"!==o.type?e(o.content):(a=o.content[1],o=o.content[3],a&&o&&"code-language"===a.type&&"code-block"===o.type&&"string"==typeof a.content&&(a=a.content.replace(/\b#/g,"sharp").replace(/\b\+\+/g,"pp"),a="language-"+(a=(/[a-z][\w-]*/i.exec(a)||[""])[0].toLowerCase()),o.alias?"string"==typeof o.alias?o.alias=[o.alias,a]:o.alias.push(a):o.alias=[a]))}}(e.tokens)}),e.hooks.add("wrap",function(t){if("code-block"===t.type){for(var n,r="",a=0,o=t.classes.length;a<o;a++){var u=t.classes[a],u=/language-(.+)/.exec(u);if(u){r=u[1];break}}var c,d=e.languages[r];d?t.content=e.highlight(n=(n=(n=t.content).replace(i,"")).replace(/&(\w{1,8}|#x?[\da-f]{1,8});/gi,function(e,t){return"#"===(t=t.toLowerCase())[0]?s("x"===t[1]?parseInt(t.slice(2),16):Number(t.slice(1))):l[t]||e}),d,r):r&&"none"!==r&&e.plugins.autoloader&&(c="md-"+new Date().valueOf()+"-"+Math.floor(1e16*Math.random()),t.attributes.id=c,e.plugins.autoloader.loadLanguages(r,function(){var t=document.getElementById(c);t&&(t.innerHTML=e.highlight(t.textContent,e.languages[r],r))}))}}),RegExp(e.languages.markup.tag.pattern.source,"gi")),l={amp:"&",lt:"<",gt:">",quot:'"'},s=String.fromCodePoint||String.fromCharCode;e.languages.md=e.languages.markdown}(K),K.languages.graphql={comment:/#.*/,description:{pattern:/(?:"""(?:[^"]|(?!""")")*"""|"(?:\\.|[^\\"\r\n])*")(?=\s*[a-z_])/i,greedy:!0,alias:"string",inside:{"language-markdown":{pattern:/(^"(?:"")?)(?!\1)[\s\S]+(?=\1$)/,lookbehind:!0,inside:K.languages.markdown}}},string:{pattern:/"""(?:[^"]|(?!""")")*"""|"(?:\\.|[^\\"\r\n])*"/,greedy:!0},number:/(?:\B-|\b)\d+(?:\.\d+)?(?:e[+-]?\d+)?\b/i,boolean:/\b(?:false|true)\b/,variable:/\$[a-z_]\w*/i,directive:{pattern:/@[a-z_]\w*/i,alias:"function"},"attr-name":{pattern:/\b[a-z_]\w*(?=\s*(?:\((?:[^()"]|"(?:\\.|[^\\"\r\n])*")*\))?:)/i,greedy:!0},"atom-input":{pattern:/\b[A-Z]\w*Input\b/,alias:"class-name"},scalar:/\b(?:Boolean|Float|ID|Int|String)\b/,constant:/\b[A-Z][A-Z_\d]*\b/,"class-name":{pattern:/(\b(?:enum|implements|interface|on|scalar|type|union)\s+|&\s*|:\s*|\[)[A-Z_]\w*/,lookbehind:!0},fragment:{pattern:/(\bfragment\s+|\.{3}\s*(?!on\b))[a-zA-Z_]\w*/,lookbehind:!0,alias:"function"},"definition-mutation":{pattern:/(\bmutation\s+)[a-zA-Z_]\w*/,lookbehind:!0,alias:"function"},"definition-query":{pattern:/(\bquery\s+)[a-zA-Z_]\w*/,lookbehind:!0,alias:"function"},keyword:/\b(?:directive|enum|extend|fragment|implements|input|interface|mutation|on|query|repeatable|scalar|schema|subscription|type|union)\b/,operator:/[!=|&]|\.{3}/,"property-query":/\w+(?=\s*\()/,object:/\w+(?=\s*\{)/,punctuation:/[!(){}\[\]:=,]/,property:/\w+/},K.hooks.add("after-tokenize",function(e){if("graphql"===e.language)for(var t=e.tokens.filter(function(e){return"string"!=typeof e&&"comment"!==e.type&&"scalar"!==e.type}),n=0;n<t.length;){var r=t[n++];if("keyword"===r.type&&"mutation"===r.content){var a=[];if(d(["definition-mutation","punctuation"])&&"("===function(e){return t[n+e]}(1).content){n+=2;var o=f(/^\($/,/^\)$/);if(-1===o)continue;for(;n<o;n++){var i=function(e){return t[n+e]}(0);"variable"===i.type&&(p(i,"variable-input"),a.push(i.content))}n=o+1}if(d(["punctuation","property-query"])&&"{"===function(e){return t[n+e]}(0).content&&(n++,p(function(e){return t[n+e]}(0),"property-mutation"),0<a.length)){var l=f(/^\{$/,/^\}$/);if(-1!==l)for(var s=n;s<l;s++){var u=t[s];"variable"===u.type&&0<=a.indexOf(u.content)&&p(u,"variable-input")}}}}function c(e){return t[n+e]}function d(e,r){r=r||0;for(var a=0;a<e.length;a++){var o=t[n+(a+r)];if(!o||o.type!==e[a])return}return 1}function f(e,r){for(var a=1,o=n;o<t.length;o++){var i=t[o],l=i.content;if("punctuation"===i.type&&"string"==typeof l){if(e.test(l))a++;else if(r.test(l)&&0==--a)return o}}return -1}function p(e,t){var n=e.alias;n?Array.isArray(n)||(e.alias=n=[n]):e.alias=n=[],n.push(t)}}),K.languages.sql={comment:{pattern:/(^|[^\\])(?:\/\*[\s\S]*?\*\/|(?:--|\/\/|#).*)/,lookbehind:!0},variable:[{pattern:/@(["'`])(?:\\[\s\S]|(?!\1)[^\\])+\1/,greedy:!0},/@[\w.$]+/],string:{pattern:/(^|[^@\\])("|')(?:\\[\s\S]|(?!\2)[^\\]|\2\2)*\2/,greedy:!0,lookbehind:!0},identifier:{pattern:/(^|[^@\\])`(?:\\[\s\S]|[^`\\]|``)*`/,greedy:!0,lookbehind:!0,inside:{punctuation:/^`|`$/}},function:/\b(?:AVG|COUNT|FIRST|FORMAT|LAST|LCASE|LEN|MAX|MID|MIN|MOD|NOW|ROUND|SUM|UCASE)(?=\s*\()/i,keyword:/\b(?:ACTION|ADD|AFTER|ALGORITHM|ALL|ALTER|ANALYZE|ANY|APPLY|AS|ASC|AUTHORIZATION|AUTO_INCREMENT|BACKUP|BDB|BEGIN|BERKELEYDB|BIGINT|BINARY|BIT|BLOB|BOOL|BOOLEAN|BREAK|BROWSE|BTREE|BULK|BY|CALL|CASCADED?|CASE|CHAIN|CHAR(?:ACTER|SET)?|CHECK(?:POINT)?|CLOSE|CLUSTERED|COALESCE|COLLATE|COLUMNS?|COMMENT|COMMIT(?:TED)?|COMPUTE|CONNECT|CONSISTENT|CONSTRAINT|CONTAINS(?:TABLE)?|CONTINUE|CONVERT|CREATE|CROSS|CURRENT(?:_DATE|_TIME|_TIMESTAMP|_USER)?|CURSOR|CYCLE|DATA(?:BASES?)?|DATE(?:TIME)?|DAY|DBCC|DEALLOCATE|DEC|DECIMAL|DECLARE|DEFAULT|DEFINER|DELAYED|DELETE|DELIMITERS?|DENY|DESC|DESCRIBE|DETERMINISTIC|DISABLE|DISCARD|DISK|DISTINCT|DISTINCTROW|DISTRIBUTED|DO|DOUBLE|DROP|DUMMY|DUMP(?:FILE)?|DUPLICATE|ELSE(?:IF)?|ENABLE|ENCLOSED|END|ENGINE|ENUM|ERRLVL|ERRORS|ESCAPED?|EXCEPT|EXEC(?:UTE)?|EXISTS|EXIT|EXPLAIN|EXTENDED|FETCH|FIELDS|FILE|FILLFACTOR|FIRST|FIXED|FLOAT|FOLLOWING|FOR(?: EACH ROW)?|FORCE|FOREIGN|FREETEXT(?:TABLE)?|FROM|FULL|FUNCTION|GEOMETRY(?:COLLECTION)?|GLOBAL|GOTO|GRANT|GROUP|HANDLER|HASH|HAVING|HOLDLOCK|HOUR|IDENTITY(?:COL|_INSERT)?|IF|IGNORE|IMPORT|INDEX|INFILE|INNER|INNODB|INOUT|INSERT|INT|INTEGER|INTERSECT|INTERVAL|INTO|INVOKER|ISOLATION|ITERATE|JOIN|KEYS?|KILL|LANGUAGE|LAST|LEAVE|LEFT|LEVEL|LIMIT|LINENO|LINES|LINESTRING|LOAD|LOCAL|LOCK|LONG(?:BLOB|TEXT)|LOOP|MATCH(?:ED)?|MEDIUM(?:BLOB|INT|TEXT)|MERGE|MIDDLEINT|MINUTE|MODE|MODIFIES|MODIFY|MONTH|MULTI(?:LINESTRING|POINT|POLYGON)|NATIONAL|NATURAL|NCHAR|NEXT|NO|NONCLUSTERED|NULLIF|NUMERIC|OFF?|OFFSETS?|ON|OPEN(?:DATASOURCE|QUERY|ROWSET)?|OPTIMIZE|OPTION(?:ALLY)?|ORDER|OUT(?:ER|FILE)?|OVER|PARTIAL|PARTITION|PERCENT|PIVOT|PLAN|POINT|POLYGON|PRECEDING|PRECISION|PREPARE|PREV|PRIMARY|PRINT|PRIVILEGES|PROC(?:EDURE)?|PUBLIC|PURGE|QUICK|RAISERROR|READS?|REAL|RECONFIGURE|REFERENCES|RELEASE|RENAME|REPEAT(?:ABLE)?|REPLACE|REPLICATION|REQUIRE|RESIGNAL|RESTORE|RESTRICT|RETURN(?:ING|S)?|REVOKE|RIGHT|ROLLBACK|ROUTINE|ROW(?:COUNT|GUIDCOL|S)?|RTREE|RULE|SAVE(?:POINT)?|SCHEMA|SECOND|SELECT|SERIAL(?:IZABLE)?|SESSION(?:_USER)?|SET(?:USER)?|SHARE|SHOW|SHUTDOWN|SIMPLE|SMALLINT|SNAPSHOT|SOME|SONAME|SQL|START(?:ING)?|STATISTICS|STATUS|STRIPED|SYSTEM_USER|TABLES?|TABLESPACE|TEMP(?:ORARY|TABLE)?|TERMINATED|TEXT(?:SIZE)?|THEN|TIME(?:STAMP)?|TINY(?:BLOB|INT|TEXT)|TOP?|TRAN(?:SACTIONS?)?|TRIGGER|TRUNCATE|TSEQUAL|TYPES?|UNBOUNDED|UNCOMMITTED|UNDEFINED|UNION|UNIQUE|UNLOCK|UNPIVOT|UNSIGNED|UPDATE(?:TEXT)?|USAGE|USE|USER|USING|VALUES?|VAR(?:BINARY|CHAR|CHARACTER|YING)|VIEW|WAITFOR|WARNINGS|WHEN|WHERE|WHILE|WITH(?: ROLLUP|IN)?|WORK|WRITE(?:TEXT)?|YEAR)\b/i,boolean:/\b(?:FALSE|NULL|TRUE)\b/i,number:/\b0x[\da-f]+\b|\b\d+(?:\.\d*)?|\B\.\d+\b/i,operator:/[-+*\/=%^~]|&&?|\|\|?|!=?|<(?:=>?|<|>)?|>[>=]?|\b(?:AND|BETWEEN|DIV|ILIKE|IN|IS|LIKE|NOT|OR|REGEXP|RLIKE|SOUNDS LIKE|XOR)\b/i,punctuation:/[;[\]()`,.]/},function(e){var t=e.languages.javascript["template-string"],n=t.pattern.source,r=t.inside.interpolation,a=r.inside["interpolation-punctuation"],o=r.pattern.source;function i(t,r){if(e.languages[t])return{pattern:RegExp("((?:"+r+")\\s*)"+n),lookbehind:!0,greedy:!0,inside:{"template-punctuation":{pattern:/^`|`$/,alias:"string"},"embedded-code":{pattern:/[\s\S]+/,alias:t}}}}function l(t,n,r){return t={code:t,grammar:n,language:r},e.hooks.run("before-tokenize",t),t.tokens=e.tokenize(t.code,t.grammar),e.hooks.run("after-tokenize",t),t.tokens}e.languages.javascript["template-string"]=[i("css",/\b(?:styled(?:\([^)]*\))?(?:\s*\.\s*\w+(?:\([^)]*\))*)*|css(?:\s*\.\s*(?:global|resolve))?|createGlobalStyle|keyframes)/.source),i("html",/\bhtml|\.\s*(?:inner|outer)HTML\s*\+?=/.source),i("svg",/\bsvg/.source),i("markdown",/\b(?:markdown|md)/.source),i("graphql",/\b(?:gql|graphql(?:\s*\.\s*experimental)?)/.source),i("sql",/\bsql/.source),t].filter(Boolean);var s={javascript:!0,js:!0,typescript:!0,ts:!0,jsx:!0,tsx:!0};e.hooks.add("after-tokenize",function(t){t.language in s&&function t(n){for(var i=0,s=n.length;i<s;i++){var u,c,d,f=n[i];"string"!=typeof f&&(Array.isArray(u=f.content)?"template-string"===f.type?(f=u[1],3===u.length&&"string"!=typeof f&&"embedded-code"===f.type&&(c=function e(t){return"string"==typeof t?t:Array.isArray(t)?t.map(e).join(""):e(t.content)}(f),f=Array.isArray(f=f.alias)?f[0]:f,d=e.languages[f])&&(u[1]=function(t,n,i){var s=e.tokenize(t,{interpolation:{pattern:RegExp(o),lookbehind:!0}}),u=0,c={},s=l(s.map(function(e){if("string"==typeof e)return e;for(var n,r,e=e.content;-1!==t.indexOf((r=u++,n="___"+i.toUpperCase()+"_"+r+"___")););return c[n]=e,n}).join(""),n,i),d=Object.keys(c);return u=0,function t(n){for(var o=0;o<n.length;o++){if(u>=d.length)return;var i,s,f,p,h,g,m,y=n[o];"string"==typeof y||"string"==typeof y.content?(i=d[u],-1!==(m=(g="string"==typeof y?y:y.content).indexOf(i))&&(++u,s=g.substring(0,m),h=c[i],f=void 0,(p={})["interpolation-punctuation"]=a,3===(p=e.tokenize(h,p)).length&&((f=[1,1]).push.apply(f,l(p[1],e.languages.javascript,"javascript")),p.splice.apply(p,f)),f=new e.Token("interpolation",p,r.alias,h),p=g.substring(m+i.length),h=[],s&&h.push(s),h.push(f),p&&(t(g=[p]),h.push.apply(h,g)),"string"==typeof y?(n.splice.apply(n,[o,1].concat(h)),o+=h.length-1):y.content=h)):Array.isArray(m=y.content)?t(m):t([m])}}(s),new e.Token(i,s,"language-"+i,t)}(c,d,f))):t(u):"string"!=typeof u&&t([u]))}}(t.tokens)})}(K),(x=K).languages.typescript=x.languages.extend("javascript",{"class-name":{pattern:/(\b(?:class|extends|implements|instanceof|interface|new|type)\s+)(?!keyof\b)(?!\s)[_$a-zA-Z\xA0-\uFFFF](?:(?!\s)[$\w\xA0-\uFFFF])*(?:\s*<(?:[^<>]|<(?:[^<>]|<[^<>]*>)*>)*>)?/,lookbehind:!0,greedy:!0,inside:null},builtin:/\b(?:Array|Function|Promise|any|boolean|console|never|number|string|symbol|unknown)\b/}),x.languages.typescript.keyword.push(/\b(?:abstract|declare|is|keyof|readonly|require)\b/,/\b(?:asserts|infer|interface|module|namespace|type)\b(?=\s*(?:[{_$a-zA-Z\xA0-\uFFFF]|$))/,/\btype\b(?=\s*(?:[\{*]|$))/),delete x.languages.typescript.parameter,delete x.languages.typescript["literal-property"],w=x.languages.extend("typescript",{}),delete w["class-name"],x.languages.typescript["class-name"].inside=w,x.languages.insertBefore("typescript","function",{decorator:{pattern:/@[$\w\xA0-\uFFFF]+/,inside:{at:{pattern:/^@/,alias:"operator"},function:/^[\s\S]+/}},"generic-function":{pattern:/#?(?!\s)[_$a-zA-Z\xA0-\uFFFF](?:(?!\s)[$\w\xA0-\uFFFF])*\s*<(?:[^<>]|<(?:[^<>]|<[^<>]*>)*>)*>(?=\s*\()/,greedy:!0,inside:{function:/^#?(?!\s)[_$a-zA-Z\xA0-\uFFFF](?:(?!\s)[$\w\xA0-\uFFFF])*/,generic:{pattern:/<[\s\S]+/,alias:"class-name",inside:w}}}}),x.languages.ts=x.languages.typescript,S=(k=K).languages.javascript,_="(@(?:arg|argument|param|property)\\s+(?:"+(E=/\{(?:[^{}]|\{(?:[^{}]|\{[^{}]*\})*\})+\}/.source)+"\\s+)?)",k.languages.jsdoc=k.languages.extend("javadoclike",{parameter:{pattern:RegExp(_+/(?:(?!\s)[$\w\xA0-\uFFFF.])+(?=\s|$)/.source),lookbehind:!0,inside:{punctuation:/\./}}}),k.languages.insertBefore("jsdoc","keyword",{"optional-parameter":{pattern:RegExp(_+/\[(?:(?!\s)[$\w\xA0-\uFFFF.])+(?:=[^[\]]+)?\](?=\s|$)/.source),lookbehind:!0,inside:{parameter:{pattern:/(^\[)[$\w\xA0-\uFFFF\.]+/,lookbehind:!0,inside:{punctuation:/\./}},code:{pattern:/(=)[\s\S]*(?=\]$)/,lookbehind:!0,inside:S,alias:"language-javascript"},punctuation:/[=[\]]/}},"class-name":[{pattern:RegExp(/(@(?:augments|class|extends|interface|memberof!?|template|this|typedef)\s+(?:<TYPE>\s+)?)[A-Z]\w*(?:\.[A-Z]\w*)*/.source.replace(/<TYPE>/g,function(){return E})),lookbehind:!0,inside:{punctuation:/\./}},{pattern:RegExp("(@[a-z]+\\s+)"+E),lookbehind:!0,inside:{string:S.string,number:S.number,boolean:S.boolean,keyword:k.languages.typescript.keyword,operator:/=>|\.\.\.|[&|?:*]/,punctuation:/[.,;=<>{}()[\]]/}}],example:{pattern:/(@example\s+(?!\s))(?:[^@\s]|\s+(?!\s))+?(?=\s*(?:\*\s*)?(?:@\w|\*\/))/,lookbehind:!0,inside:{code:{pattern:/^([\t ]*(?:\*\s*)?)\S.*$/m,lookbehind:!0,inside:S,alias:"language-javascript"}}}}),k.languages.javadoclike.addSupport("javascript",k.languages.jsdoc),(T=K).languages.flow=T.languages.extend("javascript",{}),T.languages.insertBefore("flow","keyword",{type:[{pattern:/\b(?:[Bb]oolean|Function|[Nn]umber|[Ss]tring|[Ss]ymbol|any|mixed|null|void)\b/,alias:"class-name"}]}),T.languages.flow["function-variable"].pattern=/(?!\s)[_$a-z\xA0-\uFFFF](?:(?!\s)[$\w\xA0-\uFFFF])*(?=\s*=\s*(?:function\b|(?:\([^()]*\)(?:\s*:\s*\w+)?|(?!\s)[_$a-z\xA0-\uFFFF](?:(?!\s)[$\w\xA0-\uFFFF])*)\s*=>))/i,delete T.languages.flow.parameter,T.languages.insertBefore("flow","operator",{"flow-punctuation":{pattern:/\{\||\|\}/,alias:"punctuation"}}),Array.isArray(T.languages.flow.keyword)||(T.languages.flow.keyword=[T.languages.flow.keyword]),T.languages.flow.keyword.unshift({pattern:/(^|[^$]\b)(?:Class|declare|opaque|type)\b(?!\$)/,lookbehind:!0},{pattern:/(^|[^$]\B)\$(?:Diff|Enum|Exact|Keys|ObjMap|PropertyType|Record|Shape|Subtype|Supertype|await)\b(?!\$)/,lookbehind:!0}),K.languages.n4js=K.languages.extend("javascript",{keyword:/\b(?:Array|any|boolean|break|case|catch|class|const|constructor|continue|debugger|declare|default|delete|do|else|enum|export|extends|false|finally|for|from|function|get|if|implements|import|in|instanceof|interface|let|module|new|null|number|package|private|protected|public|return|set|static|string|super|switch|this|throw|true|try|typeof|var|void|while|with|yield)\b/}),K.languages.insertBefore("n4js","constant",{annotation:{pattern:/@+\w+/,alias:"operator"}}),K.languages.n4jsd=K.languages.n4js,function(e){function t(e,t){return RegExp(e.replace(/<ID>/g,function(){return/(?!\s)[_$a-zA-Z\xA0-\uFFFF](?:(?!\s)[$\w\xA0-\uFFFF])*/.source}),t)}e.languages.insertBefore("javascript","function-variable",{"method-variable":{pattern:RegExp("(\\.\\s*)"+e.languages.javascript["function-variable"].pattern.source),lookbehind:!0,alias:["function-variable","method","function","property-access"]}}),e.languages.insertBefore("javascript","function",{method:{pattern:RegExp("(\\.\\s*)"+e.languages.javascript.function.source),lookbehind:!0,alias:["function","property-access"]}}),e.languages.insertBefore("javascript","constant",{"known-class-name":[{pattern:/\b(?:(?:Float(?:32|64)|(?:Int|Uint)(?:8|16|32)|Uint8Clamped)?Array|ArrayBuffer|BigInt|Boolean|DataView|Date|Error|Function|Intl|JSON|(?:Weak)?(?:Map|Set)|Math|Number|Object|Promise|Proxy|Reflect|RegExp|String|Symbol|WebAssembly)\b/,alias:"class-name"},{pattern:/\b(?:[A-Z]\w*)Error\b/,alias:"class-name"}]}),e.languages.insertBefore("javascript","keyword",{imports:{pattern:t(/(\bimport\b\s*)(?:<ID>(?:\s*,\s*(?:\*\s*as\s+<ID>|\{[^{}]*\}))?|\*\s*as\s+<ID>|\{[^{}]*\})(?=\s*\bfrom\b)/.source),lookbehind:!0,inside:e.languages.javascript},exports:{pattern:t(/(\bexport\b\s*)(?:\*(?:\s*as\s+<ID>)?(?=\s*\bfrom\b)|\{[^{}]*\})/.source),lookbehind:!0,inside:e.languages.javascript}}),e.languages.javascript.keyword.unshift({pattern:/\b(?:as|default|export|from|import)\b/,alias:"module"},{pattern:/\b(?:await|break|catch|continue|do|else|finally|for|if|return|switch|throw|try|while|yield)\b/,alias:"control-flow"},{pattern:/\bnull\b/,alias:["null","nil"]},{pattern:/\bundefined\b/,alias:"nil"}),e.languages.insertBefore("javascript","operator",{spread:{pattern:/\.{3}/,alias:"operator"},arrow:{pattern:/=>/,alias:"operator"}}),e.languages.insertBefore("javascript","punctuation",{"property-access":{pattern:t(/(\.\s*)#?<ID>/.source),lookbehind:!0},"maybe-class-name":{pattern:/(^|[^$\w\xA0-\uFFFF])[A-Z][$\w\xA0-\uFFFF]+/,lookbehind:!0},dom:{pattern:/\b(?:document|(?:local|session)Storage|location|navigator|performance|window)\b/,alias:"variable"},console:{pattern:/\bconsole(?=\s*\.)/,alias:"class-name"}});for(var n=["function","function-variable","method","method-variable","property-access"],r=0;r<n.length;r++){var a=n[r],o=e.languages.javascript[a],a=(o="RegExp"===e.util.type(o)?e.languages.javascript[a]={pattern:o}:o).inside||{};(o.inside=a)["maybe-class-name"]=/^[A-Z][\s\S]*/}}(K),function(e){var t=e.util.clone(e.languages.javascript),n=/(?:\s|\/\/.*(?!.)|\/\*(?:[^*]|\*(?!\/))\*\/)/.source,r=/(?:\{(?:\{(?:\{[^{}]*\}|[^{}])*\}|[^{}])*\})/.source,a=/(?:\{<S>*\.{3}(?:[^{}]|<BRACES>)*\})/.source;function o(e,t){return RegExp(e=e.replace(/<S>/g,function(){return n}).replace(/<BRACES>/g,function(){return r}).replace(/<SPREAD>/g,function(){return a}),t)}a=o(a).source,e.languages.jsx=e.languages.extend("markup",t),e.languages.jsx.tag.pattern=o(/<\/?(?:[\w.:-]+(?:<S>+(?:[\w.:$-]+(?:=(?:"(?:\\[\s\S]|[^\\"])*"|'(?:\\[\s\S]|[^\\'])*'|[^\s{'"/>=]+|<BRACES>))?|<SPREAD>))*<S>*\/?)?>/.source),e.languages.jsx.tag.inside.tag.pattern=/^<\/?[^\s>\/]*/,e.languages.jsx.tag.inside["attr-value"].pattern=/=(?!\{)(?:"(?:\\[\s\S]|[^\\"])*"|'(?:\\[\s\S]|[^\\'])*'|[^\s'">]+)/,e.languages.jsx.tag.inside.tag.inside["class-name"]=/^[A-Z]\w*(?:\.[A-Z]\w*)*$/,e.languages.jsx.tag.inside.comment=t.comment,e.languages.insertBefore("inside","attr-name",{spread:{pattern:o(/<SPREAD>/.source),inside:e.languages.jsx}},e.languages.jsx.tag),e.languages.insertBefore("inside","special-attr",{script:{pattern:o(/=<BRACES>/.source),alias:"language-javascript",inside:{"script-punctuation":{pattern:/^=(?=\{)/,alias:"punctuation"},rest:e.languages.jsx}}},e.languages.jsx.tag);var i=function(e){return e?"string"==typeof e?e:"string"==typeof e.content?e.content:e.content.map(i).join(""):""};e.hooks.add("after-tokenize",function(t){"jsx"!==t.language&&"tsx"!==t.language||function t(n){for(var r=[],a=0;a<n.length;a++){var o=n[a],l=!1;"string"!=typeof o&&("tag"===o.type&&o.content[0]&&"tag"===o.content[0].type?"</"===o.content[0].content[0].content?0<r.length&&r[r.length-1].tagName===i(o.content[0].content[1])&&r.pop():"/>"!==o.content[o.content.length-1].content&&r.push({tagName:i(o.content[0].content[1]),openedBraces:0}):0<r.length&&"punctuation"===o.type&&"{"===o.content?r[r.length-1].openedBraces++:0<r.length&&0<r[r.length-1].openedBraces&&"punctuation"===o.type&&"}"===o.content?r[r.length-1].openedBraces--:l=!0),(l||"string"==typeof o)&&0<r.length&&0===r[r.length-1].openedBraces&&(l=i(o),a<n.length-1&&("string"==typeof n[a+1]||"plain-text"===n[a+1].type)&&(l+=i(n[a+1]),n.splice(a+1,1)),0<a&&("string"==typeof n[a-1]||"plain-text"===n[a-1].type)&&(l=i(n[a-1])+l,n.splice(a-1,1),a--),n[a]=new e.Token("plain-text",l,null,l)),o.content&&"string"!=typeof o.content&&t(o.content)}}(t.tokens)})}(K),P=(C=K).util.clone(C.languages.typescript),(P=(C.languages.tsx=C.languages.extend("jsx",P),delete C.languages.tsx.parameter,delete C.languages.tsx["literal-property"],C.languages.tsx.tag)).pattern=RegExp(/(^|[^\w$]|(?=<\/))/.source+"(?:"+P.pattern.source+")",P.pattern.flags),P.lookbehind=!0,K.languages.swift={comment:{pattern:/(^|[^\\:])(?:\/\/.*|\/\*(?:[^/*]|\/(?!\*)|\*(?!\/)|\/\*(?:[^*]|\*(?!\/))*\*\/)*\*\/)/,lookbehind:!0,greedy:!0},"string-literal":[{pattern:RegExp(/(^|[^"#])/.source+"(?:"+/"(?:\\(?:\((?:[^()]|\([^()]*\))*\)|\r\n|[^(])|[^\\\r\n"])*"/.source+"|"+/"""(?:\\(?:\((?:[^()]|\([^()]*\))*\)|[^(])|[^\\"]|"(?!""))*"""/.source+")"+/(?!["#])/.source),lookbehind:!0,greedy:!0,inside:{interpolation:{pattern:/(\\\()(?:[^()]|\([^()]*\))*(?=\))/,lookbehind:!0,inside:null},"interpolation-punctuation":{pattern:/^\)|\\\($/,alias:"punctuation"},punctuation:/\\(?=[\r\n])/,string:/[\s\S]+/}},{pattern:RegExp(/(^|[^"#])(#+)/.source+"(?:"+/"(?:\\(?:#+\((?:[^()]|\([^()]*\))*\)|\r\n|[^#])|[^\\\r\n])*?"/.source+"|"+/"""(?:\\(?:#+\((?:[^()]|\([^()]*\))*\)|[^#])|[^\\])*?"""/.source+")\\2"),lookbehind:!0,greedy:!0,inside:{interpolation:{pattern:/(\\#+\()(?:[^()]|\([^()]*\))*(?=\))/,lookbehind:!0,inside:null},"interpolation-punctuation":{pattern:/^\)|\\#+\($/,alias:"punctuation"},string:/[\s\S]+/}}],directive:{pattern:RegExp(/#/.source+"(?:"+/(?:elseif|if)\b/.source+"(?:[ 	]*"+/(?:![ \t]*)?(?:\b\w+\b(?:[ \t]*\((?:[^()]|\([^()]*\))*\))?|\((?:[^()]|\([^()]*\))*\))(?:[ \t]*(?:&&|\|\|))?/.source+")+|"+/(?:else|endif)\b/.source+")"),alias:"property",inside:{"directive-name":/^#\w+/,boolean:/\b(?:false|true)\b/,number:/\b\d+(?:\.\d+)*\b/,operator:/!|&&|\|\||[<>]=?/,punctuation:/[(),]/}},literal:{pattern:/#(?:colorLiteral|column|dsohandle|file(?:ID|Literal|Path)?|function|imageLiteral|line)\b/,alias:"constant"},"other-directive":{pattern:/#\w+\b/,alias:"property"},attribute:{pattern:/@\w+/,alias:"atrule"},"function-definition":{pattern:/(\bfunc\s+)\w+/,lookbehind:!0,alias:"function"},label:{pattern:/\b(break|continue)\s+\w+|\b[a-zA-Z_]\w*(?=\s*:\s*(?:for|repeat|while)\b)/,lookbehind:!0,alias:"important"},keyword:/\b(?:Any|Protocol|Self|Type|actor|as|assignment|associatedtype|associativity|async|await|break|case|catch|class|continue|convenience|default|defer|deinit|didSet|do|dynamic|else|enum|extension|fallthrough|fileprivate|final|for|func|get|guard|higherThan|if|import|in|indirect|infix|init|inout|internal|is|isolated|lazy|left|let|lowerThan|mutating|none|nonisolated|nonmutating|open|operator|optional|override|postfix|precedencegroup|prefix|private|protocol|public|repeat|required|rethrows|return|right|safe|self|set|some|static|struct|subscript|super|switch|throw|throws|try|typealias|unowned|unsafe|var|weak|where|while|willSet)\b/,boolean:/\b(?:false|true)\b/,nil:{pattern:/\bnil\b/,alias:"constant"},"short-argument":/\$\d+\b/,omit:{pattern:/\b_\b/,alias:"keyword"},number:/\b(?:[\d_]+(?:\.[\de_]+)?|0x[a-f0-9_]+(?:\.[a-f0-9p_]+)?|0b[01_]+|0o[0-7_]+)\b/i,"class-name":/\b[A-Z](?:[A-Z_\d]*[a-z]\w*)?\b/,function:/\b[a-z_]\w*(?=\s*\()/i,constant:/\b(?:[A-Z_]{2,}|k[A-Z][A-Za-z_]+)\b/,operator:/[-+*/%=!<>&|^~?]+|\.[.\-+*/%=!<>&|^~?]+/,punctuation:/[{}[\]();,.:\\]/},K.languages.swift["string-literal"].forEach(function(e){e.inside.interpolation.inside=K.languages.swift}),(O=K).languages.kotlin=O.languages.extend("clike",{keyword:{pattern:/(^|[^.])\b(?:abstract|actual|annotation|as|break|by|catch|class|companion|const|constructor|continue|crossinline|data|do|dynamic|else|enum|expect|external|final|finally|for|fun|get|if|import|in|infix|init|inline|inner|interface|internal|is|lateinit|noinline|null|object|open|operator|out|override|package|private|protected|public|reified|return|sealed|set|super|suspend|tailrec|this|throw|to|try|typealias|val|var|vararg|when|where|while)\b/,lookbehind:!0},function:[{pattern:/(?:`[^\r\n`]+`|\b\w+)(?=\s*\()/,greedy:!0},{pattern:/(\.)(?:`[^\r\n`]+`|\w+)(?=\s*\{)/,lookbehind:!0,greedy:!0}],number:/\b(?:0[xX][\da-fA-F]+(?:_[\da-fA-F]+)*|0[bB][01]+(?:_[01]+)*|\d+(?:_\d+)*(?:\.\d+(?:_\d+)*)?(?:[eE][+-]?\d+(?:_\d+)*)?[fFL]?)\b/,operator:/\+[+=]?|-[-=>]?|==?=?|!(?:!|==?)?|[\/*%<>]=?|[?:]:?|\.\.|&&|\|\||\b(?:and|inv|or|shl|shr|ushr|xor)\b/}),delete O.languages.kotlin["class-name"],N={"interpolation-punctuation":{pattern:/^\$\{?|\}$/,alias:"punctuation"},expression:{pattern:/[\s\S]+/,inside:O.languages.kotlin}},O.languages.insertBefore("kotlin","string",{"string-literal":[{pattern:/"""(?:[^$]|\$(?:(?!\{)|\{[^{}]*\}))*?"""/,alias:"multiline",inside:{interpolation:{pattern:/\$(?:[a-z_]\w*|\{[^{}]*\})/i,inside:N},string:/[\s\S]+/}},{pattern:/"(?:[^"\\\r\n$]|\\.|\$(?:(?!\{)|\{[^{}]*\}))*"/,alias:"singleline",inside:{interpolation:{pattern:/((?:^|[^\\])(?:\\{2})*)\$(?:[a-z_]\w*|\{[^{}]*\})/i,lookbehind:!0,inside:N},string:/[\s\S]+/}}],char:{pattern:/'(?:[^'\\\r\n]|\\(?:.|u[a-fA-F0-9]{0,4}))'/,greedy:!0}}),delete O.languages.kotlin.string,O.languages.insertBefore("kotlin","keyword",{annotation:{pattern:/\B@(?:\w+:)?(?:[A-Z]\w*|\[[^\]]+\])/,alias:"builtin"}}),O.languages.insertBefore("kotlin","function",{label:{pattern:/\b\w+@|@\w+\b/,alias:"symbol"}}),O.languages.kt=O.languages.kotlin,O.languages.kts=O.languages.kotlin,K.languages.c=K.languages.extend("clike",{comment:{pattern:/\/\/(?:[^\r\n\\]|\\(?:\r\n?|\n|(?![\r\n])))*|\/\*[\s\S]*?(?:\*\/|$)/,greedy:!0},string:{pattern:/"(?:\\(?:\r\n|[\s\S])|[^"\\\r\n])*"/,greedy:!0},"class-name":{pattern:/(\b(?:enum|struct)\s+(?:__attribute__\s*\(\([\s\S]*?\)\)\s*)?)\w+|\b[a-z]\w*_t\b/,lookbehind:!0},keyword:/\b(?:_Alignas|_Alignof|_Atomic|_Bool|_Complex|_Generic|_Imaginary|_Noreturn|_Static_assert|_Thread_local|__attribute__|asm|auto|break|case|char|const|continue|default|do|double|else|enum|extern|float|for|goto|if|inline|int|long|register|return|short|signed|sizeof|static|struct|switch|typedef|typeof|union|unsigned|void|volatile|while)\b/,function:/\b[a-z_]\w*(?=\s*\()/i,number:/(?:\b0x(?:[\da-f]+(?:\.[\da-f]*)?|\.[\da-f]+)(?:p[+-]?\d+)?|(?:\b\d+(?:\.\d*)?|\B\.\d+)(?:e[+-]?\d+)?)[ful]{0,4}/i,operator:/>>=?|<<=?|->|([-+&|:])\1|[?:~]|[-+*/%&|^!=<>]=?/}),K.languages.insertBefore("c","string",{char:{pattern:/'(?:\\(?:\r\n|[\s\S])|[^'\\\r\n]){0,32}'/,greedy:!0}}),K.languages.insertBefore("c","string",{macro:{pattern:/(^[\t ]*)#\s*[a-z](?:[^\r\n\\/]|\/(?!\*)|\/\*(?:[^*]|\*(?!\/))*\*\/|\\(?:\r\n|[\s\S]))*/im,lookbehind:!0,greedy:!0,alias:"property",inside:{string:[{pattern:/^(#\s*include\s*)<[^>]+>/,lookbehind:!0},K.languages.c.string],char:K.languages.c.char,comment:K.languages.c.comment,"macro-name":[{pattern:/(^#\s*define\s+)\w+\b(?!\()/i,lookbehind:!0},{pattern:/(^#\s*define\s+)\w+\b(?=\()/i,lookbehind:!0,alias:"function"}],directive:{pattern:/^(#\s*)[a-z]+/,lookbehind:!0,alias:"keyword"},"directive-hash":/^#/,punctuation:/##|\\(?=[\r\n])/,expression:{pattern:/\S[\s\S]*/,inside:K.languages.c}}}}),K.languages.insertBefore("c","function",{constant:/\b(?:EOF|NULL|SEEK_CUR|SEEK_END|SEEK_SET|__DATE__|__FILE__|__LINE__|__TIMESTAMP__|__TIME__|__func__|stderr|stdin|stdout)\b/}),delete K.languages.c.boolean,K.languages.objectivec=K.languages.extend("c",{string:{pattern:/@?"(?:\\(?:\r\n|[\s\S])|[^"\\\r\n])*"/,greedy:!0},keyword:/\b(?:asm|auto|break|case|char|const|continue|default|do|double|else|enum|extern|float|for|goto|if|in|inline|int|long|register|return|self|short|signed|sizeof|static|struct|super|switch|typedef|typeof|union|unsigned|void|volatile|while)\b|(?:@interface|@end|@implementation|@protocol|@class|@public|@protected|@private|@property|@try|@catch|@finally|@throw|@synthesize|@dynamic|@selector)\b/,operator:/-[->]?|\+\+?|!=?|<<?=?|>>?=?|==?|&&?|\|\|?|[~^%?*\/@]/}),delete K.languages.objectivec["class-name"],K.languages.objc=K.languages.objectivec,K.languages.reason=K.languages.extend("clike",{string:{pattern:/"(?:\\(?:\r\n|[\s\S])|[^\\\r\n"])*"/,greedy:!0},"class-name":/\b[A-Z]\w*/,keyword:/\b(?:and|as|assert|begin|class|constraint|do|done|downto|else|end|exception|external|for|fun|function|functor|if|in|include|inherit|initializer|lazy|let|method|module|mutable|new|nonrec|object|of|open|or|private|rec|sig|struct|switch|then|to|try|type|val|virtual|when|while|with)\b/,operator:/\.{3}|:[:=]|\|>|->|=(?:==?|>)?|<=?|>=?|[|^?'#!~`]|[+\-*\/]\.?|\b(?:asr|land|lor|lsl|lsr|lxor|mod)\b/}),K.languages.insertBefore("reason","class-name",{char:{pattern:/'(?:\\x[\da-f]{2}|\\o[0-3][0-7][0-7]|\\\d{3}|\\.|[^'\\\r\n])'/,greedy:!0},constructor:/\b[A-Z]\w*\b(?!\s*\.)/,label:{pattern:/\b[a-z]\w*(?=::)/,alias:"symbol"}}),delete K.languages.reason.function,function(e){for(var t=/\/\*(?:[^*/]|\*(?!\/)|\/(?!\*)|<self>)*\*\//.source,n=0;n<2;n++)t=t.replace(/<self>/g,function(){return t});t=t.replace(/<self>/g,function(){return/[^\s\S]/.source}),e.languages.rust={comment:[{pattern:RegExp(/(^|[^\\])/.source+t),lookbehind:!0,greedy:!0},{pattern:/(^|[^\\:])\/\/.*/,lookbehind:!0,greedy:!0}],string:{pattern:/b?"(?:\\[\s\S]|[^\\"])*"|b?r(#*)"(?:[^"]|"(?!\1))*"\1/,greedy:!0},char:{pattern:/b?'(?:\\(?:x[0-7][\da-fA-F]|u\{(?:[\da-fA-F]_*){1,6}\}|.)|[^\\\r\n\t'])'/,greedy:!0},attribute:{pattern:/#!?\[(?:[^\[\]"]|"(?:\\[\s\S]|[^\\"])*")*\]/,greedy:!0,alias:"attr-name",inside:{string:null}},"closure-params":{pattern:/([=(,:]\s*|\bmove\s*)\|[^|]*\||\|[^|]*\|(?=\s*(?:\{|->))/,lookbehind:!0,greedy:!0,inside:{"closure-punctuation":{pattern:/^\||\|$/,alias:"punctuation"},rest:null}},"lifetime-annotation":{pattern:/'\w+/,alias:"symbol"},"fragment-specifier":{pattern:/(\$\w+:)[a-z]+/,lookbehind:!0,alias:"punctuation"},variable:/\$\w+/,"function-definition":{pattern:/(\bfn\s+)\w+/,lookbehind:!0,alias:"function"},"type-definition":{pattern:/(\b(?:enum|struct|trait|type|union)\s+)\w+/,lookbehind:!0,alias:"class-name"},"module-declaration":[{pattern:/(\b(?:crate|mod)\s+)[a-z][a-z_\d]*/,lookbehind:!0,alias:"namespace"},{pattern:/(\b(?:crate|self|super)\s*)::\s*[a-z][a-z_\d]*\b(?:\s*::(?:\s*[a-z][a-z_\d]*\s*::)*)?/,lookbehind:!0,alias:"namespace",inside:{punctuation:/::/}}],keyword:[/\b(?:Self|abstract|as|async|await|become|box|break|const|continue|crate|do|dyn|else|enum|extern|final|fn|for|if|impl|in|let|loop|macro|match|mod|move|mut|override|priv|pub|ref|return|self|static|struct|super|trait|try|type|typeof|union|unsafe|unsized|use|virtual|where|while|yield)\b/,/\b(?:bool|char|f(?:32|64)|[ui](?:8|16|32|64|128|size)|str)\b/],function:/\b[a-z_]\w*(?=\s*(?:::\s*<|\())/,macro:{pattern:/\b\w+!/,alias:"property"},constant:/\b[A-Z_][A-Z_\d]+\b/,"class-name":/\b[A-Z]\w*\b/,namespace:{pattern:/(?:\b[a-z][a-z_\d]*\s*::\s*)*\b[a-z][a-z_\d]*\s*::(?!\s*<)/,inside:{punctuation:/::/}},number:/\b(?:0x[\dA-Fa-f](?:_?[\dA-Fa-f])*|0o[0-7](?:_?[0-7])*|0b[01](?:_?[01])*|(?:(?:\d(?:_?\d)*)?\.)?\d(?:_?\d)*(?:[Ee][+-]?\d+)?)(?:_?(?:f32|f64|[iu](?:8|16|32|64|size)?))?\b/,boolean:/\b(?:false|true)\b/,punctuation:/->|\.\.=|\.{1,3}|::|[{}[\];(),:]/,operator:/[-+*\/%!^]=?|=[=>]?|&[&=]?|\|[|=]?|<<?=?|>>?=?|[@?]/},e.languages.rust["closure-params"].inside.rest=e.languages.rust,e.languages.rust.attribute.inside.string=e.languages.rust.string}(K),K.languages.go=K.languages.extend("clike",{string:{pattern:/(^|[^\\])"(?:\\.|[^"\\\r\n])*"|`[^`]*`/,lookbehind:!0,greedy:!0},keyword:/\b(?:break|case|chan|const|continue|default|defer|else|fallthrough|for|func|go(?:to)?|if|import|interface|map|package|range|return|select|struct|switch|type|var)\b/,boolean:/\b(?:_|false|iota|nil|true)\b/,number:[/\b0(?:b[01_]+|o[0-7_]+)i?\b/i,/\b0x(?:[a-f\d_]+(?:\.[a-f\d_]*)?|\.[a-f\d_]+)(?:p[+-]?\d+(?:_\d+)*)?i?(?!\w)/i,/(?:\b\d[\d_]*(?:\.[\d_]*)?|\B\.\d[\d_]*)(?:e[+-]?[\d_]+)?i?(?!\w)/i],operator:/[*\/%^!=]=?|\+[=+]?|-[=-]?|\|[=|]?|&(?:=|&|\^=?)?|>(?:>=?|=)?|<(?:<=?|=|-)?|:=|\.\.\./,builtin:/\b(?:append|bool|byte|cap|close|complex|complex(?:64|128)|copy|delete|error|float(?:32|64)|u?int(?:8|16|32|64)?|imag|len|make|new|panic|print(?:ln)?|real|recover|rune|string|uintptr)\b/}),K.languages.insertBefore("go","string",{char:{pattern:/'(?:\\.|[^'\\\r\n]){0,10}'/,greedy:!0}}),delete K.languages.go["class-name"],L=K,A=/\b(?:alignas|alignof|asm|auto|bool|break|case|catch|char|char16_t|char32_t|char8_t|class|co_await|co_return|co_yield|compl|concept|const|const_cast|consteval|constexpr|constinit|continue|decltype|default|delete|do|double|dynamic_cast|else|enum|explicit|export|extern|final|float|for|friend|goto|if|import|inline|int|int16_t|int32_t|int64_t|int8_t|long|module|mutable|namespace|new|noexcept|nullptr|operator|override|private|protected|public|register|reinterpret_cast|requires|return|short|signed|sizeof|static|static_assert|static_cast|struct|switch|template|this|thread_local|throw|try|typedef|typeid|typename|uint16_t|uint32_t|uint64_t|uint8_t|union|unsigned|using|virtual|void|volatile|wchar_t|while)\b/,I=/\b(?!<keyword>)\w+(?:\s*\.\s*\w+)*\b/.source.replace(/<keyword>/g,function(){return A.source}),L.languages.cpp=L.languages.extend("c",{"class-name":[{pattern:RegExp(/(\b(?:class|concept|enum|struct|typename)\s+)(?!<keyword>)\w+/.source.replace(/<keyword>/g,function(){return A.source})),lookbehind:!0},/\b[A-Z]\w*(?=\s*::\s*\w+\s*\()/,/\b[A-Z_]\w*(?=\s*::\s*~\w+\s*\()/i,/\b\w+(?=\s*<(?:[^<>]|<(?:[^<>]|<[^<>]*>)*>)*>\s*::\s*\w+\s*\()/],keyword:A,number:{pattern:/(?:\b0b[01']+|\b0x(?:[\da-f']+(?:\.[\da-f']*)?|\.[\da-f']+)(?:p[+-]?[\d']+)?|(?:\b[\d']+(?:\.[\d']*)?|\B\.[\d']+)(?:e[+-]?[\d']+)?)[ful]{0,4}/i,greedy:!0},operator:/>>=?|<<=?|->|--|\+\+|&&|\|\||[?:~]|<=>|[-+*/%&|^!=<>]=?|\b(?:and|and_eq|bitand|bitor|not|not_eq|or|or_eq|xor|xor_eq)\b/,boolean:/\b(?:false|true)\b/}),L.languages.insertBefore("cpp","string",{module:{pattern:RegExp(/(\b(?:import|module)\s+)/.source+"(?:"+/"(?:\\(?:\r\n|[\s\S])|[^"\\\r\n])*"|<[^<>\r\n]*>/.source+"|"+/<mod-name>(?:\s*:\s*<mod-name>)?|:\s*<mod-name>/.source.replace(/<mod-name>/g,function(){return I})+")"),lookbehind:!0,greedy:!0,inside:{string:/^[<"][\s\S]+/,operator:/:/,punctuation:/\./}},"raw-string":{pattern:/R"([^()\\ ]{0,16})\([\s\S]*?\)\1"/,alias:"string",greedy:!0}}),L.languages.insertBefore("cpp","keyword",{"generic-function":{pattern:/\b(?!operator\b)[a-z_]\w*\s*<(?:[^<>]|<[^<>]*>)*>(?=\s*\()/i,inside:{function:/^\w+/,generic:{pattern:/<[\s\S]+/,alias:"class-name",inside:L.languages.cpp}}}}),L.languages.insertBefore("cpp","operator",{"double-colon":{pattern:/::/,alias:"punctuation"}}),L.languages.insertBefore("cpp","class-name",{"base-clause":{pattern:/(\b(?:class|struct)\s+\w+\s*:\s*)[^;{}"'\s]+(?:\s+[^;{}"'\s]+)*(?=\s*[;{])/,lookbehind:!0,greedy:!0,inside:L.languages.extend("cpp",{})}}),L.languages.insertBefore("inside","double-colon",{"class-name":/\b[a-z_]\w*\b(?!\s*::)/i},L.languages.cpp["base-clause"]),K.languages.python={comment:{pattern:/(^|[^\\])#.*/,lookbehind:!0,greedy:!0},"string-interpolation":{pattern:/(?:f|fr|rf)(?:("""|''')[\s\S]*?\1|("|')(?:\\.|(?!\2)[^\\\r\n])*\2)/i,greedy:!0,inside:{interpolation:{pattern:/((?:^|[^{])(?:\{\{)*)\{(?!\{)(?:[^{}]|\{(?!\{)(?:[^{}]|\{(?!\{)(?:[^{}])+\})+\})+\}/,lookbehind:!0,inside:{"format-spec":{pattern:/(:)[^:(){}]+(?=\}$)/,lookbehind:!0},"conversion-option":{pattern:/![sra](?=[:}]$)/,alias:"punctuation"},rest:null}},string:/[\s\S]+/}},"triple-quoted-string":{pattern:/(?:[rub]|br|rb)?("""|''')[\s\S]*?\1/i,greedy:!0,alias:"string"},string:{pattern:/(?:[rub]|br|rb)?("|')(?:\\.|(?!\1)[^\\\r\n])*\1/i,greedy:!0},function:{pattern:/((?:^|\s)def[ \t]+)[a-zA-Z_]\w*(?=\s*\()/g,lookbehind:!0},"class-name":{pattern:/(\bclass\s+)\w+/i,lookbehind:!0},decorator:{pattern:/(^[\t ]*)@\w+(?:\.\w+)*/m,lookbehind:!0,alias:["annotation","punctuation"],inside:{punctuation:/\./}},keyword:/\b(?:_(?=\s*:)|and|as|assert|async|await|break|case|class|continue|def|del|elif|else|except|exec|finally|for|from|global|if|import|in|is|lambda|match|nonlocal|not|or|pass|print|raise|return|try|while|with|yield)\b/,builtin:/\b(?:__import__|abs|all|any|apply|ascii|basestring|bin|bool|buffer|bytearray|bytes|callable|chr|classmethod|cmp|coerce|compile|complex|delattr|dict|dir|divmod|enumerate|eval|execfile|file|filter|float|format|frozenset|getattr|globals|hasattr|hash|help|hex|id|input|int|intern|isinstance|issubclass|iter|len|list|locals|long|map|max|memoryview|min|next|object|oct|open|ord|pow|property|range|raw_input|reduce|reload|repr|reversed|round|set|setattr|slice|sorted|staticmethod|str|sum|super|tuple|type|unichr|unicode|vars|xrange|zip)\b/,boolean:/\b(?:False|None|True)\b/,number:/\b0(?:b(?:_?[01])+|o(?:_?[0-7])+|x(?:_?[a-f0-9])+)\b|(?:\b\d+(?:_\d+)*(?:\.(?:\d+(?:_\d+)*)?)?|\B\.\d+(?:_\d+)*)(?:e[+-]?\d+(?:_\d+)*)?j?(?!\w)/i,operator:/[-+%=]=?|!=|:=|\*\*?=?|\/\/?=?|<[<=>]?|>[=>]?|[&|^~]/,punctuation:/[{}[\];(),.:]/},K.languages.python["string-interpolation"].inside.interpolation.inside.rest=K.languages.python,K.languages.py=K.languages.python,K.languages.json={property:{pattern:/(^|[^\\])"(?:\\.|[^\\"\r\n])*"(?=\s*:)/,lookbehind:!0,greedy:!0},string:{pattern:/(^|[^\\])"(?:\\.|[^\\"\r\n])*"(?!\s*:)/,lookbehind:!0,greedy:!0},comment:{pattern:/\/\/.*|\/\*[\s\S]*?(?:\*\/|$)/,greedy:!0},number:/-?\b\d+(?:\.\d+)?(?:e[+-]?\d+)?\b/i,punctuation:/[{}[\],]/,operator:/:/,boolean:/\b(?:false|true)\b/,null:{pattern:/\bnull\b/,alias:"keyword"}},K.languages.webmanifest=K.languages.json;((e,t)=>{for(var n in t)D(e,n,{get:t[n],enumerable:!0})})({},{dracula:()=>X,duotoneDark:()=>J,duotoneLight:()=>ee,github:()=>et,gruvboxMaterialDark:()=>eT,gruvboxMaterialLight:()=>eC,jettwaveDark:()=>ek,jettwaveLight:()=>eS,nightOwl:()=>en,nightOwlLight:()=>er,oceanicNext:()=>eh,okaidia:()=>eg,oneDark:()=>eE,oneLight:()=>e_,palenight:()=>em,shadesOfPurple:()=>ey,synthwave84:()=>eb,ultramin:()=>ev,vsDark:()=>ex,vsLight:()=>ew});var X={plain:{color:"#F8F8F2",backgroundColor:"#282A36"},styles:[{types:["prolog","constant","builtin"],style:{color:"rgb(189, 147, 249)"}},{types:["inserted","function"],style:{color:"rgb(80, 250, 123)"}},{types:["deleted"],style:{color:"rgb(255, 85, 85)"}},{types:["changed"],style:{color:"rgb(255, 184, 108)"}},{types:["punctuation","symbol"],style:{color:"rgb(248, 248, 242)"}},{types:["string","char","tag","selector"],style:{color:"rgb(255, 121, 198)"}},{types:["keyword","variable"],style:{color:"rgb(189, 147, 249)",fontStyle:"italic"}},{types:["comment"],style:{color:"rgb(98, 114, 164)"}},{types:["attr-name"],style:{color:"rgb(241, 250, 140)"}}]},J={plain:{backgroundColor:"#2a2734",color:"#9a86fd"},styles:[{types:["comment","prolog","doctype","cdata","punctuation"],style:{color:"#6c6783"}},{types:["namespace"],style:{opacity:.7}},{types:["tag","operator","number"],style:{color:"#e09142"}},{types:["property","function"],style:{color:"#9a86fd"}},{types:["tag-id","selector","atrule-id"],style:{color:"#eeebff"}},{types:["attr-name"],style:{color:"#c4b9fe"}},{types:["boolean","string","entity","url","attr-value","keyword","control","directive","unit","statement","regex","atrule","placeholder","variable"],style:{color:"#ffcc99"}},{types:["deleted"],style:{textDecorationLine:"line-through"}},{types:["inserted"],style:{textDecorationLine:"underline"}},{types:["italic"],style:{fontStyle:"italic"}},{types:["important","bold"],style:{fontWeight:"bold"}},{types:["important"],style:{color:"#c4b9fe"}}]},ee={plain:{backgroundColor:"#faf8f5",color:"#728fcb"},styles:[{types:["comment","prolog","doctype","cdata","punctuation"],style:{color:"#b6ad9a"}},{types:["namespace"],style:{opacity:.7}},{types:["tag","operator","number"],style:{color:"#063289"}},{types:["property","function"],style:{color:"#b29762"}},{types:["tag-id","selector","atrule-id"],style:{color:"#2d2006"}},{types:["attr-name"],style:{color:"#896724"}},{types:["boolean","string","entity","url","attr-value","keyword","control","directive","unit","statement","regex","atrule"],style:{color:"#728fcb"}},{types:["placeholder","variable"],style:{color:"#93abdc"}},{types:["deleted"],style:{textDecorationLine:"line-through"}},{types:["inserted"],style:{textDecorationLine:"underline"}},{types:["italic"],style:{fontStyle:"italic"}},{types:["important","bold"],style:{fontWeight:"bold"}},{types:["important"],style:{color:"#896724"}}]},et={plain:{color:"#393A34",backgroundColor:"#f6f8fa"},styles:[{types:["comment","prolog","doctype","cdata"],style:{color:"#999988",fontStyle:"italic"}},{types:["namespace"],style:{opacity:.7}},{types:["string","attr-value"],style:{color:"#e3116c"}},{types:["punctuation","operator"],style:{color:"#393A34"}},{types:["entity","url","symbol","number","boolean","variable","constant","property","regex","inserted"],style:{color:"#36acaa"}},{types:["atrule","keyword","attr-name","selector"],style:{color:"#00a4db"}},{types:["function","deleted","tag"],style:{color:"#d73a49"}},{types:["function-variable"],style:{color:"#6f42c1"}},{types:["tag","selector","keyword"],style:{color:"#00009f"}}]},en={plain:{color:"#d6deeb",backgroundColor:"#011627"},styles:[{types:["changed"],style:{color:"rgb(162, 191, 252)",fontStyle:"italic"}},{types:["deleted"],style:{color:"rgba(239, 83, 80, 0.56)",fontStyle:"italic"}},{types:["inserted","attr-name"],style:{color:"rgb(173, 219, 103)",fontStyle:"italic"}},{types:["comment"],style:{color:"rgb(99, 119, 119)",fontStyle:"italic"}},{types:["string","url"],style:{color:"rgb(173, 219, 103)"}},{types:["variable"],style:{color:"rgb(214, 222, 235)"}},{types:["number"],style:{color:"rgb(247, 140, 108)"}},{types:["builtin","char","constant","function"],style:{color:"rgb(130, 170, 255)"}},{types:["punctuation"],style:{color:"rgb(199, 146, 234)"}},{types:["selector","doctype"],style:{color:"rgb(199, 146, 234)",fontStyle:"italic"}},{types:["class-name"],style:{color:"rgb(255, 203, 139)"}},{types:["tag","operator","keyword"],style:{color:"rgb(127, 219, 202)"}},{types:["boolean"],style:{color:"rgb(255, 88, 116)"}},{types:["property"],style:{color:"rgb(128, 203, 196)"}},{types:["namespace"],style:{color:"rgb(178, 204, 214)"}}]},er={plain:{color:"#403f53",backgroundColor:"#FBFBFB"},styles:[{types:["changed"],style:{color:"rgb(162, 191, 252)",fontStyle:"italic"}},{types:["deleted"],style:{color:"rgba(239, 83, 80, 0.56)",fontStyle:"italic"}},{types:["inserted","attr-name"],style:{color:"rgb(72, 118, 214)",fontStyle:"italic"}},{types:["comment"],style:{color:"rgb(152, 159, 177)",fontStyle:"italic"}},{types:["string","builtin","char","constant","url"],style:{color:"rgb(72, 118, 214)"}},{types:["variable"],style:{color:"rgb(201, 103, 101)"}},{types:["number"],style:{color:"rgb(170, 9, 130)"}},{types:["punctuation"],style:{color:"rgb(153, 76, 195)"}},{types:["function","selector","doctype"],style:{color:"rgb(153, 76, 195)",fontStyle:"italic"}},{types:["class-name"],style:{color:"rgb(17, 17, 17)"}},{types:["tag"],style:{color:"rgb(153, 76, 195)"}},{types:["operator","property","keyword","namespace"],style:{color:"rgb(12, 150, 155)"}},{types:["boolean"],style:{color:"rgb(188, 84, 84)"}}]},ea="#D8DEE9",eo="#999999",ei="#c5a5c5",el="#5a9bcf",es="#8dc891",eu="#d7deea",ec="#ff8b50",ed="#fc929e",ef="#79b6f2",ep="#FAC863",eh={plain:{backgroundColor:"#282c34",color:"#ffffff"},styles:[{types:["attr-name"],style:{color:ei}},{types:["attr-value"],style:{color:es}},{types:["comment","block-comment","prolog","doctype","cdata","shebang"],style:{color:eo}},{types:["property","number","function-name","constant","symbol","deleted"],style:{color:el}},{types:["boolean"],style:{color:ec}},{types:["tag"],style:{color:ed}},{types:["string"],style:{color:es}},{types:["punctuation"],style:{color:es}},{types:["selector","char","builtin","inserted"],style:{color:ea}},{types:["function"],style:{color:ef}},{types:["operator","entity","url","variable"],style:{color:eu}},{types:["keyword"],style:{color:ei}},{types:["atrule","class-name"],style:{color:ep}},{types:["important"],style:{fontWeight:"400"}},{types:["bold"],style:{fontWeight:"bold"}},{types:["italic"],style:{fontStyle:"italic"}},{types:["namespace"],style:{opacity:.7}}]},eg={plain:{color:"#f8f8f2",backgroundColor:"#272822"},styles:[{types:["changed"],style:{color:"rgb(162, 191, 252)",fontStyle:"italic"}},{types:["deleted"],style:{color:"#f92672",fontStyle:"italic"}},{types:["inserted"],style:{color:"rgb(173, 219, 103)",fontStyle:"italic"}},{types:["comment"],style:{color:"#8292a2",fontStyle:"italic"}},{types:["string","url"],style:{color:"#a6e22e"}},{types:["variable"],style:{color:"#f8f8f2"}},{types:["number"],style:{color:"#ae81ff"}},{types:["builtin","char","constant","function","class-name"],style:{color:"#e6db74"}},{types:["punctuation"],style:{color:"#f8f8f2"}},{types:["selector","doctype"],style:{color:"#a6e22e",fontStyle:"italic"}},{types:["tag","operator","keyword"],style:{color:"#66d9ef"}},{types:["boolean"],style:{color:"#ae81ff"}},{types:["namespace"],style:{color:"rgb(178, 204, 214)",opacity:.7}},{types:["tag","property"],style:{color:"#f92672"}},{types:["attr-name"],style:{color:"#a6e22e !important"}},{types:["doctype"],style:{color:"#8292a2"}},{types:["rule"],style:{color:"#e6db74"}}]},em={plain:{color:"#bfc7d5",backgroundColor:"#292d3e"},styles:[{types:["comment"],style:{color:"rgb(105, 112, 152)",fontStyle:"italic"}},{types:["string","inserted"],style:{color:"rgb(195, 232, 141)"}},{types:["number"],style:{color:"rgb(247, 140, 108)"}},{types:["builtin","char","constant","function"],style:{color:"rgb(130, 170, 255)"}},{types:["punctuation","selector"],style:{color:"rgb(199, 146, 234)"}},{types:["variable"],style:{color:"rgb(191, 199, 213)"}},{types:["class-name","attr-name"],style:{color:"rgb(255, 203, 107)"}},{types:["tag","deleted"],style:{color:"rgb(255, 85, 114)"}},{types:["operator"],style:{color:"rgb(137, 221, 255)"}},{types:["boolean"],style:{color:"rgb(255, 88, 116)"}},{types:["keyword"],style:{fontStyle:"italic"}},{types:["doctype"],style:{color:"rgb(199, 146, 234)",fontStyle:"italic"}},{types:["namespace"],style:{color:"rgb(178, 204, 214)"}},{types:["url"],style:{color:"rgb(221, 221, 221)"}}]},ey={plain:{color:"#9EFEFF",backgroundColor:"#2D2A55"},styles:[{types:["changed"],style:{color:"rgb(255, 238, 128)"}},{types:["deleted"],style:{color:"rgba(239, 83, 80, 0.56)"}},{types:["inserted"],style:{color:"rgb(173, 219, 103)"}},{types:["comment"],style:{color:"rgb(179, 98, 255)",fontStyle:"italic"}},{types:["punctuation"],style:{color:"rgb(255, 255, 255)"}},{types:["constant"],style:{color:"rgb(255, 98, 140)"}},{types:["string","url"],style:{color:"rgb(165, 255, 144)"}},{types:["variable"],style:{color:"rgb(255, 238, 128)"}},{types:["number","boolean"],style:{color:"rgb(255, 98, 140)"}},{types:["attr-name"],style:{color:"rgb(255, 180, 84)"}},{types:["keyword","operator","property","namespace","tag","selector","doctype"],style:{color:"rgb(255, 157, 0)"}},{types:["builtin","char","constant","function","class-name"],style:{color:"rgb(250, 208, 0)"}}]},eb={plain:{backgroundColor:"linear-gradient(to bottom, #2a2139 75%, #34294f)",backgroundImage:"#34294f",color:"#f92aad",textShadow:"0 0 2px #100c0f, 0 0 5px #dc078e33, 0 0 10px #fff3"},styles:[{types:["comment","block-comment","prolog","doctype","cdata"],style:{color:"#495495",fontStyle:"italic"}},{types:["punctuation"],style:{color:"#ccc"}},{types:["tag","attr-name","namespace","number","unit","hexcode","deleted"],style:{color:"#e2777a"}},{types:["property","selector"],style:{color:"#72f1b8",textShadow:"0 0 2px #100c0f, 0 0 10px #257c5575, 0 0 35px #21272475"}},{types:["function-name"],style:{color:"#6196cc"}},{types:["boolean","selector-id","function"],style:{color:"#fdfdfd",textShadow:"0 0 2px #001716, 0 0 3px #03edf975, 0 0 5px #03edf975, 0 0 8px #03edf975"}},{types:["class-name","maybe-class-name","builtin"],style:{color:"#fff5f6",textShadow:"0 0 2px #000, 0 0 10px #fc1f2c75, 0 0 5px #fc1f2c75, 0 0 25px #fc1f2c75"}},{types:["constant","symbol"],style:{color:"#f92aad",textShadow:"0 0 2px #100c0f, 0 0 5px #dc078e33, 0 0 10px #fff3"}},{types:["important","atrule","keyword","selector-class"],style:{color:"#f4eee4",textShadow:"0 0 2px #393a33, 0 0 8px #f39f0575, 0 0 2px #f39f0575"}},{types:["string","char","attr-value","regex","variable"],style:{color:"#f87c32"}},{types:["parameter"],style:{fontStyle:"italic"}},{types:["entity","url"],style:{color:"#67cdcc"}},{types:["operator"],style:{color:"ffffffee"}},{types:["important","bold"],style:{fontWeight:"bold"}},{types:["italic"],style:{fontStyle:"italic"}},{types:["entity"],style:{cursor:"help"}},{types:["inserted"],style:{color:"green"}}]},ev={plain:{color:"#282a2e",backgroundColor:"#ffffff"},styles:[{types:["comment"],style:{color:"rgb(197, 200, 198)"}},{types:["string","number","builtin","variable"],style:{color:"rgb(150, 152, 150)"}},{types:["class-name","function","tag","attr-name"],style:{color:"rgb(40, 42, 46)"}}]},ex={plain:{color:"#9CDCFE",backgroundColor:"#1E1E1E"},styles:[{types:["prolog"],style:{color:"rgb(0, 0, 128)"}},{types:["comment"],style:{color:"rgb(106, 153, 85)"}},{types:["builtin","changed","keyword","interpolation-punctuation"],style:{color:"rgb(86, 156, 214)"}},{types:["number","inserted"],style:{color:"rgb(181, 206, 168)"}},{types:["constant"],style:{color:"rgb(100, 102, 149)"}},{types:["attr-name","variable"],style:{color:"rgb(156, 220, 254)"}},{types:["deleted","string","attr-value","template-punctuation"],style:{color:"rgb(206, 145, 120)"}},{types:["selector"],style:{color:"rgb(215, 186, 125)"}},{types:["tag"],style:{color:"rgb(78, 201, 176)"}},{types:["tag"],languages:["markup"],style:{color:"rgb(86, 156, 214)"}},{types:["punctuation","operator"],style:{color:"rgb(212, 212, 212)"}},{types:["punctuation"],languages:["markup"],style:{color:"#808080"}},{types:["function"],style:{color:"rgb(220, 220, 170)"}},{types:["class-name"],style:{color:"rgb(78, 201, 176)"}},{types:["char"],style:{color:"rgb(209, 105, 105)"}}]},ew={plain:{color:"#000000",backgroundColor:"#ffffff"},styles:[{types:["comment"],style:{color:"rgb(0, 128, 0)"}},{types:["builtin"],style:{color:"rgb(0, 112, 193)"}},{types:["number","variable","inserted"],style:{color:"rgb(9, 134, 88)"}},{types:["operator"],style:{color:"rgb(0, 0, 0)"}},{types:["constant","char"],style:{color:"rgb(129, 31, 63)"}},{types:["tag"],style:{color:"rgb(128, 0, 0)"}},{types:["attr-name"],style:{color:"rgb(255, 0, 0)"}},{types:["deleted","string"],style:{color:"rgb(163, 21, 21)"}},{types:["changed","punctuation"],style:{color:"rgb(4, 81, 165)"}},{types:["function","keyword"],style:{color:"rgb(0, 0, 255)"}},{types:["class-name"],style:{color:"rgb(38, 127, 153)"}}]},ek={plain:{color:"#f8fafc",backgroundColor:"#011627"},styles:[{types:["prolog"],style:{color:"#000080"}},{types:["comment"],style:{color:"#6A9955"}},{types:["builtin","changed","keyword","interpolation-punctuation"],style:{color:"#569CD6"}},{types:["number","inserted"],style:{color:"#B5CEA8"}},{types:["constant"],style:{color:"#f8fafc"}},{types:["attr-name","variable"],style:{color:"#9CDCFE"}},{types:["deleted","string","attr-value","template-punctuation"],style:{color:"#cbd5e1"}},{types:["selector"],style:{color:"#D7BA7D"}},{types:["tag"],style:{color:"#0ea5e9"}},{types:["tag"],languages:["markup"],style:{color:"#0ea5e9"}},{types:["punctuation","operator"],style:{color:"#D4D4D4"}},{types:["punctuation"],languages:["markup"],style:{color:"#808080"}},{types:["function"],style:{color:"#7dd3fc"}},{types:["class-name"],style:{color:"#0ea5e9"}},{types:["char"],style:{color:"#D16969"}}]},eS={plain:{color:"#0f172a",backgroundColor:"#f1f5f9"},styles:[{types:["prolog"],style:{color:"#000080"}},{types:["comment"],style:{color:"#6A9955"}},{types:["builtin","changed","keyword","interpolation-punctuation"],style:{color:"#0c4a6e"}},{types:["number","inserted"],style:{color:"#B5CEA8"}},{types:["constant"],style:{color:"#0f172a"}},{types:["attr-name","variable"],style:{color:"#0c4a6e"}},{types:["deleted","string","attr-value","template-punctuation"],style:{color:"#64748b"}},{types:["selector"],style:{color:"#D7BA7D"}},{types:["tag"],style:{color:"#0ea5e9"}},{types:["tag"],languages:["markup"],style:{color:"#0ea5e9"}},{types:["punctuation","operator"],style:{color:"#475569"}},{types:["punctuation"],languages:["markup"],style:{color:"#808080"}},{types:["function"],style:{color:"#0e7490"}},{types:["class-name"],style:{color:"#0ea5e9"}},{types:["char"],style:{color:"#D16969"}}]},eE={plain:{backgroundColor:"hsl(220, 13%, 18%)",color:"hsl(220, 14%, 71%)",textShadow:"0 1px rgba(0, 0, 0, 0.3)"},styles:[{types:["comment","prolog","cdata"],style:{color:"hsl(220, 10%, 40%)"}},{types:["doctype","punctuation","entity"],style:{color:"hsl(220, 14%, 71%)"}},{types:["attr-name","class-name","maybe-class-name","boolean","constant","number","atrule"],style:{color:"hsl(29, 54%, 61%)"}},{types:["keyword"],style:{color:"hsl(286, 60%, 67%)"}},{types:["property","tag","symbol","deleted","important"],style:{color:"hsl(355, 65%, 65%)"}},{types:["selector","string","char","builtin","inserted","regex","attr-value"],style:{color:"hsl(95, 38%, 62%)"}},{types:["variable","operator","function"],style:{color:"hsl(207, 82%, 66%)"}},{types:["url"],style:{color:"hsl(187, 47%, 55%)"}},{types:["deleted"],style:{textDecorationLine:"line-through"}},{types:["inserted"],style:{textDecorationLine:"underline"}},{types:["italic"],style:{fontStyle:"italic"}},{types:["important","bold"],style:{fontWeight:"bold"}},{types:["important"],style:{color:"hsl(220, 14%, 71%)"}}]},e_={plain:{backgroundColor:"hsl(230, 1%, 98%)",color:"hsl(230, 8%, 24%)"},styles:[{types:["comment","prolog","cdata"],style:{color:"hsl(230, 4%, 64%)"}},{types:["doctype","punctuation","entity"],style:{color:"hsl(230, 8%, 24%)"}},{types:["attr-name","class-name","boolean","constant","number","atrule"],style:{color:"hsl(35, 99%, 36%)"}},{types:["keyword"],style:{color:"hsl(301, 63%, 40%)"}},{types:["property","tag","symbol","deleted","important"],style:{color:"hsl(5, 74%, 59%)"}},{types:["selector","string","char","builtin","inserted","regex","attr-value","punctuation"],style:{color:"hsl(119, 34%, 47%)"}},{types:["variable","operator","function"],style:{color:"hsl(221, 87%, 60%)"}},{types:["url"],style:{color:"hsl(198, 99%, 37%)"}},{types:["deleted"],style:{textDecorationLine:"line-through"}},{types:["inserted"],style:{textDecorationLine:"underline"}},{types:["italic"],style:{fontStyle:"italic"}},{types:["important","bold"],style:{fontWeight:"bold"}},{types:["important"],style:{color:"hsl(230, 8%, 24%)"}}]},eT={plain:{color:"#ebdbb2",backgroundColor:"#292828"},styles:[{types:["imports","class-name","maybe-class-name","constant","doctype","builtin","function"],style:{color:"#d8a657"}},{types:["property-access"],style:{color:"#7daea3"}},{types:["tag"],style:{color:"#e78a4e"}},{types:["attr-name","char","url","regex"],style:{color:"#a9b665"}},{types:["attr-value","string"],style:{color:"#89b482"}},{types:["comment","prolog","cdata","operator","inserted"],style:{color:"#a89984"}},{types:["delimiter","boolean","keyword","selector","important","atrule","property","variable","deleted"],style:{color:"#ea6962"}},{types:["entity","number","symbol"],style:{color:"#d3869b"}}]},eC={plain:{color:"#654735",backgroundColor:"#f9f5d7"},styles:[{types:["delimiter","boolean","keyword","selector","important","atrule","property","variable","deleted"],style:{color:"#af2528"}},{types:["imports","class-name","maybe-class-name","constant","doctype","builtin"],style:{color:"#b4730e"}},{types:["string","attr-value"],style:{color:"#477a5b"}},{types:["property-access"],style:{color:"#266b79"}},{types:["function","attr-name","char","url"],style:{color:"#72761e"}},{types:["tag"],style:{color:"#b94c07"}},{types:["comment","prolog","cdata","operator","inserted"],style:{color:"#a89984"}},{types:["entity","number","symbol"],style:{color:"#924f79"}}]},eP=(e,t)=>{let{plain:n}=e,r=e.styles.reduce((e,n)=>{let{languages:r,style:a}=n;return r&&!r.includes(t)?e:(n.types.forEach(t=>{let n=V(V({},e[t]),a);e[t]=n}),e)},{});return r.root=n,r.plain=G(V({},n),{backgroundColor:void 0}),r},eO=(e,t)=>{let[n,r]=(0,R.useState)(eP(t,e)),a=(0,R.useRef)(),o=(0,R.useRef)();return(0,R.useEffect)(()=>{(t!==a.current||e!==o.current)&&(a.current=t,o.current=e,r(eP(t,e)))},[e,t]),n},eN=e=>(0,R.useCallback)(t=>{var{className:n,style:r,line:a}=t;let o=G(V({},q(t,["className","style","line"])),{className:(0,j.Z)("token-line",n)});return"object"==typeof e&&"plain"in e&&(o.style=e.plain),"object"==typeof r&&(o.style=V(V({},o.style||{}),r)),o},[e]),eL=e=>{let t=(0,R.useCallback)(({types:t,empty:n})=>{if(null!=e){if(1===t.length&&"plain"===t[0])return null!=n?{display:"inline-block"}:void 0;if(1===t.length&&null!=n)return e[t[0]];return Object.assign(null!=n?{display:"inline-block"}:{},...t.map(t=>e[t]))}},[e]);return(0,R.useCallback)(e=>{var{token:n,className:r,style:a}=e;let o=G(V({},q(e,["token","className","style"])),{className:(0,j.Z)("token",...n.types,r),children:n.content,style:t(n)});return null!=a&&(o.style=V(V({},o.style||{}),a)),o},[t])},eA=/\r\n|\r|\n/,eI=e=>{0===e.length?e.push({types:["plain"],content:"\n",empty:!0}):1===e.length&&""===e[0].content&&(e[0].content="\n",e[0].empty=!0)},eR=(e,t)=>{let n=e.length;return n>0&&e[n-1]===t?e:e.concat(t)},ej=e=>{let t=[[]],n=[e],r=[0],a=[e.length],o=0,i=0,l=[],s=[l];for(;i>-1;){for(;(o=r[i]++)<a[i];){let e;let u=t[i],c=n[i][o];if("string"==typeof c?(u=i>0?u:["plain"],e=c):(u=eR(u,c.type),c.alias&&(u=eR(u,c.alias)),e=c.content),"string"!=typeof e){i++,t.push(u),n.push(e),r.push(0),a.push(e.length);continue}let d=e.split(eA),f=d.length;l.push({types:u,content:d[0]});for(let e=1;e<f;e++)eI(l),s.push(l=[]),l.push({types:u,content:d[e]})}i--,t.pop(),n.pop(),r.pop(),a.pop()}return eI(l),s},eF=({prism:e,code:t,grammar:n,language:r})=>{let a=(0,R.useRef)(e);return(0,R.useMemo)(()=>{if(null==n)return ej([t]);let e={code:t,grammar:n,language:r,tokens:[]};return a.current.hooks.run("before-tokenize",e),e.tokens=a.current.tokenize(t,n),a.current.hooks.run("after-tokenize",e),ej(e.tokens)},[t,n,r])},eD=({children:e,language:t,code:n,theme:r,prism:a})=>{let o=t.toLowerCase(),i=eO(o,r),l=eN(i),s=eL(i),u=a.languages[o];return e({tokens:eF({prism:a,language:o,code:n,grammar:u}),className:`prism-code language-${o}`,style:null!=i?i.root:{},getLineProps:l,getTokenProps:s})},eM=e=>(0,R.createElement)(eD,G(V({},e),{prism:e.prism||K,theme:e.theme||ex,code:e.code,language:e.language}))},1835:function(e,t,n){"use strict";n.d(t,{Z:function(){return a}});var r="Invariant failed";function a(e,t){var n;if(!e)throw Error(r)}},8395:function(e,t,n){"use strict";n.r(t),n.d(t,{__addDisposableResource:function(){return j},__assign:function(){return o},__asyncDelegator:function(){return _},__asyncGenerator:function(){return E},__asyncValues:function(){return T},__await:function(){return S},__awaiter:function(){return h},__classPrivateFieldGet:function(){return A},__classPrivateFieldIn:function(){return R},__classPrivateFieldSet:function(){return I},__createBinding:function(){return m},__decorate:function(){return l},__disposeResources:function(){return D},__esDecorate:function(){return u},__exportStar:function(){return y},__extends:function(){return a},__generator:function(){return g},__importDefault:function(){return L},__importStar:function(){return N},__makeTemplateObject:function(){return C},__metadata:function(){return p},__param:function(){return s},__propKey:function(){return d},__read:function(){return v},__rest:function(){return i},__rewriteRelativeImportExtension:function(){return M},__runInitializers:function(){return c},__setFunctionName:function(){return f},__spread:function(){return x},__spreadArray:function(){return k},__spreadArrays:function(){return w},__values:function(){return b},default:function(){return z}});var r=function(e,t){return(r=Object.setPrototypeOf||({__proto__:[]})instanceof Array&&function(e,t){e.__proto__=t}||function(e,t){for(var n in t)Object.prototype.hasOwnProperty.call(t,n)&&(e[n]=t[n])})(e,t)};function a(e,t){if("function"!=typeof t&&null!==t)throw TypeError("Class extends value "+String(t)+" is not a constructor or null");function n(){this.constructor=e}r(e,t),e.prototype=null===t?Object.create(t):(n.prototype=t.prototype,new n)}var o=function(){return(o=Object.assign||function(e){for(var t,n=1,r=arguments.length;n<r;n++)for(var a in t=arguments[n],t)Object.prototype.hasOwnProperty.call(t,a)&&(e[a]=t[a]);return e}).apply(this,arguments)};function i(e,t){var n={};for(var r in e)Object.prototype.hasOwnProperty.call(e,r)&&0>t.indexOf(r)&&(n[r]=e[r]);if(null!=e&&"function"==typeof Object.getOwnPropertySymbols)for(var a=0,r=Object.getOwnPropertySymbols(e);a<r.length;a++)0>t.indexOf(r[a])&&Object.prototype.propertyIsEnumerable.call(e,r[a])&&(n[r[a]]=e[r[a]]);return n}function l(e,t,n,r){var a,o=arguments.length,i=o<3?t:null===r?r=Object.getOwnPropertyDescriptor(t,n):r;if("object"==typeof Reflect&&"function"==typeof Reflect.decorate)i=Reflect.decorate(e,t,n,r);else for(var l=e.length-1;l>=0;l--)(a=e[l])&&(i=(o<3?a(i):o>3?a(t,n,i):a(t,n))||i);return o>3&&i&&Object.defineProperty(t,n,i),i}function s(e,t){return function(n,r){t(n,r,e)}}function u(e,t,n,r,a,o){function i(e){if(void 0!==e&&"function"!=typeof e)throw TypeError("Function expected");return e}for(var l=r.kind,s="getter"===l?"get":"setter"===l?"set":"value",u=!t&&e?r.static?e:e.prototype:null,c=t||(u?Object.getOwnPropertyDescriptor(u,r.name):{}),d,f=!1,p=n.length-1;p>=0;p--){var h={};for(var g in r)h[g]="access"===g?{}:r[g];for(var g in r.access)h.access[g]=r.access[g];h.addInitializer=function(e){if(f)throw TypeError("Cannot add initializers after decoration has completed");o.push(i(e||null))};var m=(0,n[p])("accessor"===l?{get:c.get,set:c.set}:c[s],h);if("accessor"===l){if(void 0===m)continue;if(null===m||"object"!=typeof m)throw TypeError("Object expected");(d=i(m.get))&&(c.get=d),(d=i(m.set))&&(c.set=d),(d=i(m.init))&&a.unshift(d)}else(d=i(m))&&("field"===l?a.unshift(d):c[s]=d)}u&&Object.defineProperty(u,r.name,c),f=!0}function c(e,t,n){for(var r=arguments.length>2,a=0;a<t.length;a++)n=r?t[a].call(e,n):t[a].call(e);return r?n:void 0}function d(e){return"symbol"==typeof e?e:"".concat(e)}function f(e,t,n){return"symbol"==typeof t&&(t=t.description?"[".concat(t.description,"]"):""),Object.defineProperty(e,"name",{configurable:!0,value:n?"".concat(n," ",t):t})}function p(e,t){if("object"==typeof Reflect&&"function"==typeof Reflect.metadata)return Reflect.metadata(e,t)}function h(e,t,n,r){return new(n||(n=Promise))(function(a,o){function i(e){try{s(r.next(e))}catch(e){o(e)}}function l(e){try{s(r.throw(e))}catch(e){o(e)}}function s(e){var t;e.done?a(e.value):((t=e.value)instanceof n?t:new n(function(e){e(t)})).then(i,l)}s((r=r.apply(e,t||[])).next())})}function g(e,t){var n,r,a,o={label:0,sent:function(){if(1&a[0])throw a[1];return a[1]},trys:[],ops:[]},i=Object.create(("function"==typeof Iterator?Iterator:Object).prototype);return i.next=l(0),i.throw=l(1),i.return=l(2),"function"==typeof Symbol&&(i[Symbol.iterator]=function(){return this}),i;function l(l){return function(s){return function(l){if(n)throw TypeError("Generator is already executing.");for(;i&&(i=0,l[0]&&(o=0)),o;)try{if(n=1,r&&(a=2&l[0]?r.return:l[0]?r.throw||((a=r.return)&&a.call(r),0):r.next)&&!(a=a.call(r,l[1])).done)return a;switch(r=0,a&&(l=[2&l[0],a.value]),l[0]){case 0:case 1:a=l;break;case 4:return o.label++,{value:l[1],done:!1};case 5:o.label++,r=l[1],l=[0];continue;case 7:l=o.ops.pop(),o.trys.pop();continue;default:if(!(a=(a=o.trys).length>0&&a[a.length-1])&&(6===l[0]||2===l[0])){o=0;continue}if(3===l[0]&&(!a||l[1]>a[0]&&l[1]<a[3])){o.label=l[1];break}if(6===l[0]&&o.label<a[1]){o.label=a[1],a=l;break}if(a&&o.label<a[2]){o.label=a[2],o.ops.push(l);break}a[2]&&o.ops.pop(),o.trys.pop();continue}l=t.call(e,o)}catch(e){l=[6,e],r=0}finally{n=a=0}if(5&l[0])throw l[1];return{value:l[0]?l[1]:void 0,done:!0}}([l,s])}}}var m=Object.create?function(e,t,n,r){void 0===r&&(r=n);var a=Object.getOwnPropertyDescriptor(t,n);(!a||("get"in a?!t.__esModule:a.writable||a.configurable))&&(a={enumerable:!0,get:function(){return t[n]}}),Object.defineProperty(e,r,a)}:function(e,t,n,r){void 0===r&&(r=n),e[r]=t[n]};function y(e,t){for(var n in e)"default"!==n&&!Object.prototype.hasOwnProperty.call(t,n)&&m(t,e,n)}function b(e){var t="function"==typeof Symbol&&Symbol.iterator,n=t&&e[t],r=0;if(n)return n.call(e);if(e&&"number"==typeof e.length)return{next:function(){return e&&r>=e.length&&(e=void 0),{value:e&&e[r++],done:!e}}};throw TypeError(t?"Object is not iterable.":"Symbol.iterator is not defined.")}function v(e,t){var n="function"==typeof Symbol&&e[Symbol.iterator];if(!n)return e;var r,a,o=n.call(e),i=[];try{for(;(void 0===t||t-- >0)&&!(r=o.next()).done;)i.push(r.value)}catch(e){a={error:e}}finally{try{r&&!r.done&&(n=o.return)&&n.call(o)}finally{if(a)throw a.error}}return i}function x(){for(var e=[],t=0;t<arguments.length;t++)e=e.concat(v(arguments[t]));return e}function w(){for(var e=0,t=0,n=arguments.length;t<n;t++)e+=arguments[t].length;for(var r=Array(e),a=0,t=0;t<n;t++)for(var o=arguments[t],i=0,l=o.length;i<l;i++,a++)r[a]=o[i];return r}function k(e,t,n){if(n||2==arguments.length)for(var r,a=0,o=t.length;a<o;a++)(r||!(a in t))&&(!r&&(r=Array.prototype.slice.call(t,0,a)),r[a]=t[a]);return e.concat(r||Array.prototype.slice.call(t))}function S(e){return this instanceof S?(this.v=e,this):new S(e)}function E(e,t,n){if(!Symbol.asyncIterator)throw TypeError("Symbol.asyncIterator is not defined.");var r,a=n.apply(e,t||[]),o=[];return r=Object.create(("function"==typeof AsyncIterator?AsyncIterator:Object).prototype),i("next"),i("throw"),i("return",function(e){return function(t){return Promise.resolve(t).then(e,u)}}),r[Symbol.asyncIterator]=function(){return this},r;function i(e,t){a[e]&&(r[e]=function(t){return new Promise(function(n,r){o.push([e,t,n,r])>1||l(e,t)})},t&&(r[e]=t(r[e])))}function l(e,t){try{(function(e){e.value instanceof S?Promise.resolve(e.value.v).then(s,u):c(o[0][2],e)})(a[e](t))}catch(e){c(o[0][3],e)}}function s(e){l("next",e)}function u(e){l("throw",e)}function c(e,t){e(t),o.shift(),o.length&&l(o[0][0],o[0][1])}}function _(e){var t,n;return t={},r("next"),r("throw",function(e){throw e}),r("return"),t[Symbol.iterator]=function(){return this},t;function r(r,a){t[r]=e[r]?function(t){return(n=!n)?{value:S(e[r](t)),done:!1}:a?a(t):t}:a}}function T(e){if(!Symbol.asyncIterator)throw TypeError("Symbol.asyncIterator is not defined.");var t,n=e[Symbol.asyncIterator];return n?n.call(e):(e=b(e),t={},r("next"),r("throw"),r("return"),t[Symbol.asyncIterator]=function(){return this},t);function r(n){t[n]=e[n]&&function(t){return new Promise(function(r,a){(function(e,t,n,r){Promise.resolve(r).then(function(t){e({value:t,done:n})},t)})(r,a,(t=e[n](t)).done,t.value)})}}}function C(e,t){return Object.defineProperty?Object.defineProperty(e,"raw",{value:t}):e.raw=t,e}var P=Object.create?function(e,t){Object.defineProperty(e,"default",{enumerable:!0,value:t})}:function(e,t){e.default=t},O=function(e){return(O=Object.getOwnPropertyNames||function(e){var t=[];for(var n in e)Object.prototype.hasOwnProperty.call(e,n)&&(t[t.length]=n);return t})(e)};function N(e){if(e&&e.__esModule)return e;var t={};if(null!=e)for(var n=O(e),r=0;r<n.length;r++)"default"!==n[r]&&m(t,e,n[r]);return P(t,e),t}function L(e){return e&&e.__esModule?e:{default:e}}function A(e,t,n,r){if("a"===n&&!r)throw TypeError("Private accessor was defined without a getter");if("function"==typeof t?e!==t||!r:!t.has(e))throw TypeError("Cannot read private member from an object whose class did not declare it");return"m"===n?r:"a"===n?r.call(e):r?r.value:t.get(e)}function I(e,t,n,r,a){if("m"===r)throw TypeError("Private method is not writable");if("a"===r&&!a)throw TypeError("Private accessor was defined without a setter");if("function"==typeof t?e!==t||!a:!t.has(e))throw TypeError("Cannot write private member to an object whose class did not declare it");return"a"===r?a.call(e,n):a?a.value=n:t.set(e,n),n}function R(e,t){if(null===t||"object"!=typeof t&&"function"!=typeof t)throw TypeError("Cannot use 'in' operator on non-object");return"function"==typeof e?t===e:e.has(t)}function j(e,t,n){if(null!=t){var r,a;if("object"!=typeof t&&"function"!=typeof t)throw TypeError("Object expected.");if(n){if(!Symbol.asyncDispose)throw TypeError("Symbol.asyncDispose is not defined.");r=t[Symbol.asyncDispose]}if(void 0===r){if(!Symbol.dispose)throw TypeError("Symbol.dispose is not defined.");r=t[Symbol.dispose],n&&(a=r)}if("function"!=typeof r)throw TypeError("Object not disposable.");a&&(r=function(){try{a.call(this)}catch(e){return Promise.reject(e)}}),e.stack.push({value:t,dispose:r,async:n})}else n&&e.stack.push({async:!0});return t}var F="function"==typeof SuppressedError?SuppressedError:function(e,t,n){var r=Error(n);return r.name="SuppressedError",r.error=e,r.suppressed=t,r};function D(e){function t(t){e.error=e.hasError?new F(t,e.error,"An error was suppressed during disposal."):t,e.hasError=!0}var n,r=0;return function a(){for(;n=e.stack.pop();)try{if(!n.async&&1===r)return r=0,e.stack.push(n),Promise.resolve().then(a);if(n.dispose){var o=n.dispose.call(n.value);if(n.async)return r|=2,Promise.resolve(o).then(a,function(e){return t(e),a()})}else r|=1}catch(e){t(e)}if(1===r)return e.hasError?Promise.reject(e.error):Promise.resolve();if(e.hasError)throw e.error}()}function M(e,t){return"string"==typeof e&&/^\.\.?\//.test(e)?e.replace(/\.(tsx)$|((?:\.d)?)((?:\.[^./]+?)?)\.([cm]?)ts$/i,function(e,n,r,a,o){return n?t?".jsx":".js":!r||a&&o?r+a+"."+o.toLowerCase()+"js":e}):e}let z={__extends:a,__assign:o,__rest:i,__decorate:l,__param:s,__esDecorate:u,__runInitializers:c,__propKey:d,__setFunctionName:f,__metadata:p,__awaiter:h,__generator:g,__createBinding:m,__exportStar:y,__values:b,__read:v,__spread:x,__spreadArrays:w,__spreadArray:k,__await:S,__asyncGenerator:E,__asyncDelegator:_,__asyncValues:T,__makeTemplateObject:C,__importStar:N,__importDefault:L,__classPrivateFieldGet:A,__classPrivateFieldSet:I,__classPrivateFieldIn:R,__addDisposableResource:j,__disposeResources:D,__rewriteRelativeImportExtension:M}},2627:function(e){"use strict";e.exports={}},7138:function(e){"use strict";e.exports=JSON.parse('{"/fortran/search-397":{"__comp":"1a4e3797","__context":{"plugin":"138e0e15"}},"/fortran/-d4e":{"__comp":"5e95c892","__context":{"plugin":"aba21aa0"}},"/fortran/-91f":{"__comp":"a7bd4aaa","__props":"59d59f3e"},"/fortran/-b55":{"__comp":"a94703ab"},"/fortran/abs-path-a28":{"__comp":"17896441","content":"f7a8d7e4"},"/fortran/arg-parsing-92b":{"__comp":"17896441","content":"f7cc7224"},"/fortran/array-e55":{"__comp":"17896441","content":"db3cc5ec"},"/fortran/basics-a02":{"__comp":"17896441","content":"dfb2590f"},"/fortran/blas-c79":{"__comp":"17896441","content":"7cc2b576"},"/fortran/category/coding-practice-69e":{"__comp":"14eb3368","__props":"10e376e2"},"/fortran/coarray-15b":{"__comp":"17896441","content":"7c7ecee8"},"/fortran/complex-303":{"__comp":"17896441","content":"6d493ad8"},"/fortran/control-77b":{"__comp":"17896441","content":"6cf698e2"},"/fortran/exec-command-a7e":{"__comp":"17896441","content":"b9589125"},"/fortran/file-492":{"__comp":"17896441","content":"1c39b14f"},"/fortran/haversine-135":{"__comp":"17896441","content":"0b49818d"},"/fortran/hypotenuse-723":{"__comp":"17896441","content":"f8ccda63"},"/fortran/inner-product-ded":{"__comp":"17896441","content":"13f533b7"},"/fortran/integration-ce0":{"__comp":"17896441","content":"858ebe90"},"/fortran/license-dcb":{"__comp":"17896441","content":"ac5280f2"},"/fortran/loop-bd1":{"__comp":"17896441","content":"37e61803"},"/fortran/modules-693":{"__comp":"17896441","content":"d1eb9fd4"},"/fortran/monte-carlo-integration-f13":{"__comp":"17896441","content":"6386618c"},"/fortran/monte-carlo-pi-244":{"__comp":"17896441","content":"fefe6209"},"/fortran/mpi-225":{"__comp":"17896441","content":"d9067e83"},"/fortran/pointer-796":{"__comp":"17896441","content":"53ac9137"},"/fortran/procedures-636":{"__comp":"17896441","content":"af036c34"},"/fortran/recursion-919":{"__comp":"17896441","content":"41a4ba7f"},"/fortran/resources-643":{"__comp":"17896441","content":"d92a3c43"},"/fortran/swap-780":{"__comp":"17896441","content":"d98862a9"},"/fortran/time-b2a":{"__comp":"17896441","content":"31c8d1c8"},"/fortran/types-187":{"__comp":"17896441","content":"d19ccb42"},"/fortran/-89e":{"__comp":"17896441","content":"3847b3ea"}}')}},function(e){e.O(0,["212"],function(){return e(e.s="2465")}),e.O()}]);
\ No newline at end of file
diff --git a/assets/js/runtime~main.866c090c.js b/assets/js/runtime~main.667e3c0f.js
similarity index 63%
rename from assets/js/runtime~main.866c090c.js
rename to assets/js/runtime~main.667e3c0f.js
index 3ef37ab..de7779a 100644
--- a/assets/js/runtime~main.866c090c.js
+++ b/assets/js/runtime~main.667e3c0f.js
@@ -1 +1 @@
-(()=>{"use strict";var e,t,r,n,c,o,a,f,d={},u={};function i(e){var t=u[e];if(void 0!==t)return t.exports;var r=u[e]={id:e,loaded:!1,exports:{}};return d[e].call(r.exports,r,r.exports,i),r.loaded=!0,r.exports}i.m=d,i.n=function(e){var t=e&&e.__esModule?function(){return e.default}:function(){return e};return i.d(t,{a:t}),t},t=Object.getPrototypeOf?function(e){return Object.getPrototypeOf(e)}:function(e){return e.__proto__},i.t=function(r,n){if(1&n&&(r=this(r)),8&n||"object"==typeof r&&r&&(4&n&&r.__esModule||16&n&&"function"==typeof r.then))return r;var c=Object.create(null);i.r(c);var o={};e=e||[null,t({}),t([]),t(t)];for(var a=2&n&&r;"object"==typeof a&&!~e.indexOf(a);a=t(a))Object.getOwnPropertyNames(a).forEach(function(e){o[e]=function(){return r[e]}});return o.default=function(){return r},i.d(c,o),c},i.d=function(e,t){for(var r in t)i.o(t,r)&&!i.o(e,r)&&Object.defineProperty(e,r,{enumerable:!0,get:t[r]})},i.f={},i.e=function(e){return Promise.all(Object.keys(i.f).reduce(function(t,r){return i.f[r](e,t),t},[]))},i.hmd=function(e){return!(e=Object.create(e)).children&&(e.children=[]),Object.defineProperty(e,"exports",{enumerable:!0,set:function(){throw Error("ES Modules may not assign module.exports or exports.*, Use ESM export syntax, instead: "+e.id)}}),e},i.u=function(e){return"assets/js/"+(({112:"aba21aa0",118:"fefe6209",141:"db3cc5ec",151:"138e0e15",16:"common",165:"b9589125",199:"59d59f3e",211:"a7bd4aaa",230:"1a4e3797",284:"f8ccda63",321:"858ebe90",334:"53ac9137",347:"ac5280f2",369:"7c7ecee8",386:"f7a8d7e4",389:"d19ccb42",400:"dfb2590f",426:"d92a3c43",432:"5e95c892",440:"6cf698e2",443:"0b49818d",456:"41a4ba7f",47:"13f533b7",48:"17896441",480:"10e376e2",521:"31c8d1c8",567:"1c39b14f",587:"d1eb9fd4",622:"d98862a9",649:"6386618c",748:"f7cc7224",807:"af036c34",844:"37e61803",914:"a94703ab",935:"7cc2b576",960:"3847b3ea",976:"6d493ad8",983:"14eb3368",990:"d9067e83"})[e]||e)+"."+({112:"34924ce7",118:"e7acc248",141:"23f0741e",151:"275cc9aa",16:"22feaa3d",165:"75660052",196:"c710ce17",199:"5217ec2a",21:"a8ce0ab1",211:"1bcf64bc",230:"48107a34",284:"50b1cef3",321:"88d5e28b",334:"7e9826f4",347:"eea95dfd",369:"271c1f43",386:"42bc980b",389:"6bb00697",400:"09e4e890",426:"f35572c7",432:"6da14d13",440:"eb9f11da",443:"d88864a2",456:"966d3c40",47:"02b88af9",48:"72669e89",480:"08063097",513:"28e87eb8",521:"8ee60d84",567:"54afcf0e",587:"e647fd64",622:"526536bc",649:"58d83b30",748:"5b81ebe4",807:"5ca60b5b",844:"62d3cbe1",914:"b705e539",935:"7335f635",960:"96a61778",976:"444b84f6",983:"fe739f4b",990:"019a52e6"})[e]+".js"},i.miniCssF=function(e){return""+e+".css"},i.h=function(){return"2dd4fbfe6e9c292d"},i.g=function(){if("object"==typeof globalThis)return globalThis;try{return this||Function("return this")()}catch(e){if("object"==typeof window)return window}}(),i.o=function(e,t){return Object.prototype.hasOwnProperty.call(e,t)},r={},n="fortran-programing:",i.l=function(e,t,c,o){if(r[e]){r[e].push(t);return}if(void 0!==c){for(var a,f,d=document.getElementsByTagName("script"),u=0;u<d.length;u++){var b=d[u];if(b.getAttribute("src")==e||b.getAttribute("data-webpack")==n+c){a=b;break}}}!a&&(f=!0,(a=document.createElement("script")).charset="utf-8",a.timeout=120,i.nc&&a.setAttribute("nonce",i.nc),a.setAttribute("data-webpack",n+c),a.src=e),r[e]=[t];var l=function(t,n){a.onerror=a.onload=null,clearTimeout(s);var c=r[e];if(delete r[e],a.parentNode&&a.parentNode.removeChild(a),c&&c.forEach(function(e){return e(n)}),t)return t(n)},s=setTimeout(l.bind(null,void 0,{type:"timeout",target:a}),12e4);a.onerror=l.bind(null,a.onerror),a.onload=l.bind(null,a.onload),f&&document.head.appendChild(a)},i.r=function(e){"undefined"!=typeof Symbol&&Symbol.toStringTag&&Object.defineProperty(e,Symbol.toStringTag,{value:"Module"}),Object.defineProperty(e,"__esModule",{value:!0})},c=[],i.O=function(e,t,r,n){if(t){n=n||0;for(var o=c.length;o>0&&c[o-1][2]>n;o--)c[o]=c[o-1];c[o]=[t,r,n];return}for(var a=1/0,o=0;o<c.length;o++){for(var t=c[o][0],r=c[o][1],n=c[o][2],f=!0,d=0;d<t.length;d++)(!1&n||a>=n)&&Object.keys(i.O).every(function(e){return i.O[e](t[d])})?t.splice(d--,1):(f=!1,n<a&&(a=n));if(f){c.splice(o--,1);var u=r();void 0!==u&&(e=u)}}return e},i.p="/fortran/",i.rv=function(){return"1.1.1"},i.gca=function(e){return e=({0x11113f9:"48",common:"16","13f533b7":"47",aba21aa0:"112",fefe6209:"118",db3cc5ec:"141","138e0e15":"151",b9589125:"165","59d59f3e":"199",a7bd4aaa:"211","1a4e3797":"230",f8ccda63:"284","858ebe90":"321","53ac9137":"334",ac5280f2:"347","7c7ecee8":"369",f7a8d7e4:"386",d19ccb42:"389",dfb2590f:"400",d92a3c43:"426","5e95c892":"432","6cf698e2":"440","0b49818d":"443","41a4ba7f":"456","10e376e2":"480","31c8d1c8":"521","1c39b14f":"567",d1eb9fd4:"587",d98862a9:"622","6386618c":"649",f7cc7224:"748",af036c34:"807","37e61803":"844",a94703ab:"914","7cc2b576":"935","3847b3ea":"960","6d493ad8":"976","14eb3368":"983",d9067e83:"990"})[e]||e,i.p+i.u(e)},o={212:0,580:0},i.f.j=function(e,t){var r=i.o(o,e)?o[e]:void 0;if(0!==r){if(r)t.push(r[2]);else if(/^(212|580)$/.test(e))o[e]=0;else{var n=new Promise(function(t,n){r=o[e]=[t,n]});t.push(r[2]=n);var c=i.p+i.u(e),a=Error();i.l(c,function(t){if(i.o(o,e)&&(0!==(r=o[e])&&(o[e]=void 0),r)){var n=t&&("load"===t.type?"missing":t.type),c=t&&t.target&&t.target.src;a.message="Loading chunk "+e+" failed.\n("+n+": "+c+")",a.name="ChunkLoadError",a.type=n,a.request=c,r[1](a)}},"chunk-"+e,e)}}},i.O.j=function(e){return 0===o[e]},a=function(e,t){var r=t[0],n=t[1],c=t[2],a,f,d=0;if(r.some(function(e){return 0!==o[e]})){for(a in n)i.o(n,a)&&(i.m[a]=n[a]);if(c)var u=c(i)}for(e&&e(t);d<r.length;d++)f=r[d],i.o(o,f)&&o[f]&&o[f][0](),o[f]=0;return i.O(u)},(f=self.webpackChunkfortran_programing=self.webpackChunkfortran_programing||[]).forEach(a.bind(null,0)),f.push=a.bind(null,f.push.bind(f))})();
\ No newline at end of file
+(()=>{"use strict";var e,t,r,n,c,a,o,f,d={},u={};function i(e){var t=u[e];if(void 0!==t)return t.exports;var r=u[e]={id:e,loaded:!1,exports:{}};return d[e].call(r.exports,r,r.exports,i),r.loaded=!0,r.exports}i.m=d,i.n=function(e){var t=e&&e.__esModule?function(){return e.default}:function(){return e};return i.d(t,{a:t}),t},t=Object.getPrototypeOf?function(e){return Object.getPrototypeOf(e)}:function(e){return e.__proto__},i.t=function(r,n){if(1&n&&(r=this(r)),8&n||"object"==typeof r&&r&&(4&n&&r.__esModule||16&n&&"function"==typeof r.then))return r;var c=Object.create(null);i.r(c);var a={};e=e||[null,t({}),t([]),t(t)];for(var o=2&n&&r;"object"==typeof o&&!~e.indexOf(o);o=t(o))Object.getOwnPropertyNames(o).forEach(function(e){a[e]=function(){return r[e]}});return a.default=function(){return r},i.d(c,a),c},i.d=function(e,t){for(var r in t)i.o(t,r)&&!i.o(e,r)&&Object.defineProperty(e,r,{enumerable:!0,get:t[r]})},i.f={},i.e=function(e){return Promise.all(Object.keys(i.f).reduce(function(t,r){return i.f[r](e,t),t},[]))},i.hmd=function(e){return!(e=Object.create(e)).children&&(e.children=[]),Object.defineProperty(e,"exports",{enumerable:!0,set:function(){throw Error("ES Modules may not assign module.exports or exports.*, Use ESM export syntax, instead: "+e.id)}}),e},i.u=function(e){return"assets/js/"+(({112:"aba21aa0",118:"fefe6209",141:"db3cc5ec",151:"138e0e15",16:"common",165:"b9589125",199:"59d59f3e",211:"a7bd4aaa",230:"1a4e3797",284:"f8ccda63",321:"858ebe90",334:"53ac9137",347:"ac5280f2",369:"7c7ecee8",386:"f7a8d7e4",389:"d19ccb42",400:"dfb2590f",426:"d92a3c43",432:"5e95c892",440:"6cf698e2",443:"0b49818d",456:"41a4ba7f",47:"13f533b7",48:"17896441",480:"10e376e2",521:"31c8d1c8",567:"1c39b14f",587:"d1eb9fd4",622:"d98862a9",649:"6386618c",748:"f7cc7224",807:"af036c34",844:"37e61803",914:"a94703ab",935:"7cc2b576",960:"3847b3ea",976:"6d493ad8",983:"14eb3368",990:"d9067e83"})[e]||e)+"."+({112:"34924ce7",118:"e7acc248",141:"23f0741e",151:"275cc9aa",16:"22feaa3d",165:"75660052",196:"c710ce17",199:"5217ec2a",21:"a8ce0ab1",211:"1bcf64bc",230:"48107a34",284:"50b1cef3",321:"88d5e28b",334:"7e9826f4",347:"eea95dfd",369:"271c1f43",386:"42bc980b",389:"6bb00697",400:"09e4e890",426:"f35572c7",432:"6da14d13",440:"eb9f11da",443:"d88864a2",456:"966d3c40",47:"02b88af9",48:"72669e89",480:"08063097",513:"28e87eb8",521:"8ee60d84",567:"54afcf0e",587:"e647fd64",622:"526536bc",649:"58d83b30",748:"5b81ebe4",807:"5ca60b5b",844:"62d3cbe1",914:"b705e539",935:"7335f635",960:"96a61778",976:"444b84f6",983:"fe739f4b",990:"019a52e6"})[e]+".js"},i.miniCssF=function(e){return""+e+".css"},i.h=function(){return"261e496bfdc2a8e5"},i.g=function(){if("object"==typeof globalThis)return globalThis;try{return this||Function("return this")()}catch(e){if("object"==typeof window)return window}}(),i.o=function(e,t){return Object.prototype.hasOwnProperty.call(e,t)},r={},n="fortran-programing:",i.l=function(e,t,c,a){if(r[e]){r[e].push(t);return}if(void 0!==c){for(var o,f,d=document.getElementsByTagName("script"),u=0;u<d.length;u++){var b=d[u];if(b.getAttribute("src")==e||b.getAttribute("data-webpack")==n+c){o=b;break}}}!o&&(f=!0,(o=document.createElement("script")).charset="utf-8",o.timeout=120,i.nc&&o.setAttribute("nonce",i.nc),o.setAttribute("data-webpack",n+c),o.src=e),r[e]=[t];var l=function(t,n){o.onerror=o.onload=null,clearTimeout(s);var c=r[e];if(delete r[e],o.parentNode&&o.parentNode.removeChild(o),c&&c.forEach(function(e){return e(n)}),t)return t(n)},s=setTimeout(l.bind(null,void 0,{type:"timeout",target:o}),12e4);o.onerror=l.bind(null,o.onerror),o.onload=l.bind(null,o.onload),f&&document.head.appendChild(o)},i.r=function(e){"undefined"!=typeof Symbol&&Symbol.toStringTag&&Object.defineProperty(e,Symbol.toStringTag,{value:"Module"}),Object.defineProperty(e,"__esModule",{value:!0})},c=[],i.O=function(e,t,r,n){if(t){n=n||0;for(var a=c.length;a>0&&c[a-1][2]>n;a--)c[a]=c[a-1];c[a]=[t,r,n];return}for(var o=1/0,a=0;a<c.length;a++){for(var t=c[a][0],r=c[a][1],n=c[a][2],f=!0,d=0;d<t.length;d++)(!1&n||o>=n)&&Object.keys(i.O).every(function(e){return i.O[e](t[d])})?t.splice(d--,1):(f=!1,n<o&&(o=n));if(f){c.splice(a--,1);var u=r();void 0!==u&&(e=u)}}return e},i.p="/fortran/",i.rv=function(){return"1.1.1"},i.gca=function(e){return e=({0x11113f9:"48",common:"16","13f533b7":"47",aba21aa0:"112",fefe6209:"118",db3cc5ec:"141","138e0e15":"151",b9589125:"165","59d59f3e":"199",a7bd4aaa:"211","1a4e3797":"230",f8ccda63:"284","858ebe90":"321","53ac9137":"334",ac5280f2:"347","7c7ecee8":"369",f7a8d7e4:"386",d19ccb42:"389",dfb2590f:"400",d92a3c43:"426","5e95c892":"432","6cf698e2":"440","0b49818d":"443","41a4ba7f":"456","10e376e2":"480","31c8d1c8":"521","1c39b14f":"567",d1eb9fd4:"587",d98862a9:"622","6386618c":"649",f7cc7224:"748",af036c34:"807","37e61803":"844",a94703ab:"914","7cc2b576":"935","3847b3ea":"960","6d493ad8":"976","14eb3368":"983",d9067e83:"990"})[e]||e,i.p+i.u(e)},a={212:0,580:0},i.f.j=function(e,t){var r=i.o(a,e)?a[e]:void 0;if(0!==r){if(r)t.push(r[2]);else if(/^(212|580)$/.test(e))a[e]=0;else{var n=new Promise(function(t,n){r=a[e]=[t,n]});t.push(r[2]=n);var c=i.p+i.u(e),o=Error();i.l(c,function(t){if(i.o(a,e)&&(0!==(r=a[e])&&(a[e]=void 0),r)){var n=t&&("load"===t.type?"missing":t.type),c=t&&t.target&&t.target.src;o.message="Loading chunk "+e+" failed.\n("+n+": "+c+")",o.name="ChunkLoadError",o.type=n,o.request=c,r[1](o)}},"chunk-"+e,e)}}},i.O.j=function(e){return 0===a[e]},o=function(e,t){var r=t[0],n=t[1],c=t[2],o,f,d=0;if(r.some(function(e){return 0!==a[e]})){for(o in n)i.o(n,o)&&(i.m[o]=n[o]);if(c)var u=c(i)}for(e&&e(t);d<r.length;d++)f=r[d],i.o(a,f)&&a[f]&&a[f][0](),a[f]=0;return i.O(u)},(f=self.webpackChunkfortran_programing=self.webpackChunkfortran_programing||[]).forEach(o.bind(null,0)),f.push=o.bind(null,f.push.bind(f))})();
\ No newline at end of file
diff --git a/basics/index.html b/basics/index.html
index 5dd5429..05a1d1f 100644
--- a/basics/index.html
+++ b/basics/index.html
@@ -1,4 +1,4 @@
-<!doctype html><html lang=en dir=ltr class="docs-wrapper plugin-docs plugin-id-default docs-version-current docs-doc-page docs-doc-id-basics" data-has-hydrated=false><meta charset=UTF-8><meta name=generator content="Docusaurus v3.6.1"><title data-rh=true>Basics • Fortran Tutorial</title><meta data-rh=true name=viewport content="width=device-width,initial-scale=1.0"><meta data-rh=true name=twitter:card content=summary_large_image><meta data-rh=true property=og:url content=https://pranabdas.github.io/fortran/basics><meta data-rh=true property=og:locale content=en><meta data-rh=true name=docusaurus_locale content=en><meta data-rh=true name=docsearch:language content=en><meta data-rh=true name=theme-color content=#06445c><meta data-rh=true name=docusaurus_version content=current><meta data-rh=true name=docusaurus_tag content=docs-default-current><meta data-rh=true name=docsearch:version content=current><meta data-rh=true name=docsearch:docusaurus_tag content=docs-default-current><meta data-rh=true property=og:title content="Basics • Fortran Tutorial"><meta data-rh=true name=description content="We will learn by doing. Let us start by writing a simple program that asks for"><meta data-rh=true property=og:description content="We will learn by doing. Let us start by writing a simple program that asks for"><link data-rh=true rel=icon href=/fortran/img/favicon.png><link data-rh=true rel=canonical href=https://pranabdas.github.io/fortran/basics><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/basics hreflang=en><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/basics hreflang=x-default><link rel=stylesheet href=https://pranabdas.github.io/drive/webfonts/katex/katex.min.css><link rel=stylesheet href=/fortran/assets/css/styles.4de1c8a8.css><script src=/fortran/assets/js/runtime~main.866c090c.js defer></script><script src=/fortran/assets/js/main.ec888ba8.js defer></script><body class=navigation-with-keyboard><script>!function(){var t,e=function(){try{return new URLSearchParams(window.location.search).get("docusaurus-theme")}catch(t){}}()||function(){try{return window.localStorage.getItem("theme")}catch(t){}}();t=null!==e?e:window.matchMedia("(prefers-color-scheme: dark)").matches?"dark":(window.matchMedia("(prefers-color-scheme: light)").matches,"light"),document.documentElement.setAttribute("data-theme",t)}(),function(){try{for(var[t,e]of new URLSearchParams(window.location.search).entries())if(t.startsWith("docusaurus-data-")){var a=t.replace("docusaurus-data-","data-");document.documentElement.setAttribute(a,e)}}catch(t){}}()</script><div id=__docusaurus><div role=region aria-label="Skip to main content"><a class=skipToContent_fXgn href=#__docusaurus_skipToContent_fallback>Skip to main content</a></div><nav aria-label=Main class="navbar navbar--fixed-top navbarHideable_m1mJ"><div class=navbar__inner><div class=navbar__items><button aria-label="Toggle navigation bar" aria-expanded=false class="navbar__toggle clean-btn" type=button><svg width=30 height=30 viewBox="0 0 30 30" aria-hidden=true><path stroke=currentColor stroke-linecap=round stroke-miterlimit=10 stroke-width=2 d="M4 7h22M4 15h22M4 23h22"/></svg></button><a class=navbar__brand href=/fortran/><div class=navbar__logo><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--light_NVdE"><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--dark_xIcU"></div><b class="navbar__title text--truncate">Fortran</b></a><div class="navbar__item dropdown dropdown--hoverable"><a aria-current=page class="navbar__link active" aria-haspopup=true aria-expanded=false role=button href=/fortran/>Docs</a><ul class=dropdown__menu><li><a aria-current=page class="dropdown__link dropdown__link--active" href=/fortran/>Fortran Programming</a><li><a href=https://pranabdas.github.io/docs/ rel="noopener noreferrer" class=dropdown__link>~ ~ ~ Other Docs ~ ~ ~</a><li><a href=https://pranabdas.github.io/arpespythontools/ rel="noopener noreferrer" class=dropdown__link>ARPES Python Tools</a><li><a href=https://pranabdas.github.io/c-cpp/ rel="noopener noreferrer" class=dropdown__link>C and C++ Programming</a><li><a href=https://pranabdas.github.io/condmat-notes/ rel="noopener noreferrer" class=dropdown__link>Condensed Matter Notes</a><li><a href=https://pranabdas.github.io/javascript/ rel="noopener noreferrer" class=dropdown__link>Javascript Tutorial</a><li><a href=https://pranabdas.github.io/linux/ rel="noopener noreferrer" class=dropdown__link>Linux Tutorial</a><li><a href=https://pranabdas.github.io/machine-learning/ rel="noopener noreferrer" class=dropdown__link>Machine Learning Notes</a><li><a href=https://pranabdas.github.io/openmx/ rel="noopener noreferrer" class=dropdown__link>OpenMX tutorial</a><li><a href=https://pranabdas.github.io/python-tutorial/ rel="noopener noreferrer" class=dropdown__link>Python Tutorial</a><li><a href=https://pranabdas.github.io/espresso/ rel="noopener noreferrer" class=dropdown__link>Quantum Espresso Tutorial</a><li><a href=https://pranabdas.github.io/rust/ rel="noopener noreferrer" class=dropdown__link>Rust Programming</a><li><a href=https://pranabdas.github.io/arpes-manual/ rel="noopener noreferrer" class=dropdown__link>SUV ARPES Manual</a><li><a href=https://pranabdas.github.io/suvtools/ rel="noopener noreferrer" class=dropdown__link>SUV Python Tools</a></ul></div></div><div class="navbar__items navbar__items--right"><a href=https://github.com/pranabdas/fortran rel="noopener noreferrer" class="navbar__item navbar__link header-github-link" aria-label="GitHub repository" title="Visit project repository in GitHub"></a><a href=https://pranabdas.github.io rel="noopener noreferrer" class="navbar__item navbar__link header-homepage-link" aria-label="About me" title="Go to Pranab's Homepage"></a><div class="toggle_vylO colorModeToggle_DEke"><button class="clean-btn toggleButton_gllP toggleButtonDisabled_aARS" type=button disabled title="Switch between dark and light mode (currently light mode)" aria-label="Switch between dark and light mode (currently light mode)" aria-live=polite aria-pressed=false><svg viewBox="0 0 24 24" width=24 height=24 class=lightToggleIcon_pyhR><path fill=currentColor d="M12,9c1.65,0,3,1.35,3,3s-1.35,3-3,3s-3-1.35-3-3S10.35,9,12,9 M12,7c-2.76,0-5,2.24-5,5s2.24,5,5,5s5-2.24,5-5 S14.76,7,12,7L12,7z M2,13l2,0c0.55,0,1-0.45,1-1s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S1.45,13,2,13z M20,13l2,0c0.55,0,1-0.45,1-1 s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S19.45,13,20,13z M11,2v2c0,0.55,0.45,1,1,1s1-0.45,1-1V2c0-0.55-0.45-1-1-1S11,1.45,11,2z M11,20v2c0,0.55,0.45,1,1,1s1-0.45,1-1v-2c0-0.55-0.45-1-1-1C11.45,19,11,19.45,11,20z M5.99,4.58c-0.39-0.39-1.03-0.39-1.41,0 c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0s0.39-1.03,0-1.41L5.99,4.58z M18.36,16.95 c-0.39-0.39-1.03-0.39-1.41,0c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0c0.39-0.39,0.39-1.03,0-1.41 L18.36,16.95z M19.42,5.99c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06c-0.39,0.39-0.39,1.03,0,1.41 s1.03,0.39,1.41,0L19.42,5.99z M7.05,18.36c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06 c-0.39,0.39-0.39,1.03,0,1.41s1.03,0.39,1.41,0L7.05,18.36z"/></svg><svg viewBox="0 0 24 24" width=24 height=24 class=darkToggleIcon_wfgR><path fill=currentColor d="M9.37,5.51C9.19,6.15,9.1,6.82,9.1,7.5c0,4.08,3.32,7.4,7.4,7.4c0.68,0,1.35-0.09,1.99-0.27C17.45,17.19,14.93,19,12,19 c-3.86,0-7-3.14-7-7C5,9.07,6.81,6.55,9.37,5.51z M12,3c-4.97,0-9,4.03-9,9s4.03,9,9,9s9-4.03,9-9c0-0.46-0.04-0.92-0.1-1.36 c-0.98,1.37-2.58,2.26-4.4,2.26c-2.98,0-5.4-2.42-5.4-5.4c0-1.81,0.89-3.42,2.26-4.4C12.92,3.04,12.46,3,12,3L12,3z"/></svg></button></div><div class=navbarSearchContainer_Bca1><div class="navbar__search searchBarContainer_NW3z" dir=ltr><input placeholder=Search aria-label=Search class=navbar__search-input value=""><div class="loadingRing_RJI3 searchBarLoadingRing_YnHq"><div></div><div></div><div></div><div></div></div></div></div></div></div><div role=presentation class=navbar-sidebar__backdrop></div></nav><div id=__docusaurus_skipToContent_fallback class="main-wrapper mainWrapper_z2l0"><div class=docsWrapper_hBAB><button aria-label="Scroll back to top" class="clean-btn theme-back-to-top-button backToTopButton_sjWU" type=button></button><div class=docRoot_UBD9><aside class="theme-doc-sidebar-container docSidebarContainer_YfHR"><div class=sidebarViewport_aRkj><div class="sidebar_njMd sidebarWithHideableNavbar_wUlq"><a tabindex=-1 class=sidebarLogo_isFc href=/fortran/><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--light_NVdE"><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--dark_xIcU"><b>Fortran</b></a><nav aria-label="Docs sidebar" class="menu thin-scrollbar menu_SIkG"><ul class="theme-doc-sidebar-menu menu__list"><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/>Setup</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class="menu__link menu__link--active" aria-current=page href=/fortran/basics>Basics</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/array>Array and Matrix</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/control>Logical control</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/loop>Loop</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/modules>Modules</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/procedures>Procedures</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/complex>Complex number</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/recursion>Recursion</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/types>Custom types</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/pointer>Pointer</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/file>File I/O</a><li class="theme-doc-sidebar-item-category theme-doc-sidebar-item-category-level-1 menu__list-item menu__list-item--collapsed"><div class=menu__list-item-collapsible><a class="menu__link menu__link--sublist" href=/fortran/category/coding-practice>Coding practice</a><button aria-label="Expand sidebar category 'Coding practice'" aria-expanded=false type=button class="clean-btn menu__caret"></button></div><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/resources>Resources</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/license>License</a></ul></nav><button type=button title="Collapse sidebar" aria-label="Collapse sidebar" class="button button--secondary button--outline collapseSidebarButton_PEFL"><svg width=20 height=20 aria-hidden=true class=collapseSidebarButtonIcon_kv0_><g fill=#7a7a7a><path d="M9.992 10.023c0 .2-.062.399-.172.547l-4.996 7.492a.982.982 0 01-.828.454H1c-.55 0-1-.453-1-1 0-.2.059-.403.168-.551l4.629-6.942L.168 3.078A.939.939 0 010 2.528c0-.548.45-.997 1-.997h2.996c.352 0 .649.18.828.45L9.82 9.472c.11.148.172.347.172.55zm0 0"/><path d="M19.98 10.023c0 .2-.058.399-.168.547l-4.996 7.492a.987.987 0 01-.828.454h-3c-.547 0-.996-.453-.996-1 0-.2.059-.403.168-.551l4.625-6.942-4.625-6.945a.939.939 0 01-.168-.55 1 1 0 01.996-.997h3c.348 0 .649.18.828.45l4.996 7.492c.11.148.168.347.168.55zm0 0"/></g></svg></button></div></div></aside><main class=docMainContainer_TBSr><div class="container padding-top--md padding-bottom--lg"><div class=row><div class="col docItemCol_VOVn"><div class=docItemContainer_Djhp><article><nav class="theme-doc-breadcrumbs breadcrumbsContainer_Z_bl" aria-label=Breadcrumbs><ul class=breadcrumbs itemscope itemtype=https://schema.org/BreadcrumbList><li class=breadcrumbs__item><a aria-label="Home page" class=breadcrumbs__link href=/fortran/><svg viewBox="0 0 24 24" class=breadcrumbHomeIcon_YNFT><path d="M10 19v-5h4v5c0 .55.45 1 1 1h3c.55 0 1-.45 1-1v-7h1.7c.46 0 .68-.57.33-.87L12.67 3.6c-.38-.34-.96-.34-1.34 0l-8.36 7.53c-.34.3-.13.87.33.87H5v7c0 .55.45 1 1 1h3c.55 0 1-.45 1-1z" fill=currentColor /></svg></a><li itemscope itemprop=itemListElement itemtype=https://schema.org/ListItem class="breadcrumbs__item breadcrumbs__item--active"><span class=breadcrumbs__link itemprop=name>Basics</span><meta itemprop=position content=1></ul></nav><div class="tocCollapsible_ETCw theme-doc-toc-mobile tocMobile_ITEo"><button type=button class="clean-btn tocCollapsibleButton_TO0P">On this page</button></div><div class="theme-doc-markdown markdown"><header><h1>Basics</h1></header><p>We will learn by doing. Let us start by writing a simple program that asks for
+<!doctype html><html lang=en dir=ltr class="docs-wrapper plugin-docs plugin-id-default docs-version-current docs-doc-page docs-doc-id-basics" data-has-hydrated=false><meta charset=UTF-8><meta name=generator content="Docusaurus v3.6.1"><title data-rh=true>Basics • Fortran Tutorial</title><meta data-rh=true name=viewport content="width=device-width,initial-scale=1.0"><meta data-rh=true name=twitter:card content=summary_large_image><meta data-rh=true property=og:url content=https://pranabdas.github.io/fortran/basics><meta data-rh=true property=og:locale content=en><meta data-rh=true name=docusaurus_locale content=en><meta data-rh=true name=docsearch:language content=en><meta data-rh=true name=theme-color content=#06445c><meta data-rh=true name=docusaurus_version content=current><meta data-rh=true name=docusaurus_tag content=docs-default-current><meta data-rh=true name=docsearch:version content=current><meta data-rh=true name=docsearch:docusaurus_tag content=docs-default-current><meta data-rh=true property=og:title content="Basics • Fortran Tutorial"><meta data-rh=true name=description content="We will learn by doing. Let us start by writing a simple program that asks for"><meta data-rh=true property=og:description content="We will learn by doing. Let us start by writing a simple program that asks for"><link data-rh=true rel=icon href=/fortran/img/favicon.png><link data-rh=true rel=canonical href=https://pranabdas.github.io/fortran/basics><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/basics hreflang=en><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/basics hreflang=x-default><link rel=stylesheet href=https://pranab.pages.dev/assets/fonts/katex/katex.min.css><link rel=stylesheet href=/fortran/assets/css/styles.4de1c8a8.css><script src=/fortran/assets/js/runtime~main.667e3c0f.js defer></script><script src=/fortran/assets/js/main.10795e8f.js defer></script><body class=navigation-with-keyboard><script>!function(){var t,e=function(){try{return new URLSearchParams(window.location.search).get("docusaurus-theme")}catch(t){}}()||function(){try{return window.localStorage.getItem("theme")}catch(t){}}();t=null!==e?e:window.matchMedia("(prefers-color-scheme: dark)").matches?"dark":(window.matchMedia("(prefers-color-scheme: light)").matches,"light"),document.documentElement.setAttribute("data-theme",t)}(),function(){try{for(var[t,e]of new URLSearchParams(window.location.search).entries())if(t.startsWith("docusaurus-data-")){var a=t.replace("docusaurus-data-","data-");document.documentElement.setAttribute(a,e)}}catch(t){}}()</script><div id=__docusaurus><div role=region aria-label="Skip to main content"><a class=skipToContent_fXgn href=#__docusaurus_skipToContent_fallback>Skip to main content</a></div><nav aria-label=Main class="navbar navbar--fixed-top navbarHideable_m1mJ"><div class=navbar__inner><div class=navbar__items><button aria-label="Toggle navigation bar" aria-expanded=false class="navbar__toggle clean-btn" type=button><svg width=30 height=30 viewBox="0 0 30 30" aria-hidden=true><path stroke=currentColor stroke-linecap=round stroke-miterlimit=10 stroke-width=2 d="M4 7h22M4 15h22M4 23h22"/></svg></button><a class=navbar__brand href=/fortran/><div class=navbar__logo><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--light_NVdE"><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--dark_xIcU"></div><b class="navbar__title text--truncate">Fortran</b></a><div class="navbar__item dropdown dropdown--hoverable"><a aria-current=page class="navbar__link active" aria-haspopup=true aria-expanded=false role=button href=/fortran/>Docs</a><ul class=dropdown__menu><li><a aria-current=page class="dropdown__link dropdown__link--active" href=/fortran/>Fortran Programming</a><li><a href=https://pranabdas.github.io/docs/ rel="noopener noreferrer" class=dropdown__link>~ ~ ~ Other Docs ~ ~ ~</a><li><a href=https://pranabdas.github.io/arpespythontools/ rel="noopener noreferrer" class=dropdown__link>ARPES Python Tools</a><li><a href=https://pranabdas.github.io/c-cpp/ rel="noopener noreferrer" class=dropdown__link>C and C++ Programming</a><li><a href=https://pranabdas.github.io/condmat-notes/ rel="noopener noreferrer" class=dropdown__link>Condensed Matter Notes</a><li><a href=https://pranabdas.github.io/javascript/ rel="noopener noreferrer" class=dropdown__link>Javascript Tutorial</a><li><a href=https://pranabdas.github.io/linux/ rel="noopener noreferrer" class=dropdown__link>Linux Tutorial</a><li><a href=https://pranabdas.github.io/machine-learning/ rel="noopener noreferrer" class=dropdown__link>Machine Learning Notes</a><li><a href=https://pranabdas.github.io/openmx/ rel="noopener noreferrer" class=dropdown__link>OpenMX tutorial</a><li><a href=https://pranabdas.github.io/python-tutorial/ rel="noopener noreferrer" class=dropdown__link>Python Tutorial</a><li><a href=https://pranabdas.github.io/espresso/ rel="noopener noreferrer" class=dropdown__link>Quantum Espresso Tutorial</a><li><a href=https://pranabdas.github.io/rust/ rel="noopener noreferrer" class=dropdown__link>Rust Programming</a><li><a href=https://pranabdas.github.io/arpes-manual/ rel="noopener noreferrer" class=dropdown__link>SUV ARPES Manual</a><li><a href=https://pranabdas.github.io/suvtools/ rel="noopener noreferrer" class=dropdown__link>SUV Python Tools</a></ul></div></div><div class="navbar__items navbar__items--right"><a href=https://github.com/pranabdas/fortran rel="noopener noreferrer" class="navbar__item navbar__link header-github-link" aria-label="GitHub repository" title="Visit project repository in GitHub"></a><a href=https://pranabdas.github.io rel="noopener noreferrer" class="navbar__item navbar__link header-homepage-link" aria-label="About me" title="Go to Pranab's Homepage"></a><div class="toggle_vylO colorModeToggle_DEke"><button class="clean-btn toggleButton_gllP toggleButtonDisabled_aARS" type=button disabled title="Switch between dark and light mode (currently light mode)" aria-label="Switch between dark and light mode (currently light mode)" aria-live=polite aria-pressed=false><svg viewBox="0 0 24 24" width=24 height=24 class=lightToggleIcon_pyhR><path fill=currentColor d="M12,9c1.65,0,3,1.35,3,3s-1.35,3-3,3s-3-1.35-3-3S10.35,9,12,9 M12,7c-2.76,0-5,2.24-5,5s2.24,5,5,5s5-2.24,5-5 S14.76,7,12,7L12,7z M2,13l2,0c0.55,0,1-0.45,1-1s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S1.45,13,2,13z M20,13l2,0c0.55,0,1-0.45,1-1 s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S19.45,13,20,13z M11,2v2c0,0.55,0.45,1,1,1s1-0.45,1-1V2c0-0.55-0.45-1-1-1S11,1.45,11,2z M11,20v2c0,0.55,0.45,1,1,1s1-0.45,1-1v-2c0-0.55-0.45-1-1-1C11.45,19,11,19.45,11,20z M5.99,4.58c-0.39-0.39-1.03-0.39-1.41,0 c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0s0.39-1.03,0-1.41L5.99,4.58z M18.36,16.95 c-0.39-0.39-1.03-0.39-1.41,0c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0c0.39-0.39,0.39-1.03,0-1.41 L18.36,16.95z M19.42,5.99c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06c-0.39,0.39-0.39,1.03,0,1.41 s1.03,0.39,1.41,0L19.42,5.99z M7.05,18.36c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06 c-0.39,0.39-0.39,1.03,0,1.41s1.03,0.39,1.41,0L7.05,18.36z"/></svg><svg viewBox="0 0 24 24" width=24 height=24 class=darkToggleIcon_wfgR><path fill=currentColor d="M9.37,5.51C9.19,6.15,9.1,6.82,9.1,7.5c0,4.08,3.32,7.4,7.4,7.4c0.68,0,1.35-0.09,1.99-0.27C17.45,17.19,14.93,19,12,19 c-3.86,0-7-3.14-7-7C5,9.07,6.81,6.55,9.37,5.51z M12,3c-4.97,0-9,4.03-9,9s4.03,9,9,9s9-4.03,9-9c0-0.46-0.04-0.92-0.1-1.36 c-0.98,1.37-2.58,2.26-4.4,2.26c-2.98,0-5.4-2.42-5.4-5.4c0-1.81,0.89-3.42,2.26-4.4C12.92,3.04,12.46,3,12,3L12,3z"/></svg></button></div><div class=navbarSearchContainer_Bca1><div class="navbar__search searchBarContainer_NW3z" dir=ltr><input placeholder=Search aria-label=Search class=navbar__search-input value=""><div class="loadingRing_RJI3 searchBarLoadingRing_YnHq"><div></div><div></div><div></div><div></div></div></div></div></div></div><div role=presentation class=navbar-sidebar__backdrop></div></nav><div id=__docusaurus_skipToContent_fallback class="main-wrapper mainWrapper_z2l0"><div class=docsWrapper_hBAB><button aria-label="Scroll back to top" class="clean-btn theme-back-to-top-button backToTopButton_sjWU" type=button></button><div class=docRoot_UBD9><aside class="theme-doc-sidebar-container docSidebarContainer_YfHR"><div class=sidebarViewport_aRkj><div class="sidebar_njMd sidebarWithHideableNavbar_wUlq"><a tabindex=-1 class=sidebarLogo_isFc href=/fortran/><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--light_NVdE"><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--dark_xIcU"><b>Fortran</b></a><nav aria-label="Docs sidebar" class="menu thin-scrollbar menu_SIkG"><ul class="theme-doc-sidebar-menu menu__list"><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/>Setup</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class="menu__link menu__link--active" aria-current=page href=/fortran/basics>Basics</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/array>Array and Matrix</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/control>Logical control</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/loop>Loop</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/modules>Modules</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/procedures>Procedures</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/complex>Complex number</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/recursion>Recursion</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/types>Custom types</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/pointer>Pointer</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/file>File I/O</a><li class="theme-doc-sidebar-item-category theme-doc-sidebar-item-category-level-1 menu__list-item menu__list-item--collapsed"><div class=menu__list-item-collapsible><a class="menu__link menu__link--sublist" href=/fortran/category/coding-practice>Coding practice</a><button aria-label="Expand sidebar category 'Coding practice'" aria-expanded=false type=button class="clean-btn menu__caret"></button></div><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/resources>Resources</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/license>License</a></ul></nav><button type=button title="Collapse sidebar" aria-label="Collapse sidebar" class="button button--secondary button--outline collapseSidebarButton_PEFL"><svg width=20 height=20 aria-hidden=true class=collapseSidebarButtonIcon_kv0_><g fill=#7a7a7a><path d="M9.992 10.023c0 .2-.062.399-.172.547l-4.996 7.492a.982.982 0 01-.828.454H1c-.55 0-1-.453-1-1 0-.2.059-.403.168-.551l4.629-6.942L.168 3.078A.939.939 0 010 2.528c0-.548.45-.997 1-.997h2.996c.352 0 .649.18.828.45L9.82 9.472c.11.148.172.347.172.55zm0 0"/><path d="M19.98 10.023c0 .2-.058.399-.168.547l-4.996 7.492a.987.987 0 01-.828.454h-3c-.547 0-.996-.453-.996-1 0-.2.059-.403.168-.551l4.625-6.942-4.625-6.945a.939.939 0 01-.168-.55 1 1 0 01.996-.997h3c.348 0 .649.18.828.45l4.996 7.492c.11.148.168.347.168.55zm0 0"/></g></svg></button></div></div></aside><main class=docMainContainer_TBSr><div class="container padding-top--md padding-bottom--lg"><div class=row><div class="col docItemCol_VOVn"><div class=docItemContainer_Djhp><article><nav class="theme-doc-breadcrumbs breadcrumbsContainer_Z_bl" aria-label=Breadcrumbs><ul class=breadcrumbs itemscope itemtype=https://schema.org/BreadcrumbList><li class=breadcrumbs__item><a aria-label="Home page" class=breadcrumbs__link href=/fortran/><svg viewBox="0 0 24 24" class=breadcrumbHomeIcon_YNFT><path d="M10 19v-5h4v5c0 .55.45 1 1 1h3c.55 0 1-.45 1-1v-7h1.7c.46 0 .68-.57.33-.87L12.67 3.6c-.38-.34-.96-.34-1.34 0l-8.36 7.53c-.34.3-.13.87.33.87H5v7c0 .55.45 1 1 1h3c.55 0 1-.45 1-1z" fill=currentColor /></svg></a><li itemscope itemprop=itemListElement itemtype=https://schema.org/ListItem class="breadcrumbs__item breadcrumbs__item--active"><span class=breadcrumbs__link itemprop=name>Basics</span><meta itemprop=position content=1></ul></nav><div class="tocCollapsible_ETCw theme-doc-toc-mobile tocMobile_ITEo"><button type=button class="clean-btn tocCollapsibleButton_TO0P">On this page</button></div><div class="theme-doc-markdown markdown"><header><h1>Basics</h1></header><p>We will learn by doing. Let us start by writing a simple program that asks for
 some user input, performs some arithmetic operations, and returns a result.</p>
 <!-- -->
 <div class="language-fortran codeBlockContainer_Ckt0 theme-code-block" style=--prism-color:#393A34;--prism-background-color:#f6f8fa><div class=codeBlockTitle_Ktv7>src/01_add.f90</div><div class=codeBlockContent_biex><pre tabindex=0 class="prism-code language-fortran codeBlock_bY9V thin-scrollbar" style=color:#393A34;background-color:#f6f8fa><code class="codeBlockLines_e6Vv codeBlockLinesWithNumbering_o6Pm"><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token comment" style=color:#999988;font-style:italic>! Program : Add two integer numbers</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain"></span><span class="token keyword" style=color:#00009f>PROGRAM</span><span class="token plain"> add</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">  </span><span class="token keyword" style=color:#00009f>IMPLICIT NONE</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">  </span><span class="token keyword" style=color:#00009f>INTEGER</span><span class="token plain"> </span><span class="token operator" style=color:#393A34>::</span><span class="token plain"> a</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> b</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> output</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">  </span><span class="token keyword" style=color:#00009f>PRINT</span><span class="token plain"> </span><span class="token operator" style=color:#393A34>*</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> </span><span class="token string" style=color:#e3116c>"Input a ="</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">  </span><span class="token keyword" style=color:#00009f>READ</span><span class="token plain"> </span><span class="token operator" style=color:#393A34>*</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> a</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">  </span><span class="token keyword" style=color:#00009f>PRINT</span><span class="token plain"> </span><span class="token operator" style=color:#393A34>*</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> </span><span class="token string" style=color:#e3116c>"Input b ="</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">  </span><span class="token keyword" style=color:#00009f>READ</span><span class="token plain"> </span><span class="token operator" style=color:#393A34>*</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> b</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">  output </span><span class="token operator" style=color:#393A34>=</span><span class="token plain"> a </span><span class="token operator" style=color:#393A34>+</span><span class="token plain"> b</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">  </span><span class="token keyword" style=color:#00009f>PRINT</span><span class="token operator" style=color:#393A34>*</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> </span><span class="token string" style=color:#e3116c>"Output: "</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> a</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> </span><span class="token string" style=color:#e3116c>"+"</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> b</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> </span><span class="token string" style=color:#e3116c>"="</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> output</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain"></span><span class="token keyword" style=color:#00009f>END PROGRAM</span><span class="token plain"> add</span></span><br></span></code></pre><div class=buttonGroup__atx><button type=button aria-label="Copy code to clipboard" title=Copy class=clean-btn><span class=copyButtonIcons_eSgA aria-hidden=true><svg viewBox="0 0 24 24" class=copyButtonIcon_y97N><path fill=currentColor d="M19,21H8V7H19M19,5H8A2,2 0 0,0 6,7V21A2,2 0 0,0 8,23H19A2,2 0 0,0 21,21V7A2,2 0 0,0 19,5M16,1H4A2,2 0 0,0 2,3V17H4V3H16V1Z"/></svg><svg viewBox="0 0 24 24" class=copyButtonSuccessIcon_LjdS><path fill=currentColor d=M21,7L9,19L3.5,13.5L4.91,12.09L9,16.17L19.59,5.59L21,7Z /></svg></span></button></div></div></div>
diff --git a/blas/index.html b/blas/index.html
index 8b1a204..831db6b 100644
--- a/blas/index.html
+++ b/blas/index.html
@@ -1,4 +1,4 @@
-<!doctype html><html lang=en dir=ltr class="docs-wrapper plugin-docs plugin-id-default docs-version-current docs-doc-page docs-doc-id-blas" data-has-hydrated=false><meta charset=UTF-8><meta name=generator content="Docusaurus v3.6.1"><title data-rh=true>Basic Linear Algebra Subprograms • Fortran Tutorial</title><meta data-rh=true name=viewport content="width=device-width,initial-scale=1.0"><meta data-rh=true name=twitter:card content=summary_large_image><meta data-rh=true property=og:url content=https://pranabdas.github.io/fortran/blas><meta data-rh=true property=og:locale content=en><meta data-rh=true name=docusaurus_locale content=en><meta data-rh=true name=docsearch:language content=en><meta data-rh=true name=theme-color content=#06445c><meta data-rh=true name=docusaurus_version content=current><meta data-rh=true name=docusaurus_tag content=docs-default-current><meta data-rh=true name=docsearch:version content=current><meta data-rh=true name=docsearch:docusaurus_tag content=docs-default-current><meta data-rh=true property=og:title content="Basic Linear Algebra Subprograms • Fortran Tutorial"><meta data-rh=true name=description content="Install BLAS and [LAPACK]("><meta data-rh=true property=og:description content="Install BLAS and [LAPACK]("><link data-rh=true rel=icon href=/fortran/img/favicon.png><link data-rh=true rel=canonical href=https://pranabdas.github.io/fortran/blas><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/blas hreflang=en><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/blas hreflang=x-default><link rel=stylesheet href=https://pranabdas.github.io/drive/webfonts/katex/katex.min.css><link rel=stylesheet href=/fortran/assets/css/styles.4de1c8a8.css><script src=/fortran/assets/js/runtime~main.866c090c.js defer></script><script src=/fortran/assets/js/main.ec888ba8.js defer></script><body class=navigation-with-keyboard><script>!function(){var t,e=function(){try{return new URLSearchParams(window.location.search).get("docusaurus-theme")}catch(t){}}()||function(){try{return window.localStorage.getItem("theme")}catch(t){}}();t=null!==e?e:window.matchMedia("(prefers-color-scheme: dark)").matches?"dark":(window.matchMedia("(prefers-color-scheme: light)").matches,"light"),document.documentElement.setAttribute("data-theme",t)}(),function(){try{for(var[t,e]of new URLSearchParams(window.location.search).entries())if(t.startsWith("docusaurus-data-")){var a=t.replace("docusaurus-data-","data-");document.documentElement.setAttribute(a,e)}}catch(t){}}()</script><div id=__docusaurus><div role=region aria-label="Skip to main content"><a class=skipToContent_fXgn href=#__docusaurus_skipToContent_fallback>Skip to main content</a></div><nav aria-label=Main class="navbar navbar--fixed-top navbarHideable_m1mJ"><div class=navbar__inner><div class=navbar__items><button aria-label="Toggle navigation bar" aria-expanded=false class="navbar__toggle clean-btn" type=button><svg width=30 height=30 viewBox="0 0 30 30" aria-hidden=true><path stroke=currentColor stroke-linecap=round stroke-miterlimit=10 stroke-width=2 d="M4 7h22M4 15h22M4 23h22"/></svg></button><a class=navbar__brand href=/fortran/><div class=navbar__logo><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--light_NVdE"><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--dark_xIcU"></div><b class="navbar__title text--truncate">Fortran</b></a><div class="navbar__item dropdown dropdown--hoverable"><a aria-current=page class="navbar__link active" aria-haspopup=true aria-expanded=false role=button href=/fortran/>Docs</a><ul class=dropdown__menu><li><a aria-current=page class="dropdown__link dropdown__link--active" href=/fortran/>Fortran Programming</a><li><a href=https://pranabdas.github.io/docs/ rel="noopener noreferrer" class=dropdown__link>~ ~ ~ Other Docs ~ ~ ~</a><li><a href=https://pranabdas.github.io/arpespythontools/ rel="noopener noreferrer" class=dropdown__link>ARPES Python Tools</a><li><a href=https://pranabdas.github.io/c-cpp/ rel="noopener noreferrer" class=dropdown__link>C and C++ Programming</a><li><a href=https://pranabdas.github.io/condmat-notes/ rel="noopener noreferrer" class=dropdown__link>Condensed Matter Notes</a><li><a href=https://pranabdas.github.io/javascript/ rel="noopener noreferrer" class=dropdown__link>Javascript Tutorial</a><li><a href=https://pranabdas.github.io/linux/ rel="noopener noreferrer" class=dropdown__link>Linux Tutorial</a><li><a href=https://pranabdas.github.io/machine-learning/ rel="noopener noreferrer" class=dropdown__link>Machine Learning Notes</a><li><a href=https://pranabdas.github.io/openmx/ rel="noopener noreferrer" class=dropdown__link>OpenMX tutorial</a><li><a href=https://pranabdas.github.io/python-tutorial/ rel="noopener noreferrer" class=dropdown__link>Python Tutorial</a><li><a href=https://pranabdas.github.io/espresso/ rel="noopener noreferrer" class=dropdown__link>Quantum Espresso Tutorial</a><li><a href=https://pranabdas.github.io/rust/ rel="noopener noreferrer" class=dropdown__link>Rust Programming</a><li><a href=https://pranabdas.github.io/arpes-manual/ rel="noopener noreferrer" class=dropdown__link>SUV ARPES Manual</a><li><a href=https://pranabdas.github.io/suvtools/ rel="noopener noreferrer" class=dropdown__link>SUV Python Tools</a></ul></div></div><div class="navbar__items navbar__items--right"><a href=https://github.com/pranabdas/fortran rel="noopener noreferrer" class="navbar__item navbar__link header-github-link" aria-label="GitHub repository" title="Visit project repository in GitHub"></a><a href=https://pranabdas.github.io rel="noopener noreferrer" class="navbar__item navbar__link header-homepage-link" aria-label="About me" title="Go to Pranab's Homepage"></a><div class="toggle_vylO colorModeToggle_DEke"><button class="clean-btn toggleButton_gllP toggleButtonDisabled_aARS" type=button disabled title="Switch between dark and light mode (currently light mode)" aria-label="Switch between dark and light mode (currently light mode)" aria-live=polite aria-pressed=false><svg viewBox="0 0 24 24" width=24 height=24 class=lightToggleIcon_pyhR><path fill=currentColor d="M12,9c1.65,0,3,1.35,3,3s-1.35,3-3,3s-3-1.35-3-3S10.35,9,12,9 M12,7c-2.76,0-5,2.24-5,5s2.24,5,5,5s5-2.24,5-5 S14.76,7,12,7L12,7z M2,13l2,0c0.55,0,1-0.45,1-1s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S1.45,13,2,13z M20,13l2,0c0.55,0,1-0.45,1-1 s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S19.45,13,20,13z M11,2v2c0,0.55,0.45,1,1,1s1-0.45,1-1V2c0-0.55-0.45-1-1-1S11,1.45,11,2z M11,20v2c0,0.55,0.45,1,1,1s1-0.45,1-1v-2c0-0.55-0.45-1-1-1C11.45,19,11,19.45,11,20z M5.99,4.58c-0.39-0.39-1.03-0.39-1.41,0 c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0s0.39-1.03,0-1.41L5.99,4.58z M18.36,16.95 c-0.39-0.39-1.03-0.39-1.41,0c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0c0.39-0.39,0.39-1.03,0-1.41 L18.36,16.95z M19.42,5.99c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06c-0.39,0.39-0.39,1.03,0,1.41 s1.03,0.39,1.41,0L19.42,5.99z M7.05,18.36c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06 c-0.39,0.39-0.39,1.03,0,1.41s1.03,0.39,1.41,0L7.05,18.36z"/></svg><svg viewBox="0 0 24 24" width=24 height=24 class=darkToggleIcon_wfgR><path fill=currentColor d="M9.37,5.51C9.19,6.15,9.1,6.82,9.1,7.5c0,4.08,3.32,7.4,7.4,7.4c0.68,0,1.35-0.09,1.99-0.27C17.45,17.19,14.93,19,12,19 c-3.86,0-7-3.14-7-7C5,9.07,6.81,6.55,9.37,5.51z M12,3c-4.97,0-9,4.03-9,9s4.03,9,9,9s9-4.03,9-9c0-0.46-0.04-0.92-0.1-1.36 c-0.98,1.37-2.58,2.26-4.4,2.26c-2.98,0-5.4-2.42-5.4-5.4c0-1.81,0.89-3.42,2.26-4.4C12.92,3.04,12.46,3,12,3L12,3z"/></svg></button></div><div class=navbarSearchContainer_Bca1><div class="navbar__search searchBarContainer_NW3z" dir=ltr><input placeholder=Search aria-label=Search class=navbar__search-input value=""><div class="loadingRing_RJI3 searchBarLoadingRing_YnHq"><div></div><div></div><div></div><div></div></div></div></div></div></div><div role=presentation class=navbar-sidebar__backdrop></div></nav><div id=__docusaurus_skipToContent_fallback class="main-wrapper mainWrapper_z2l0"><div class=docsWrapper_hBAB><button aria-label="Scroll back to top" class="clean-btn theme-back-to-top-button backToTopButton_sjWU" type=button></button><div class=docRoot_UBD9><aside class="theme-doc-sidebar-container docSidebarContainer_YfHR"><div class=sidebarViewport_aRkj><div class="sidebar_njMd sidebarWithHideableNavbar_wUlq"><a tabindex=-1 class=sidebarLogo_isFc href=/fortran/><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--light_NVdE"><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--dark_xIcU"><b>Fortran</b></a><nav aria-label="Docs sidebar" class="menu thin-scrollbar menu_SIkG"><ul class="theme-doc-sidebar-menu menu__list"><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/>Setup</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/basics>Basics</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/array>Array and Matrix</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/control>Logical control</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/loop>Loop</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/modules>Modules</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/procedures>Procedures</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/complex>Complex number</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/recursion>Recursion</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/types>Custom types</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/pointer>Pointer</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/file>File I/O</a><li class="theme-doc-sidebar-item-category theme-doc-sidebar-item-category-level-1 menu__list-item"><div class=menu__list-item-collapsible><a class="menu__link menu__link--sublist menu__link--active" href=/fortran/category/coding-practice>Coding practice</a><button aria-label="Collapse sidebar category 'Coding practice'" aria-expanded=true type=button class="clean-btn menu__caret"></button></div><ul style=display:block;overflow:visible;height:auto class=menu__list><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/swap>Swap two numbers</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/abs-path>Absolute path</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/hypotenuse>Calculate hypotenuse</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/integration>Numerical integration</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/haversine>Haversine formula</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/inner-product>Inner product</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/monte-carlo-pi>Monte Carlo method</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/monte-carlo-integration>Monte Carlo integration</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/time>Time</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/arg-parsing>Argument parsing</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/exec-command>External command</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class="menu__link menu__link--active" aria-current=page tabindex=0 href=/fortran/blas>BLAS</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/mpi>MPI Basics</a></ul><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/resources>Resources</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/license>License</a></ul></nav><button type=button title="Collapse sidebar" aria-label="Collapse sidebar" class="button button--secondary button--outline collapseSidebarButton_PEFL"><svg width=20 height=20 aria-hidden=true class=collapseSidebarButtonIcon_kv0_><g fill=#7a7a7a><path d="M9.992 10.023c0 .2-.062.399-.172.547l-4.996 7.492a.982.982 0 01-.828.454H1c-.55 0-1-.453-1-1 0-.2.059-.403.168-.551l4.629-6.942L.168 3.078A.939.939 0 010 2.528c0-.548.45-.997 1-.997h2.996c.352 0 .649.18.828.45L9.82 9.472c.11.148.172.347.172.55zm0 0"/><path d="M19.98 10.023c0 .2-.058.399-.168.547l-4.996 7.492a.987.987 0 01-.828.454h-3c-.547 0-.996-.453-.996-1 0-.2.059-.403.168-.551l4.625-6.942-4.625-6.945a.939.939 0 01-.168-.55 1 1 0 01.996-.997h3c.348 0 .649.18.828.45l4.996 7.492c.11.148.168.347.168.55zm0 0"/></g></svg></button></div></div></aside><main class=docMainContainer_TBSr><div class="container padding-top--md padding-bottom--lg"><div class=row><div class="col docItemCol_VOVn"><div class=docItemContainer_Djhp><article><nav class="theme-doc-breadcrumbs breadcrumbsContainer_Z_bl" aria-label=Breadcrumbs><ul class=breadcrumbs itemscope itemtype=https://schema.org/BreadcrumbList><li class=breadcrumbs__item><a aria-label="Home page" class=breadcrumbs__link href=/fortran/><svg viewBox="0 0 24 24" class=breadcrumbHomeIcon_YNFT><path d="M10 19v-5h4v5c0 .55.45 1 1 1h3c.55 0 1-.45 1-1v-7h1.7c.46 0 .68-.57.33-.87L12.67 3.6c-.38-.34-.96-.34-1.34 0l-8.36 7.53c-.34.3-.13.87.33.87H5v7c0 .55.45 1 1 1h3c.55 0 1-.45 1-1z" fill=currentColor /></svg></a><li itemscope itemprop=itemListElement itemtype=https://schema.org/ListItem class=breadcrumbs__item><a class=breadcrumbs__link itemprop=item href=/fortran/category/coding-practice><span itemprop=name>Coding practice</span></a><meta itemprop=position content=1><li itemscope itemprop=itemListElement itemtype=https://schema.org/ListItem class="breadcrumbs__item breadcrumbs__item--active"><span class=breadcrumbs__link itemprop=name>BLAS</span><meta itemprop=position content=2></ul></nav><div class="tocCollapsible_ETCw theme-doc-toc-mobile tocMobile_ITEo"><button type=button class="clean-btn tocCollapsibleButton_TO0P">On this page</button></div><div class="theme-doc-markdown markdown"><header><h1>Basic Linear Algebra Subprograms</h1></header><p>Install <a href=https://netlib.org/blas/ target=_blank rel="noopener noreferrer">BLAS</a> and <a href=https://netlib.org/lapack/ target=_blank rel="noopener noreferrer">LAPACK</a> libraries:</p>
+<!doctype html><html lang=en dir=ltr class="docs-wrapper plugin-docs plugin-id-default docs-version-current docs-doc-page docs-doc-id-blas" data-has-hydrated=false><meta charset=UTF-8><meta name=generator content="Docusaurus v3.6.1"><title data-rh=true>Basic Linear Algebra Subprograms • Fortran Tutorial</title><meta data-rh=true name=viewport content="width=device-width,initial-scale=1.0"><meta data-rh=true name=twitter:card content=summary_large_image><meta data-rh=true property=og:url content=https://pranabdas.github.io/fortran/blas><meta data-rh=true property=og:locale content=en><meta data-rh=true name=docusaurus_locale content=en><meta data-rh=true name=docsearch:language content=en><meta data-rh=true name=theme-color content=#06445c><meta data-rh=true name=docusaurus_version content=current><meta data-rh=true name=docusaurus_tag content=docs-default-current><meta data-rh=true name=docsearch:version content=current><meta data-rh=true name=docsearch:docusaurus_tag content=docs-default-current><meta data-rh=true property=og:title content="Basic Linear Algebra Subprograms • Fortran Tutorial"><meta data-rh=true name=description content="Install BLAS and [LAPACK]("><meta data-rh=true property=og:description content="Install BLAS and [LAPACK]("><link data-rh=true rel=icon href=/fortran/img/favicon.png><link data-rh=true rel=canonical href=https://pranabdas.github.io/fortran/blas><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/blas hreflang=en><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/blas hreflang=x-default><link rel=stylesheet href=https://pranab.pages.dev/assets/fonts/katex/katex.min.css><link rel=stylesheet href=/fortran/assets/css/styles.4de1c8a8.css><script src=/fortran/assets/js/runtime~main.667e3c0f.js defer></script><script src=/fortran/assets/js/main.10795e8f.js defer></script><body class=navigation-with-keyboard><script>!function(){var t,e=function(){try{return new URLSearchParams(window.location.search).get("docusaurus-theme")}catch(t){}}()||function(){try{return window.localStorage.getItem("theme")}catch(t){}}();t=null!==e?e:window.matchMedia("(prefers-color-scheme: dark)").matches?"dark":(window.matchMedia("(prefers-color-scheme: light)").matches,"light"),document.documentElement.setAttribute("data-theme",t)}(),function(){try{for(var[t,e]of new URLSearchParams(window.location.search).entries())if(t.startsWith("docusaurus-data-")){var a=t.replace("docusaurus-data-","data-");document.documentElement.setAttribute(a,e)}}catch(t){}}()</script><div id=__docusaurus><div role=region aria-label="Skip to main content"><a class=skipToContent_fXgn href=#__docusaurus_skipToContent_fallback>Skip to main content</a></div><nav aria-label=Main class="navbar navbar--fixed-top navbarHideable_m1mJ"><div class=navbar__inner><div class=navbar__items><button aria-label="Toggle navigation bar" aria-expanded=false class="navbar__toggle clean-btn" type=button><svg width=30 height=30 viewBox="0 0 30 30" aria-hidden=true><path stroke=currentColor stroke-linecap=round stroke-miterlimit=10 stroke-width=2 d="M4 7h22M4 15h22M4 23h22"/></svg></button><a class=navbar__brand href=/fortran/><div class=navbar__logo><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--light_NVdE"><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--dark_xIcU"></div><b class="navbar__title text--truncate">Fortran</b></a><div class="navbar__item dropdown dropdown--hoverable"><a aria-current=page class="navbar__link active" aria-haspopup=true aria-expanded=false role=button href=/fortran/>Docs</a><ul class=dropdown__menu><li><a aria-current=page class="dropdown__link dropdown__link--active" href=/fortran/>Fortran Programming</a><li><a href=https://pranabdas.github.io/docs/ rel="noopener noreferrer" class=dropdown__link>~ ~ ~ Other Docs ~ ~ ~</a><li><a href=https://pranabdas.github.io/arpespythontools/ rel="noopener noreferrer" class=dropdown__link>ARPES Python Tools</a><li><a href=https://pranabdas.github.io/c-cpp/ rel="noopener noreferrer" class=dropdown__link>C and C++ Programming</a><li><a href=https://pranabdas.github.io/condmat-notes/ rel="noopener noreferrer" class=dropdown__link>Condensed Matter Notes</a><li><a href=https://pranabdas.github.io/javascript/ rel="noopener noreferrer" class=dropdown__link>Javascript Tutorial</a><li><a href=https://pranabdas.github.io/linux/ rel="noopener noreferrer" class=dropdown__link>Linux Tutorial</a><li><a href=https://pranabdas.github.io/machine-learning/ rel="noopener noreferrer" class=dropdown__link>Machine Learning Notes</a><li><a href=https://pranabdas.github.io/openmx/ rel="noopener noreferrer" class=dropdown__link>OpenMX tutorial</a><li><a href=https://pranabdas.github.io/python-tutorial/ rel="noopener noreferrer" class=dropdown__link>Python Tutorial</a><li><a href=https://pranabdas.github.io/espresso/ rel="noopener noreferrer" class=dropdown__link>Quantum Espresso Tutorial</a><li><a href=https://pranabdas.github.io/rust/ rel="noopener noreferrer" class=dropdown__link>Rust Programming</a><li><a href=https://pranabdas.github.io/arpes-manual/ rel="noopener noreferrer" class=dropdown__link>SUV ARPES Manual</a><li><a href=https://pranabdas.github.io/suvtools/ rel="noopener noreferrer" class=dropdown__link>SUV Python Tools</a></ul></div></div><div class="navbar__items navbar__items--right"><a href=https://github.com/pranabdas/fortran rel="noopener noreferrer" class="navbar__item navbar__link header-github-link" aria-label="GitHub repository" title="Visit project repository in GitHub"></a><a href=https://pranabdas.github.io rel="noopener noreferrer" class="navbar__item navbar__link header-homepage-link" aria-label="About me" title="Go to Pranab's Homepage"></a><div class="toggle_vylO colorModeToggle_DEke"><button class="clean-btn toggleButton_gllP toggleButtonDisabled_aARS" type=button disabled title="Switch between dark and light mode (currently light mode)" aria-label="Switch between dark and light mode (currently light mode)" aria-live=polite aria-pressed=false><svg viewBox="0 0 24 24" width=24 height=24 class=lightToggleIcon_pyhR><path fill=currentColor d="M12,9c1.65,0,3,1.35,3,3s-1.35,3-3,3s-3-1.35-3-3S10.35,9,12,9 M12,7c-2.76,0-5,2.24-5,5s2.24,5,5,5s5-2.24,5-5 S14.76,7,12,7L12,7z M2,13l2,0c0.55,0,1-0.45,1-1s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S1.45,13,2,13z M20,13l2,0c0.55,0,1-0.45,1-1 s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S19.45,13,20,13z M11,2v2c0,0.55,0.45,1,1,1s1-0.45,1-1V2c0-0.55-0.45-1-1-1S11,1.45,11,2z M11,20v2c0,0.55,0.45,1,1,1s1-0.45,1-1v-2c0-0.55-0.45-1-1-1C11.45,19,11,19.45,11,20z M5.99,4.58c-0.39-0.39-1.03-0.39-1.41,0 c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0s0.39-1.03,0-1.41L5.99,4.58z M18.36,16.95 c-0.39-0.39-1.03-0.39-1.41,0c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0c0.39-0.39,0.39-1.03,0-1.41 L18.36,16.95z M19.42,5.99c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06c-0.39,0.39-0.39,1.03,0,1.41 s1.03,0.39,1.41,0L19.42,5.99z M7.05,18.36c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06 c-0.39,0.39-0.39,1.03,0,1.41s1.03,0.39,1.41,0L7.05,18.36z"/></svg><svg viewBox="0 0 24 24" width=24 height=24 class=darkToggleIcon_wfgR><path fill=currentColor d="M9.37,5.51C9.19,6.15,9.1,6.82,9.1,7.5c0,4.08,3.32,7.4,7.4,7.4c0.68,0,1.35-0.09,1.99-0.27C17.45,17.19,14.93,19,12,19 c-3.86,0-7-3.14-7-7C5,9.07,6.81,6.55,9.37,5.51z M12,3c-4.97,0-9,4.03-9,9s4.03,9,9,9s9-4.03,9-9c0-0.46-0.04-0.92-0.1-1.36 c-0.98,1.37-2.58,2.26-4.4,2.26c-2.98,0-5.4-2.42-5.4-5.4c0-1.81,0.89-3.42,2.26-4.4C12.92,3.04,12.46,3,12,3L12,3z"/></svg></button></div><div class=navbarSearchContainer_Bca1><div class="navbar__search searchBarContainer_NW3z" dir=ltr><input placeholder=Search aria-label=Search class=navbar__search-input value=""><div class="loadingRing_RJI3 searchBarLoadingRing_YnHq"><div></div><div></div><div></div><div></div></div></div></div></div></div><div role=presentation class=navbar-sidebar__backdrop></div></nav><div id=__docusaurus_skipToContent_fallback class="main-wrapper mainWrapper_z2l0"><div class=docsWrapper_hBAB><button aria-label="Scroll back to top" class="clean-btn theme-back-to-top-button backToTopButton_sjWU" type=button></button><div class=docRoot_UBD9><aside class="theme-doc-sidebar-container docSidebarContainer_YfHR"><div class=sidebarViewport_aRkj><div class="sidebar_njMd sidebarWithHideableNavbar_wUlq"><a tabindex=-1 class=sidebarLogo_isFc href=/fortran/><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--light_NVdE"><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--dark_xIcU"><b>Fortran</b></a><nav aria-label="Docs sidebar" class="menu thin-scrollbar menu_SIkG"><ul class="theme-doc-sidebar-menu menu__list"><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/>Setup</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/basics>Basics</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/array>Array and Matrix</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/control>Logical control</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/loop>Loop</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/modules>Modules</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/procedures>Procedures</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/complex>Complex number</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/recursion>Recursion</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/types>Custom types</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/pointer>Pointer</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/file>File I/O</a><li class="theme-doc-sidebar-item-category theme-doc-sidebar-item-category-level-1 menu__list-item"><div class=menu__list-item-collapsible><a class="menu__link menu__link--sublist menu__link--active" href=/fortran/category/coding-practice>Coding practice</a><button aria-label="Collapse sidebar category 'Coding practice'" aria-expanded=true type=button class="clean-btn menu__caret"></button></div><ul style=display:block;overflow:visible;height:auto class=menu__list><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/swap>Swap two numbers</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/abs-path>Absolute path</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/hypotenuse>Calculate hypotenuse</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/integration>Numerical integration</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/haversine>Haversine formula</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/inner-product>Inner product</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/monte-carlo-pi>Monte Carlo method</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/monte-carlo-integration>Monte Carlo integration</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/time>Time</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/arg-parsing>Argument parsing</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/exec-command>External command</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class="menu__link menu__link--active" aria-current=page tabindex=0 href=/fortran/blas>BLAS</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/mpi>MPI Basics</a></ul><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/resources>Resources</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/license>License</a></ul></nav><button type=button title="Collapse sidebar" aria-label="Collapse sidebar" class="button button--secondary button--outline collapseSidebarButton_PEFL"><svg width=20 height=20 aria-hidden=true class=collapseSidebarButtonIcon_kv0_><g fill=#7a7a7a><path d="M9.992 10.023c0 .2-.062.399-.172.547l-4.996 7.492a.982.982 0 01-.828.454H1c-.55 0-1-.453-1-1 0-.2.059-.403.168-.551l4.629-6.942L.168 3.078A.939.939 0 010 2.528c0-.548.45-.997 1-.997h2.996c.352 0 .649.18.828.45L9.82 9.472c.11.148.172.347.172.55zm0 0"/><path d="M19.98 10.023c0 .2-.058.399-.168.547l-4.996 7.492a.987.987 0 01-.828.454h-3c-.547 0-.996-.453-.996-1 0-.2.059-.403.168-.551l4.625-6.942-4.625-6.945a.939.939 0 01-.168-.55 1 1 0 01.996-.997h3c.348 0 .649.18.828.45l4.996 7.492c.11.148.168.347.168.55zm0 0"/></g></svg></button></div></div></aside><main class=docMainContainer_TBSr><div class="container padding-top--md padding-bottom--lg"><div class=row><div class="col docItemCol_VOVn"><div class=docItemContainer_Djhp><article><nav class="theme-doc-breadcrumbs breadcrumbsContainer_Z_bl" aria-label=Breadcrumbs><ul class=breadcrumbs itemscope itemtype=https://schema.org/BreadcrumbList><li class=breadcrumbs__item><a aria-label="Home page" class=breadcrumbs__link href=/fortran/><svg viewBox="0 0 24 24" class=breadcrumbHomeIcon_YNFT><path d="M10 19v-5h4v5c0 .55.45 1 1 1h3c.55 0 1-.45 1-1v-7h1.7c.46 0 .68-.57.33-.87L12.67 3.6c-.38-.34-.96-.34-1.34 0l-8.36 7.53c-.34.3-.13.87.33.87H5v7c0 .55.45 1 1 1h3c.55 0 1-.45 1-1z" fill=currentColor /></svg></a><li itemscope itemprop=itemListElement itemtype=https://schema.org/ListItem class=breadcrumbs__item><a class=breadcrumbs__link itemprop=item href=/fortran/category/coding-practice><span itemprop=name>Coding practice</span></a><meta itemprop=position content=1><li itemscope itemprop=itemListElement itemtype=https://schema.org/ListItem class="breadcrumbs__item breadcrumbs__item--active"><span class=breadcrumbs__link itemprop=name>BLAS</span><meta itemprop=position content=2></ul></nav><div class="tocCollapsible_ETCw theme-doc-toc-mobile tocMobile_ITEo"><button type=button class="clean-btn tocCollapsibleButton_TO0P">On this page</button></div><div class="theme-doc-markdown markdown"><header><h1>Basic Linear Algebra Subprograms</h1></header><p>Install <a href=https://netlib.org/blas/ target=_blank rel="noopener noreferrer">BLAS</a> and <a href=https://netlib.org/lapack/ target=_blank rel="noopener noreferrer">LAPACK</a> libraries:</p>
 <div class="language-bash codeBlockContainer_Ckt0 theme-code-block" style=--prism-color:#393A34;--prism-background-color:#f6f8fa><div class=codeBlockContent_biex><pre tabindex=0 class="prism-code language-bash codeBlock_bY9V thin-scrollbar" style=color:#393A34;background-color:#f6f8fa><code class=codeBlockLines_e6Vv><span class=token-line style=color:#393A34><span class="token function" style=color:#d73a49>apt</span><span class="token plain"> </span><span class="token function" style=color:#d73a49>install</span><span class="token plain"> blaslib-dev lapacklib-dev</span><br></span><span class=token-line style=color:#393A34><span class="token plain" style=display:inline-block></span><br></span><span class=token-line style=color:#393A34><span class="token plain"></span><span class="token comment" style=color:#999988;font-style:italic># compile program</span><span class="token plain"></span><br></span><span class=token-line style=color:#393A34><span class="token plain">gfortran filename.f90 </span><span class="token parameter variable" style=color:#36acaa>-lblas</span><span class="token plain"></span><br></span><span class=token-line style=color:#393A34><span class="token plain" style=display:inline-block></span><br></span><span class=token-line style=color:#393A34><span class="token plain"></span><span class="token comment" style=color:#999988;font-style:italic># in case libs are not in system path</span><span class="token plain"></span><br></span><span class=token-line style=color:#393A34><span class="token plain">gfortran filename.f90 -L/usr/lib </span><span class="token parameter variable" style=color:#36acaa>-lblas</span><br></span></code></pre><div class=buttonGroup__atx><button type=button aria-label="Copy code to clipboard" title=Copy class=clean-btn><span class=copyButtonIcons_eSgA aria-hidden=true><svg viewBox="0 0 24 24" class=copyButtonIcon_y97N><path fill=currentColor d="M19,21H8V7H19M19,5H8A2,2 0 0,0 6,7V21A2,2 0 0,0 8,23H19A2,2 0 0,0 21,21V7A2,2 0 0,0 19,5M16,1H4A2,2 0 0,0 2,3V17H4V3H16V1Z"/></svg><svg viewBox="0 0 24 24" class=copyButtonSuccessIcon_LjdS><path fill=currentColor d=M21,7L9,19L3.5,13.5L4.91,12.09L9,16.17L19.59,5.59L21,7Z /></svg></span></button></div></div></div>
 <h2 class="anchor anchorWithHideOnScrollNavbar_WYt5" id=scaler-product-sdot>Scaler product (<code>SDOT</code>)<a href=#scaler-product-sdot class=hash-link aria-label="Direct link to scaler-product-sdot" title="Direct link to scaler-product-sdot">​</a></h2>
 <!-- -->
diff --git a/category/coding-practice/index.html b/category/coding-practice/index.html
index 3a23500..af2e05b 100644
--- a/category/coding-practice/index.html
+++ b/category/coding-practice/index.html
@@ -1,2 +1,2 @@
-<!doctype html><html lang=en dir=ltr class="docs-wrapper plugin-docs plugin-id-default docs-version-current docs-doc-page" data-has-hydrated=false><meta charset=UTF-8><meta name=generator content="Docusaurus v3.6.1"><title data-rh=true>Coding practice • Fortran Tutorial</title><meta data-rh=true name=viewport content="width=device-width,initial-scale=1.0"><meta data-rh=true name=twitter:card content=summary_large_image><meta data-rh=true property=og:url content=https://pranabdas.github.io/fortran/category/coding-practice><meta data-rh=true property=og:locale content=en><meta data-rh=true name=docusaurus_locale content=en><meta data-rh=true name=docsearch:language content=en><meta data-rh=true name=theme-color content=#06445c><meta data-rh=true name=docusaurus_version content=current><meta data-rh=true name=docusaurus_tag content=docs-default-current><meta data-rh=true name=docsearch:version content=current><meta data-rh=true name=docsearch:docusaurus_tag content=docs-default-current><meta data-rh=true property=og:title content="Coding practice • Fortran Tutorial"><link data-rh=true rel=icon href=/fortran/img/favicon.png><link data-rh=true rel=canonical href=https://pranabdas.github.io/fortran/category/coding-practice><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/category/coding-practice hreflang=en><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/category/coding-practice hreflang=x-default><link rel=stylesheet href=https://pranabdas.github.io/drive/webfonts/katex/katex.min.css><link rel=stylesheet href=/fortran/assets/css/styles.4de1c8a8.css><script src=/fortran/assets/js/runtime~main.866c090c.js defer></script><script src=/fortran/assets/js/main.ec888ba8.js defer></script><body class=navigation-with-keyboard><script>!function(){var t,e=function(){try{return new URLSearchParams(window.location.search).get("docusaurus-theme")}catch(t){}}()||function(){try{return window.localStorage.getItem("theme")}catch(t){}}();t=null!==e?e:window.matchMedia("(prefers-color-scheme: dark)").matches?"dark":(window.matchMedia("(prefers-color-scheme: light)").matches,"light"),document.documentElement.setAttribute("data-theme",t)}(),function(){try{for(var[t,e]of new URLSearchParams(window.location.search).entries())if(t.startsWith("docusaurus-data-")){var a=t.replace("docusaurus-data-","data-");document.documentElement.setAttribute(a,e)}}catch(t){}}()</script><div id=__docusaurus><div role=region aria-label="Skip to main content"><a class=skipToContent_fXgn href=#__docusaurus_skipToContent_fallback>Skip to main content</a></div><nav aria-label=Main class="navbar navbar--fixed-top navbarHideable_m1mJ"><div class=navbar__inner><div class=navbar__items><button aria-label="Toggle navigation bar" aria-expanded=false class="navbar__toggle clean-btn" type=button><svg width=30 height=30 viewBox="0 0 30 30" aria-hidden=true><path stroke=currentColor stroke-linecap=round stroke-miterlimit=10 stroke-width=2 d="M4 7h22M4 15h22M4 23h22"/></svg></button><a class=navbar__brand href=/fortran/><div class=navbar__logo><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--light_NVdE"><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--dark_xIcU"></div><b class="navbar__title text--truncate">Fortran</b></a><div class="navbar__item dropdown dropdown--hoverable"><a aria-current=page class="navbar__link active" aria-haspopup=true aria-expanded=false role=button href=/fortran/>Docs</a><ul class=dropdown__menu><li><a aria-current=page class="dropdown__link dropdown__link--active" href=/fortran/>Fortran Programming</a><li><a href=https://pranabdas.github.io/docs/ rel="noopener noreferrer" class=dropdown__link>~ ~ ~ Other Docs ~ ~ ~</a><li><a href=https://pranabdas.github.io/arpespythontools/ rel="noopener noreferrer" class=dropdown__link>ARPES Python Tools</a><li><a href=https://pranabdas.github.io/c-cpp/ rel="noopener noreferrer" class=dropdown__link>C and C++ Programming</a><li><a href=https://pranabdas.github.io/condmat-notes/ rel="noopener noreferrer" class=dropdown__link>Condensed Matter Notes</a><li><a href=https://pranabdas.github.io/javascript/ rel="noopener noreferrer" class=dropdown__link>Javascript Tutorial</a><li><a href=https://pranabdas.github.io/linux/ rel="noopener noreferrer" class=dropdown__link>Linux Tutorial</a><li><a href=https://pranabdas.github.io/machine-learning/ rel="noopener noreferrer" class=dropdown__link>Machine Learning Notes</a><li><a href=https://pranabdas.github.io/openmx/ rel="noopener noreferrer" class=dropdown__link>OpenMX tutorial</a><li><a href=https://pranabdas.github.io/python-tutorial/ rel="noopener noreferrer" class=dropdown__link>Python Tutorial</a><li><a href=https://pranabdas.github.io/espresso/ rel="noopener noreferrer" class=dropdown__link>Quantum Espresso Tutorial</a><li><a href=https://pranabdas.github.io/rust/ rel="noopener noreferrer" class=dropdown__link>Rust Programming</a><li><a href=https://pranabdas.github.io/arpes-manual/ rel="noopener noreferrer" class=dropdown__link>SUV ARPES Manual</a><li><a href=https://pranabdas.github.io/suvtools/ rel="noopener noreferrer" class=dropdown__link>SUV Python Tools</a></ul></div></div><div class="navbar__items navbar__items--right"><a href=https://github.com/pranabdas/fortran rel="noopener noreferrer" class="navbar__item navbar__link header-github-link" aria-label="GitHub repository" title="Visit project repository in GitHub"></a><a href=https://pranabdas.github.io rel="noopener noreferrer" class="navbar__item navbar__link header-homepage-link" aria-label="About me" title="Go to Pranab's Homepage"></a><div class="toggle_vylO colorModeToggle_DEke"><button class="clean-btn toggleButton_gllP toggleButtonDisabled_aARS" type=button disabled title="Switch between dark and light mode (currently light mode)" aria-label="Switch between dark and light mode (currently light mode)" aria-live=polite aria-pressed=false><svg viewBox="0 0 24 24" width=24 height=24 class=lightToggleIcon_pyhR><path fill=currentColor d="M12,9c1.65,0,3,1.35,3,3s-1.35,3-3,3s-3-1.35-3-3S10.35,9,12,9 M12,7c-2.76,0-5,2.24-5,5s2.24,5,5,5s5-2.24,5-5 S14.76,7,12,7L12,7z M2,13l2,0c0.55,0,1-0.45,1-1s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S1.45,13,2,13z M20,13l2,0c0.55,0,1-0.45,1-1 s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S19.45,13,20,13z M11,2v2c0,0.55,0.45,1,1,1s1-0.45,1-1V2c0-0.55-0.45-1-1-1S11,1.45,11,2z M11,20v2c0,0.55,0.45,1,1,1s1-0.45,1-1v-2c0-0.55-0.45-1-1-1C11.45,19,11,19.45,11,20z M5.99,4.58c-0.39-0.39-1.03-0.39-1.41,0 c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0s0.39-1.03,0-1.41L5.99,4.58z M18.36,16.95 c-0.39-0.39-1.03-0.39-1.41,0c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0c0.39-0.39,0.39-1.03,0-1.41 L18.36,16.95z M19.42,5.99c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06c-0.39,0.39-0.39,1.03,0,1.41 s1.03,0.39,1.41,0L19.42,5.99z M7.05,18.36c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06 c-0.39,0.39-0.39,1.03,0,1.41s1.03,0.39,1.41,0L7.05,18.36z"/></svg><svg viewBox="0 0 24 24" width=24 height=24 class=darkToggleIcon_wfgR><path fill=currentColor d="M9.37,5.51C9.19,6.15,9.1,6.82,9.1,7.5c0,4.08,3.32,7.4,7.4,7.4c0.68,0,1.35-0.09,1.99-0.27C17.45,17.19,14.93,19,12,19 c-3.86,0-7-3.14-7-7C5,9.07,6.81,6.55,9.37,5.51z M12,3c-4.97,0-9,4.03-9,9s4.03,9,9,9s9-4.03,9-9c0-0.46-0.04-0.92-0.1-1.36 c-0.98,1.37-2.58,2.26-4.4,2.26c-2.98,0-5.4-2.42-5.4-5.4c0-1.81,0.89-3.42,2.26-4.4C12.92,3.04,12.46,3,12,3L12,3z"/></svg></button></div><div class=navbarSearchContainer_Bca1><div class="navbar__search searchBarContainer_NW3z" dir=ltr><input placeholder=Search aria-label=Search class=navbar__search-input value=""><div class="loadingRing_RJI3 searchBarLoadingRing_YnHq"><div></div><div></div><div></div><div></div></div></div></div></div></div><div role=presentation class=navbar-sidebar__backdrop></div></nav><div id=__docusaurus_skipToContent_fallback class="main-wrapper mainWrapper_z2l0"><div class=docsWrapper_hBAB><button aria-label="Scroll back to top" class="clean-btn theme-back-to-top-button backToTopButton_sjWU" type=button></button><div class=docRoot_UBD9><aside class="theme-doc-sidebar-container docSidebarContainer_YfHR"><div class=sidebarViewport_aRkj><div class="sidebar_njMd sidebarWithHideableNavbar_wUlq"><a tabindex=-1 class=sidebarLogo_isFc href=/fortran/><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--light_NVdE"><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--dark_xIcU"><b>Fortran</b></a><nav aria-label="Docs sidebar" class="menu thin-scrollbar menu_SIkG"><ul class="theme-doc-sidebar-menu menu__list"><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/>Setup</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/basics>Basics</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/array>Array and Matrix</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/control>Logical control</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/loop>Loop</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/modules>Modules</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/procedures>Procedures</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/complex>Complex number</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/recursion>Recursion</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/types>Custom types</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/pointer>Pointer</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/file>File I/O</a><li class="theme-doc-sidebar-item-category theme-doc-sidebar-item-category-level-1 menu__list-item"><div class="menu__list-item-collapsible menu__list-item-collapsible--active"><a class="menu__link menu__link--sublist menu__link--active" aria-current=page href=/fortran/category/coding-practice>Coding practice</a><button aria-label="Collapse sidebar category 'Coding practice'" aria-expanded=true type=button class="clean-btn menu__caret"></button></div><ul style=display:block;overflow:visible;height:auto class=menu__list><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/swap>Swap two numbers</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/abs-path>Absolute path</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/hypotenuse>Calculate hypotenuse</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/integration>Numerical integration</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/haversine>Haversine formula</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/inner-product>Inner product</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/monte-carlo-pi>Monte Carlo method</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/monte-carlo-integration>Monte Carlo integration</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/time>Time</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/arg-parsing>Argument parsing</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/exec-command>External command</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/blas>BLAS</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/mpi>MPI Basics</a></ul><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/resources>Resources</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/license>License</a></ul></nav><button type=button title="Collapse sidebar" aria-label="Collapse sidebar" class="button button--secondary button--outline collapseSidebarButton_PEFL"><svg width=20 height=20 aria-hidden=true class=collapseSidebarButtonIcon_kv0_><g fill=#7a7a7a><path d="M9.992 10.023c0 .2-.062.399-.172.547l-4.996 7.492a.982.982 0 01-.828.454H1c-.55 0-1-.453-1-1 0-.2.059-.403.168-.551l4.629-6.942L.168 3.078A.939.939 0 010 2.528c0-.548.45-.997 1-.997h2.996c.352 0 .649.18.828.45L9.82 9.472c.11.148.172.347.172.55zm0 0"/><path d="M19.98 10.023c0 .2-.058.399-.168.547l-4.996 7.492a.987.987 0 01-.828.454h-3c-.547 0-.996-.453-.996-1 0-.2.059-.403.168-.551l4.625-6.942-4.625-6.945a.939.939 0 01-.168-.55 1 1 0 01.996-.997h3c.348 0 .649.18.828.45l4.996 7.492c.11.148.168.347.168.55zm0 0"/></g></svg></button></div></div></aside><main class=docMainContainer_TBSr><div class="container padding-top--md padding-bottom--lg"><div class=generatedIndexPage_vN6x><nav class="theme-doc-breadcrumbs breadcrumbsContainer_Z_bl" aria-label=Breadcrumbs><ul class=breadcrumbs itemscope itemtype=https://schema.org/BreadcrumbList><li class=breadcrumbs__item><a aria-label="Home page" class=breadcrumbs__link href=/fortran/><svg viewBox="0 0 24 24" class=breadcrumbHomeIcon_YNFT><path d="M10 19v-5h4v5c0 .55.45 1 1 1h3c.55 0 1-.45 1-1v-7h1.7c.46 0 .68-.57.33-.87L12.67 3.6c-.38-.34-.96-.34-1.34 0l-8.36 7.53c-.34.3-.13.87.33.87H5v7c0 .55.45 1 1 1h3c.55 0 1-.45 1-1z" fill=currentColor /></svg></a><li itemscope itemprop=itemListElement itemtype=https://schema.org/ListItem class="breadcrumbs__item breadcrumbs__item--active"><span class=breadcrumbs__link itemprop=name>Coding practice</span><meta itemprop=position content=1></ul></nav><header><h1 class=title_kItE>Coding practice</h1></header><article class=margin-top--lg><section class="row list_eTzJ"><article class="col col--6 margin-bottom--lg"><a class="card padding--lg cardContainer_fWXF" href=/fortran/swap><h2 class="text--truncate cardTitle_rnsV" title="Swap two numbers">📄️<!-- --> <!-- -->Swap two numbers</h2><p class="text--truncate cardDescription_PWke" title="Subroutine to swap two integers:">Subroutine to swap two integers:</p></a></article><article class="col col--6 margin-bottom--lg"><a class="card padding--lg cardContainer_fWXF" href=/fortran/abs-path><h2 class="text--truncate cardTitle_rnsV" title="Absolute path">📄️<!-- --> <!-- -->Absolute path</h2><p class="text--truncate cardDescription_PWke" title="Here is a function to convert filenames to their absolute path:">Here is a function to convert filenames to their absolute path:</p></a></article><article class="col col--6 margin-bottom--lg"><a class="card padding--lg cardContainer_fWXF" href=/fortran/hypotenuse><h2 class="text--truncate cardTitle_rnsV" title="Calculate hypotenuse">📄️<!-- --> <!-- -->Calculate hypotenuse</h2><p class="text--truncate cardDescription_PWke" title="Hypotenuse can be calculated using following formula:">Hypotenuse can be calculated using following formula:</p></a></article><article class="col col--6 margin-bottom--lg"><a class="card padding--lg cardContainer_fWXF" href=/fortran/integration><h2 class="text--truncate cardTitle_rnsV" title="Numerical integration">📄️<!-- --> <!-- -->Numerical integration</h2><p class="text--truncate cardDescription_PWke" title="We will calculate the area under the curve $f(x)$ within the bounds $x=a$ and">We will calculate the area under the curve $f(x)$ within the bounds $x=a$ and</p></a></article><article class="col col--6 margin-bottom--lg"><a class="card padding--lg cardContainer_fWXF" href=/fortran/haversine><h2 class="text--truncate cardTitle_rnsV" title="Haversine formula">📄️<!-- --> <!-- -->Haversine formula</h2><p class="text--truncate cardDescription_PWke" title="Determine the distance between two places on earth given latitude and longitude.">Determine the distance between two places on earth given latitude and longitude.</p></a></article><article class="col col--6 margin-bottom--lg"><a class="card padding--lg cardContainer_fWXF" href=/fortran/inner-product><h2 class="text--truncate cardTitle_rnsV" title="Inner product">📄️<!-- --> <!-- -->Inner product</h2><p class="text--truncate cardDescription_PWke" title="Example of dynamic array allocation:">Example of dynamic array allocation:</p></a></article><article class="col col--6 margin-bottom--lg"><a class="card padding--lg cardContainer_fWXF" href=/fortran/monte-carlo-pi><h2 class="text--truncate cardTitle_rnsV" title="Monte Carlo method">📄️<!-- --> <!-- -->Monte Carlo method</h2><p class="text--truncate cardDescription_PWke" title="We will approximate value of $\pi$ by Monte Carlo method. We will generate">We will approximate value of $\pi$ by Monte Carlo method. We will generate</p></a></article><article class="col col--6 margin-bottom--lg"><a class="card padding--lg cardContainer_fWXF" href=/fortran/monte-carlo-integration><h2 class="text--truncate cardTitle_rnsV" title="Monte Carlo integration">📄️<!-- --> <!-- -->Monte Carlo integration</h2></a></article><article class="col col--6 margin-bottom--lg"><a class="card padding--lg cardContainer_fWXF" href=/fortran/time><h2 class="text--truncate cardTitle_rnsV" title=Time>📄️<!-- --> <!-- -->Time</h2><p class="text--truncate cardDescription_PWke" title="Following example uses dateandtime and cup_time to find current date and">Following example uses dateandtime and cup_time to find current date and</p></a></article><article class="col col--6 margin-bottom--lg"><a class="card padding--lg cardContainer_fWXF" href=/fortran/arg-parsing><h2 class="text--truncate cardTitle_rnsV" title="Argument parsing">📄️<!-- --> <!-- -->Argument parsing</h2><p class="text--truncate cardDescription_PWke" title="We will use commandargumentcount and getcommandargument to parse command">We will use commandargumentcount and getcommandargument to parse command</p></a></article><article class="col col--6 margin-bottom--lg"><a class="card padding--lg cardContainer_fWXF" href=/fortran/exec-command><h2 class="text--truncate cardTitle_rnsV" title="External command">📄️<!-- --> <!-- -->External command</h2><p class="text--truncate cardDescription_PWke" title="We can call executecommandline to execute external commands in a FORTRAN">We can call executecommandline to execute external commands in a FORTRAN</p></a></article><article class="col col--6 margin-bottom--lg"><a class="card padding--lg cardContainer_fWXF" href=/fortran/blas><h2 class="text--truncate cardTitle_rnsV" title=BLAS>📄️<!-- --> <!-- -->BLAS</h2><p class="text--truncate cardDescription_PWke" title="Install BLAS and [LAPACK](">Install BLAS and [LAPACK](</p></a></article><article class="col col--6 margin-bottom--lg"><a class="card padding--lg cardContainer_fWXF" href=/fortran/mpi><h2 class="text--truncate cardTitle_rnsV" title="MPI Basics">📄️<!-- --> <!-- -->MPI Basics</h2><p class="text--truncate cardDescription_PWke" title="MPI Hello World">MPI Hello World</p></a></article></section></article><footer class=margin-top--lg><nav class="pagination-nav docusaurus-mt-lg" aria-label="Docs pages"><a class="pagination-nav__link pagination-nav__link--prev" href=/fortran/file><div class=pagination-nav__sublabel>Previous</div><div class=pagination-nav__label>File I/O</div></a><a class="pagination-nav__link pagination-nav__link--next" href=/fortran/swap><div class=pagination-nav__sublabel>Next</div><div class=pagination-nav__label>Swap two numbers</div></a></nav></footer></div></div></main></div></div></div><footer class="footer footer--dark"><div class="container container-fluid"><div class="footer__bottom text--center"><div class=footer__copyright>Copyright © 2024 Pranab Das. All rights
+<!doctype html><html lang=en dir=ltr class="docs-wrapper plugin-docs plugin-id-default docs-version-current docs-doc-page" data-has-hydrated=false><meta charset=UTF-8><meta name=generator content="Docusaurus v3.6.1"><title data-rh=true>Coding practice • Fortran Tutorial</title><meta data-rh=true name=viewport content="width=device-width,initial-scale=1.0"><meta data-rh=true name=twitter:card content=summary_large_image><meta data-rh=true property=og:url content=https://pranabdas.github.io/fortran/category/coding-practice><meta data-rh=true property=og:locale content=en><meta data-rh=true name=docusaurus_locale content=en><meta data-rh=true name=docsearch:language content=en><meta data-rh=true name=theme-color content=#06445c><meta data-rh=true name=docusaurus_version content=current><meta data-rh=true name=docusaurus_tag content=docs-default-current><meta data-rh=true name=docsearch:version content=current><meta data-rh=true name=docsearch:docusaurus_tag content=docs-default-current><meta data-rh=true property=og:title content="Coding practice • Fortran Tutorial"><link data-rh=true rel=icon href=/fortran/img/favicon.png><link data-rh=true rel=canonical href=https://pranabdas.github.io/fortran/category/coding-practice><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/category/coding-practice hreflang=en><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/category/coding-practice hreflang=x-default><link rel=stylesheet href=https://pranab.pages.dev/assets/fonts/katex/katex.min.css><link rel=stylesheet href=/fortran/assets/css/styles.4de1c8a8.css><script src=/fortran/assets/js/runtime~main.667e3c0f.js defer></script><script src=/fortran/assets/js/main.10795e8f.js defer></script><body class=navigation-with-keyboard><script>!function(){var t,e=function(){try{return new URLSearchParams(window.location.search).get("docusaurus-theme")}catch(t){}}()||function(){try{return window.localStorage.getItem("theme")}catch(t){}}();t=null!==e?e:window.matchMedia("(prefers-color-scheme: dark)").matches?"dark":(window.matchMedia("(prefers-color-scheme: light)").matches,"light"),document.documentElement.setAttribute("data-theme",t)}(),function(){try{for(var[t,e]of new URLSearchParams(window.location.search).entries())if(t.startsWith("docusaurus-data-")){var a=t.replace("docusaurus-data-","data-");document.documentElement.setAttribute(a,e)}}catch(t){}}()</script><div id=__docusaurus><div role=region aria-label="Skip to main content"><a class=skipToContent_fXgn href=#__docusaurus_skipToContent_fallback>Skip to main content</a></div><nav aria-label=Main class="navbar navbar--fixed-top navbarHideable_m1mJ"><div class=navbar__inner><div class=navbar__items><button aria-label="Toggle navigation bar" aria-expanded=false class="navbar__toggle clean-btn" type=button><svg width=30 height=30 viewBox="0 0 30 30" aria-hidden=true><path stroke=currentColor stroke-linecap=round stroke-miterlimit=10 stroke-width=2 d="M4 7h22M4 15h22M4 23h22"/></svg></button><a class=navbar__brand href=/fortran/><div class=navbar__logo><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--light_NVdE"><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--dark_xIcU"></div><b class="navbar__title text--truncate">Fortran</b></a><div class="navbar__item dropdown dropdown--hoverable"><a aria-current=page class="navbar__link active" aria-haspopup=true aria-expanded=false role=button href=/fortran/>Docs</a><ul class=dropdown__menu><li><a aria-current=page class="dropdown__link dropdown__link--active" href=/fortran/>Fortran Programming</a><li><a href=https://pranabdas.github.io/docs/ rel="noopener noreferrer" class=dropdown__link>~ ~ ~ Other Docs ~ ~ ~</a><li><a href=https://pranabdas.github.io/arpespythontools/ rel="noopener noreferrer" class=dropdown__link>ARPES Python Tools</a><li><a href=https://pranabdas.github.io/c-cpp/ rel="noopener noreferrer" class=dropdown__link>C and C++ Programming</a><li><a href=https://pranabdas.github.io/condmat-notes/ rel="noopener noreferrer" class=dropdown__link>Condensed Matter Notes</a><li><a href=https://pranabdas.github.io/javascript/ rel="noopener noreferrer" class=dropdown__link>Javascript Tutorial</a><li><a href=https://pranabdas.github.io/linux/ rel="noopener noreferrer" class=dropdown__link>Linux Tutorial</a><li><a href=https://pranabdas.github.io/machine-learning/ rel="noopener noreferrer" class=dropdown__link>Machine Learning Notes</a><li><a href=https://pranabdas.github.io/openmx/ rel="noopener noreferrer" class=dropdown__link>OpenMX tutorial</a><li><a href=https://pranabdas.github.io/python-tutorial/ rel="noopener noreferrer" class=dropdown__link>Python Tutorial</a><li><a href=https://pranabdas.github.io/espresso/ rel="noopener noreferrer" class=dropdown__link>Quantum Espresso Tutorial</a><li><a href=https://pranabdas.github.io/rust/ rel="noopener noreferrer" class=dropdown__link>Rust Programming</a><li><a href=https://pranabdas.github.io/arpes-manual/ rel="noopener noreferrer" class=dropdown__link>SUV ARPES Manual</a><li><a href=https://pranabdas.github.io/suvtools/ rel="noopener noreferrer" class=dropdown__link>SUV Python Tools</a></ul></div></div><div class="navbar__items navbar__items--right"><a href=https://github.com/pranabdas/fortran rel="noopener noreferrer" class="navbar__item navbar__link header-github-link" aria-label="GitHub repository" title="Visit project repository in GitHub"></a><a href=https://pranabdas.github.io rel="noopener noreferrer" class="navbar__item navbar__link header-homepage-link" aria-label="About me" title="Go to Pranab's Homepage"></a><div class="toggle_vylO colorModeToggle_DEke"><button class="clean-btn toggleButton_gllP toggleButtonDisabled_aARS" type=button disabled title="Switch between dark and light mode (currently light mode)" aria-label="Switch between dark and light mode (currently light mode)" aria-live=polite aria-pressed=false><svg viewBox="0 0 24 24" width=24 height=24 class=lightToggleIcon_pyhR><path fill=currentColor d="M12,9c1.65,0,3,1.35,3,3s-1.35,3-3,3s-3-1.35-3-3S10.35,9,12,9 M12,7c-2.76,0-5,2.24-5,5s2.24,5,5,5s5-2.24,5-5 S14.76,7,12,7L12,7z M2,13l2,0c0.55,0,1-0.45,1-1s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S1.45,13,2,13z M20,13l2,0c0.55,0,1-0.45,1-1 s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S19.45,13,20,13z M11,2v2c0,0.55,0.45,1,1,1s1-0.45,1-1V2c0-0.55-0.45-1-1-1S11,1.45,11,2z M11,20v2c0,0.55,0.45,1,1,1s1-0.45,1-1v-2c0-0.55-0.45-1-1-1C11.45,19,11,19.45,11,20z M5.99,4.58c-0.39-0.39-1.03-0.39-1.41,0 c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0s0.39-1.03,0-1.41L5.99,4.58z M18.36,16.95 c-0.39-0.39-1.03-0.39-1.41,0c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0c0.39-0.39,0.39-1.03,0-1.41 L18.36,16.95z M19.42,5.99c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06c-0.39,0.39-0.39,1.03,0,1.41 s1.03,0.39,1.41,0L19.42,5.99z M7.05,18.36c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06 c-0.39,0.39-0.39,1.03,0,1.41s1.03,0.39,1.41,0L7.05,18.36z"/></svg><svg viewBox="0 0 24 24" width=24 height=24 class=darkToggleIcon_wfgR><path fill=currentColor d="M9.37,5.51C9.19,6.15,9.1,6.82,9.1,7.5c0,4.08,3.32,7.4,7.4,7.4c0.68,0,1.35-0.09,1.99-0.27C17.45,17.19,14.93,19,12,19 c-3.86,0-7-3.14-7-7C5,9.07,6.81,6.55,9.37,5.51z M12,3c-4.97,0-9,4.03-9,9s4.03,9,9,9s9-4.03,9-9c0-0.46-0.04-0.92-0.1-1.36 c-0.98,1.37-2.58,2.26-4.4,2.26c-2.98,0-5.4-2.42-5.4-5.4c0-1.81,0.89-3.42,2.26-4.4C12.92,3.04,12.46,3,12,3L12,3z"/></svg></button></div><div class=navbarSearchContainer_Bca1><div class="navbar__search searchBarContainer_NW3z" dir=ltr><input placeholder=Search aria-label=Search class=navbar__search-input value=""><div class="loadingRing_RJI3 searchBarLoadingRing_YnHq"><div></div><div></div><div></div><div></div></div></div></div></div></div><div role=presentation class=navbar-sidebar__backdrop></div></nav><div id=__docusaurus_skipToContent_fallback class="main-wrapper mainWrapper_z2l0"><div class=docsWrapper_hBAB><button aria-label="Scroll back to top" class="clean-btn theme-back-to-top-button backToTopButton_sjWU" type=button></button><div class=docRoot_UBD9><aside class="theme-doc-sidebar-container docSidebarContainer_YfHR"><div class=sidebarViewport_aRkj><div class="sidebar_njMd sidebarWithHideableNavbar_wUlq"><a tabindex=-1 class=sidebarLogo_isFc href=/fortran/><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--light_NVdE"><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--dark_xIcU"><b>Fortran</b></a><nav aria-label="Docs sidebar" class="menu thin-scrollbar menu_SIkG"><ul class="theme-doc-sidebar-menu menu__list"><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/>Setup</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/basics>Basics</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/array>Array and Matrix</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/control>Logical control</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/loop>Loop</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/modules>Modules</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/procedures>Procedures</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/complex>Complex number</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/recursion>Recursion</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/types>Custom types</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/pointer>Pointer</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/file>File I/O</a><li class="theme-doc-sidebar-item-category theme-doc-sidebar-item-category-level-1 menu__list-item"><div class="menu__list-item-collapsible menu__list-item-collapsible--active"><a class="menu__link menu__link--sublist menu__link--active" aria-current=page href=/fortran/category/coding-practice>Coding practice</a><button aria-label="Collapse sidebar category 'Coding practice'" aria-expanded=true type=button class="clean-btn menu__caret"></button></div><ul style=display:block;overflow:visible;height:auto class=menu__list><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/swap>Swap two numbers</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/abs-path>Absolute path</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/hypotenuse>Calculate hypotenuse</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/integration>Numerical integration</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/haversine>Haversine formula</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/inner-product>Inner product</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/monte-carlo-pi>Monte Carlo method</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/monte-carlo-integration>Monte Carlo integration</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/time>Time</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/arg-parsing>Argument parsing</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/exec-command>External command</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/blas>BLAS</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/mpi>MPI Basics</a></ul><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/resources>Resources</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/license>License</a></ul></nav><button type=button title="Collapse sidebar" aria-label="Collapse sidebar" class="button button--secondary button--outline collapseSidebarButton_PEFL"><svg width=20 height=20 aria-hidden=true class=collapseSidebarButtonIcon_kv0_><g fill=#7a7a7a><path d="M9.992 10.023c0 .2-.062.399-.172.547l-4.996 7.492a.982.982 0 01-.828.454H1c-.55 0-1-.453-1-1 0-.2.059-.403.168-.551l4.629-6.942L.168 3.078A.939.939 0 010 2.528c0-.548.45-.997 1-.997h2.996c.352 0 .649.18.828.45L9.82 9.472c.11.148.172.347.172.55zm0 0"/><path d="M19.98 10.023c0 .2-.058.399-.168.547l-4.996 7.492a.987.987 0 01-.828.454h-3c-.547 0-.996-.453-.996-1 0-.2.059-.403.168-.551l4.625-6.942-4.625-6.945a.939.939 0 01-.168-.55 1 1 0 01.996-.997h3c.348 0 .649.18.828.45l4.996 7.492c.11.148.168.347.168.55zm0 0"/></g></svg></button></div></div></aside><main class=docMainContainer_TBSr><div class="container padding-top--md padding-bottom--lg"><div class=generatedIndexPage_vN6x><nav class="theme-doc-breadcrumbs breadcrumbsContainer_Z_bl" aria-label=Breadcrumbs><ul class=breadcrumbs itemscope itemtype=https://schema.org/BreadcrumbList><li class=breadcrumbs__item><a aria-label="Home page" class=breadcrumbs__link href=/fortran/><svg viewBox="0 0 24 24" class=breadcrumbHomeIcon_YNFT><path d="M10 19v-5h4v5c0 .55.45 1 1 1h3c.55 0 1-.45 1-1v-7h1.7c.46 0 .68-.57.33-.87L12.67 3.6c-.38-.34-.96-.34-1.34 0l-8.36 7.53c-.34.3-.13.87.33.87H5v7c0 .55.45 1 1 1h3c.55 0 1-.45 1-1z" fill=currentColor /></svg></a><li itemscope itemprop=itemListElement itemtype=https://schema.org/ListItem class="breadcrumbs__item breadcrumbs__item--active"><span class=breadcrumbs__link itemprop=name>Coding practice</span><meta itemprop=position content=1></ul></nav><header><h1 class=title_kItE>Coding practice</h1></header><article class=margin-top--lg><section class="row list_eTzJ"><article class="col col--6 margin-bottom--lg"><a class="card padding--lg cardContainer_fWXF" href=/fortran/swap><h2 class="text--truncate cardTitle_rnsV" title="Swap two numbers">📄️<!-- --> <!-- -->Swap two numbers</h2><p class="text--truncate cardDescription_PWke" title="Subroutine to swap two integers:">Subroutine to swap two integers:</p></a></article><article class="col col--6 margin-bottom--lg"><a class="card padding--lg cardContainer_fWXF" href=/fortran/abs-path><h2 class="text--truncate cardTitle_rnsV" title="Absolute path">📄️<!-- --> <!-- -->Absolute path</h2><p class="text--truncate cardDescription_PWke" title="Here is a function to convert filenames to their absolute path:">Here is a function to convert filenames to their absolute path:</p></a></article><article class="col col--6 margin-bottom--lg"><a class="card padding--lg cardContainer_fWXF" href=/fortran/hypotenuse><h2 class="text--truncate cardTitle_rnsV" title="Calculate hypotenuse">📄️<!-- --> <!-- -->Calculate hypotenuse</h2><p class="text--truncate cardDescription_PWke" title="Hypotenuse can be calculated using following formula:">Hypotenuse can be calculated using following formula:</p></a></article><article class="col col--6 margin-bottom--lg"><a class="card padding--lg cardContainer_fWXF" href=/fortran/integration><h2 class="text--truncate cardTitle_rnsV" title="Numerical integration">📄️<!-- --> <!-- -->Numerical integration</h2><p class="text--truncate cardDescription_PWke" title="We will calculate the area under the curve $f(x)$ within the bounds $x=a$ and">We will calculate the area under the curve $f(x)$ within the bounds $x=a$ and</p></a></article><article class="col col--6 margin-bottom--lg"><a class="card padding--lg cardContainer_fWXF" href=/fortran/haversine><h2 class="text--truncate cardTitle_rnsV" title="Haversine formula">📄️<!-- --> <!-- -->Haversine formula</h2><p class="text--truncate cardDescription_PWke" title="Determine the distance between two places on earth given latitude and longitude.">Determine the distance between two places on earth given latitude and longitude.</p></a></article><article class="col col--6 margin-bottom--lg"><a class="card padding--lg cardContainer_fWXF" href=/fortran/inner-product><h2 class="text--truncate cardTitle_rnsV" title="Inner product">📄️<!-- --> <!-- -->Inner product</h2><p class="text--truncate cardDescription_PWke" title="Example of dynamic array allocation:">Example of dynamic array allocation:</p></a></article><article class="col col--6 margin-bottom--lg"><a class="card padding--lg cardContainer_fWXF" href=/fortran/monte-carlo-pi><h2 class="text--truncate cardTitle_rnsV" title="Monte Carlo method">📄️<!-- --> <!-- -->Monte Carlo method</h2><p class="text--truncate cardDescription_PWke" title="We will approximate value of $\pi$ by Monte Carlo method. We will generate">We will approximate value of $\pi$ by Monte Carlo method. We will generate</p></a></article><article class="col col--6 margin-bottom--lg"><a class="card padding--lg cardContainer_fWXF" href=/fortran/monte-carlo-integration><h2 class="text--truncate cardTitle_rnsV" title="Monte Carlo integration">📄️<!-- --> <!-- -->Monte Carlo integration</h2></a></article><article class="col col--6 margin-bottom--lg"><a class="card padding--lg cardContainer_fWXF" href=/fortran/time><h2 class="text--truncate cardTitle_rnsV" title=Time>📄️<!-- --> <!-- -->Time</h2><p class="text--truncate cardDescription_PWke" title="Following example uses dateandtime and cup_time to find current date and">Following example uses dateandtime and cup_time to find current date and</p></a></article><article class="col col--6 margin-bottom--lg"><a class="card padding--lg cardContainer_fWXF" href=/fortran/arg-parsing><h2 class="text--truncate cardTitle_rnsV" title="Argument parsing">📄️<!-- --> <!-- -->Argument parsing</h2><p class="text--truncate cardDescription_PWke" title="We will use commandargumentcount and getcommandargument to parse command">We will use commandargumentcount and getcommandargument to parse command</p></a></article><article class="col col--6 margin-bottom--lg"><a class="card padding--lg cardContainer_fWXF" href=/fortran/exec-command><h2 class="text--truncate cardTitle_rnsV" title="External command">📄️<!-- --> <!-- -->External command</h2><p class="text--truncate cardDescription_PWke" title="We can call executecommandline to execute external commands in a FORTRAN">We can call executecommandline to execute external commands in a FORTRAN</p></a></article><article class="col col--6 margin-bottom--lg"><a class="card padding--lg cardContainer_fWXF" href=/fortran/blas><h2 class="text--truncate cardTitle_rnsV" title=BLAS>📄️<!-- --> <!-- -->BLAS</h2><p class="text--truncate cardDescription_PWke" title="Install BLAS and [LAPACK](">Install BLAS and [LAPACK](</p></a></article><article class="col col--6 margin-bottom--lg"><a class="card padding--lg cardContainer_fWXF" href=/fortran/mpi><h2 class="text--truncate cardTitle_rnsV" title="MPI Basics">📄️<!-- --> <!-- -->MPI Basics</h2><p class="text--truncate cardDescription_PWke" title="MPI Hello World">MPI Hello World</p></a></article></section></article><footer class=margin-top--lg><nav class="pagination-nav docusaurus-mt-lg" aria-label="Docs pages"><a class="pagination-nav__link pagination-nav__link--prev" href=/fortran/file><div class=pagination-nav__sublabel>Previous</div><div class=pagination-nav__label>File I/O</div></a><a class="pagination-nav__link pagination-nav__link--next" href=/fortran/swap><div class=pagination-nav__sublabel>Next</div><div class=pagination-nav__label>Swap two numbers</div></a></nav></footer></div></div></main></div></div></div><footer class="footer footer--dark"><div class="container container-fluid"><div class="footer__bottom text--center"><div class=footer__copyright>Copyright © 2024 Pranab Das. All rights
       reserved.</div></div></div></footer></div>
\ No newline at end of file
diff --git a/coarray/index.html b/coarray/index.html
index 7bce7e3..ee2c5a5 100644
--- a/coarray/index.html
+++ b/coarray/index.html
@@ -1,4 +1,4 @@
-<!doctype html><html lang=en dir=ltr class="docs-wrapper plugin-docs plugin-id-default docs-version-current docs-doc-page docs-doc-id-coarray" data-has-hydrated=false><meta charset=UTF-8><meta name=generator content="Docusaurus v3.6.1"><title data-rh=true>Coarray • Fortran Tutorial</title><meta data-rh=true name=viewport content="width=device-width,initial-scale=1.0"><meta data-rh=true name=twitter:card content=summary_large_image><meta data-rh=true property=og:url content=https://pranabdas.github.io/fortran/coarray><meta data-rh=true property=og:locale content=en><meta data-rh=true name=docusaurus_locale content=en><meta data-rh=true name=docsearch:language content=en><meta data-rh=true name=theme-color content=#06445c><meta data-rh=true name=docusaurus_version content=current><meta data-rh=true name=docusaurus_tag content=docs-default-current><meta data-rh=true name=docsearch:version content=current><meta data-rh=true name=docsearch:docusaurus_tag content=docs-default-current><meta data-rh=true property=og:title content="Coarray • Fortran Tutorial"><meta data-rh=true name=description content=Resouces><meta data-rh=true property=og:description content=Resouces><link data-rh=true rel=icon href=/fortran/img/favicon.png><link data-rh=true rel=canonical href=https://pranabdas.github.io/fortran/coarray><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/coarray hreflang=en><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/coarray hreflang=x-default><link rel=stylesheet href=https://pranabdas.github.io/drive/webfonts/katex/katex.min.css><link rel=stylesheet href=/fortran/assets/css/styles.4de1c8a8.css><script src=/fortran/assets/js/runtime~main.866c090c.js defer></script><script src=/fortran/assets/js/main.ec888ba8.js defer></script><body class=navigation-with-keyboard><script>!function(){var t,e=function(){try{return new URLSearchParams(window.location.search).get("docusaurus-theme")}catch(t){}}()||function(){try{return window.localStorage.getItem("theme")}catch(t){}}();t=null!==e?e:window.matchMedia("(prefers-color-scheme: dark)").matches?"dark":(window.matchMedia("(prefers-color-scheme: light)").matches,"light"),document.documentElement.setAttribute("data-theme",t)}(),function(){try{for(var[t,e]of new URLSearchParams(window.location.search).entries())if(t.startsWith("docusaurus-data-")){var a=t.replace("docusaurus-data-","data-");document.documentElement.setAttribute(a,e)}}catch(t){}}()</script><div id=__docusaurus><div role=region aria-label="Skip to main content"><a class=skipToContent_fXgn href=#__docusaurus_skipToContent_fallback>Skip to main content</a></div><nav aria-label=Main class="navbar navbar--fixed-top navbarHideable_m1mJ"><div class=navbar__inner><div class=navbar__items><button aria-label="Toggle navigation bar" aria-expanded=false class="navbar__toggle clean-btn" type=button><svg width=30 height=30 viewBox="0 0 30 30" aria-hidden=true><path stroke=currentColor stroke-linecap=round stroke-miterlimit=10 stroke-width=2 d="M4 7h22M4 15h22M4 23h22"/></svg></button><a class=navbar__brand href=/fortran/><div class=navbar__logo><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--light_NVdE"><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--dark_xIcU"></div><b class="navbar__title text--truncate">Fortran</b></a><div class="navbar__item dropdown dropdown--hoverable"><a aria-current=page class="navbar__link active" aria-haspopup=true aria-expanded=false role=button href=/fortran/>Docs</a><ul class=dropdown__menu><li><a aria-current=page class="dropdown__link dropdown__link--active" href=/fortran/>Fortran Programming</a><li><a href=https://pranabdas.github.io/docs/ rel="noopener noreferrer" class=dropdown__link>~ ~ ~ Other Docs ~ ~ ~</a><li><a href=https://pranabdas.github.io/arpespythontools/ rel="noopener noreferrer" class=dropdown__link>ARPES Python Tools</a><li><a href=https://pranabdas.github.io/c-cpp/ rel="noopener noreferrer" class=dropdown__link>C and C++ Programming</a><li><a href=https://pranabdas.github.io/condmat-notes/ rel="noopener noreferrer" class=dropdown__link>Condensed Matter Notes</a><li><a href=https://pranabdas.github.io/javascript/ rel="noopener noreferrer" class=dropdown__link>Javascript Tutorial</a><li><a href=https://pranabdas.github.io/linux/ rel="noopener noreferrer" class=dropdown__link>Linux Tutorial</a><li><a href=https://pranabdas.github.io/machine-learning/ rel="noopener noreferrer" class=dropdown__link>Machine Learning Notes</a><li><a href=https://pranabdas.github.io/openmx/ rel="noopener noreferrer" class=dropdown__link>OpenMX tutorial</a><li><a href=https://pranabdas.github.io/python-tutorial/ rel="noopener noreferrer" class=dropdown__link>Python Tutorial</a><li><a href=https://pranabdas.github.io/espresso/ rel="noopener noreferrer" class=dropdown__link>Quantum Espresso Tutorial</a><li><a href=https://pranabdas.github.io/rust/ rel="noopener noreferrer" class=dropdown__link>Rust Programming</a><li><a href=https://pranabdas.github.io/arpes-manual/ rel="noopener noreferrer" class=dropdown__link>SUV ARPES Manual</a><li><a href=https://pranabdas.github.io/suvtools/ rel="noopener noreferrer" class=dropdown__link>SUV Python Tools</a></ul></div></div><div class="navbar__items navbar__items--right"><a href=https://github.com/pranabdas/fortran rel="noopener noreferrer" class="navbar__item navbar__link header-github-link" aria-label="GitHub repository" title="Visit project repository in GitHub"></a><a href=https://pranabdas.github.io rel="noopener noreferrer" class="navbar__item navbar__link header-homepage-link" aria-label="About me" title="Go to Pranab's Homepage"></a><div class="toggle_vylO colorModeToggle_DEke"><button class="clean-btn toggleButton_gllP toggleButtonDisabled_aARS" type=button disabled title="Switch between dark and light mode (currently light mode)" aria-label="Switch between dark and light mode (currently light mode)" aria-live=polite aria-pressed=false><svg viewBox="0 0 24 24" width=24 height=24 class=lightToggleIcon_pyhR><path fill=currentColor d="M12,9c1.65,0,3,1.35,3,3s-1.35,3-3,3s-3-1.35-3-3S10.35,9,12,9 M12,7c-2.76,0-5,2.24-5,5s2.24,5,5,5s5-2.24,5-5 S14.76,7,12,7L12,7z M2,13l2,0c0.55,0,1-0.45,1-1s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S1.45,13,2,13z M20,13l2,0c0.55,0,1-0.45,1-1 s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S19.45,13,20,13z M11,2v2c0,0.55,0.45,1,1,1s1-0.45,1-1V2c0-0.55-0.45-1-1-1S11,1.45,11,2z M11,20v2c0,0.55,0.45,1,1,1s1-0.45,1-1v-2c0-0.55-0.45-1-1-1C11.45,19,11,19.45,11,20z M5.99,4.58c-0.39-0.39-1.03-0.39-1.41,0 c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0s0.39-1.03,0-1.41L5.99,4.58z M18.36,16.95 c-0.39-0.39-1.03-0.39-1.41,0c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0c0.39-0.39,0.39-1.03,0-1.41 L18.36,16.95z M19.42,5.99c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06c-0.39,0.39-0.39,1.03,0,1.41 s1.03,0.39,1.41,0L19.42,5.99z M7.05,18.36c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06 c-0.39,0.39-0.39,1.03,0,1.41s1.03,0.39,1.41,0L7.05,18.36z"/></svg><svg viewBox="0 0 24 24" width=24 height=24 class=darkToggleIcon_wfgR><path fill=currentColor d="M9.37,5.51C9.19,6.15,9.1,6.82,9.1,7.5c0,4.08,3.32,7.4,7.4,7.4c0.68,0,1.35-0.09,1.99-0.27C17.45,17.19,14.93,19,12,19 c-3.86,0-7-3.14-7-7C5,9.07,6.81,6.55,9.37,5.51z M12,3c-4.97,0-9,4.03-9,9s4.03,9,9,9s9-4.03,9-9c0-0.46-0.04-0.92-0.1-1.36 c-0.98,1.37-2.58,2.26-4.4,2.26c-2.98,0-5.4-2.42-5.4-5.4c0-1.81,0.89-3.42,2.26-4.4C12.92,3.04,12.46,3,12,3L12,3z"/></svg></button></div><div class=navbarSearchContainer_Bca1><div class="navbar__search searchBarContainer_NW3z" dir=ltr><input placeholder=Search aria-label=Search class=navbar__search-input value=""><div class="loadingRing_RJI3 searchBarLoadingRing_YnHq"><div></div><div></div><div></div><div></div></div></div></div></div></div><div role=presentation class=navbar-sidebar__backdrop></div></nav><div id=__docusaurus_skipToContent_fallback class="main-wrapper mainWrapper_z2l0"><div class=docsWrapper_hBAB><button aria-label="Scroll back to top" class="clean-btn theme-back-to-top-button backToTopButton_sjWU" type=button></button><div class=docRoot_UBD9><main class="docMainContainer_TBSr docMainContainerEnhanced_lQrH"><div class="container padding-top--md padding-bottom--lg"><div class=row><div class="col docItemCol_VOVn"><div class=docItemContainer_Djhp><article><div class="tocCollapsible_ETCw theme-doc-toc-mobile tocMobile_ITEo"><button type=button class="clean-btn tocCollapsibleButton_TO0P">On this page</button></div><div class="theme-doc-markdown markdown"><header><h1>Coarray</h1></header><h2 class="anchor anchorWithHideOnScrollNavbar_WYt5" id=resouces>Resouces<a href=#resouces class=hash-link aria-label="Direct link to Resouces" title="Direct link to Resouces">​</a></h2>
+<!doctype html><html lang=en dir=ltr class="docs-wrapper plugin-docs plugin-id-default docs-version-current docs-doc-page docs-doc-id-coarray" data-has-hydrated=false><meta charset=UTF-8><meta name=generator content="Docusaurus v3.6.1"><title data-rh=true>Coarray • Fortran Tutorial</title><meta data-rh=true name=viewport content="width=device-width,initial-scale=1.0"><meta data-rh=true name=twitter:card content=summary_large_image><meta data-rh=true property=og:url content=https://pranabdas.github.io/fortran/coarray><meta data-rh=true property=og:locale content=en><meta data-rh=true name=docusaurus_locale content=en><meta data-rh=true name=docsearch:language content=en><meta data-rh=true name=theme-color content=#06445c><meta data-rh=true name=docusaurus_version content=current><meta data-rh=true name=docusaurus_tag content=docs-default-current><meta data-rh=true name=docsearch:version content=current><meta data-rh=true name=docsearch:docusaurus_tag content=docs-default-current><meta data-rh=true property=og:title content="Coarray • Fortran Tutorial"><meta data-rh=true name=description content=Resouces><meta data-rh=true property=og:description content=Resouces><link data-rh=true rel=icon href=/fortran/img/favicon.png><link data-rh=true rel=canonical href=https://pranabdas.github.io/fortran/coarray><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/coarray hreflang=en><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/coarray hreflang=x-default><link rel=stylesheet href=https://pranab.pages.dev/assets/fonts/katex/katex.min.css><link rel=stylesheet href=/fortran/assets/css/styles.4de1c8a8.css><script src=/fortran/assets/js/runtime~main.667e3c0f.js defer></script><script src=/fortran/assets/js/main.10795e8f.js defer></script><body class=navigation-with-keyboard><script>!function(){var t,e=function(){try{return new URLSearchParams(window.location.search).get("docusaurus-theme")}catch(t){}}()||function(){try{return window.localStorage.getItem("theme")}catch(t){}}();t=null!==e?e:window.matchMedia("(prefers-color-scheme: dark)").matches?"dark":(window.matchMedia("(prefers-color-scheme: light)").matches,"light"),document.documentElement.setAttribute("data-theme",t)}(),function(){try{for(var[t,e]of new URLSearchParams(window.location.search).entries())if(t.startsWith("docusaurus-data-")){var a=t.replace("docusaurus-data-","data-");document.documentElement.setAttribute(a,e)}}catch(t){}}()</script><div id=__docusaurus><div role=region aria-label="Skip to main content"><a class=skipToContent_fXgn href=#__docusaurus_skipToContent_fallback>Skip to main content</a></div><nav aria-label=Main class="navbar navbar--fixed-top navbarHideable_m1mJ"><div class=navbar__inner><div class=navbar__items><button aria-label="Toggle navigation bar" aria-expanded=false class="navbar__toggle clean-btn" type=button><svg width=30 height=30 viewBox="0 0 30 30" aria-hidden=true><path stroke=currentColor stroke-linecap=round stroke-miterlimit=10 stroke-width=2 d="M4 7h22M4 15h22M4 23h22"/></svg></button><a class=navbar__brand href=/fortran/><div class=navbar__logo><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--light_NVdE"><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--dark_xIcU"></div><b class="navbar__title text--truncate">Fortran</b></a><div class="navbar__item dropdown dropdown--hoverable"><a aria-current=page class="navbar__link active" aria-haspopup=true aria-expanded=false role=button href=/fortran/>Docs</a><ul class=dropdown__menu><li><a aria-current=page class="dropdown__link dropdown__link--active" href=/fortran/>Fortran Programming</a><li><a href=https://pranabdas.github.io/docs/ rel="noopener noreferrer" class=dropdown__link>~ ~ ~ Other Docs ~ ~ ~</a><li><a href=https://pranabdas.github.io/arpespythontools/ rel="noopener noreferrer" class=dropdown__link>ARPES Python Tools</a><li><a href=https://pranabdas.github.io/c-cpp/ rel="noopener noreferrer" class=dropdown__link>C and C++ Programming</a><li><a href=https://pranabdas.github.io/condmat-notes/ rel="noopener noreferrer" class=dropdown__link>Condensed Matter Notes</a><li><a href=https://pranabdas.github.io/javascript/ rel="noopener noreferrer" class=dropdown__link>Javascript Tutorial</a><li><a href=https://pranabdas.github.io/linux/ rel="noopener noreferrer" class=dropdown__link>Linux Tutorial</a><li><a href=https://pranabdas.github.io/machine-learning/ rel="noopener noreferrer" class=dropdown__link>Machine Learning Notes</a><li><a href=https://pranabdas.github.io/openmx/ rel="noopener noreferrer" class=dropdown__link>OpenMX tutorial</a><li><a href=https://pranabdas.github.io/python-tutorial/ rel="noopener noreferrer" class=dropdown__link>Python Tutorial</a><li><a href=https://pranabdas.github.io/espresso/ rel="noopener noreferrer" class=dropdown__link>Quantum Espresso Tutorial</a><li><a href=https://pranabdas.github.io/rust/ rel="noopener noreferrer" class=dropdown__link>Rust Programming</a><li><a href=https://pranabdas.github.io/arpes-manual/ rel="noopener noreferrer" class=dropdown__link>SUV ARPES Manual</a><li><a href=https://pranabdas.github.io/suvtools/ rel="noopener noreferrer" class=dropdown__link>SUV Python Tools</a></ul></div></div><div class="navbar__items navbar__items--right"><a href=https://github.com/pranabdas/fortran rel="noopener noreferrer" class="navbar__item navbar__link header-github-link" aria-label="GitHub repository" title="Visit project repository in GitHub"></a><a href=https://pranabdas.github.io rel="noopener noreferrer" class="navbar__item navbar__link header-homepage-link" aria-label="About me" title="Go to Pranab's Homepage"></a><div class="toggle_vylO colorModeToggle_DEke"><button class="clean-btn toggleButton_gllP toggleButtonDisabled_aARS" type=button disabled title="Switch between dark and light mode (currently light mode)" aria-label="Switch between dark and light mode (currently light mode)" aria-live=polite aria-pressed=false><svg viewBox="0 0 24 24" width=24 height=24 class=lightToggleIcon_pyhR><path fill=currentColor d="M12,9c1.65,0,3,1.35,3,3s-1.35,3-3,3s-3-1.35-3-3S10.35,9,12,9 M12,7c-2.76,0-5,2.24-5,5s2.24,5,5,5s5-2.24,5-5 S14.76,7,12,7L12,7z M2,13l2,0c0.55,0,1-0.45,1-1s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S1.45,13,2,13z M20,13l2,0c0.55,0,1-0.45,1-1 s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S19.45,13,20,13z M11,2v2c0,0.55,0.45,1,1,1s1-0.45,1-1V2c0-0.55-0.45-1-1-1S11,1.45,11,2z M11,20v2c0,0.55,0.45,1,1,1s1-0.45,1-1v-2c0-0.55-0.45-1-1-1C11.45,19,11,19.45,11,20z M5.99,4.58c-0.39-0.39-1.03-0.39-1.41,0 c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0s0.39-1.03,0-1.41L5.99,4.58z M18.36,16.95 c-0.39-0.39-1.03-0.39-1.41,0c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0c0.39-0.39,0.39-1.03,0-1.41 L18.36,16.95z M19.42,5.99c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06c-0.39,0.39-0.39,1.03,0,1.41 s1.03,0.39,1.41,0L19.42,5.99z M7.05,18.36c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06 c-0.39,0.39-0.39,1.03,0,1.41s1.03,0.39,1.41,0L7.05,18.36z"/></svg><svg viewBox="0 0 24 24" width=24 height=24 class=darkToggleIcon_wfgR><path fill=currentColor d="M9.37,5.51C9.19,6.15,9.1,6.82,9.1,7.5c0,4.08,3.32,7.4,7.4,7.4c0.68,0,1.35-0.09,1.99-0.27C17.45,17.19,14.93,19,12,19 c-3.86,0-7-3.14-7-7C5,9.07,6.81,6.55,9.37,5.51z M12,3c-4.97,0-9,4.03-9,9s4.03,9,9,9s9-4.03,9-9c0-0.46-0.04-0.92-0.1-1.36 c-0.98,1.37-2.58,2.26-4.4,2.26c-2.98,0-5.4-2.42-5.4-5.4c0-1.81,0.89-3.42,2.26-4.4C12.92,3.04,12.46,3,12,3L12,3z"/></svg></button></div><div class=navbarSearchContainer_Bca1><div class="navbar__search searchBarContainer_NW3z" dir=ltr><input placeholder=Search aria-label=Search class=navbar__search-input value=""><div class="loadingRing_RJI3 searchBarLoadingRing_YnHq"><div></div><div></div><div></div><div></div></div></div></div></div></div><div role=presentation class=navbar-sidebar__backdrop></div></nav><div id=__docusaurus_skipToContent_fallback class="main-wrapper mainWrapper_z2l0"><div class=docsWrapper_hBAB><button aria-label="Scroll back to top" class="clean-btn theme-back-to-top-button backToTopButton_sjWU" type=button></button><div class=docRoot_UBD9><main class="docMainContainer_TBSr docMainContainerEnhanced_lQrH"><div class="container padding-top--md padding-bottom--lg"><div class=row><div class="col docItemCol_VOVn"><div class=docItemContainer_Djhp><article><div class="tocCollapsible_ETCw theme-doc-toc-mobile tocMobile_ITEo"><button type=button class="clean-btn tocCollapsibleButton_TO0P">On this page</button></div><div class="theme-doc-markdown markdown"><header><h1>Coarray</h1></header><h2 class="anchor anchorWithHideOnScrollNavbar_WYt5" id=resouces>Resouces<a href=#resouces class=hash-link aria-label="Direct link to Resouces" title="Direct link to Resouces">​</a></h2>
 <ul>
 <li><a href=https://annefou.github.io/Fortran/coarrays/coarrays.html target=_blank rel="noopener noreferrer">https://annefou.github.io/Fortran/coarrays/coarrays.html</a></li>
 </ul></div><footer class="theme-doc-footer docusaurus-mt-lg"><div class="row margin-top--sm theme-doc-footer-edit-meta-row"><div class=col><a href=https://github.com/pranabdas/fortran/blob/main/docs/coarray.md target=_blank rel="noopener noreferrer" class=theme-edit-this-page><svg fill=currentColor height=20 width=20 viewBox="0 0 40 40" class=iconEdit_Z9Sw aria-hidden=true><g><path d="m34.5 11.7l-3 3.1-6.3-6.3 3.1-3q0.5-0.5 1.2-0.5t1.1 0.5l3.9 3.9q0.5 0.4 0.5 1.1t-0.5 1.2z m-29.5 17.1l18.4-18.5 6.3 6.3-18.4 18.4h-6.3v-6.2z"/></g></svg>Edit this page</a></div><div class="col lastUpdated_JAkA"></div></div></footer></article><nav class="pagination-nav docusaurus-mt-lg" aria-label="Docs pages"></nav></div></div><div class="col col--3"><div class="tableOfContents_bqdL thin-scrollbar theme-doc-toc-desktop"><ul class="table-of-contents table-of-contents__left-border"><li><a href=#resouces class="table-of-contents__link toc-highlight">Resouces</a></ul></div></div></div></div></main></div></div></div><footer class="footer footer--dark"><div class="container container-fluid"><div class="footer__bottom text--center"><div class=footer__copyright>Copyright © 2024 Pranab Das. All rights
diff --git a/complex/index.html b/complex/index.html
index 4cfad57..42be552 100644
--- a/complex/index.html
+++ b/complex/index.html
@@ -1,4 +1,4 @@
-<!doctype html><html lang=en dir=ltr class="docs-wrapper plugin-docs plugin-id-default docs-version-current docs-doc-page docs-doc-id-complex" data-has-hydrated=false><meta charset=UTF-8><meta name=generator content="Docusaurus v3.6.1"><title data-rh=true>Complex number • Fortran Tutorial</title><meta data-rh=true name=viewport content="width=device-width,initial-scale=1.0"><meta data-rh=true name=twitter:card content=summary_large_image><meta data-rh=true property=og:url content=https://pranabdas.github.io/fortran/complex><meta data-rh=true property=og:locale content=en><meta data-rh=true name=docusaurus_locale content=en><meta data-rh=true name=docsearch:language content=en><meta data-rh=true name=theme-color content=#06445c><meta data-rh=true name=docusaurus_version content=current><meta data-rh=true name=docusaurus_tag content=docs-default-current><meta data-rh=true name=docsearch:version content=current><meta data-rh=true name=docsearch:docusaurus_tag content=docs-default-current><meta data-rh=true property=og:title content="Complex number • Fortran Tutorial"><meta data-rh=true name=description content="Basic usage of complex number in FORTRAN program."><meta data-rh=true property=og:description content="Basic usage of complex number in FORTRAN program."><link data-rh=true rel=icon href=/fortran/img/favicon.png><link data-rh=true rel=canonical href=https://pranabdas.github.io/fortran/complex><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/complex hreflang=en><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/complex hreflang=x-default><link rel=stylesheet href=https://pranabdas.github.io/drive/webfonts/katex/katex.min.css><link rel=stylesheet href=/fortran/assets/css/styles.4de1c8a8.css><script src=/fortran/assets/js/runtime~main.866c090c.js defer></script><script src=/fortran/assets/js/main.ec888ba8.js defer></script><body class=navigation-with-keyboard><script>!function(){var t,e=function(){try{return new URLSearchParams(window.location.search).get("docusaurus-theme")}catch(t){}}()||function(){try{return window.localStorage.getItem("theme")}catch(t){}}();t=null!==e?e:window.matchMedia("(prefers-color-scheme: dark)").matches?"dark":(window.matchMedia("(prefers-color-scheme: light)").matches,"light"),document.documentElement.setAttribute("data-theme",t)}(),function(){try{for(var[t,e]of new URLSearchParams(window.location.search).entries())if(t.startsWith("docusaurus-data-")){var a=t.replace("docusaurus-data-","data-");document.documentElement.setAttribute(a,e)}}catch(t){}}()</script><div id=__docusaurus><div role=region aria-label="Skip to main content"><a class=skipToContent_fXgn href=#__docusaurus_skipToContent_fallback>Skip to main content</a></div><nav aria-label=Main class="navbar navbar--fixed-top navbarHideable_m1mJ"><div class=navbar__inner><div class=navbar__items><button aria-label="Toggle navigation bar" aria-expanded=false class="navbar__toggle clean-btn" type=button><svg width=30 height=30 viewBox="0 0 30 30" aria-hidden=true><path stroke=currentColor stroke-linecap=round stroke-miterlimit=10 stroke-width=2 d="M4 7h22M4 15h22M4 23h22"/></svg></button><a class=navbar__brand href=/fortran/><div class=navbar__logo><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--light_NVdE"><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--dark_xIcU"></div><b class="navbar__title text--truncate">Fortran</b></a><div class="navbar__item dropdown dropdown--hoverable"><a aria-current=page class="navbar__link active" aria-haspopup=true aria-expanded=false role=button href=/fortran/>Docs</a><ul class=dropdown__menu><li><a aria-current=page class="dropdown__link dropdown__link--active" href=/fortran/>Fortran Programming</a><li><a href=https://pranabdas.github.io/docs/ rel="noopener noreferrer" class=dropdown__link>~ ~ ~ Other Docs ~ ~ ~</a><li><a href=https://pranabdas.github.io/arpespythontools/ rel="noopener noreferrer" class=dropdown__link>ARPES Python Tools</a><li><a href=https://pranabdas.github.io/c-cpp/ rel="noopener noreferrer" class=dropdown__link>C and C++ Programming</a><li><a href=https://pranabdas.github.io/condmat-notes/ rel="noopener noreferrer" class=dropdown__link>Condensed Matter Notes</a><li><a href=https://pranabdas.github.io/javascript/ rel="noopener noreferrer" class=dropdown__link>Javascript Tutorial</a><li><a href=https://pranabdas.github.io/linux/ rel="noopener noreferrer" class=dropdown__link>Linux Tutorial</a><li><a href=https://pranabdas.github.io/machine-learning/ rel="noopener noreferrer" class=dropdown__link>Machine Learning Notes</a><li><a href=https://pranabdas.github.io/openmx/ rel="noopener noreferrer" class=dropdown__link>OpenMX tutorial</a><li><a href=https://pranabdas.github.io/python-tutorial/ rel="noopener noreferrer" class=dropdown__link>Python Tutorial</a><li><a href=https://pranabdas.github.io/espresso/ rel="noopener noreferrer" class=dropdown__link>Quantum Espresso Tutorial</a><li><a href=https://pranabdas.github.io/rust/ rel="noopener noreferrer" class=dropdown__link>Rust Programming</a><li><a href=https://pranabdas.github.io/arpes-manual/ rel="noopener noreferrer" class=dropdown__link>SUV ARPES Manual</a><li><a href=https://pranabdas.github.io/suvtools/ rel="noopener noreferrer" class=dropdown__link>SUV Python Tools</a></ul></div></div><div class="navbar__items navbar__items--right"><a href=https://github.com/pranabdas/fortran rel="noopener noreferrer" class="navbar__item navbar__link header-github-link" aria-label="GitHub repository" title="Visit project repository in GitHub"></a><a href=https://pranabdas.github.io rel="noopener noreferrer" class="navbar__item navbar__link header-homepage-link" aria-label="About me" title="Go to Pranab's Homepage"></a><div class="toggle_vylO colorModeToggle_DEke"><button class="clean-btn toggleButton_gllP toggleButtonDisabled_aARS" type=button disabled title="Switch between dark and light mode (currently light mode)" aria-label="Switch between dark and light mode (currently light mode)" aria-live=polite aria-pressed=false><svg viewBox="0 0 24 24" width=24 height=24 class=lightToggleIcon_pyhR><path fill=currentColor d="M12,9c1.65,0,3,1.35,3,3s-1.35,3-3,3s-3-1.35-3-3S10.35,9,12,9 M12,7c-2.76,0-5,2.24-5,5s2.24,5,5,5s5-2.24,5-5 S14.76,7,12,7L12,7z M2,13l2,0c0.55,0,1-0.45,1-1s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S1.45,13,2,13z M20,13l2,0c0.55,0,1-0.45,1-1 s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S19.45,13,20,13z M11,2v2c0,0.55,0.45,1,1,1s1-0.45,1-1V2c0-0.55-0.45-1-1-1S11,1.45,11,2z M11,20v2c0,0.55,0.45,1,1,1s1-0.45,1-1v-2c0-0.55-0.45-1-1-1C11.45,19,11,19.45,11,20z M5.99,4.58c-0.39-0.39-1.03-0.39-1.41,0 c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0s0.39-1.03,0-1.41L5.99,4.58z M18.36,16.95 c-0.39-0.39-1.03-0.39-1.41,0c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0c0.39-0.39,0.39-1.03,0-1.41 L18.36,16.95z M19.42,5.99c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06c-0.39,0.39-0.39,1.03,0,1.41 s1.03,0.39,1.41,0L19.42,5.99z M7.05,18.36c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06 c-0.39,0.39-0.39,1.03,0,1.41s1.03,0.39,1.41,0L7.05,18.36z"/></svg><svg viewBox="0 0 24 24" width=24 height=24 class=darkToggleIcon_wfgR><path fill=currentColor d="M9.37,5.51C9.19,6.15,9.1,6.82,9.1,7.5c0,4.08,3.32,7.4,7.4,7.4c0.68,0,1.35-0.09,1.99-0.27C17.45,17.19,14.93,19,12,19 c-3.86,0-7-3.14-7-7C5,9.07,6.81,6.55,9.37,5.51z M12,3c-4.97,0-9,4.03-9,9s4.03,9,9,9s9-4.03,9-9c0-0.46-0.04-0.92-0.1-1.36 c-0.98,1.37-2.58,2.26-4.4,2.26c-2.98,0-5.4-2.42-5.4-5.4c0-1.81,0.89-3.42,2.26-4.4C12.92,3.04,12.46,3,12,3L12,3z"/></svg></button></div><div class=navbarSearchContainer_Bca1><div class="navbar__search searchBarContainer_NW3z" dir=ltr><input placeholder=Search aria-label=Search class=navbar__search-input value=""><div class="loadingRing_RJI3 searchBarLoadingRing_YnHq"><div></div><div></div><div></div><div></div></div></div></div></div></div><div role=presentation class=navbar-sidebar__backdrop></div></nav><div id=__docusaurus_skipToContent_fallback class="main-wrapper mainWrapper_z2l0"><div class=docsWrapper_hBAB><button aria-label="Scroll back to top" class="clean-btn theme-back-to-top-button backToTopButton_sjWU" type=button></button><div class=docRoot_UBD9><aside class="theme-doc-sidebar-container docSidebarContainer_YfHR"><div class=sidebarViewport_aRkj><div class="sidebar_njMd sidebarWithHideableNavbar_wUlq"><a tabindex=-1 class=sidebarLogo_isFc href=/fortran/><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--light_NVdE"><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--dark_xIcU"><b>Fortran</b></a><nav aria-label="Docs sidebar" class="menu thin-scrollbar menu_SIkG"><ul class="theme-doc-sidebar-menu menu__list"><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/>Setup</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/basics>Basics</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/array>Array and Matrix</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/control>Logical control</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/loop>Loop</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/modules>Modules</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/procedures>Procedures</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class="menu__link menu__link--active" aria-current=page href=/fortran/complex>Complex number</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/recursion>Recursion</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/types>Custom types</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/pointer>Pointer</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/file>File I/O</a><li class="theme-doc-sidebar-item-category theme-doc-sidebar-item-category-level-1 menu__list-item menu__list-item--collapsed"><div class=menu__list-item-collapsible><a class="menu__link menu__link--sublist" href=/fortran/category/coding-practice>Coding practice</a><button aria-label="Expand sidebar category 'Coding practice'" aria-expanded=false type=button class="clean-btn menu__caret"></button></div><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/resources>Resources</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/license>License</a></ul></nav><button type=button title="Collapse sidebar" aria-label="Collapse sidebar" class="button button--secondary button--outline collapseSidebarButton_PEFL"><svg width=20 height=20 aria-hidden=true class=collapseSidebarButtonIcon_kv0_><g fill=#7a7a7a><path d="M9.992 10.023c0 .2-.062.399-.172.547l-4.996 7.492a.982.982 0 01-.828.454H1c-.55 0-1-.453-1-1 0-.2.059-.403.168-.551l4.629-6.942L.168 3.078A.939.939 0 010 2.528c0-.548.45-.997 1-.997h2.996c.352 0 .649.18.828.45L9.82 9.472c.11.148.172.347.172.55zm0 0"/><path d="M19.98 10.023c0 .2-.058.399-.168.547l-4.996 7.492a.987.987 0 01-.828.454h-3c-.547 0-.996-.453-.996-1 0-.2.059-.403.168-.551l4.625-6.942-4.625-6.945a.939.939 0 01-.168-.55 1 1 0 01.996-.997h3c.348 0 .649.18.828.45l4.996 7.492c.11.148.168.347.168.55zm0 0"/></g></svg></button></div></div></aside><main class=docMainContainer_TBSr><div class="container padding-top--md padding-bottom--lg"><div class=row><div class="col docItemCol_VOVn"><div class=docItemContainer_Djhp><article><nav class="theme-doc-breadcrumbs breadcrumbsContainer_Z_bl" aria-label=Breadcrumbs><ul class=breadcrumbs itemscope itemtype=https://schema.org/BreadcrumbList><li class=breadcrumbs__item><a aria-label="Home page" class=breadcrumbs__link href=/fortran/><svg viewBox="0 0 24 24" class=breadcrumbHomeIcon_YNFT><path d="M10 19v-5h4v5c0 .55.45 1 1 1h3c.55 0 1-.45 1-1v-7h1.7c.46 0 .68-.57.33-.87L12.67 3.6c-.38-.34-.96-.34-1.34 0l-8.36 7.53c-.34.3-.13.87.33.87H5v7c0 .55.45 1 1 1h3c.55 0 1-.45 1-1z" fill=currentColor /></svg></a><li itemscope itemprop=itemListElement itemtype=https://schema.org/ListItem class="breadcrumbs__item breadcrumbs__item--active"><span class=breadcrumbs__link itemprop=name>Complex number</span><meta itemprop=position content=1></ul></nav><div class="theme-doc-markdown markdown"><header><h1>Complex number</h1></header><p>Basic usage of complex number in FORTRAN program.</p>
+<!doctype html><html lang=en dir=ltr class="docs-wrapper plugin-docs plugin-id-default docs-version-current docs-doc-page docs-doc-id-complex" data-has-hydrated=false><meta charset=UTF-8><meta name=generator content="Docusaurus v3.6.1"><title data-rh=true>Complex number • Fortran Tutorial</title><meta data-rh=true name=viewport content="width=device-width,initial-scale=1.0"><meta data-rh=true name=twitter:card content=summary_large_image><meta data-rh=true property=og:url content=https://pranabdas.github.io/fortran/complex><meta data-rh=true property=og:locale content=en><meta data-rh=true name=docusaurus_locale content=en><meta data-rh=true name=docsearch:language content=en><meta data-rh=true name=theme-color content=#06445c><meta data-rh=true name=docusaurus_version content=current><meta data-rh=true name=docusaurus_tag content=docs-default-current><meta data-rh=true name=docsearch:version content=current><meta data-rh=true name=docsearch:docusaurus_tag content=docs-default-current><meta data-rh=true property=og:title content="Complex number • Fortran Tutorial"><meta data-rh=true name=description content="Basic usage of complex number in FORTRAN program."><meta data-rh=true property=og:description content="Basic usage of complex number in FORTRAN program."><link data-rh=true rel=icon href=/fortran/img/favicon.png><link data-rh=true rel=canonical href=https://pranabdas.github.io/fortran/complex><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/complex hreflang=en><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/complex hreflang=x-default><link rel=stylesheet href=https://pranab.pages.dev/assets/fonts/katex/katex.min.css><link rel=stylesheet href=/fortran/assets/css/styles.4de1c8a8.css><script src=/fortran/assets/js/runtime~main.667e3c0f.js defer></script><script src=/fortran/assets/js/main.10795e8f.js defer></script><body class=navigation-with-keyboard><script>!function(){var t,e=function(){try{return new URLSearchParams(window.location.search).get("docusaurus-theme")}catch(t){}}()||function(){try{return window.localStorage.getItem("theme")}catch(t){}}();t=null!==e?e:window.matchMedia("(prefers-color-scheme: dark)").matches?"dark":(window.matchMedia("(prefers-color-scheme: light)").matches,"light"),document.documentElement.setAttribute("data-theme",t)}(),function(){try{for(var[t,e]of new URLSearchParams(window.location.search).entries())if(t.startsWith("docusaurus-data-")){var a=t.replace("docusaurus-data-","data-");document.documentElement.setAttribute(a,e)}}catch(t){}}()</script><div id=__docusaurus><div role=region aria-label="Skip to main content"><a class=skipToContent_fXgn href=#__docusaurus_skipToContent_fallback>Skip to main content</a></div><nav aria-label=Main class="navbar navbar--fixed-top navbarHideable_m1mJ"><div class=navbar__inner><div class=navbar__items><button aria-label="Toggle navigation bar" aria-expanded=false class="navbar__toggle clean-btn" type=button><svg width=30 height=30 viewBox="0 0 30 30" aria-hidden=true><path stroke=currentColor stroke-linecap=round stroke-miterlimit=10 stroke-width=2 d="M4 7h22M4 15h22M4 23h22"/></svg></button><a class=navbar__brand href=/fortran/><div class=navbar__logo><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--light_NVdE"><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--dark_xIcU"></div><b class="navbar__title text--truncate">Fortran</b></a><div class="navbar__item dropdown dropdown--hoverable"><a aria-current=page class="navbar__link active" aria-haspopup=true aria-expanded=false role=button href=/fortran/>Docs</a><ul class=dropdown__menu><li><a aria-current=page class="dropdown__link dropdown__link--active" href=/fortran/>Fortran Programming</a><li><a href=https://pranabdas.github.io/docs/ rel="noopener noreferrer" class=dropdown__link>~ ~ ~ Other Docs ~ ~ ~</a><li><a href=https://pranabdas.github.io/arpespythontools/ rel="noopener noreferrer" class=dropdown__link>ARPES Python Tools</a><li><a href=https://pranabdas.github.io/c-cpp/ rel="noopener noreferrer" class=dropdown__link>C and C++ Programming</a><li><a href=https://pranabdas.github.io/condmat-notes/ rel="noopener noreferrer" class=dropdown__link>Condensed Matter Notes</a><li><a href=https://pranabdas.github.io/javascript/ rel="noopener noreferrer" class=dropdown__link>Javascript Tutorial</a><li><a href=https://pranabdas.github.io/linux/ rel="noopener noreferrer" class=dropdown__link>Linux Tutorial</a><li><a href=https://pranabdas.github.io/machine-learning/ rel="noopener noreferrer" class=dropdown__link>Machine Learning Notes</a><li><a href=https://pranabdas.github.io/openmx/ rel="noopener noreferrer" class=dropdown__link>OpenMX tutorial</a><li><a href=https://pranabdas.github.io/python-tutorial/ rel="noopener noreferrer" class=dropdown__link>Python Tutorial</a><li><a href=https://pranabdas.github.io/espresso/ rel="noopener noreferrer" class=dropdown__link>Quantum Espresso Tutorial</a><li><a href=https://pranabdas.github.io/rust/ rel="noopener noreferrer" class=dropdown__link>Rust Programming</a><li><a href=https://pranabdas.github.io/arpes-manual/ rel="noopener noreferrer" class=dropdown__link>SUV ARPES Manual</a><li><a href=https://pranabdas.github.io/suvtools/ rel="noopener noreferrer" class=dropdown__link>SUV Python Tools</a></ul></div></div><div class="navbar__items navbar__items--right"><a href=https://github.com/pranabdas/fortran rel="noopener noreferrer" class="navbar__item navbar__link header-github-link" aria-label="GitHub repository" title="Visit project repository in GitHub"></a><a href=https://pranabdas.github.io rel="noopener noreferrer" class="navbar__item navbar__link header-homepage-link" aria-label="About me" title="Go to Pranab's Homepage"></a><div class="toggle_vylO colorModeToggle_DEke"><button class="clean-btn toggleButton_gllP toggleButtonDisabled_aARS" type=button disabled title="Switch between dark and light mode (currently light mode)" aria-label="Switch between dark and light mode (currently light mode)" aria-live=polite aria-pressed=false><svg viewBox="0 0 24 24" width=24 height=24 class=lightToggleIcon_pyhR><path fill=currentColor d="M12,9c1.65,0,3,1.35,3,3s-1.35,3-3,3s-3-1.35-3-3S10.35,9,12,9 M12,7c-2.76,0-5,2.24-5,5s2.24,5,5,5s5-2.24,5-5 S14.76,7,12,7L12,7z M2,13l2,0c0.55,0,1-0.45,1-1s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S1.45,13,2,13z M20,13l2,0c0.55,0,1-0.45,1-1 s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S19.45,13,20,13z M11,2v2c0,0.55,0.45,1,1,1s1-0.45,1-1V2c0-0.55-0.45-1-1-1S11,1.45,11,2z M11,20v2c0,0.55,0.45,1,1,1s1-0.45,1-1v-2c0-0.55-0.45-1-1-1C11.45,19,11,19.45,11,20z M5.99,4.58c-0.39-0.39-1.03-0.39-1.41,0 c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0s0.39-1.03,0-1.41L5.99,4.58z M18.36,16.95 c-0.39-0.39-1.03-0.39-1.41,0c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0c0.39-0.39,0.39-1.03,0-1.41 L18.36,16.95z M19.42,5.99c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06c-0.39,0.39-0.39,1.03,0,1.41 s1.03,0.39,1.41,0L19.42,5.99z M7.05,18.36c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06 c-0.39,0.39-0.39,1.03,0,1.41s1.03,0.39,1.41,0L7.05,18.36z"/></svg><svg viewBox="0 0 24 24" width=24 height=24 class=darkToggleIcon_wfgR><path fill=currentColor d="M9.37,5.51C9.19,6.15,9.1,6.82,9.1,7.5c0,4.08,3.32,7.4,7.4,7.4c0.68,0,1.35-0.09,1.99-0.27C17.45,17.19,14.93,19,12,19 c-3.86,0-7-3.14-7-7C5,9.07,6.81,6.55,9.37,5.51z M12,3c-4.97,0-9,4.03-9,9s4.03,9,9,9s9-4.03,9-9c0-0.46-0.04-0.92-0.1-1.36 c-0.98,1.37-2.58,2.26-4.4,2.26c-2.98,0-5.4-2.42-5.4-5.4c0-1.81,0.89-3.42,2.26-4.4C12.92,3.04,12.46,3,12,3L12,3z"/></svg></button></div><div class=navbarSearchContainer_Bca1><div class="navbar__search searchBarContainer_NW3z" dir=ltr><input placeholder=Search aria-label=Search class=navbar__search-input value=""><div class="loadingRing_RJI3 searchBarLoadingRing_YnHq"><div></div><div></div><div></div><div></div></div></div></div></div></div><div role=presentation class=navbar-sidebar__backdrop></div></nav><div id=__docusaurus_skipToContent_fallback class="main-wrapper mainWrapper_z2l0"><div class=docsWrapper_hBAB><button aria-label="Scroll back to top" class="clean-btn theme-back-to-top-button backToTopButton_sjWU" type=button></button><div class=docRoot_UBD9><aside class="theme-doc-sidebar-container docSidebarContainer_YfHR"><div class=sidebarViewport_aRkj><div class="sidebar_njMd sidebarWithHideableNavbar_wUlq"><a tabindex=-1 class=sidebarLogo_isFc href=/fortran/><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--light_NVdE"><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--dark_xIcU"><b>Fortran</b></a><nav aria-label="Docs sidebar" class="menu thin-scrollbar menu_SIkG"><ul class="theme-doc-sidebar-menu menu__list"><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/>Setup</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/basics>Basics</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/array>Array and Matrix</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/control>Logical control</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/loop>Loop</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/modules>Modules</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/procedures>Procedures</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class="menu__link menu__link--active" aria-current=page href=/fortran/complex>Complex number</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/recursion>Recursion</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/types>Custom types</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/pointer>Pointer</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/file>File I/O</a><li class="theme-doc-sidebar-item-category theme-doc-sidebar-item-category-level-1 menu__list-item menu__list-item--collapsed"><div class=menu__list-item-collapsible><a class="menu__link menu__link--sublist" href=/fortran/category/coding-practice>Coding practice</a><button aria-label="Expand sidebar category 'Coding practice'" aria-expanded=false type=button class="clean-btn menu__caret"></button></div><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/resources>Resources</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/license>License</a></ul></nav><button type=button title="Collapse sidebar" aria-label="Collapse sidebar" class="button button--secondary button--outline collapseSidebarButton_PEFL"><svg width=20 height=20 aria-hidden=true class=collapseSidebarButtonIcon_kv0_><g fill=#7a7a7a><path d="M9.992 10.023c0 .2-.062.399-.172.547l-4.996 7.492a.982.982 0 01-.828.454H1c-.55 0-1-.453-1-1 0-.2.059-.403.168-.551l4.629-6.942L.168 3.078A.939.939 0 010 2.528c0-.548.45-.997 1-.997h2.996c.352 0 .649.18.828.45L9.82 9.472c.11.148.172.347.172.55zm0 0"/><path d="M19.98 10.023c0 .2-.058.399-.168.547l-4.996 7.492a.987.987 0 01-.828.454h-3c-.547 0-.996-.453-.996-1 0-.2.059-.403.168-.551l4.625-6.942-4.625-6.945a.939.939 0 01-.168-.55 1 1 0 01.996-.997h3c.348 0 .649.18.828.45l4.996 7.492c.11.148.168.347.168.55zm0 0"/></g></svg></button></div></div></aside><main class=docMainContainer_TBSr><div class="container padding-top--md padding-bottom--lg"><div class=row><div class="col docItemCol_VOVn"><div class=docItemContainer_Djhp><article><nav class="theme-doc-breadcrumbs breadcrumbsContainer_Z_bl" aria-label=Breadcrumbs><ul class=breadcrumbs itemscope itemtype=https://schema.org/BreadcrumbList><li class=breadcrumbs__item><a aria-label="Home page" class=breadcrumbs__link href=/fortran/><svg viewBox="0 0 24 24" class=breadcrumbHomeIcon_YNFT><path d="M10 19v-5h4v5c0 .55.45 1 1 1h3c.55 0 1-.45 1-1v-7h1.7c.46 0 .68-.57.33-.87L12.67 3.6c-.38-.34-.96-.34-1.34 0l-8.36 7.53c-.34.3-.13.87.33.87H5v7c0 .55.45 1 1 1h3c.55 0 1-.45 1-1z" fill=currentColor /></svg></a><li itemscope itemprop=itemListElement itemtype=https://schema.org/ListItem class="breadcrumbs__item breadcrumbs__item--active"><span class=breadcrumbs__link itemprop=name>Complex number</span><meta itemprop=position content=1></ul></nav><div class="theme-doc-markdown markdown"><header><h1>Complex number</h1></header><p>Basic usage of complex number in FORTRAN program.</p>
 <!-- -->
 <div class="language-fortran codeBlockContainer_Ckt0 theme-code-block" style=--prism-color:#393A34;--prism-background-color:#f6f8fa><div class=codeBlockTitle_Ktv7>src/17_complex_number.f90</div><div class=codeBlockContent_biex><pre tabindex=0 class="prism-code language-fortran codeBlock_bY9V thin-scrollbar" style=color:#393A34;background-color:#f6f8fa><code class="codeBlockLines_e6Vv codeBlockLinesWithNumbering_o6Pm"><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token keyword" style=color:#00009f>PROGRAM</span><span class="token plain"> complex_number</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>IMPLICIT NONE</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>COMPLEX</span><span class="token plain"> </span><span class="token operator" style=color:#393A34>::</span><span class="token plain"> z </span><span class="token operator" style=color:#393A34>=</span><span class="token plain"> </span><span class="token punctuation" style=color:#393A34>(</span><span class="token number" style=color:#36acaa>2.0</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> </span><span class="token number" style=color:#36acaa>3.0</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>COMPLEX</span><span class="token plain"> </span><span class="token operator" style=color:#393A34>::</span><span class="token plain"> z1</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> z2</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>WRITE</span><span class="token plain"> </span><span class="token punctuation" style=color:#393A34>(</span><span class="token operator" style=color:#393A34>*</span><span class="token punctuation" style=color:#393A34>,</span><span class="token operator" style=color:#393A34>*</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"> </span><span class="token string" style=color:#e3116c>"z = "</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> z</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>WRITE</span><span class="token plain"> </span><span class="token punctuation" style=color:#393A34>(</span><span class="token operator" style=color:#393A34>*</span><span class="token punctuation" style=color:#393A34>,</span><span class="token operator" style=color:#393A34>*</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"> </span><span class="token string" style=color:#e3116c>"abs = "</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> CABS</span><span class="token punctuation" style=color:#393A34>(</span><span class="token plain">z</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    z1 </span><span class="token operator" style=color:#393A34>=</span><span class="token plain"> </span><span class="token punctuation" style=color:#393A34>(</span><span class="token number" style=color:#36acaa>1.0</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> </span><span class="token number" style=color:#36acaa>5.0</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>WRITE</span><span class="token plain"> </span><span class="token punctuation" style=color:#393A34>(</span><span class="token operator" style=color:#393A34>*</span><span class="token punctuation" style=color:#393A34>,</span><span class="token operator" style=color:#393A34>*</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"> </span><span class="token string" style=color:#e3116c>"z1 = "</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> z1</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    z2 </span><span class="token operator" style=color:#393A34>=</span><span class="token plain"> CMPLX</span><span class="token punctuation" style=color:#393A34>(</span><span class="token number" style=color:#36acaa>1.0</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> </span><span class="token number" style=color:#36acaa>3.14159</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain"></span><span class="token comment" style=color:#999988;font-style:italic>! double precision: z2 = DCMPLX(1.0, 3.14159)</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain"></span><span class="token comment" style=color:#999988;font-style:italic>! arithmetic operations</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>WRITE</span><span class="token plain"> </span><span class="token punctuation" style=color:#393A34>(</span><span class="token operator" style=color:#393A34>*</span><span class="token punctuation" style=color:#393A34>,</span><span class="token operator" style=color:#393A34>*</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"> </span><span class="token string" style=color:#e3116c>"z1 + z2 = "</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> z1 </span><span class="token operator" style=color:#393A34>+</span><span class="token plain"> z2</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>WRITE</span><span class="token plain"> </span><span class="token punctuation" style=color:#393A34>(</span><span class="token operator" style=color:#393A34>*</span><span class="token punctuation" style=color:#393A34>,</span><span class="token operator" style=color:#393A34>*</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"> </span><span class="token string" style=color:#e3116c>"z1 * z2 = "</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> z1 </span><span class="token operator" style=color:#393A34>*</span><span class="token plain"> z2</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain"></span><span class="token comment" style=color:#999988;font-style:italic>! real and imaginary parts (if real part is integer, use int(z2) instead)</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>WRITE</span><span class="token plain"> </span><span class="token punctuation" style=color:#393A34>(</span><span class="token operator" style=color:#393A34>*</span><span class="token punctuation" style=color:#393A34>,</span><span class="token operator" style=color:#393A34>*</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"> </span><span class="token string" style=color:#e3116c>"Real part = "</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> </span><span class="token keyword" style=color:#00009f>real</span><span class="token punctuation" style=color:#393A34>(</span><span class="token plain">z2</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>WRITE</span><span class="token plain"> </span><span class="token punctuation" style=color:#393A34>(</span><span class="token operator" style=color:#393A34>*</span><span class="token punctuation" style=color:#393A34>,</span><span class="token operator" style=color:#393A34>*</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"> </span><span class="token string" style=color:#e3116c>"Imaginary part = "</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> imag</span><span class="token punctuation" style=color:#393A34>(</span><span class="token plain">z2</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain"></span><span class="token comment" style=color:#999988;font-style:italic>! complex conjugate</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>WRITE</span><span class="token plain"> </span><span class="token punctuation" style=color:#393A34>(</span><span class="token operator" style=color:#393A34>*</span><span class="token punctuation" style=color:#393A34>,</span><span class="token operator" style=color:#393A34>*</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"> </span><span class="token string" style=color:#e3116c>"Complex conjugate: "</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> conjg</span><span class="token punctuation" style=color:#393A34>(</span><span class="token plain">z2</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain"></span><span class="token keyword" style=color:#00009f>END PROGRAM</span><span class="token plain"> complex_number</span></span><br></span></code></pre><div class=buttonGroup__atx><button type=button aria-label="Copy code to clipboard" title=Copy class=clean-btn><span class=copyButtonIcons_eSgA aria-hidden=true><svg viewBox="0 0 24 24" class=copyButtonIcon_y97N><path fill=currentColor d="M19,21H8V7H19M19,5H8A2,2 0 0,0 6,7V21A2,2 0 0,0 8,23H19A2,2 0 0,0 21,21V7A2,2 0 0,0 19,5M16,1H4A2,2 0 0,0 2,3V17H4V3H16V1Z"/></svg><svg viewBox="0 0 24 24" class=copyButtonSuccessIcon_LjdS><path fill=currentColor d=M21,7L9,19L3.5,13.5L4.91,12.09L9,16.17L19.59,5.59L21,7Z /></svg></span></button></div></div></div></div><footer class="theme-doc-footer docusaurus-mt-lg"><div class="row margin-top--sm theme-doc-footer-edit-meta-row"><div class=col><a href=https://github.com/pranabdas/fortran/blob/main/docs/complex.mdx target=_blank rel="noopener noreferrer" class=theme-edit-this-page><svg fill=currentColor height=20 width=20 viewBox="0 0 40 40" class=iconEdit_Z9Sw aria-hidden=true><g><path d="m34.5 11.7l-3 3.1-6.3-6.3 3.1-3q0.5-0.5 1.2-0.5t1.1 0.5l3.9 3.9q0.5 0.4 0.5 1.1t-0.5 1.2z m-29.5 17.1l18.4-18.5 6.3 6.3-18.4 18.4h-6.3v-6.2z"/></g></svg>Edit this page</a></div><div class="col lastUpdated_JAkA"></div></div></footer></article><nav class="pagination-nav docusaurus-mt-lg" aria-label="Docs pages"><a class="pagination-nav__link pagination-nav__link--prev" href=/fortran/procedures><div class=pagination-nav__sublabel>Previous</div><div class=pagination-nav__label>Procedures</div></a><a class="pagination-nav__link pagination-nav__link--next" href=/fortran/recursion><div class=pagination-nav__sublabel>Next</div><div class=pagination-nav__label>Recursion</div></a></nav></div></div></div></div></main></div></div></div><footer class="footer footer--dark"><div class="container container-fluid"><div class="footer__bottom text--center"><div class=footer__copyright>Copyright © 2024 Pranab Das. All rights
       reserved.</div></div></div></footer></div>
\ No newline at end of file
diff --git a/control/index.html b/control/index.html
index 23e5da3..782af44 100644
--- a/control/index.html
+++ b/control/index.html
@@ -1,4 +1,4 @@
-<!doctype html><html lang=en dir=ltr class="docs-wrapper plugin-docs plugin-id-default docs-version-current docs-doc-page docs-doc-id-control" data-has-hydrated=false><meta charset=UTF-8><meta name=generator content="Docusaurus v3.6.1"><title data-rh=true>Logical expression and control • Fortran Tutorial</title><meta data-rh=true name=viewport content="width=device-width,initial-scale=1.0"><meta data-rh=true name=twitter:card content=summary_large_image><meta data-rh=true property=og:url content=https://pranabdas.github.io/fortran/control><meta data-rh=true property=og:locale content=en><meta data-rh=true name=docusaurus_locale content=en><meta data-rh=true name=docsearch:language content=en><meta data-rh=true name=theme-color content=#06445c><meta data-rh=true name=docusaurus_version content=current><meta data-rh=true name=docusaurus_tag content=docs-default-current><meta data-rh=true name=docsearch:version content=current><meta data-rh=true name=docsearch:docusaurus_tag content=docs-default-current><meta data-rh=true property=og:title content="Logical expression and control • Fortran Tutorial"><meta data-rh=true name=description content="Operators | Meaning"><meta data-rh=true property=og:description content="Operators | Meaning"><link data-rh=true rel=icon href=/fortran/img/favicon.png><link data-rh=true rel=canonical href=https://pranabdas.github.io/fortran/control><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/control hreflang=en><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/control hreflang=x-default><link rel=stylesheet href=https://pranabdas.github.io/drive/webfonts/katex/katex.min.css><link rel=stylesheet href=/fortran/assets/css/styles.4de1c8a8.css><script src=/fortran/assets/js/runtime~main.866c090c.js defer></script><script src=/fortran/assets/js/main.ec888ba8.js defer></script><body class=navigation-with-keyboard><script>!function(){var t,e=function(){try{return new URLSearchParams(window.location.search).get("docusaurus-theme")}catch(t){}}()||function(){try{return window.localStorage.getItem("theme")}catch(t){}}();t=null!==e?e:window.matchMedia("(prefers-color-scheme: dark)").matches?"dark":(window.matchMedia("(prefers-color-scheme: light)").matches,"light"),document.documentElement.setAttribute("data-theme",t)}(),function(){try{for(var[t,e]of new URLSearchParams(window.location.search).entries())if(t.startsWith("docusaurus-data-")){var a=t.replace("docusaurus-data-","data-");document.documentElement.setAttribute(a,e)}}catch(t){}}()</script><div id=__docusaurus><div role=region aria-label="Skip to main content"><a class=skipToContent_fXgn href=#__docusaurus_skipToContent_fallback>Skip to main content</a></div><nav aria-label=Main class="navbar navbar--fixed-top navbarHideable_m1mJ"><div class=navbar__inner><div class=navbar__items><button aria-label="Toggle navigation bar" aria-expanded=false class="navbar__toggle clean-btn" type=button><svg width=30 height=30 viewBox="0 0 30 30" aria-hidden=true><path stroke=currentColor stroke-linecap=round stroke-miterlimit=10 stroke-width=2 d="M4 7h22M4 15h22M4 23h22"/></svg></button><a class=navbar__brand href=/fortran/><div class=navbar__logo><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--light_NVdE"><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--dark_xIcU"></div><b class="navbar__title text--truncate">Fortran</b></a><div class="navbar__item dropdown dropdown--hoverable"><a aria-current=page class="navbar__link active" aria-haspopup=true aria-expanded=false role=button href=/fortran/>Docs</a><ul class=dropdown__menu><li><a aria-current=page class="dropdown__link dropdown__link--active" href=/fortran/>Fortran Programming</a><li><a href=https://pranabdas.github.io/docs/ rel="noopener noreferrer" class=dropdown__link>~ ~ ~ Other Docs ~ ~ ~</a><li><a href=https://pranabdas.github.io/arpespythontools/ rel="noopener noreferrer" class=dropdown__link>ARPES Python Tools</a><li><a href=https://pranabdas.github.io/c-cpp/ rel="noopener noreferrer" class=dropdown__link>C and C++ Programming</a><li><a href=https://pranabdas.github.io/condmat-notes/ rel="noopener noreferrer" class=dropdown__link>Condensed Matter Notes</a><li><a href=https://pranabdas.github.io/javascript/ rel="noopener noreferrer" class=dropdown__link>Javascript Tutorial</a><li><a href=https://pranabdas.github.io/linux/ rel="noopener noreferrer" class=dropdown__link>Linux Tutorial</a><li><a href=https://pranabdas.github.io/machine-learning/ rel="noopener noreferrer" class=dropdown__link>Machine Learning Notes</a><li><a href=https://pranabdas.github.io/openmx/ rel="noopener noreferrer" class=dropdown__link>OpenMX tutorial</a><li><a href=https://pranabdas.github.io/python-tutorial/ rel="noopener noreferrer" class=dropdown__link>Python Tutorial</a><li><a href=https://pranabdas.github.io/espresso/ rel="noopener noreferrer" class=dropdown__link>Quantum Espresso Tutorial</a><li><a href=https://pranabdas.github.io/rust/ rel="noopener noreferrer" class=dropdown__link>Rust Programming</a><li><a href=https://pranabdas.github.io/arpes-manual/ rel="noopener noreferrer" class=dropdown__link>SUV ARPES Manual</a><li><a href=https://pranabdas.github.io/suvtools/ rel="noopener noreferrer" class=dropdown__link>SUV Python Tools</a></ul></div></div><div class="navbar__items navbar__items--right"><a href=https://github.com/pranabdas/fortran rel="noopener noreferrer" class="navbar__item navbar__link header-github-link" aria-label="GitHub repository" title="Visit project repository in GitHub"></a><a href=https://pranabdas.github.io rel="noopener noreferrer" class="navbar__item navbar__link header-homepage-link" aria-label="About me" title="Go to Pranab's Homepage"></a><div class="toggle_vylO colorModeToggle_DEke"><button class="clean-btn toggleButton_gllP toggleButtonDisabled_aARS" type=button disabled title="Switch between dark and light mode (currently light mode)" aria-label="Switch between dark and light mode (currently light mode)" aria-live=polite aria-pressed=false><svg viewBox="0 0 24 24" width=24 height=24 class=lightToggleIcon_pyhR><path fill=currentColor d="M12,9c1.65,0,3,1.35,3,3s-1.35,3-3,3s-3-1.35-3-3S10.35,9,12,9 M12,7c-2.76,0-5,2.24-5,5s2.24,5,5,5s5-2.24,5-5 S14.76,7,12,7L12,7z M2,13l2,0c0.55,0,1-0.45,1-1s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S1.45,13,2,13z M20,13l2,0c0.55,0,1-0.45,1-1 s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S19.45,13,20,13z M11,2v2c0,0.55,0.45,1,1,1s1-0.45,1-1V2c0-0.55-0.45-1-1-1S11,1.45,11,2z M11,20v2c0,0.55,0.45,1,1,1s1-0.45,1-1v-2c0-0.55-0.45-1-1-1C11.45,19,11,19.45,11,20z M5.99,4.58c-0.39-0.39-1.03-0.39-1.41,0 c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0s0.39-1.03,0-1.41L5.99,4.58z M18.36,16.95 c-0.39-0.39-1.03-0.39-1.41,0c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0c0.39-0.39,0.39-1.03,0-1.41 L18.36,16.95z M19.42,5.99c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06c-0.39,0.39-0.39,1.03,0,1.41 s1.03,0.39,1.41,0L19.42,5.99z M7.05,18.36c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06 c-0.39,0.39-0.39,1.03,0,1.41s1.03,0.39,1.41,0L7.05,18.36z"/></svg><svg viewBox="0 0 24 24" width=24 height=24 class=darkToggleIcon_wfgR><path fill=currentColor d="M9.37,5.51C9.19,6.15,9.1,6.82,9.1,7.5c0,4.08,3.32,7.4,7.4,7.4c0.68,0,1.35-0.09,1.99-0.27C17.45,17.19,14.93,19,12,19 c-3.86,0-7-3.14-7-7C5,9.07,6.81,6.55,9.37,5.51z M12,3c-4.97,0-9,4.03-9,9s4.03,9,9,9s9-4.03,9-9c0-0.46-0.04-0.92-0.1-1.36 c-0.98,1.37-2.58,2.26-4.4,2.26c-2.98,0-5.4-2.42-5.4-5.4c0-1.81,0.89-3.42,2.26-4.4C12.92,3.04,12.46,3,12,3L12,3z"/></svg></button></div><div class=navbarSearchContainer_Bca1><div class="navbar__search searchBarContainer_NW3z" dir=ltr><input placeholder=Search aria-label=Search class=navbar__search-input value=""><div class="loadingRing_RJI3 searchBarLoadingRing_YnHq"><div></div><div></div><div></div><div></div></div></div></div></div></div><div role=presentation class=navbar-sidebar__backdrop></div></nav><div id=__docusaurus_skipToContent_fallback class="main-wrapper mainWrapper_z2l0"><div class=docsWrapper_hBAB><button aria-label="Scroll back to top" class="clean-btn theme-back-to-top-button backToTopButton_sjWU" type=button></button><div class=docRoot_UBD9><aside class="theme-doc-sidebar-container docSidebarContainer_YfHR"><div class=sidebarViewport_aRkj><div class="sidebar_njMd sidebarWithHideableNavbar_wUlq"><a tabindex=-1 class=sidebarLogo_isFc href=/fortran/><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--light_NVdE"><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--dark_xIcU"><b>Fortran</b></a><nav aria-label="Docs sidebar" class="menu thin-scrollbar menu_SIkG"><ul class="theme-doc-sidebar-menu menu__list"><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/>Setup</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/basics>Basics</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/array>Array and Matrix</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class="menu__link menu__link--active" aria-current=page href=/fortran/control>Logical control</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/loop>Loop</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/modules>Modules</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/procedures>Procedures</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/complex>Complex number</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/recursion>Recursion</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/types>Custom types</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/pointer>Pointer</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/file>File I/O</a><li class="theme-doc-sidebar-item-category theme-doc-sidebar-item-category-level-1 menu__list-item menu__list-item--collapsed"><div class=menu__list-item-collapsible><a class="menu__link menu__link--sublist" href=/fortran/category/coding-practice>Coding practice</a><button aria-label="Expand sidebar category 'Coding practice'" aria-expanded=false type=button class="clean-btn menu__caret"></button></div><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/resources>Resources</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/license>License</a></ul></nav><button type=button title="Collapse sidebar" aria-label="Collapse sidebar" class="button button--secondary button--outline collapseSidebarButton_PEFL"><svg width=20 height=20 aria-hidden=true class=collapseSidebarButtonIcon_kv0_><g fill=#7a7a7a><path d="M9.992 10.023c0 .2-.062.399-.172.547l-4.996 7.492a.982.982 0 01-.828.454H1c-.55 0-1-.453-1-1 0-.2.059-.403.168-.551l4.629-6.942L.168 3.078A.939.939 0 010 2.528c0-.548.45-.997 1-.997h2.996c.352 0 .649.18.828.45L9.82 9.472c.11.148.172.347.172.55zm0 0"/><path d="M19.98 10.023c0 .2-.058.399-.168.547l-4.996 7.492a.987.987 0 01-.828.454h-3c-.547 0-.996-.453-.996-1 0-.2.059-.403.168-.551l4.625-6.942-4.625-6.945a.939.939 0 01-.168-.55 1 1 0 01.996-.997h3c.348 0 .649.18.828.45l4.996 7.492c.11.148.168.347.168.55zm0 0"/></g></svg></button></div></div></aside><main class=docMainContainer_TBSr><div class="container padding-top--md padding-bottom--lg"><div class=row><div class="col docItemCol_VOVn"><div class=docItemContainer_Djhp><article><nav class="theme-doc-breadcrumbs breadcrumbsContainer_Z_bl" aria-label=Breadcrumbs><ul class=breadcrumbs itemscope itemtype=https://schema.org/BreadcrumbList><li class=breadcrumbs__item><a aria-label="Home page" class=breadcrumbs__link href=/fortran/><svg viewBox="0 0 24 24" class=breadcrumbHomeIcon_YNFT><path d="M10 19v-5h4v5c0 .55.45 1 1 1h3c.55 0 1-.45 1-1v-7h1.7c.46 0 .68-.57.33-.87L12.67 3.6c-.38-.34-.96-.34-1.34 0l-8.36 7.53c-.34.3-.13.87.33.87H5v7c0 .55.45 1 1 1h3c.55 0 1-.45 1-1z" fill=currentColor /></svg></a><li itemscope itemprop=itemListElement itemtype=https://schema.org/ListItem class="breadcrumbs__item breadcrumbs__item--active"><span class=breadcrumbs__link itemprop=name>Logical control</span><meta itemprop=position content=1></ul></nav><div class="tocCollapsible_ETCw theme-doc-toc-mobile tocMobile_ITEo"><button type=button class="clean-btn tocCollapsibleButton_TO0P">On this page</button></div><div class="theme-doc-markdown markdown"><header><h1>Logical expression and control</h1></header><table><thead><tr><th style=text-align:center>Operators<th style=text-align:left>Meaning<tbody><tr><td style=text-align:center>.lt.<td style=text-align:left>less than<tr><td style=text-align:center>.gt.<td style=text-align:left>greater than<tr><td style=text-align:center>.le.<td style=text-align:left>less than or equal to<tr><td style=text-align:center>.ge.<td style=text-align:left>greater than or equal to<tr><td style=text-align:center>.eq.<td style=text-align:left>equals<tr><td style=text-align:center>.ne.<td style=text-align:left>not equal to<tr><td style=text-align:center>.and.<td style=text-align:left>and<tr><td style=text-align:center>.or.<td style=text-align:left>or<tr><td style=text-align:center>.not.<td style=text-align:left>not<tr><td style=text-align:center>.xor.<td style=text-align:left>"exclusive" or<tr><td style=text-align:center>.eqv.<td style=text-align:left>equivalent<tr><td style=text-align:center>.neqv.<td style=text-align:left>not equivalent</table>
+<!doctype html><html lang=en dir=ltr class="docs-wrapper plugin-docs plugin-id-default docs-version-current docs-doc-page docs-doc-id-control" data-has-hydrated=false><meta charset=UTF-8><meta name=generator content="Docusaurus v3.6.1"><title data-rh=true>Logical expression and control • Fortran Tutorial</title><meta data-rh=true name=viewport content="width=device-width,initial-scale=1.0"><meta data-rh=true name=twitter:card content=summary_large_image><meta data-rh=true property=og:url content=https://pranabdas.github.io/fortran/control><meta data-rh=true property=og:locale content=en><meta data-rh=true name=docusaurus_locale content=en><meta data-rh=true name=docsearch:language content=en><meta data-rh=true name=theme-color content=#06445c><meta data-rh=true name=docusaurus_version content=current><meta data-rh=true name=docusaurus_tag content=docs-default-current><meta data-rh=true name=docsearch:version content=current><meta data-rh=true name=docsearch:docusaurus_tag content=docs-default-current><meta data-rh=true property=og:title content="Logical expression and control • Fortran Tutorial"><meta data-rh=true name=description content="Operators | Meaning"><meta data-rh=true property=og:description content="Operators | Meaning"><link data-rh=true rel=icon href=/fortran/img/favicon.png><link data-rh=true rel=canonical href=https://pranabdas.github.io/fortran/control><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/control hreflang=en><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/control hreflang=x-default><link rel=stylesheet href=https://pranab.pages.dev/assets/fonts/katex/katex.min.css><link rel=stylesheet href=/fortran/assets/css/styles.4de1c8a8.css><script src=/fortran/assets/js/runtime~main.667e3c0f.js defer></script><script src=/fortran/assets/js/main.10795e8f.js defer></script><body class=navigation-with-keyboard><script>!function(){var t,e=function(){try{return new URLSearchParams(window.location.search).get("docusaurus-theme")}catch(t){}}()||function(){try{return window.localStorage.getItem("theme")}catch(t){}}();t=null!==e?e:window.matchMedia("(prefers-color-scheme: dark)").matches?"dark":(window.matchMedia("(prefers-color-scheme: light)").matches,"light"),document.documentElement.setAttribute("data-theme",t)}(),function(){try{for(var[t,e]of new URLSearchParams(window.location.search).entries())if(t.startsWith("docusaurus-data-")){var a=t.replace("docusaurus-data-","data-");document.documentElement.setAttribute(a,e)}}catch(t){}}()</script><div id=__docusaurus><div role=region aria-label="Skip to main content"><a class=skipToContent_fXgn href=#__docusaurus_skipToContent_fallback>Skip to main content</a></div><nav aria-label=Main class="navbar navbar--fixed-top navbarHideable_m1mJ"><div class=navbar__inner><div class=navbar__items><button aria-label="Toggle navigation bar" aria-expanded=false class="navbar__toggle clean-btn" type=button><svg width=30 height=30 viewBox="0 0 30 30" aria-hidden=true><path stroke=currentColor stroke-linecap=round stroke-miterlimit=10 stroke-width=2 d="M4 7h22M4 15h22M4 23h22"/></svg></button><a class=navbar__brand href=/fortran/><div class=navbar__logo><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--light_NVdE"><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--dark_xIcU"></div><b class="navbar__title text--truncate">Fortran</b></a><div class="navbar__item dropdown dropdown--hoverable"><a aria-current=page class="navbar__link active" aria-haspopup=true aria-expanded=false role=button href=/fortran/>Docs</a><ul class=dropdown__menu><li><a aria-current=page class="dropdown__link dropdown__link--active" href=/fortran/>Fortran Programming</a><li><a href=https://pranabdas.github.io/docs/ rel="noopener noreferrer" class=dropdown__link>~ ~ ~ Other Docs ~ ~ ~</a><li><a href=https://pranabdas.github.io/arpespythontools/ rel="noopener noreferrer" class=dropdown__link>ARPES Python Tools</a><li><a href=https://pranabdas.github.io/c-cpp/ rel="noopener noreferrer" class=dropdown__link>C and C++ Programming</a><li><a href=https://pranabdas.github.io/condmat-notes/ rel="noopener noreferrer" class=dropdown__link>Condensed Matter Notes</a><li><a href=https://pranabdas.github.io/javascript/ rel="noopener noreferrer" class=dropdown__link>Javascript Tutorial</a><li><a href=https://pranabdas.github.io/linux/ rel="noopener noreferrer" class=dropdown__link>Linux Tutorial</a><li><a href=https://pranabdas.github.io/machine-learning/ rel="noopener noreferrer" class=dropdown__link>Machine Learning Notes</a><li><a href=https://pranabdas.github.io/openmx/ rel="noopener noreferrer" class=dropdown__link>OpenMX tutorial</a><li><a href=https://pranabdas.github.io/python-tutorial/ rel="noopener noreferrer" class=dropdown__link>Python Tutorial</a><li><a href=https://pranabdas.github.io/espresso/ rel="noopener noreferrer" class=dropdown__link>Quantum Espresso Tutorial</a><li><a href=https://pranabdas.github.io/rust/ rel="noopener noreferrer" class=dropdown__link>Rust Programming</a><li><a href=https://pranabdas.github.io/arpes-manual/ rel="noopener noreferrer" class=dropdown__link>SUV ARPES Manual</a><li><a href=https://pranabdas.github.io/suvtools/ rel="noopener noreferrer" class=dropdown__link>SUV Python Tools</a></ul></div></div><div class="navbar__items navbar__items--right"><a href=https://github.com/pranabdas/fortran rel="noopener noreferrer" class="navbar__item navbar__link header-github-link" aria-label="GitHub repository" title="Visit project repository in GitHub"></a><a href=https://pranabdas.github.io rel="noopener noreferrer" class="navbar__item navbar__link header-homepage-link" aria-label="About me" title="Go to Pranab's Homepage"></a><div class="toggle_vylO colorModeToggle_DEke"><button class="clean-btn toggleButton_gllP toggleButtonDisabled_aARS" type=button disabled title="Switch between dark and light mode (currently light mode)" aria-label="Switch between dark and light mode (currently light mode)" aria-live=polite aria-pressed=false><svg viewBox="0 0 24 24" width=24 height=24 class=lightToggleIcon_pyhR><path fill=currentColor d="M12,9c1.65,0,3,1.35,3,3s-1.35,3-3,3s-3-1.35-3-3S10.35,9,12,9 M12,7c-2.76,0-5,2.24-5,5s2.24,5,5,5s5-2.24,5-5 S14.76,7,12,7L12,7z M2,13l2,0c0.55,0,1-0.45,1-1s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S1.45,13,2,13z M20,13l2,0c0.55,0,1-0.45,1-1 s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S19.45,13,20,13z M11,2v2c0,0.55,0.45,1,1,1s1-0.45,1-1V2c0-0.55-0.45-1-1-1S11,1.45,11,2z M11,20v2c0,0.55,0.45,1,1,1s1-0.45,1-1v-2c0-0.55-0.45-1-1-1C11.45,19,11,19.45,11,20z M5.99,4.58c-0.39-0.39-1.03-0.39-1.41,0 c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0s0.39-1.03,0-1.41L5.99,4.58z M18.36,16.95 c-0.39-0.39-1.03-0.39-1.41,0c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0c0.39-0.39,0.39-1.03,0-1.41 L18.36,16.95z M19.42,5.99c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06c-0.39,0.39-0.39,1.03,0,1.41 s1.03,0.39,1.41,0L19.42,5.99z M7.05,18.36c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06 c-0.39,0.39-0.39,1.03,0,1.41s1.03,0.39,1.41,0L7.05,18.36z"/></svg><svg viewBox="0 0 24 24" width=24 height=24 class=darkToggleIcon_wfgR><path fill=currentColor d="M9.37,5.51C9.19,6.15,9.1,6.82,9.1,7.5c0,4.08,3.32,7.4,7.4,7.4c0.68,0,1.35-0.09,1.99-0.27C17.45,17.19,14.93,19,12,19 c-3.86,0-7-3.14-7-7C5,9.07,6.81,6.55,9.37,5.51z M12,3c-4.97,0-9,4.03-9,9s4.03,9,9,9s9-4.03,9-9c0-0.46-0.04-0.92-0.1-1.36 c-0.98,1.37-2.58,2.26-4.4,2.26c-2.98,0-5.4-2.42-5.4-5.4c0-1.81,0.89-3.42,2.26-4.4C12.92,3.04,12.46,3,12,3L12,3z"/></svg></button></div><div class=navbarSearchContainer_Bca1><div class="navbar__search searchBarContainer_NW3z" dir=ltr><input placeholder=Search aria-label=Search class=navbar__search-input value=""><div class="loadingRing_RJI3 searchBarLoadingRing_YnHq"><div></div><div></div><div></div><div></div></div></div></div></div></div><div role=presentation class=navbar-sidebar__backdrop></div></nav><div id=__docusaurus_skipToContent_fallback class="main-wrapper mainWrapper_z2l0"><div class=docsWrapper_hBAB><button aria-label="Scroll back to top" class="clean-btn theme-back-to-top-button backToTopButton_sjWU" type=button></button><div class=docRoot_UBD9><aside class="theme-doc-sidebar-container docSidebarContainer_YfHR"><div class=sidebarViewport_aRkj><div class="sidebar_njMd sidebarWithHideableNavbar_wUlq"><a tabindex=-1 class=sidebarLogo_isFc href=/fortran/><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--light_NVdE"><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--dark_xIcU"><b>Fortran</b></a><nav aria-label="Docs sidebar" class="menu thin-scrollbar menu_SIkG"><ul class="theme-doc-sidebar-menu menu__list"><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/>Setup</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/basics>Basics</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/array>Array and Matrix</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class="menu__link menu__link--active" aria-current=page href=/fortran/control>Logical control</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/loop>Loop</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/modules>Modules</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/procedures>Procedures</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/complex>Complex number</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/recursion>Recursion</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/types>Custom types</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/pointer>Pointer</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/file>File I/O</a><li class="theme-doc-sidebar-item-category theme-doc-sidebar-item-category-level-1 menu__list-item menu__list-item--collapsed"><div class=menu__list-item-collapsible><a class="menu__link menu__link--sublist" href=/fortran/category/coding-practice>Coding practice</a><button aria-label="Expand sidebar category 'Coding practice'" aria-expanded=false type=button class="clean-btn menu__caret"></button></div><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/resources>Resources</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/license>License</a></ul></nav><button type=button title="Collapse sidebar" aria-label="Collapse sidebar" class="button button--secondary button--outline collapseSidebarButton_PEFL"><svg width=20 height=20 aria-hidden=true class=collapseSidebarButtonIcon_kv0_><g fill=#7a7a7a><path d="M9.992 10.023c0 .2-.062.399-.172.547l-4.996 7.492a.982.982 0 01-.828.454H1c-.55 0-1-.453-1-1 0-.2.059-.403.168-.551l4.629-6.942L.168 3.078A.939.939 0 010 2.528c0-.548.45-.997 1-.997h2.996c.352 0 .649.18.828.45L9.82 9.472c.11.148.172.347.172.55zm0 0"/><path d="M19.98 10.023c0 .2-.058.399-.168.547l-4.996 7.492a.987.987 0 01-.828.454h-3c-.547 0-.996-.453-.996-1 0-.2.059-.403.168-.551l4.625-6.942-4.625-6.945a.939.939 0 01-.168-.55 1 1 0 01.996-.997h3c.348 0 .649.18.828.45l4.996 7.492c.11.148.168.347.168.55zm0 0"/></g></svg></button></div></div></aside><main class=docMainContainer_TBSr><div class="container padding-top--md padding-bottom--lg"><div class=row><div class="col docItemCol_VOVn"><div class=docItemContainer_Djhp><article><nav class="theme-doc-breadcrumbs breadcrumbsContainer_Z_bl" aria-label=Breadcrumbs><ul class=breadcrumbs itemscope itemtype=https://schema.org/BreadcrumbList><li class=breadcrumbs__item><a aria-label="Home page" class=breadcrumbs__link href=/fortran/><svg viewBox="0 0 24 24" class=breadcrumbHomeIcon_YNFT><path d="M10 19v-5h4v5c0 .55.45 1 1 1h3c.55 0 1-.45 1-1v-7h1.7c.46 0 .68-.57.33-.87L12.67 3.6c-.38-.34-.96-.34-1.34 0l-8.36 7.53c-.34.3-.13.87.33.87H5v7c0 .55.45 1 1 1h3c.55 0 1-.45 1-1z" fill=currentColor /></svg></a><li itemscope itemprop=itemListElement itemtype=https://schema.org/ListItem class="breadcrumbs__item breadcrumbs__item--active"><span class=breadcrumbs__link itemprop=name>Logical control</span><meta itemprop=position content=1></ul></nav><div class="tocCollapsible_ETCw theme-doc-toc-mobile tocMobile_ITEo"><button type=button class="clean-btn tocCollapsibleButton_TO0P">On this page</button></div><div class="theme-doc-markdown markdown"><header><h1>Logical expression and control</h1></header><table><thead><tr><th style=text-align:center>Operators<th style=text-align:left>Meaning<tbody><tr><td style=text-align:center>.lt.<td style=text-align:left>less than<tr><td style=text-align:center>.gt.<td style=text-align:left>greater than<tr><td style=text-align:center>.le.<td style=text-align:left>less than or equal to<tr><td style=text-align:center>.ge.<td style=text-align:left>greater than or equal to<tr><td style=text-align:center>.eq.<td style=text-align:left>equals<tr><td style=text-align:center>.ne.<td style=text-align:left>not equal to<tr><td style=text-align:center>.and.<td style=text-align:left>and<tr><td style=text-align:center>.or.<td style=text-align:left>or<tr><td style=text-align:center>.not.<td style=text-align:left>not<tr><td style=text-align:center>.xor.<td style=text-align:left>"exclusive" or<tr><td style=text-align:center>.eqv.<td style=text-align:left>equivalent<tr><td style=text-align:center>.neqv.<td style=text-align:left>not equivalent</table>
 <p>F90 introduced following simplified notation for the relational operators:</p>
 <table><thead><tr><th style=text-align:center>Operators<th style=text-align:left>Meaning<tbody><tr><td style=text-align:center>&lt;<td style=text-align:left>less than<tr><td style=text-align:center>><td style=text-align:left>greater than<tr><td style=text-align:center>&lt;=<td style=text-align:left>less than or equal to<tr><td style=text-align:center>>=<td style=text-align:left>greater than or equal to<tr><td style=text-align:center>==<td style=text-align:left>equal to<tr><td style=text-align:center>/=<td style=text-align:left>not equal to</table>
 <h3 class="anchor anchorWithHideOnScrollNavbar_WYt5" id=if-condition>IF condition<a href=#if-condition class=hash-link aria-label="Direct link to IF condition" title="Direct link to IF condition">​</a></h3>
diff --git a/exec-command/index.html b/exec-command/index.html
index bb2caa1..90945d8 100644
--- a/exec-command/index.html
+++ b/exec-command/index.html
@@ -1,4 +1,4 @@
-<!doctype html><html lang=en dir=ltr class="docs-wrapper plugin-docs plugin-id-default docs-version-current docs-doc-page docs-doc-id-exec-command" data-has-hydrated=false><meta charset=UTF-8><meta name=generator content="Docusaurus v3.6.1"><title data-rh=true>Execute system/external command • Fortran Tutorial</title><meta data-rh=true name=viewport content="width=device-width,initial-scale=1.0"><meta data-rh=true name=twitter:card content=summary_large_image><meta data-rh=true property=og:url content=https://pranabdas.github.io/fortran/exec-command><meta data-rh=true property=og:locale content=en><meta data-rh=true name=docusaurus_locale content=en><meta data-rh=true name=docsearch:language content=en><meta data-rh=true name=theme-color content=#06445c><meta data-rh=true name=docusaurus_version content=current><meta data-rh=true name=docusaurus_tag content=docs-default-current><meta data-rh=true name=docsearch:version content=current><meta data-rh=true name=docsearch:docusaurus_tag content=docs-default-current><meta data-rh=true property=og:title content="Execute system/external command • Fortran Tutorial"><meta data-rh=true name=description content="We can call executecommandline to execute external commands in a FORTRAN"><meta data-rh=true property=og:description content="We can call executecommandline to execute external commands in a FORTRAN"><link data-rh=true rel=icon href=/fortran/img/favicon.png><link data-rh=true rel=canonical href=https://pranabdas.github.io/fortran/exec-command><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/exec-command hreflang=en><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/exec-command hreflang=x-default><link rel=stylesheet href=https://pranabdas.github.io/drive/webfonts/katex/katex.min.css><link rel=stylesheet href=/fortran/assets/css/styles.4de1c8a8.css><script src=/fortran/assets/js/runtime~main.866c090c.js defer></script><script src=/fortran/assets/js/main.ec888ba8.js defer></script><body class=navigation-with-keyboard><script>!function(){var t,e=function(){try{return new URLSearchParams(window.location.search).get("docusaurus-theme")}catch(t){}}()||function(){try{return window.localStorage.getItem("theme")}catch(t){}}();t=null!==e?e:window.matchMedia("(prefers-color-scheme: dark)").matches?"dark":(window.matchMedia("(prefers-color-scheme: light)").matches,"light"),document.documentElement.setAttribute("data-theme",t)}(),function(){try{for(var[t,e]of new URLSearchParams(window.location.search).entries())if(t.startsWith("docusaurus-data-")){var a=t.replace("docusaurus-data-","data-");document.documentElement.setAttribute(a,e)}}catch(t){}}()</script><div id=__docusaurus><div role=region aria-label="Skip to main content"><a class=skipToContent_fXgn href=#__docusaurus_skipToContent_fallback>Skip to main content</a></div><nav aria-label=Main class="navbar navbar--fixed-top navbarHideable_m1mJ"><div class=navbar__inner><div class=navbar__items><button aria-label="Toggle navigation bar" aria-expanded=false class="navbar__toggle clean-btn" type=button><svg width=30 height=30 viewBox="0 0 30 30" aria-hidden=true><path stroke=currentColor stroke-linecap=round stroke-miterlimit=10 stroke-width=2 d="M4 7h22M4 15h22M4 23h22"/></svg></button><a class=navbar__brand href=/fortran/><div class=navbar__logo><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--light_NVdE"><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--dark_xIcU"></div><b class="navbar__title text--truncate">Fortran</b></a><div class="navbar__item dropdown dropdown--hoverable"><a aria-current=page class="navbar__link active" aria-haspopup=true aria-expanded=false role=button href=/fortran/>Docs</a><ul class=dropdown__menu><li><a aria-current=page class="dropdown__link dropdown__link--active" href=/fortran/>Fortran Programming</a><li><a href=https://pranabdas.github.io/docs/ rel="noopener noreferrer" class=dropdown__link>~ ~ ~ Other Docs ~ ~ ~</a><li><a href=https://pranabdas.github.io/arpespythontools/ rel="noopener noreferrer" class=dropdown__link>ARPES Python Tools</a><li><a href=https://pranabdas.github.io/c-cpp/ rel="noopener noreferrer" class=dropdown__link>C and C++ Programming</a><li><a href=https://pranabdas.github.io/condmat-notes/ rel="noopener noreferrer" class=dropdown__link>Condensed Matter Notes</a><li><a href=https://pranabdas.github.io/javascript/ rel="noopener noreferrer" class=dropdown__link>Javascript Tutorial</a><li><a href=https://pranabdas.github.io/linux/ rel="noopener noreferrer" class=dropdown__link>Linux Tutorial</a><li><a href=https://pranabdas.github.io/machine-learning/ rel="noopener noreferrer" class=dropdown__link>Machine Learning Notes</a><li><a href=https://pranabdas.github.io/openmx/ rel="noopener noreferrer" class=dropdown__link>OpenMX tutorial</a><li><a href=https://pranabdas.github.io/python-tutorial/ rel="noopener noreferrer" class=dropdown__link>Python Tutorial</a><li><a href=https://pranabdas.github.io/espresso/ rel="noopener noreferrer" class=dropdown__link>Quantum Espresso Tutorial</a><li><a href=https://pranabdas.github.io/rust/ rel="noopener noreferrer" class=dropdown__link>Rust Programming</a><li><a href=https://pranabdas.github.io/arpes-manual/ rel="noopener noreferrer" class=dropdown__link>SUV ARPES Manual</a><li><a href=https://pranabdas.github.io/suvtools/ rel="noopener noreferrer" class=dropdown__link>SUV Python Tools</a></ul></div></div><div class="navbar__items navbar__items--right"><a href=https://github.com/pranabdas/fortran rel="noopener noreferrer" class="navbar__item navbar__link header-github-link" aria-label="GitHub repository" title="Visit project repository in GitHub"></a><a href=https://pranabdas.github.io rel="noopener noreferrer" class="navbar__item navbar__link header-homepage-link" aria-label="About me" title="Go to Pranab's Homepage"></a><div class="toggle_vylO colorModeToggle_DEke"><button class="clean-btn toggleButton_gllP toggleButtonDisabled_aARS" type=button disabled title="Switch between dark and light mode (currently light mode)" aria-label="Switch between dark and light mode (currently light mode)" aria-live=polite aria-pressed=false><svg viewBox="0 0 24 24" width=24 height=24 class=lightToggleIcon_pyhR><path fill=currentColor d="M12,9c1.65,0,3,1.35,3,3s-1.35,3-3,3s-3-1.35-3-3S10.35,9,12,9 M12,7c-2.76,0-5,2.24-5,5s2.24,5,5,5s5-2.24,5-5 S14.76,7,12,7L12,7z M2,13l2,0c0.55,0,1-0.45,1-1s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S1.45,13,2,13z M20,13l2,0c0.55,0,1-0.45,1-1 s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S19.45,13,20,13z M11,2v2c0,0.55,0.45,1,1,1s1-0.45,1-1V2c0-0.55-0.45-1-1-1S11,1.45,11,2z M11,20v2c0,0.55,0.45,1,1,1s1-0.45,1-1v-2c0-0.55-0.45-1-1-1C11.45,19,11,19.45,11,20z M5.99,4.58c-0.39-0.39-1.03-0.39-1.41,0 c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0s0.39-1.03,0-1.41L5.99,4.58z M18.36,16.95 c-0.39-0.39-1.03-0.39-1.41,0c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0c0.39-0.39,0.39-1.03,0-1.41 L18.36,16.95z M19.42,5.99c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06c-0.39,0.39-0.39,1.03,0,1.41 s1.03,0.39,1.41,0L19.42,5.99z M7.05,18.36c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06 c-0.39,0.39-0.39,1.03,0,1.41s1.03,0.39,1.41,0L7.05,18.36z"/></svg><svg viewBox="0 0 24 24" width=24 height=24 class=darkToggleIcon_wfgR><path fill=currentColor d="M9.37,5.51C9.19,6.15,9.1,6.82,9.1,7.5c0,4.08,3.32,7.4,7.4,7.4c0.68,0,1.35-0.09,1.99-0.27C17.45,17.19,14.93,19,12,19 c-3.86,0-7-3.14-7-7C5,9.07,6.81,6.55,9.37,5.51z M12,3c-4.97,0-9,4.03-9,9s4.03,9,9,9s9-4.03,9-9c0-0.46-0.04-0.92-0.1-1.36 c-0.98,1.37-2.58,2.26-4.4,2.26c-2.98,0-5.4-2.42-5.4-5.4c0-1.81,0.89-3.42,2.26-4.4C12.92,3.04,12.46,3,12,3L12,3z"/></svg></button></div><div class=navbarSearchContainer_Bca1><div class="navbar__search searchBarContainer_NW3z" dir=ltr><input placeholder=Search aria-label=Search class=navbar__search-input value=""><div class="loadingRing_RJI3 searchBarLoadingRing_YnHq"><div></div><div></div><div></div><div></div></div></div></div></div></div><div role=presentation class=navbar-sidebar__backdrop></div></nav><div id=__docusaurus_skipToContent_fallback class="main-wrapper mainWrapper_z2l0"><div class=docsWrapper_hBAB><button aria-label="Scroll back to top" class="clean-btn theme-back-to-top-button backToTopButton_sjWU" type=button></button><div class=docRoot_UBD9><aside class="theme-doc-sidebar-container docSidebarContainer_YfHR"><div class=sidebarViewport_aRkj><div class="sidebar_njMd sidebarWithHideableNavbar_wUlq"><a tabindex=-1 class=sidebarLogo_isFc href=/fortran/><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--light_NVdE"><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--dark_xIcU"><b>Fortran</b></a><nav aria-label="Docs sidebar" class="menu thin-scrollbar menu_SIkG"><ul class="theme-doc-sidebar-menu menu__list"><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/>Setup</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/basics>Basics</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/array>Array and Matrix</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/control>Logical control</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/loop>Loop</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/modules>Modules</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/procedures>Procedures</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/complex>Complex number</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/recursion>Recursion</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/types>Custom types</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/pointer>Pointer</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/file>File I/O</a><li class="theme-doc-sidebar-item-category theme-doc-sidebar-item-category-level-1 menu__list-item"><div class=menu__list-item-collapsible><a class="menu__link menu__link--sublist menu__link--active" href=/fortran/category/coding-practice>Coding practice</a><button aria-label="Collapse sidebar category 'Coding practice'" aria-expanded=true type=button class="clean-btn menu__caret"></button></div><ul style=display:block;overflow:visible;height:auto class=menu__list><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/swap>Swap two numbers</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/abs-path>Absolute path</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/hypotenuse>Calculate hypotenuse</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/integration>Numerical integration</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/haversine>Haversine formula</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/inner-product>Inner product</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/monte-carlo-pi>Monte Carlo method</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/monte-carlo-integration>Monte Carlo integration</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/time>Time</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/arg-parsing>Argument parsing</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class="menu__link menu__link--active" aria-current=page tabindex=0 href=/fortran/exec-command>External command</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/blas>BLAS</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/mpi>MPI Basics</a></ul><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/resources>Resources</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/license>License</a></ul></nav><button type=button title="Collapse sidebar" aria-label="Collapse sidebar" class="button button--secondary button--outline collapseSidebarButton_PEFL"><svg width=20 height=20 aria-hidden=true class=collapseSidebarButtonIcon_kv0_><g fill=#7a7a7a><path d="M9.992 10.023c0 .2-.062.399-.172.547l-4.996 7.492a.982.982 0 01-.828.454H1c-.55 0-1-.453-1-1 0-.2.059-.403.168-.551l4.629-6.942L.168 3.078A.939.939 0 010 2.528c0-.548.45-.997 1-.997h2.996c.352 0 .649.18.828.45L9.82 9.472c.11.148.172.347.172.55zm0 0"/><path d="M19.98 10.023c0 .2-.058.399-.168.547l-4.996 7.492a.987.987 0 01-.828.454h-3c-.547 0-.996-.453-.996-1 0-.2.059-.403.168-.551l4.625-6.942-4.625-6.945a.939.939 0 01-.168-.55 1 1 0 01.996-.997h3c.348 0 .649.18.828.45l4.996 7.492c.11.148.168.347.168.55zm0 0"/></g></svg></button></div></div></aside><main class=docMainContainer_TBSr><div class="container padding-top--md padding-bottom--lg"><div class=row><div class="col docItemCol_VOVn"><div class=docItemContainer_Djhp><article><nav class="theme-doc-breadcrumbs breadcrumbsContainer_Z_bl" aria-label=Breadcrumbs><ul class=breadcrumbs itemscope itemtype=https://schema.org/BreadcrumbList><li class=breadcrumbs__item><a aria-label="Home page" class=breadcrumbs__link href=/fortran/><svg viewBox="0 0 24 24" class=breadcrumbHomeIcon_YNFT><path d="M10 19v-5h4v5c0 .55.45 1 1 1h3c.55 0 1-.45 1-1v-7h1.7c.46 0 .68-.57.33-.87L12.67 3.6c-.38-.34-.96-.34-1.34 0l-8.36 7.53c-.34.3-.13.87.33.87H5v7c0 .55.45 1 1 1h3c.55 0 1-.45 1-1z" fill=currentColor /></svg></a><li itemscope itemprop=itemListElement itemtype=https://schema.org/ListItem class=breadcrumbs__item><a class=breadcrumbs__link itemprop=item href=/fortran/category/coding-practice><span itemprop=name>Coding practice</span></a><meta itemprop=position content=1><li itemscope itemprop=itemListElement itemtype=https://schema.org/ListItem class="breadcrumbs__item breadcrumbs__item--active"><span class=breadcrumbs__link itemprop=name>External command</span><meta itemprop=position content=2></ul></nav><div class="theme-doc-markdown markdown"><header><h1>Execute system/external command</h1></header><p>We can call <code>execute_command_line</code> to execute external commands in a FORTRAN
+<!doctype html><html lang=en dir=ltr class="docs-wrapper plugin-docs plugin-id-default docs-version-current docs-doc-page docs-doc-id-exec-command" data-has-hydrated=false><meta charset=UTF-8><meta name=generator content="Docusaurus v3.6.1"><title data-rh=true>Execute system/external command • Fortran Tutorial</title><meta data-rh=true name=viewport content="width=device-width,initial-scale=1.0"><meta data-rh=true name=twitter:card content=summary_large_image><meta data-rh=true property=og:url content=https://pranabdas.github.io/fortran/exec-command><meta data-rh=true property=og:locale content=en><meta data-rh=true name=docusaurus_locale content=en><meta data-rh=true name=docsearch:language content=en><meta data-rh=true name=theme-color content=#06445c><meta data-rh=true name=docusaurus_version content=current><meta data-rh=true name=docusaurus_tag content=docs-default-current><meta data-rh=true name=docsearch:version content=current><meta data-rh=true name=docsearch:docusaurus_tag content=docs-default-current><meta data-rh=true property=og:title content="Execute system/external command • Fortran Tutorial"><meta data-rh=true name=description content="We can call executecommandline to execute external commands in a FORTRAN"><meta data-rh=true property=og:description content="We can call executecommandline to execute external commands in a FORTRAN"><link data-rh=true rel=icon href=/fortran/img/favicon.png><link data-rh=true rel=canonical href=https://pranabdas.github.io/fortran/exec-command><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/exec-command hreflang=en><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/exec-command hreflang=x-default><link rel=stylesheet href=https://pranab.pages.dev/assets/fonts/katex/katex.min.css><link rel=stylesheet href=/fortran/assets/css/styles.4de1c8a8.css><script src=/fortran/assets/js/runtime~main.667e3c0f.js defer></script><script src=/fortran/assets/js/main.10795e8f.js defer></script><body class=navigation-with-keyboard><script>!function(){var t,e=function(){try{return new URLSearchParams(window.location.search).get("docusaurus-theme")}catch(t){}}()||function(){try{return window.localStorage.getItem("theme")}catch(t){}}();t=null!==e?e:window.matchMedia("(prefers-color-scheme: dark)").matches?"dark":(window.matchMedia("(prefers-color-scheme: light)").matches,"light"),document.documentElement.setAttribute("data-theme",t)}(),function(){try{for(var[t,e]of new URLSearchParams(window.location.search).entries())if(t.startsWith("docusaurus-data-")){var a=t.replace("docusaurus-data-","data-");document.documentElement.setAttribute(a,e)}}catch(t){}}()</script><div id=__docusaurus><div role=region aria-label="Skip to main content"><a class=skipToContent_fXgn href=#__docusaurus_skipToContent_fallback>Skip to main content</a></div><nav aria-label=Main class="navbar navbar--fixed-top navbarHideable_m1mJ"><div class=navbar__inner><div class=navbar__items><button aria-label="Toggle navigation bar" aria-expanded=false class="navbar__toggle clean-btn" type=button><svg width=30 height=30 viewBox="0 0 30 30" aria-hidden=true><path stroke=currentColor stroke-linecap=round stroke-miterlimit=10 stroke-width=2 d="M4 7h22M4 15h22M4 23h22"/></svg></button><a class=navbar__brand href=/fortran/><div class=navbar__logo><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--light_NVdE"><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--dark_xIcU"></div><b class="navbar__title text--truncate">Fortran</b></a><div class="navbar__item dropdown dropdown--hoverable"><a aria-current=page class="navbar__link active" aria-haspopup=true aria-expanded=false role=button href=/fortran/>Docs</a><ul class=dropdown__menu><li><a aria-current=page class="dropdown__link dropdown__link--active" href=/fortran/>Fortran Programming</a><li><a href=https://pranabdas.github.io/docs/ rel="noopener noreferrer" class=dropdown__link>~ ~ ~ Other Docs ~ ~ ~</a><li><a href=https://pranabdas.github.io/arpespythontools/ rel="noopener noreferrer" class=dropdown__link>ARPES Python Tools</a><li><a href=https://pranabdas.github.io/c-cpp/ rel="noopener noreferrer" class=dropdown__link>C and C++ Programming</a><li><a href=https://pranabdas.github.io/condmat-notes/ rel="noopener noreferrer" class=dropdown__link>Condensed Matter Notes</a><li><a href=https://pranabdas.github.io/javascript/ rel="noopener noreferrer" class=dropdown__link>Javascript Tutorial</a><li><a href=https://pranabdas.github.io/linux/ rel="noopener noreferrer" class=dropdown__link>Linux Tutorial</a><li><a href=https://pranabdas.github.io/machine-learning/ rel="noopener noreferrer" class=dropdown__link>Machine Learning Notes</a><li><a href=https://pranabdas.github.io/openmx/ rel="noopener noreferrer" class=dropdown__link>OpenMX tutorial</a><li><a href=https://pranabdas.github.io/python-tutorial/ rel="noopener noreferrer" class=dropdown__link>Python Tutorial</a><li><a href=https://pranabdas.github.io/espresso/ rel="noopener noreferrer" class=dropdown__link>Quantum Espresso Tutorial</a><li><a href=https://pranabdas.github.io/rust/ rel="noopener noreferrer" class=dropdown__link>Rust Programming</a><li><a href=https://pranabdas.github.io/arpes-manual/ rel="noopener noreferrer" class=dropdown__link>SUV ARPES Manual</a><li><a href=https://pranabdas.github.io/suvtools/ rel="noopener noreferrer" class=dropdown__link>SUV Python Tools</a></ul></div></div><div class="navbar__items navbar__items--right"><a href=https://github.com/pranabdas/fortran rel="noopener noreferrer" class="navbar__item navbar__link header-github-link" aria-label="GitHub repository" title="Visit project repository in GitHub"></a><a href=https://pranabdas.github.io rel="noopener noreferrer" class="navbar__item navbar__link header-homepage-link" aria-label="About me" title="Go to Pranab's Homepage"></a><div class="toggle_vylO colorModeToggle_DEke"><button class="clean-btn toggleButton_gllP toggleButtonDisabled_aARS" type=button disabled title="Switch between dark and light mode (currently light mode)" aria-label="Switch between dark and light mode (currently light mode)" aria-live=polite aria-pressed=false><svg viewBox="0 0 24 24" width=24 height=24 class=lightToggleIcon_pyhR><path fill=currentColor d="M12,9c1.65,0,3,1.35,3,3s-1.35,3-3,3s-3-1.35-3-3S10.35,9,12,9 M12,7c-2.76,0-5,2.24-5,5s2.24,5,5,5s5-2.24,5-5 S14.76,7,12,7L12,7z M2,13l2,0c0.55,0,1-0.45,1-1s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S1.45,13,2,13z M20,13l2,0c0.55,0,1-0.45,1-1 s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S19.45,13,20,13z M11,2v2c0,0.55,0.45,1,1,1s1-0.45,1-1V2c0-0.55-0.45-1-1-1S11,1.45,11,2z M11,20v2c0,0.55,0.45,1,1,1s1-0.45,1-1v-2c0-0.55-0.45-1-1-1C11.45,19,11,19.45,11,20z M5.99,4.58c-0.39-0.39-1.03-0.39-1.41,0 c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0s0.39-1.03,0-1.41L5.99,4.58z M18.36,16.95 c-0.39-0.39-1.03-0.39-1.41,0c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0c0.39-0.39,0.39-1.03,0-1.41 L18.36,16.95z M19.42,5.99c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06c-0.39,0.39-0.39,1.03,0,1.41 s1.03,0.39,1.41,0L19.42,5.99z M7.05,18.36c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06 c-0.39,0.39-0.39,1.03,0,1.41s1.03,0.39,1.41,0L7.05,18.36z"/></svg><svg viewBox="0 0 24 24" width=24 height=24 class=darkToggleIcon_wfgR><path fill=currentColor d="M9.37,5.51C9.19,6.15,9.1,6.82,9.1,7.5c0,4.08,3.32,7.4,7.4,7.4c0.68,0,1.35-0.09,1.99-0.27C17.45,17.19,14.93,19,12,19 c-3.86,0-7-3.14-7-7C5,9.07,6.81,6.55,9.37,5.51z M12,3c-4.97,0-9,4.03-9,9s4.03,9,9,9s9-4.03,9-9c0-0.46-0.04-0.92-0.1-1.36 c-0.98,1.37-2.58,2.26-4.4,2.26c-2.98,0-5.4-2.42-5.4-5.4c0-1.81,0.89-3.42,2.26-4.4C12.92,3.04,12.46,3,12,3L12,3z"/></svg></button></div><div class=navbarSearchContainer_Bca1><div class="navbar__search searchBarContainer_NW3z" dir=ltr><input placeholder=Search aria-label=Search class=navbar__search-input value=""><div class="loadingRing_RJI3 searchBarLoadingRing_YnHq"><div></div><div></div><div></div><div></div></div></div></div></div></div><div role=presentation class=navbar-sidebar__backdrop></div></nav><div id=__docusaurus_skipToContent_fallback class="main-wrapper mainWrapper_z2l0"><div class=docsWrapper_hBAB><button aria-label="Scroll back to top" class="clean-btn theme-back-to-top-button backToTopButton_sjWU" type=button></button><div class=docRoot_UBD9><aside class="theme-doc-sidebar-container docSidebarContainer_YfHR"><div class=sidebarViewport_aRkj><div class="sidebar_njMd sidebarWithHideableNavbar_wUlq"><a tabindex=-1 class=sidebarLogo_isFc href=/fortran/><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--light_NVdE"><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--dark_xIcU"><b>Fortran</b></a><nav aria-label="Docs sidebar" class="menu thin-scrollbar menu_SIkG"><ul class="theme-doc-sidebar-menu menu__list"><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/>Setup</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/basics>Basics</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/array>Array and Matrix</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/control>Logical control</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/loop>Loop</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/modules>Modules</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/procedures>Procedures</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/complex>Complex number</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/recursion>Recursion</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/types>Custom types</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/pointer>Pointer</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/file>File I/O</a><li class="theme-doc-sidebar-item-category theme-doc-sidebar-item-category-level-1 menu__list-item"><div class=menu__list-item-collapsible><a class="menu__link menu__link--sublist menu__link--active" href=/fortran/category/coding-practice>Coding practice</a><button aria-label="Collapse sidebar category 'Coding practice'" aria-expanded=true type=button class="clean-btn menu__caret"></button></div><ul style=display:block;overflow:visible;height:auto class=menu__list><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/swap>Swap two numbers</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/abs-path>Absolute path</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/hypotenuse>Calculate hypotenuse</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/integration>Numerical integration</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/haversine>Haversine formula</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/inner-product>Inner product</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/monte-carlo-pi>Monte Carlo method</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/monte-carlo-integration>Monte Carlo integration</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/time>Time</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/arg-parsing>Argument parsing</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class="menu__link menu__link--active" aria-current=page tabindex=0 href=/fortran/exec-command>External command</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/blas>BLAS</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/mpi>MPI Basics</a></ul><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/resources>Resources</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/license>License</a></ul></nav><button type=button title="Collapse sidebar" aria-label="Collapse sidebar" class="button button--secondary button--outline collapseSidebarButton_PEFL"><svg width=20 height=20 aria-hidden=true class=collapseSidebarButtonIcon_kv0_><g fill=#7a7a7a><path d="M9.992 10.023c0 .2-.062.399-.172.547l-4.996 7.492a.982.982 0 01-.828.454H1c-.55 0-1-.453-1-1 0-.2.059-.403.168-.551l4.629-6.942L.168 3.078A.939.939 0 010 2.528c0-.548.45-.997 1-.997h2.996c.352 0 .649.18.828.45L9.82 9.472c.11.148.172.347.172.55zm0 0"/><path d="M19.98 10.023c0 .2-.058.399-.168.547l-4.996 7.492a.987.987 0 01-.828.454h-3c-.547 0-.996-.453-.996-1 0-.2.059-.403.168-.551l4.625-6.942-4.625-6.945a.939.939 0 01-.168-.55 1 1 0 01.996-.997h3c.348 0 .649.18.828.45l4.996 7.492c.11.148.168.347.168.55zm0 0"/></g></svg></button></div></div></aside><main class=docMainContainer_TBSr><div class="container padding-top--md padding-bottom--lg"><div class=row><div class="col docItemCol_VOVn"><div class=docItemContainer_Djhp><article><nav class="theme-doc-breadcrumbs breadcrumbsContainer_Z_bl" aria-label=Breadcrumbs><ul class=breadcrumbs itemscope itemtype=https://schema.org/BreadcrumbList><li class=breadcrumbs__item><a aria-label="Home page" class=breadcrumbs__link href=/fortran/><svg viewBox="0 0 24 24" class=breadcrumbHomeIcon_YNFT><path d="M10 19v-5h4v5c0 .55.45 1 1 1h3c.55 0 1-.45 1-1v-7h1.7c.46 0 .68-.57.33-.87L12.67 3.6c-.38-.34-.96-.34-1.34 0l-8.36 7.53c-.34.3-.13.87.33.87H5v7c0 .55.45 1 1 1h3c.55 0 1-.45 1-1z" fill=currentColor /></svg></a><li itemscope itemprop=itemListElement itemtype=https://schema.org/ListItem class=breadcrumbs__item><a class=breadcrumbs__link itemprop=item href=/fortran/category/coding-practice><span itemprop=name>Coding practice</span></a><meta itemprop=position content=1><li itemscope itemprop=itemListElement itemtype=https://schema.org/ListItem class="breadcrumbs__item breadcrumbs__item--active"><span class=breadcrumbs__link itemprop=name>External command</span><meta itemprop=position content=2></ul></nav><div class="theme-doc-markdown markdown"><header><h1>Execute system/external command</h1></header><p>We can call <code>execute_command_line</code> to execute external commands in a FORTRAN
 program:</p>
 <!-- -->
 <div class="language-fortran codeBlockContainer_Ckt0 theme-code-block" style=--prism-color:#393A34;--prism-background-color:#f6f8fa><div class=codeBlockTitle_Ktv7>src/27_exec_command.f90</div><div class=codeBlockContent_biex><pre tabindex=0 class="prism-code language-fortran codeBlock_bY9V thin-scrollbar" style=color:#393A34;background-color:#f6f8fa><code class="codeBlockLines_e6Vv codeBlockLinesWithNumbering_o6Pm"><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token keyword" style=color:#00009f>PROGRAM</span><span class="token plain"> MAIN</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>IMPLICIT NONE</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>INTEGER</span><span class="token plain"> exit_code</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token comment" style=color:#999988;font-style:italic>! Execute system command</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>PRINT</span><span class="token plain"> </span><span class="token operator" style=color:#393A34>*</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> </span><span class="token string" style=color:#e3116c>"Executing: ls"</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>CALL</span><span class="token plain"> execute_command_line</span><span class="token punctuation" style=color:#393A34>(</span><span class="token string" style=color:#e3116c>"ls"</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>PRINT</span><span class="token plain"> </span><span class="token operator" style=color:#393A34>*</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> </span><span class="token string" style=color:#e3116c>"Executing: du -hs ."</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>CALL</span><span class="token plain"> execute_command_line</span><span class="token punctuation" style=color:#393A34>(</span><span class="token string" style=color:#e3116c>"du -hs ."</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> exitstat</span><span class="token operator" style=color:#393A34>=</span><span class="token plain">exit_code</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>PRINT</span><span class="token plain"> </span><span class="token operator" style=color:#393A34>*</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> </span><span class="token string" style=color:#e3116c>"Exit code: "</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> exit_code</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain"></span><span class="token keyword" style=color:#00009f>END</span></span><br></span></code></pre><div class=buttonGroup__atx><button type=button aria-label="Copy code to clipboard" title=Copy class=clean-btn><span class=copyButtonIcons_eSgA aria-hidden=true><svg viewBox="0 0 24 24" class=copyButtonIcon_y97N><path fill=currentColor d="M19,21H8V7H19M19,5H8A2,2 0 0,0 6,7V21A2,2 0 0,0 8,23H19A2,2 0 0,0 21,21V7A2,2 0 0,0 19,5M16,1H4A2,2 0 0,0 2,3V17H4V3H16V1Z"/></svg><svg viewBox="0 0 24 24" class=copyButtonSuccessIcon_LjdS><path fill=currentColor d=M21,7L9,19L3.5,13.5L4.91,12.09L9,16.17L19.59,5.59L21,7Z /></svg></span></button></div></div></div></div><footer class="theme-doc-footer docusaurus-mt-lg"><div class="row margin-top--sm theme-doc-footer-edit-meta-row"><div class=col><a href=https://github.com/pranabdas/fortran/blob/main/docs/exec-command.mdx target=_blank rel="noopener noreferrer" class=theme-edit-this-page><svg fill=currentColor height=20 width=20 viewBox="0 0 40 40" class=iconEdit_Z9Sw aria-hidden=true><g><path d="m34.5 11.7l-3 3.1-6.3-6.3 3.1-3q0.5-0.5 1.2-0.5t1.1 0.5l3.9 3.9q0.5 0.4 0.5 1.1t-0.5 1.2z m-29.5 17.1l18.4-18.5 6.3 6.3-18.4 18.4h-6.3v-6.2z"/></g></svg>Edit this page</a></div><div class="col lastUpdated_JAkA"></div></div></footer></article><nav class="pagination-nav docusaurus-mt-lg" aria-label="Docs pages"><a class="pagination-nav__link pagination-nav__link--prev" href=/fortran/arg-parsing><div class=pagination-nav__sublabel>Previous</div><div class=pagination-nav__label>Argument parsing</div></a><a class="pagination-nav__link pagination-nav__link--next" href=/fortran/blas><div class=pagination-nav__sublabel>Next</div><div class=pagination-nav__label>BLAS</div></a></nav></div></div></div></div></main></div></div></div><footer class="footer footer--dark"><div class="container container-fluid"><div class="footer__bottom text--center"><div class=footer__copyright>Copyright © 2024 Pranab Das. All rights
diff --git a/file/index.html b/file/index.html
index 57404d8..b69d75d 100644
--- a/file/index.html
+++ b/file/index.html
@@ -1,4 +1,4 @@
-<!doctype html><html lang=en dir=ltr class="docs-wrapper plugin-docs plugin-id-default docs-version-current docs-doc-page docs-doc-id-file" data-has-hydrated=false><meta charset=UTF-8><meta name=generator content="Docusaurus v3.6.1"><title data-rh=true>File Input / Output • Fortran Tutorial</title><meta data-rh=true name=viewport content="width=device-width,initial-scale=1.0"><meta data-rh=true name=twitter:card content=summary_large_image><meta data-rh=true property=og:url content=https://pranabdas.github.io/fortran/file><meta data-rh=true property=og:locale content=en><meta data-rh=true name=docusaurus_locale content=en><meta data-rh=true name=docsearch:language content=en><meta data-rh=true name=theme-color content=#06445c><meta data-rh=true name=docusaurus_version content=current><meta data-rh=true name=docusaurus_tag content=docs-default-current><meta data-rh=true name=docsearch:version content=current><meta data-rh=true name=docsearch:docusaurus_tag content=docs-default-current><meta data-rh=true property=og:title content="File Input / Output • Fortran Tutorial"><meta data-rh=true name=description content="Here we will generate some data and write it to a file:"><meta data-rh=true property=og:description content="Here we will generate some data and write it to a file:"><link data-rh=true rel=icon href=/fortran/img/favicon.png><link data-rh=true rel=canonical href=https://pranabdas.github.io/fortran/file><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/file hreflang=en><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/file hreflang=x-default><link rel=stylesheet href=https://pranabdas.github.io/drive/webfonts/katex/katex.min.css><link rel=stylesheet href=/fortran/assets/css/styles.4de1c8a8.css><script src=/fortran/assets/js/runtime~main.866c090c.js defer></script><script src=/fortran/assets/js/main.ec888ba8.js defer></script><body class=navigation-with-keyboard><script>!function(){var t,e=function(){try{return new URLSearchParams(window.location.search).get("docusaurus-theme")}catch(t){}}()||function(){try{return window.localStorage.getItem("theme")}catch(t){}}();t=null!==e?e:window.matchMedia("(prefers-color-scheme: dark)").matches?"dark":(window.matchMedia("(prefers-color-scheme: light)").matches,"light"),document.documentElement.setAttribute("data-theme",t)}(),function(){try{for(var[t,e]of new URLSearchParams(window.location.search).entries())if(t.startsWith("docusaurus-data-")){var a=t.replace("docusaurus-data-","data-");document.documentElement.setAttribute(a,e)}}catch(t){}}()</script><div id=__docusaurus><div role=region aria-label="Skip to main content"><a class=skipToContent_fXgn href=#__docusaurus_skipToContent_fallback>Skip to main content</a></div><nav aria-label=Main class="navbar navbar--fixed-top navbarHideable_m1mJ"><div class=navbar__inner><div class=navbar__items><button aria-label="Toggle navigation bar" aria-expanded=false class="navbar__toggle clean-btn" type=button><svg width=30 height=30 viewBox="0 0 30 30" aria-hidden=true><path stroke=currentColor stroke-linecap=round stroke-miterlimit=10 stroke-width=2 d="M4 7h22M4 15h22M4 23h22"/></svg></button><a class=navbar__brand href=/fortran/><div class=navbar__logo><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--light_NVdE"><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--dark_xIcU"></div><b class="navbar__title text--truncate">Fortran</b></a><div class="navbar__item dropdown dropdown--hoverable"><a aria-current=page class="navbar__link active" aria-haspopup=true aria-expanded=false role=button href=/fortran/>Docs</a><ul class=dropdown__menu><li><a aria-current=page class="dropdown__link dropdown__link--active" href=/fortran/>Fortran Programming</a><li><a href=https://pranabdas.github.io/docs/ rel="noopener noreferrer" class=dropdown__link>~ ~ ~ Other Docs ~ ~ ~</a><li><a href=https://pranabdas.github.io/arpespythontools/ rel="noopener noreferrer" class=dropdown__link>ARPES Python Tools</a><li><a href=https://pranabdas.github.io/c-cpp/ rel="noopener noreferrer" class=dropdown__link>C and C++ Programming</a><li><a href=https://pranabdas.github.io/condmat-notes/ rel="noopener noreferrer" class=dropdown__link>Condensed Matter Notes</a><li><a href=https://pranabdas.github.io/javascript/ rel="noopener noreferrer" class=dropdown__link>Javascript Tutorial</a><li><a href=https://pranabdas.github.io/linux/ rel="noopener noreferrer" class=dropdown__link>Linux Tutorial</a><li><a href=https://pranabdas.github.io/machine-learning/ rel="noopener noreferrer" class=dropdown__link>Machine Learning Notes</a><li><a href=https://pranabdas.github.io/openmx/ rel="noopener noreferrer" class=dropdown__link>OpenMX tutorial</a><li><a href=https://pranabdas.github.io/python-tutorial/ rel="noopener noreferrer" class=dropdown__link>Python Tutorial</a><li><a href=https://pranabdas.github.io/espresso/ rel="noopener noreferrer" class=dropdown__link>Quantum Espresso Tutorial</a><li><a href=https://pranabdas.github.io/rust/ rel="noopener noreferrer" class=dropdown__link>Rust Programming</a><li><a href=https://pranabdas.github.io/arpes-manual/ rel="noopener noreferrer" class=dropdown__link>SUV ARPES Manual</a><li><a href=https://pranabdas.github.io/suvtools/ rel="noopener noreferrer" class=dropdown__link>SUV Python Tools</a></ul></div></div><div class="navbar__items navbar__items--right"><a href=https://github.com/pranabdas/fortran rel="noopener noreferrer" class="navbar__item navbar__link header-github-link" aria-label="GitHub repository" title="Visit project repository in GitHub"></a><a href=https://pranabdas.github.io rel="noopener noreferrer" class="navbar__item navbar__link header-homepage-link" aria-label="About me" title="Go to Pranab's Homepage"></a><div class="toggle_vylO colorModeToggle_DEke"><button class="clean-btn toggleButton_gllP toggleButtonDisabled_aARS" type=button disabled title="Switch between dark and light mode (currently light mode)" aria-label="Switch between dark and light mode (currently light mode)" aria-live=polite aria-pressed=false><svg viewBox="0 0 24 24" width=24 height=24 class=lightToggleIcon_pyhR><path fill=currentColor d="M12,9c1.65,0,3,1.35,3,3s-1.35,3-3,3s-3-1.35-3-3S10.35,9,12,9 M12,7c-2.76,0-5,2.24-5,5s2.24,5,5,5s5-2.24,5-5 S14.76,7,12,7L12,7z M2,13l2,0c0.55,0,1-0.45,1-1s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S1.45,13,2,13z M20,13l2,0c0.55,0,1-0.45,1-1 s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S19.45,13,20,13z M11,2v2c0,0.55,0.45,1,1,1s1-0.45,1-1V2c0-0.55-0.45-1-1-1S11,1.45,11,2z M11,20v2c0,0.55,0.45,1,1,1s1-0.45,1-1v-2c0-0.55-0.45-1-1-1C11.45,19,11,19.45,11,20z M5.99,4.58c-0.39-0.39-1.03-0.39-1.41,0 c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0s0.39-1.03,0-1.41L5.99,4.58z M18.36,16.95 c-0.39-0.39-1.03-0.39-1.41,0c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0c0.39-0.39,0.39-1.03,0-1.41 L18.36,16.95z M19.42,5.99c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06c-0.39,0.39-0.39,1.03,0,1.41 s1.03,0.39,1.41,0L19.42,5.99z M7.05,18.36c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06 c-0.39,0.39-0.39,1.03,0,1.41s1.03,0.39,1.41,0L7.05,18.36z"/></svg><svg viewBox="0 0 24 24" width=24 height=24 class=darkToggleIcon_wfgR><path fill=currentColor d="M9.37,5.51C9.19,6.15,9.1,6.82,9.1,7.5c0,4.08,3.32,7.4,7.4,7.4c0.68,0,1.35-0.09,1.99-0.27C17.45,17.19,14.93,19,12,19 c-3.86,0-7-3.14-7-7C5,9.07,6.81,6.55,9.37,5.51z M12,3c-4.97,0-9,4.03-9,9s4.03,9,9,9s9-4.03,9-9c0-0.46-0.04-0.92-0.1-1.36 c-0.98,1.37-2.58,2.26-4.4,2.26c-2.98,0-5.4-2.42-5.4-5.4c0-1.81,0.89-3.42,2.26-4.4C12.92,3.04,12.46,3,12,3L12,3z"/></svg></button></div><div class=navbarSearchContainer_Bca1><div class="navbar__search searchBarContainer_NW3z" dir=ltr><input placeholder=Search aria-label=Search class=navbar__search-input value=""><div class="loadingRing_RJI3 searchBarLoadingRing_YnHq"><div></div><div></div><div></div><div></div></div></div></div></div></div><div role=presentation class=navbar-sidebar__backdrop></div></nav><div id=__docusaurus_skipToContent_fallback class="main-wrapper mainWrapper_z2l0"><div class=docsWrapper_hBAB><button aria-label="Scroll back to top" class="clean-btn theme-back-to-top-button backToTopButton_sjWU" type=button></button><div class=docRoot_UBD9><aside class="theme-doc-sidebar-container docSidebarContainer_YfHR"><div class=sidebarViewport_aRkj><div class="sidebar_njMd sidebarWithHideableNavbar_wUlq"><a tabindex=-1 class=sidebarLogo_isFc href=/fortran/><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--light_NVdE"><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--dark_xIcU"><b>Fortran</b></a><nav aria-label="Docs sidebar" class="menu thin-scrollbar menu_SIkG"><ul class="theme-doc-sidebar-menu menu__list"><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/>Setup</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/basics>Basics</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/array>Array and Matrix</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/control>Logical control</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/loop>Loop</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/modules>Modules</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/procedures>Procedures</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/complex>Complex number</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/recursion>Recursion</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/types>Custom types</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/pointer>Pointer</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class="menu__link menu__link--active" aria-current=page href=/fortran/file>File I/O</a><li class="theme-doc-sidebar-item-category theme-doc-sidebar-item-category-level-1 menu__list-item menu__list-item--collapsed"><div class=menu__list-item-collapsible><a class="menu__link menu__link--sublist" href=/fortran/category/coding-practice>Coding practice</a><button aria-label="Expand sidebar category 'Coding practice'" aria-expanded=false type=button class="clean-btn menu__caret"></button></div><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/resources>Resources</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/license>License</a></ul></nav><button type=button title="Collapse sidebar" aria-label="Collapse sidebar" class="button button--secondary button--outline collapseSidebarButton_PEFL"><svg width=20 height=20 aria-hidden=true class=collapseSidebarButtonIcon_kv0_><g fill=#7a7a7a><path d="M9.992 10.023c0 .2-.062.399-.172.547l-4.996 7.492a.982.982 0 01-.828.454H1c-.55 0-1-.453-1-1 0-.2.059-.403.168-.551l4.629-6.942L.168 3.078A.939.939 0 010 2.528c0-.548.45-.997 1-.997h2.996c.352 0 .649.18.828.45L9.82 9.472c.11.148.172.347.172.55zm0 0"/><path d="M19.98 10.023c0 .2-.058.399-.168.547l-4.996 7.492a.987.987 0 01-.828.454h-3c-.547 0-.996-.453-.996-1 0-.2.059-.403.168-.551l4.625-6.942-4.625-6.945a.939.939 0 01-.168-.55 1 1 0 01.996-.997h3c.348 0 .649.18.828.45l4.996 7.492c.11.148.168.347.168.55zm0 0"/></g></svg></button></div></div></aside><main class=docMainContainer_TBSr><div class="container padding-top--md padding-bottom--lg"><div class=row><div class="col docItemCol_VOVn"><div class=docItemContainer_Djhp><article><nav class="theme-doc-breadcrumbs breadcrumbsContainer_Z_bl" aria-label=Breadcrumbs><ul class=breadcrumbs itemscope itemtype=https://schema.org/BreadcrumbList><li class=breadcrumbs__item><a aria-label="Home page" class=breadcrumbs__link href=/fortran/><svg viewBox="0 0 24 24" class=breadcrumbHomeIcon_YNFT><path d="M10 19v-5h4v5c0 .55.45 1 1 1h3c.55 0 1-.45 1-1v-7h1.7c.46 0 .68-.57.33-.87L12.67 3.6c-.38-.34-.96-.34-1.34 0l-8.36 7.53c-.34.3-.13.87.33.87H5v7c0 .55.45 1 1 1h3c.55 0 1-.45 1-1z" fill=currentColor /></svg></a><li itemscope itemprop=itemListElement itemtype=https://schema.org/ListItem class="breadcrumbs__item breadcrumbs__item--active"><span class=breadcrumbs__link itemprop=name>File I/O</span><meta itemprop=position content=1></ul></nav><div class="theme-doc-markdown markdown"><header><h1>File Input / Output</h1></header><p>Here we will generate some data and write it to a file:</p>
+<!doctype html><html lang=en dir=ltr class="docs-wrapper plugin-docs plugin-id-default docs-version-current docs-doc-page docs-doc-id-file" data-has-hydrated=false><meta charset=UTF-8><meta name=generator content="Docusaurus v3.6.1"><title data-rh=true>File Input / Output • Fortran Tutorial</title><meta data-rh=true name=viewport content="width=device-width,initial-scale=1.0"><meta data-rh=true name=twitter:card content=summary_large_image><meta data-rh=true property=og:url content=https://pranabdas.github.io/fortran/file><meta data-rh=true property=og:locale content=en><meta data-rh=true name=docusaurus_locale content=en><meta data-rh=true name=docsearch:language content=en><meta data-rh=true name=theme-color content=#06445c><meta data-rh=true name=docusaurus_version content=current><meta data-rh=true name=docusaurus_tag content=docs-default-current><meta data-rh=true name=docsearch:version content=current><meta data-rh=true name=docsearch:docusaurus_tag content=docs-default-current><meta data-rh=true property=og:title content="File Input / Output • Fortran Tutorial"><meta data-rh=true name=description content="Here we will generate some data and write it to a file:"><meta data-rh=true property=og:description content="Here we will generate some data and write it to a file:"><link data-rh=true rel=icon href=/fortran/img/favicon.png><link data-rh=true rel=canonical href=https://pranabdas.github.io/fortran/file><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/file hreflang=en><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/file hreflang=x-default><link rel=stylesheet href=https://pranab.pages.dev/assets/fonts/katex/katex.min.css><link rel=stylesheet href=/fortran/assets/css/styles.4de1c8a8.css><script src=/fortran/assets/js/runtime~main.667e3c0f.js defer></script><script src=/fortran/assets/js/main.10795e8f.js defer></script><body class=navigation-with-keyboard><script>!function(){var t,e=function(){try{return new URLSearchParams(window.location.search).get("docusaurus-theme")}catch(t){}}()||function(){try{return window.localStorage.getItem("theme")}catch(t){}}();t=null!==e?e:window.matchMedia("(prefers-color-scheme: dark)").matches?"dark":(window.matchMedia("(prefers-color-scheme: light)").matches,"light"),document.documentElement.setAttribute("data-theme",t)}(),function(){try{for(var[t,e]of new URLSearchParams(window.location.search).entries())if(t.startsWith("docusaurus-data-")){var a=t.replace("docusaurus-data-","data-");document.documentElement.setAttribute(a,e)}}catch(t){}}()</script><div id=__docusaurus><div role=region aria-label="Skip to main content"><a class=skipToContent_fXgn href=#__docusaurus_skipToContent_fallback>Skip to main content</a></div><nav aria-label=Main class="navbar navbar--fixed-top navbarHideable_m1mJ"><div class=navbar__inner><div class=navbar__items><button aria-label="Toggle navigation bar" aria-expanded=false class="navbar__toggle clean-btn" type=button><svg width=30 height=30 viewBox="0 0 30 30" aria-hidden=true><path stroke=currentColor stroke-linecap=round stroke-miterlimit=10 stroke-width=2 d="M4 7h22M4 15h22M4 23h22"/></svg></button><a class=navbar__brand href=/fortran/><div class=navbar__logo><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--light_NVdE"><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--dark_xIcU"></div><b class="navbar__title text--truncate">Fortran</b></a><div class="navbar__item dropdown dropdown--hoverable"><a aria-current=page class="navbar__link active" aria-haspopup=true aria-expanded=false role=button href=/fortran/>Docs</a><ul class=dropdown__menu><li><a aria-current=page class="dropdown__link dropdown__link--active" href=/fortran/>Fortran Programming</a><li><a href=https://pranabdas.github.io/docs/ rel="noopener noreferrer" class=dropdown__link>~ ~ ~ Other Docs ~ ~ ~</a><li><a href=https://pranabdas.github.io/arpespythontools/ rel="noopener noreferrer" class=dropdown__link>ARPES Python Tools</a><li><a href=https://pranabdas.github.io/c-cpp/ rel="noopener noreferrer" class=dropdown__link>C and C++ Programming</a><li><a href=https://pranabdas.github.io/condmat-notes/ rel="noopener noreferrer" class=dropdown__link>Condensed Matter Notes</a><li><a href=https://pranabdas.github.io/javascript/ rel="noopener noreferrer" class=dropdown__link>Javascript Tutorial</a><li><a href=https://pranabdas.github.io/linux/ rel="noopener noreferrer" class=dropdown__link>Linux Tutorial</a><li><a href=https://pranabdas.github.io/machine-learning/ rel="noopener noreferrer" class=dropdown__link>Machine Learning Notes</a><li><a href=https://pranabdas.github.io/openmx/ rel="noopener noreferrer" class=dropdown__link>OpenMX tutorial</a><li><a href=https://pranabdas.github.io/python-tutorial/ rel="noopener noreferrer" class=dropdown__link>Python Tutorial</a><li><a href=https://pranabdas.github.io/espresso/ rel="noopener noreferrer" class=dropdown__link>Quantum Espresso Tutorial</a><li><a href=https://pranabdas.github.io/rust/ rel="noopener noreferrer" class=dropdown__link>Rust Programming</a><li><a href=https://pranabdas.github.io/arpes-manual/ rel="noopener noreferrer" class=dropdown__link>SUV ARPES Manual</a><li><a href=https://pranabdas.github.io/suvtools/ rel="noopener noreferrer" class=dropdown__link>SUV Python Tools</a></ul></div></div><div class="navbar__items navbar__items--right"><a href=https://github.com/pranabdas/fortran rel="noopener noreferrer" class="navbar__item navbar__link header-github-link" aria-label="GitHub repository" title="Visit project repository in GitHub"></a><a href=https://pranabdas.github.io rel="noopener noreferrer" class="navbar__item navbar__link header-homepage-link" aria-label="About me" title="Go to Pranab's Homepage"></a><div class="toggle_vylO colorModeToggle_DEke"><button class="clean-btn toggleButton_gllP toggleButtonDisabled_aARS" type=button disabled title="Switch between dark and light mode (currently light mode)" aria-label="Switch between dark and light mode (currently light mode)" aria-live=polite aria-pressed=false><svg viewBox="0 0 24 24" width=24 height=24 class=lightToggleIcon_pyhR><path fill=currentColor d="M12,9c1.65,0,3,1.35,3,3s-1.35,3-3,3s-3-1.35-3-3S10.35,9,12,9 M12,7c-2.76,0-5,2.24-5,5s2.24,5,5,5s5-2.24,5-5 S14.76,7,12,7L12,7z M2,13l2,0c0.55,0,1-0.45,1-1s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S1.45,13,2,13z M20,13l2,0c0.55,0,1-0.45,1-1 s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S19.45,13,20,13z M11,2v2c0,0.55,0.45,1,1,1s1-0.45,1-1V2c0-0.55-0.45-1-1-1S11,1.45,11,2z M11,20v2c0,0.55,0.45,1,1,1s1-0.45,1-1v-2c0-0.55-0.45-1-1-1C11.45,19,11,19.45,11,20z M5.99,4.58c-0.39-0.39-1.03-0.39-1.41,0 c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0s0.39-1.03,0-1.41L5.99,4.58z M18.36,16.95 c-0.39-0.39-1.03-0.39-1.41,0c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0c0.39-0.39,0.39-1.03,0-1.41 L18.36,16.95z M19.42,5.99c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06c-0.39,0.39-0.39,1.03,0,1.41 s1.03,0.39,1.41,0L19.42,5.99z M7.05,18.36c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06 c-0.39,0.39-0.39,1.03,0,1.41s1.03,0.39,1.41,0L7.05,18.36z"/></svg><svg viewBox="0 0 24 24" width=24 height=24 class=darkToggleIcon_wfgR><path fill=currentColor d="M9.37,5.51C9.19,6.15,9.1,6.82,9.1,7.5c0,4.08,3.32,7.4,7.4,7.4c0.68,0,1.35-0.09,1.99-0.27C17.45,17.19,14.93,19,12,19 c-3.86,0-7-3.14-7-7C5,9.07,6.81,6.55,9.37,5.51z M12,3c-4.97,0-9,4.03-9,9s4.03,9,9,9s9-4.03,9-9c0-0.46-0.04-0.92-0.1-1.36 c-0.98,1.37-2.58,2.26-4.4,2.26c-2.98,0-5.4-2.42-5.4-5.4c0-1.81,0.89-3.42,2.26-4.4C12.92,3.04,12.46,3,12,3L12,3z"/></svg></button></div><div class=navbarSearchContainer_Bca1><div class="navbar__search searchBarContainer_NW3z" dir=ltr><input placeholder=Search aria-label=Search class=navbar__search-input value=""><div class="loadingRing_RJI3 searchBarLoadingRing_YnHq"><div></div><div></div><div></div><div></div></div></div></div></div></div><div role=presentation class=navbar-sidebar__backdrop></div></nav><div id=__docusaurus_skipToContent_fallback class="main-wrapper mainWrapper_z2l0"><div class=docsWrapper_hBAB><button aria-label="Scroll back to top" class="clean-btn theme-back-to-top-button backToTopButton_sjWU" type=button></button><div class=docRoot_UBD9><aside class="theme-doc-sidebar-container docSidebarContainer_YfHR"><div class=sidebarViewport_aRkj><div class="sidebar_njMd sidebarWithHideableNavbar_wUlq"><a tabindex=-1 class=sidebarLogo_isFc href=/fortran/><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--light_NVdE"><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--dark_xIcU"><b>Fortran</b></a><nav aria-label="Docs sidebar" class="menu thin-scrollbar menu_SIkG"><ul class="theme-doc-sidebar-menu menu__list"><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/>Setup</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/basics>Basics</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/array>Array and Matrix</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/control>Logical control</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/loop>Loop</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/modules>Modules</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/procedures>Procedures</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/complex>Complex number</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/recursion>Recursion</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/types>Custom types</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/pointer>Pointer</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class="menu__link menu__link--active" aria-current=page href=/fortran/file>File I/O</a><li class="theme-doc-sidebar-item-category theme-doc-sidebar-item-category-level-1 menu__list-item menu__list-item--collapsed"><div class=menu__list-item-collapsible><a class="menu__link menu__link--sublist" href=/fortran/category/coding-practice>Coding practice</a><button aria-label="Expand sidebar category 'Coding practice'" aria-expanded=false type=button class="clean-btn menu__caret"></button></div><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/resources>Resources</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/license>License</a></ul></nav><button type=button title="Collapse sidebar" aria-label="Collapse sidebar" class="button button--secondary button--outline collapseSidebarButton_PEFL"><svg width=20 height=20 aria-hidden=true class=collapseSidebarButtonIcon_kv0_><g fill=#7a7a7a><path d="M9.992 10.023c0 .2-.062.399-.172.547l-4.996 7.492a.982.982 0 01-.828.454H1c-.55 0-1-.453-1-1 0-.2.059-.403.168-.551l4.629-6.942L.168 3.078A.939.939 0 010 2.528c0-.548.45-.997 1-.997h2.996c.352 0 .649.18.828.45L9.82 9.472c.11.148.172.347.172.55zm0 0"/><path d="M19.98 10.023c0 .2-.058.399-.168.547l-4.996 7.492a.987.987 0 01-.828.454h-3c-.547 0-.996-.453-.996-1 0-.2.059-.403.168-.551l4.625-6.942-4.625-6.945a.939.939 0 01-.168-.55 1 1 0 01.996-.997h3c.348 0 .649.18.828.45l4.996 7.492c.11.148.168.347.168.55zm0 0"/></g></svg></button></div></div></aside><main class=docMainContainer_TBSr><div class="container padding-top--md padding-bottom--lg"><div class=row><div class="col docItemCol_VOVn"><div class=docItemContainer_Djhp><article><nav class="theme-doc-breadcrumbs breadcrumbsContainer_Z_bl" aria-label=Breadcrumbs><ul class=breadcrumbs itemscope itemtype=https://schema.org/BreadcrumbList><li class=breadcrumbs__item><a aria-label="Home page" class=breadcrumbs__link href=/fortran/><svg viewBox="0 0 24 24" class=breadcrumbHomeIcon_YNFT><path d="M10 19v-5h4v5c0 .55.45 1 1 1h3c.55 0 1-.45 1-1v-7h1.7c.46 0 .68-.57.33-.87L12.67 3.6c-.38-.34-.96-.34-1.34 0l-8.36 7.53c-.34.3-.13.87.33.87H5v7c0 .55.45 1 1 1h3c.55 0 1-.45 1-1z" fill=currentColor /></svg></a><li itemscope itemprop=itemListElement itemtype=https://schema.org/ListItem class="breadcrumbs__item breadcrumbs__item--active"><span class=breadcrumbs__link itemprop=name>File I/O</span><meta itemprop=position content=1></ul></nav><div class="theme-doc-markdown markdown"><header><h1>File Input / Output</h1></header><p>Here we will generate some data and write it to a file:</p>
 <!-- -->
 <div class="language-fortran codeBlockContainer_Ckt0 theme-code-block" style=--prism-color:#393A34;--prism-background-color:#f6f8fa><div class=codeBlockTitle_Ktv7>src/08_file_write.f90</div><div class=codeBlockContent_biex><pre tabindex=0 class="prism-code language-fortran codeBlock_bY9V thin-scrollbar" style=color:#393A34;background-color:#f6f8fa><code class="codeBlockLines_e6Vv codeBlockLinesWithNumbering_o6Pm"><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token comment" style=color:#999988;font-style:italic>! Program : Write output to a file</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain"></span><span class="token keyword" style=color:#00009f>PROGRAM</span><span class="token plain"> file_write</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">  </span><span class="token keyword" style=color:#00009f>IMPLICIT NONE</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">  </span><span class="token keyword" style=color:#00009f>INTEGER</span><span class="token plain"> </span><span class="token operator" style=color:#393A34>::</span><span class="token plain"> ii</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">  </span><span class="token keyword" style=color:#00009f>OPEN</span><span class="token punctuation" style=color:#393A34>(</span><span class="token plain">unit</span><span class="token operator" style=color:#393A34>=</span><span class="token number" style=color:#36acaa>1</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> </span><span class="token keyword" style=color:#00009f>file</span><span class="token operator" style=color:#393A34>=</span><span class="token string" style=color:#e3116c>'output.dat'</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> status</span><span class="token operator" style=color:#393A34>=</span><span class="token string" style=color:#e3116c>'new'</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>DO</span><span class="token plain"> ii </span><span class="token operator" style=color:#393A34>=</span><span class="token plain"> </span><span class="token number" style=color:#36acaa>1</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> </span><span class="token number" style=color:#36acaa>10</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">      </span><span class="token keyword" style=color:#00009f>WRITE</span><span class="token punctuation" style=color:#393A34>(</span><span class="token number" style=color:#36acaa>1</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> </span><span class="token string" style=color:#e3116c>'(i4)'</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"> ii</span><span class="token operator" style=color:#393A34>*</span><span class="token plain">ii</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>ENDDO</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">  </span><span class="token keyword" style=color:#00009f>CLOSE</span><span class="token punctuation" style=color:#393A34>(</span><span class="token plain">unit</span><span class="token operator" style=color:#393A34>=</span><span class="token number" style=color:#36acaa>1</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain"></span><span class="token keyword" style=color:#00009f>END PROGRAM</span><span class="token plain"> file_write</span></span><br></span></code></pre><div class=buttonGroup__atx><button type=button aria-label="Copy code to clipboard" title=Copy class=clean-btn><span class=copyButtonIcons_eSgA aria-hidden=true><svg viewBox="0 0 24 24" class=copyButtonIcon_y97N><path fill=currentColor d="M19,21H8V7H19M19,5H8A2,2 0 0,0 6,7V21A2,2 0 0,0 8,23H19A2,2 0 0,0 21,21V7A2,2 0 0,0 19,5M16,1H4A2,2 0 0,0 2,3V17H4V3H16V1Z"/></svg><svg viewBox="0 0 24 24" class=copyButtonSuccessIcon_LjdS><path fill=currentColor d=M21,7L9,19L3.5,13.5L4.91,12.09L9,16.17L19.59,5.59L21,7Z /></svg></span></button></div></div></div>
 <div class="theme-admonition theme-admonition-info admonition_xJq3 alert alert--info"><div class=admonitionHeading_Gvgb><span class=admonitionIcon_Rf37><svg viewBox="0 0 14 16"><path fill-rule=evenodd d="M7 2.3c3.14 0 5.7 2.56 5.7 5.7s-2.56 5.7-5.7 5.7A5.71 5.71 0 0 1 1.3 8c0-3.14 2.56-5.7 5.7-5.7zM7 1C3.14 1 0 4.14 0 8s3.14 7 7 7 7-3.14 7-7-3.14-7-7-7zm1 3H6v5h2V4zm0 6H6v2h2v-2z"/></svg></span>info</div><div class=admonitionContent_BuS1><p>Note that <code>unit=0, 5, and 6</code> are reserved. Do not use them to identify files in
diff --git a/haversine/index.html b/haversine/index.html
index 6248165..cc5fabf 100644
--- a/haversine/index.html
+++ b/haversine/index.html
@@ -1,4 +1,4 @@
-<!doctype html><html lang=en dir=ltr class="docs-wrapper plugin-docs plugin-id-default docs-version-current docs-doc-page docs-doc-id-haversine" data-has-hydrated=false><meta charset=UTF-8><meta name=generator content="Docusaurus v3.6.1"><title data-rh=true>Haversine formula • Fortran Tutorial</title><meta data-rh=true name=viewport content="width=device-width,initial-scale=1.0"><meta data-rh=true name=twitter:card content=summary_large_image><meta data-rh=true property=og:url content=https://pranabdas.github.io/fortran/haversine><meta data-rh=true property=og:locale content=en><meta data-rh=true name=docusaurus_locale content=en><meta data-rh=true name=docsearch:language content=en><meta data-rh=true name=theme-color content=#06445c><meta data-rh=true name=docusaurus_version content=current><meta data-rh=true name=docusaurus_tag content=docs-default-current><meta data-rh=true name=docsearch:version content=current><meta data-rh=true name=docsearch:docusaurus_tag content=docs-default-current><meta data-rh=true property=og:title content="Haversine formula • Fortran Tutorial"><meta data-rh=true name=description content="Determine the distance between two places on earth given latitude and longitude."><meta data-rh=true property=og:description content="Determine the distance between two places on earth given latitude and longitude."><link data-rh=true rel=icon href=/fortran/img/favicon.png><link data-rh=true rel=canonical href=https://pranabdas.github.io/fortran/haversine><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/haversine hreflang=en><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/haversine hreflang=x-default><link rel=stylesheet href=https://pranabdas.github.io/drive/webfonts/katex/katex.min.css><link rel=stylesheet href=/fortran/assets/css/styles.4de1c8a8.css><script src=/fortran/assets/js/runtime~main.866c090c.js defer></script><script src=/fortran/assets/js/main.ec888ba8.js defer></script><body class=navigation-with-keyboard><script>!function(){var t,e=function(){try{return new URLSearchParams(window.location.search).get("docusaurus-theme")}catch(t){}}()||function(){try{return window.localStorage.getItem("theme")}catch(t){}}();t=null!==e?e:window.matchMedia("(prefers-color-scheme: dark)").matches?"dark":(window.matchMedia("(prefers-color-scheme: light)").matches,"light"),document.documentElement.setAttribute("data-theme",t)}(),function(){try{for(var[t,e]of new URLSearchParams(window.location.search).entries())if(t.startsWith("docusaurus-data-")){var a=t.replace("docusaurus-data-","data-");document.documentElement.setAttribute(a,e)}}catch(t){}}()</script><div id=__docusaurus><div role=region aria-label="Skip to main content"><a class=skipToContent_fXgn href=#__docusaurus_skipToContent_fallback>Skip to main content</a></div><nav aria-label=Main class="navbar navbar--fixed-top navbarHideable_m1mJ"><div class=navbar__inner><div class=navbar__items><button aria-label="Toggle navigation bar" aria-expanded=false class="navbar__toggle clean-btn" type=button><svg width=30 height=30 viewBox="0 0 30 30" aria-hidden=true><path stroke=currentColor stroke-linecap=round stroke-miterlimit=10 stroke-width=2 d="M4 7h22M4 15h22M4 23h22"/></svg></button><a class=navbar__brand href=/fortran/><div class=navbar__logo><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--light_NVdE"><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--dark_xIcU"></div><b class="navbar__title text--truncate">Fortran</b></a><div class="navbar__item dropdown dropdown--hoverable"><a aria-current=page class="navbar__link active" aria-haspopup=true aria-expanded=false role=button href=/fortran/>Docs</a><ul class=dropdown__menu><li><a aria-current=page class="dropdown__link dropdown__link--active" href=/fortran/>Fortran Programming</a><li><a href=https://pranabdas.github.io/docs/ rel="noopener noreferrer" class=dropdown__link>~ ~ ~ Other Docs ~ ~ ~</a><li><a href=https://pranabdas.github.io/arpespythontools/ rel="noopener noreferrer" class=dropdown__link>ARPES Python Tools</a><li><a href=https://pranabdas.github.io/c-cpp/ rel="noopener noreferrer" class=dropdown__link>C and C++ Programming</a><li><a href=https://pranabdas.github.io/condmat-notes/ rel="noopener noreferrer" class=dropdown__link>Condensed Matter Notes</a><li><a href=https://pranabdas.github.io/javascript/ rel="noopener noreferrer" class=dropdown__link>Javascript Tutorial</a><li><a href=https://pranabdas.github.io/linux/ rel="noopener noreferrer" class=dropdown__link>Linux Tutorial</a><li><a href=https://pranabdas.github.io/machine-learning/ rel="noopener noreferrer" class=dropdown__link>Machine Learning Notes</a><li><a href=https://pranabdas.github.io/openmx/ rel="noopener noreferrer" class=dropdown__link>OpenMX tutorial</a><li><a href=https://pranabdas.github.io/python-tutorial/ rel="noopener noreferrer" class=dropdown__link>Python Tutorial</a><li><a href=https://pranabdas.github.io/espresso/ rel="noopener noreferrer" class=dropdown__link>Quantum Espresso Tutorial</a><li><a href=https://pranabdas.github.io/rust/ rel="noopener noreferrer" class=dropdown__link>Rust Programming</a><li><a href=https://pranabdas.github.io/arpes-manual/ rel="noopener noreferrer" class=dropdown__link>SUV ARPES Manual</a><li><a href=https://pranabdas.github.io/suvtools/ rel="noopener noreferrer" class=dropdown__link>SUV Python Tools</a></ul></div></div><div class="navbar__items navbar__items--right"><a href=https://github.com/pranabdas/fortran rel="noopener noreferrer" class="navbar__item navbar__link header-github-link" aria-label="GitHub repository" title="Visit project repository in GitHub"></a><a href=https://pranabdas.github.io rel="noopener noreferrer" class="navbar__item navbar__link header-homepage-link" aria-label="About me" title="Go to Pranab's Homepage"></a><div class="toggle_vylO colorModeToggle_DEke"><button class="clean-btn toggleButton_gllP toggleButtonDisabled_aARS" type=button disabled title="Switch between dark and light mode (currently light mode)" aria-label="Switch between dark and light mode (currently light mode)" aria-live=polite aria-pressed=false><svg viewBox="0 0 24 24" width=24 height=24 class=lightToggleIcon_pyhR><path fill=currentColor d="M12,9c1.65,0,3,1.35,3,3s-1.35,3-3,3s-3-1.35-3-3S10.35,9,12,9 M12,7c-2.76,0-5,2.24-5,5s2.24,5,5,5s5-2.24,5-5 S14.76,7,12,7L12,7z M2,13l2,0c0.55,0,1-0.45,1-1s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S1.45,13,2,13z M20,13l2,0c0.55,0,1-0.45,1-1 s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S19.45,13,20,13z M11,2v2c0,0.55,0.45,1,1,1s1-0.45,1-1V2c0-0.55-0.45-1-1-1S11,1.45,11,2z M11,20v2c0,0.55,0.45,1,1,1s1-0.45,1-1v-2c0-0.55-0.45-1-1-1C11.45,19,11,19.45,11,20z M5.99,4.58c-0.39-0.39-1.03-0.39-1.41,0 c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0s0.39-1.03,0-1.41L5.99,4.58z M18.36,16.95 c-0.39-0.39-1.03-0.39-1.41,0c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0c0.39-0.39,0.39-1.03,0-1.41 L18.36,16.95z M19.42,5.99c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06c-0.39,0.39-0.39,1.03,0,1.41 s1.03,0.39,1.41,0L19.42,5.99z M7.05,18.36c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06 c-0.39,0.39-0.39,1.03,0,1.41s1.03,0.39,1.41,0L7.05,18.36z"/></svg><svg viewBox="0 0 24 24" width=24 height=24 class=darkToggleIcon_wfgR><path fill=currentColor d="M9.37,5.51C9.19,6.15,9.1,6.82,9.1,7.5c0,4.08,3.32,7.4,7.4,7.4c0.68,0,1.35-0.09,1.99-0.27C17.45,17.19,14.93,19,12,19 c-3.86,0-7-3.14-7-7C5,9.07,6.81,6.55,9.37,5.51z M12,3c-4.97,0-9,4.03-9,9s4.03,9,9,9s9-4.03,9-9c0-0.46-0.04-0.92-0.1-1.36 c-0.98,1.37-2.58,2.26-4.4,2.26c-2.98,0-5.4-2.42-5.4-5.4c0-1.81,0.89-3.42,2.26-4.4C12.92,3.04,12.46,3,12,3L12,3z"/></svg></button></div><div class=navbarSearchContainer_Bca1><div class="navbar__search searchBarContainer_NW3z" dir=ltr><input placeholder=Search aria-label=Search class=navbar__search-input value=""><div class="loadingRing_RJI3 searchBarLoadingRing_YnHq"><div></div><div></div><div></div><div></div></div></div></div></div></div><div role=presentation class=navbar-sidebar__backdrop></div></nav><div id=__docusaurus_skipToContent_fallback class="main-wrapper mainWrapper_z2l0"><div class=docsWrapper_hBAB><button aria-label="Scroll back to top" class="clean-btn theme-back-to-top-button backToTopButton_sjWU" type=button></button><div class=docRoot_UBD9><aside class="theme-doc-sidebar-container docSidebarContainer_YfHR"><div class=sidebarViewport_aRkj><div class="sidebar_njMd sidebarWithHideableNavbar_wUlq"><a tabindex=-1 class=sidebarLogo_isFc href=/fortran/><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--light_NVdE"><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--dark_xIcU"><b>Fortran</b></a><nav aria-label="Docs sidebar" class="menu thin-scrollbar menu_SIkG"><ul class="theme-doc-sidebar-menu menu__list"><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/>Setup</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/basics>Basics</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/array>Array and Matrix</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/control>Logical control</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/loop>Loop</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/modules>Modules</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/procedures>Procedures</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/complex>Complex number</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/recursion>Recursion</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/types>Custom types</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/pointer>Pointer</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/file>File I/O</a><li class="theme-doc-sidebar-item-category theme-doc-sidebar-item-category-level-1 menu__list-item"><div class=menu__list-item-collapsible><a class="menu__link menu__link--sublist menu__link--active" href=/fortran/category/coding-practice>Coding practice</a><button aria-label="Collapse sidebar category 'Coding practice'" aria-expanded=true type=button class="clean-btn menu__caret"></button></div><ul style=display:block;overflow:visible;height:auto class=menu__list><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/swap>Swap two numbers</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/abs-path>Absolute path</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/hypotenuse>Calculate hypotenuse</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/integration>Numerical integration</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class="menu__link menu__link--active" aria-current=page tabindex=0 href=/fortran/haversine>Haversine formula</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/inner-product>Inner product</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/monte-carlo-pi>Monte Carlo method</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/monte-carlo-integration>Monte Carlo integration</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/time>Time</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/arg-parsing>Argument parsing</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/exec-command>External command</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/blas>BLAS</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/mpi>MPI Basics</a></ul><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/resources>Resources</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/license>License</a></ul></nav><button type=button title="Collapse sidebar" aria-label="Collapse sidebar" class="button button--secondary button--outline collapseSidebarButton_PEFL"><svg width=20 height=20 aria-hidden=true class=collapseSidebarButtonIcon_kv0_><g fill=#7a7a7a><path d="M9.992 10.023c0 .2-.062.399-.172.547l-4.996 7.492a.982.982 0 01-.828.454H1c-.55 0-1-.453-1-1 0-.2.059-.403.168-.551l4.629-6.942L.168 3.078A.939.939 0 010 2.528c0-.548.45-.997 1-.997h2.996c.352 0 .649.18.828.45L9.82 9.472c.11.148.172.347.172.55zm0 0"/><path d="M19.98 10.023c0 .2-.058.399-.168.547l-4.996 7.492a.987.987 0 01-.828.454h-3c-.547 0-.996-.453-.996-1 0-.2.059-.403.168-.551l4.625-6.942-4.625-6.945a.939.939 0 01-.168-.55 1 1 0 01.996-.997h3c.348 0 .649.18.828.45l4.996 7.492c.11.148.168.347.168.55zm0 0"/></g></svg></button></div></div></aside><main class=docMainContainer_TBSr><div class="container padding-top--md padding-bottom--lg"><div class=row><div class="col docItemCol_VOVn"><div class=docItemContainer_Djhp><article><nav class="theme-doc-breadcrumbs breadcrumbsContainer_Z_bl" aria-label=Breadcrumbs><ul class=breadcrumbs itemscope itemtype=https://schema.org/BreadcrumbList><li class=breadcrumbs__item><a aria-label="Home page" class=breadcrumbs__link href=/fortran/><svg viewBox="0 0 24 24" class=breadcrumbHomeIcon_YNFT><path d="M10 19v-5h4v5c0 .55.45 1 1 1h3c.55 0 1-.45 1-1v-7h1.7c.46 0 .68-.57.33-.87L12.67 3.6c-.38-.34-.96-.34-1.34 0l-8.36 7.53c-.34.3-.13.87.33.87H5v7c0 .55.45 1 1 1h3c.55 0 1-.45 1-1z" fill=currentColor /></svg></a><li itemscope itemprop=itemListElement itemtype=https://schema.org/ListItem class=breadcrumbs__item><a class=breadcrumbs__link itemprop=item href=/fortran/category/coding-practice><span itemprop=name>Coding practice</span></a><meta itemprop=position content=1><li itemscope itemprop=itemListElement itemtype=https://schema.org/ListItem class="breadcrumbs__item breadcrumbs__item--active"><span class=breadcrumbs__link itemprop=name>Haversine formula</span><meta itemprop=position content=2></ul></nav><div class="theme-doc-markdown markdown"><header><h1>Haversine formula</h1></header><p>Determine the distance between two places on earth given latitude and longitude.
+<!doctype html><html lang=en dir=ltr class="docs-wrapper plugin-docs plugin-id-default docs-version-current docs-doc-page docs-doc-id-haversine" data-has-hydrated=false><meta charset=UTF-8><meta name=generator content="Docusaurus v3.6.1"><title data-rh=true>Haversine formula • Fortran Tutorial</title><meta data-rh=true name=viewport content="width=device-width,initial-scale=1.0"><meta data-rh=true name=twitter:card content=summary_large_image><meta data-rh=true property=og:url content=https://pranabdas.github.io/fortran/haversine><meta data-rh=true property=og:locale content=en><meta data-rh=true name=docusaurus_locale content=en><meta data-rh=true name=docsearch:language content=en><meta data-rh=true name=theme-color content=#06445c><meta data-rh=true name=docusaurus_version content=current><meta data-rh=true name=docusaurus_tag content=docs-default-current><meta data-rh=true name=docsearch:version content=current><meta data-rh=true name=docsearch:docusaurus_tag content=docs-default-current><meta data-rh=true property=og:title content="Haversine formula • Fortran Tutorial"><meta data-rh=true name=description content="Determine the distance between two places on earth given latitude and longitude."><meta data-rh=true property=og:description content="Determine the distance between two places on earth given latitude and longitude."><link data-rh=true rel=icon href=/fortran/img/favicon.png><link data-rh=true rel=canonical href=https://pranabdas.github.io/fortran/haversine><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/haversine hreflang=en><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/haversine hreflang=x-default><link rel=stylesheet href=https://pranab.pages.dev/assets/fonts/katex/katex.min.css><link rel=stylesheet href=/fortran/assets/css/styles.4de1c8a8.css><script src=/fortran/assets/js/runtime~main.667e3c0f.js defer></script><script src=/fortran/assets/js/main.10795e8f.js defer></script><body class=navigation-with-keyboard><script>!function(){var t,e=function(){try{return new URLSearchParams(window.location.search).get("docusaurus-theme")}catch(t){}}()||function(){try{return window.localStorage.getItem("theme")}catch(t){}}();t=null!==e?e:window.matchMedia("(prefers-color-scheme: dark)").matches?"dark":(window.matchMedia("(prefers-color-scheme: light)").matches,"light"),document.documentElement.setAttribute("data-theme",t)}(),function(){try{for(var[t,e]of new URLSearchParams(window.location.search).entries())if(t.startsWith("docusaurus-data-")){var a=t.replace("docusaurus-data-","data-");document.documentElement.setAttribute(a,e)}}catch(t){}}()</script><div id=__docusaurus><div role=region aria-label="Skip to main content"><a class=skipToContent_fXgn href=#__docusaurus_skipToContent_fallback>Skip to main content</a></div><nav aria-label=Main class="navbar navbar--fixed-top navbarHideable_m1mJ"><div class=navbar__inner><div class=navbar__items><button aria-label="Toggle navigation bar" aria-expanded=false class="navbar__toggle clean-btn" type=button><svg width=30 height=30 viewBox="0 0 30 30" aria-hidden=true><path stroke=currentColor stroke-linecap=round stroke-miterlimit=10 stroke-width=2 d="M4 7h22M4 15h22M4 23h22"/></svg></button><a class=navbar__brand href=/fortran/><div class=navbar__logo><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--light_NVdE"><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--dark_xIcU"></div><b class="navbar__title text--truncate">Fortran</b></a><div class="navbar__item dropdown dropdown--hoverable"><a aria-current=page class="navbar__link active" aria-haspopup=true aria-expanded=false role=button href=/fortran/>Docs</a><ul class=dropdown__menu><li><a aria-current=page class="dropdown__link dropdown__link--active" href=/fortran/>Fortran Programming</a><li><a href=https://pranabdas.github.io/docs/ rel="noopener noreferrer" class=dropdown__link>~ ~ ~ Other Docs ~ ~ ~</a><li><a href=https://pranabdas.github.io/arpespythontools/ rel="noopener noreferrer" class=dropdown__link>ARPES Python Tools</a><li><a href=https://pranabdas.github.io/c-cpp/ rel="noopener noreferrer" class=dropdown__link>C and C++ Programming</a><li><a href=https://pranabdas.github.io/condmat-notes/ rel="noopener noreferrer" class=dropdown__link>Condensed Matter Notes</a><li><a href=https://pranabdas.github.io/javascript/ rel="noopener noreferrer" class=dropdown__link>Javascript Tutorial</a><li><a href=https://pranabdas.github.io/linux/ rel="noopener noreferrer" class=dropdown__link>Linux Tutorial</a><li><a href=https://pranabdas.github.io/machine-learning/ rel="noopener noreferrer" class=dropdown__link>Machine Learning Notes</a><li><a href=https://pranabdas.github.io/openmx/ rel="noopener noreferrer" class=dropdown__link>OpenMX tutorial</a><li><a href=https://pranabdas.github.io/python-tutorial/ rel="noopener noreferrer" class=dropdown__link>Python Tutorial</a><li><a href=https://pranabdas.github.io/espresso/ rel="noopener noreferrer" class=dropdown__link>Quantum Espresso Tutorial</a><li><a href=https://pranabdas.github.io/rust/ rel="noopener noreferrer" class=dropdown__link>Rust Programming</a><li><a href=https://pranabdas.github.io/arpes-manual/ rel="noopener noreferrer" class=dropdown__link>SUV ARPES Manual</a><li><a href=https://pranabdas.github.io/suvtools/ rel="noopener noreferrer" class=dropdown__link>SUV Python Tools</a></ul></div></div><div class="navbar__items navbar__items--right"><a href=https://github.com/pranabdas/fortran rel="noopener noreferrer" class="navbar__item navbar__link header-github-link" aria-label="GitHub repository" title="Visit project repository in GitHub"></a><a href=https://pranabdas.github.io rel="noopener noreferrer" class="navbar__item navbar__link header-homepage-link" aria-label="About me" title="Go to Pranab's Homepage"></a><div class="toggle_vylO colorModeToggle_DEke"><button class="clean-btn toggleButton_gllP toggleButtonDisabled_aARS" type=button disabled title="Switch between dark and light mode (currently light mode)" aria-label="Switch between dark and light mode (currently light mode)" aria-live=polite aria-pressed=false><svg viewBox="0 0 24 24" width=24 height=24 class=lightToggleIcon_pyhR><path fill=currentColor d="M12,9c1.65,0,3,1.35,3,3s-1.35,3-3,3s-3-1.35-3-3S10.35,9,12,9 M12,7c-2.76,0-5,2.24-5,5s2.24,5,5,5s5-2.24,5-5 S14.76,7,12,7L12,7z M2,13l2,0c0.55,0,1-0.45,1-1s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S1.45,13,2,13z M20,13l2,0c0.55,0,1-0.45,1-1 s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S19.45,13,20,13z M11,2v2c0,0.55,0.45,1,1,1s1-0.45,1-1V2c0-0.55-0.45-1-1-1S11,1.45,11,2z M11,20v2c0,0.55,0.45,1,1,1s1-0.45,1-1v-2c0-0.55-0.45-1-1-1C11.45,19,11,19.45,11,20z M5.99,4.58c-0.39-0.39-1.03-0.39-1.41,0 c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0s0.39-1.03,0-1.41L5.99,4.58z M18.36,16.95 c-0.39-0.39-1.03-0.39-1.41,0c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0c0.39-0.39,0.39-1.03,0-1.41 L18.36,16.95z M19.42,5.99c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06c-0.39,0.39-0.39,1.03,0,1.41 s1.03,0.39,1.41,0L19.42,5.99z M7.05,18.36c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06 c-0.39,0.39-0.39,1.03,0,1.41s1.03,0.39,1.41,0L7.05,18.36z"/></svg><svg viewBox="0 0 24 24" width=24 height=24 class=darkToggleIcon_wfgR><path fill=currentColor d="M9.37,5.51C9.19,6.15,9.1,6.82,9.1,7.5c0,4.08,3.32,7.4,7.4,7.4c0.68,0,1.35-0.09,1.99-0.27C17.45,17.19,14.93,19,12,19 c-3.86,0-7-3.14-7-7C5,9.07,6.81,6.55,9.37,5.51z M12,3c-4.97,0-9,4.03-9,9s4.03,9,9,9s9-4.03,9-9c0-0.46-0.04-0.92-0.1-1.36 c-0.98,1.37-2.58,2.26-4.4,2.26c-2.98,0-5.4-2.42-5.4-5.4c0-1.81,0.89-3.42,2.26-4.4C12.92,3.04,12.46,3,12,3L12,3z"/></svg></button></div><div class=navbarSearchContainer_Bca1><div class="navbar__search searchBarContainer_NW3z" dir=ltr><input placeholder=Search aria-label=Search class=navbar__search-input value=""><div class="loadingRing_RJI3 searchBarLoadingRing_YnHq"><div></div><div></div><div></div><div></div></div></div></div></div></div><div role=presentation class=navbar-sidebar__backdrop></div></nav><div id=__docusaurus_skipToContent_fallback class="main-wrapper mainWrapper_z2l0"><div class=docsWrapper_hBAB><button aria-label="Scroll back to top" class="clean-btn theme-back-to-top-button backToTopButton_sjWU" type=button></button><div class=docRoot_UBD9><aside class="theme-doc-sidebar-container docSidebarContainer_YfHR"><div class=sidebarViewport_aRkj><div class="sidebar_njMd sidebarWithHideableNavbar_wUlq"><a tabindex=-1 class=sidebarLogo_isFc href=/fortran/><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--light_NVdE"><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--dark_xIcU"><b>Fortran</b></a><nav aria-label="Docs sidebar" class="menu thin-scrollbar menu_SIkG"><ul class="theme-doc-sidebar-menu menu__list"><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/>Setup</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/basics>Basics</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/array>Array and Matrix</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/control>Logical control</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/loop>Loop</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/modules>Modules</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/procedures>Procedures</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/complex>Complex number</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/recursion>Recursion</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/types>Custom types</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/pointer>Pointer</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/file>File I/O</a><li class="theme-doc-sidebar-item-category theme-doc-sidebar-item-category-level-1 menu__list-item"><div class=menu__list-item-collapsible><a class="menu__link menu__link--sublist menu__link--active" href=/fortran/category/coding-practice>Coding practice</a><button aria-label="Collapse sidebar category 'Coding practice'" aria-expanded=true type=button class="clean-btn menu__caret"></button></div><ul style=display:block;overflow:visible;height:auto class=menu__list><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/swap>Swap two numbers</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/abs-path>Absolute path</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/hypotenuse>Calculate hypotenuse</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/integration>Numerical integration</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class="menu__link menu__link--active" aria-current=page tabindex=0 href=/fortran/haversine>Haversine formula</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/inner-product>Inner product</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/monte-carlo-pi>Monte Carlo method</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/monte-carlo-integration>Monte Carlo integration</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/time>Time</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/arg-parsing>Argument parsing</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/exec-command>External command</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/blas>BLAS</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/mpi>MPI Basics</a></ul><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/resources>Resources</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/license>License</a></ul></nav><button type=button title="Collapse sidebar" aria-label="Collapse sidebar" class="button button--secondary button--outline collapseSidebarButton_PEFL"><svg width=20 height=20 aria-hidden=true class=collapseSidebarButtonIcon_kv0_><g fill=#7a7a7a><path d="M9.992 10.023c0 .2-.062.399-.172.547l-4.996 7.492a.982.982 0 01-.828.454H1c-.55 0-1-.453-1-1 0-.2.059-.403.168-.551l4.629-6.942L.168 3.078A.939.939 0 010 2.528c0-.548.45-.997 1-.997h2.996c.352 0 .649.18.828.45L9.82 9.472c.11.148.172.347.172.55zm0 0"/><path d="M19.98 10.023c0 .2-.058.399-.168.547l-4.996 7.492a.987.987 0 01-.828.454h-3c-.547 0-.996-.453-.996-1 0-.2.059-.403.168-.551l4.625-6.942-4.625-6.945a.939.939 0 01-.168-.55 1 1 0 01.996-.997h3c.348 0 .649.18.828.45l4.996 7.492c.11.148.168.347.168.55zm0 0"/></g></svg></button></div></div></aside><main class=docMainContainer_TBSr><div class="container padding-top--md padding-bottom--lg"><div class=row><div class="col docItemCol_VOVn"><div class=docItemContainer_Djhp><article><nav class="theme-doc-breadcrumbs breadcrumbsContainer_Z_bl" aria-label=Breadcrumbs><ul class=breadcrumbs itemscope itemtype=https://schema.org/BreadcrumbList><li class=breadcrumbs__item><a aria-label="Home page" class=breadcrumbs__link href=/fortran/><svg viewBox="0 0 24 24" class=breadcrumbHomeIcon_YNFT><path d="M10 19v-5h4v5c0 .55.45 1 1 1h3c.55 0 1-.45 1-1v-7h1.7c.46 0 .68-.57.33-.87L12.67 3.6c-.38-.34-.96-.34-1.34 0l-8.36 7.53c-.34.3-.13.87.33.87H5v7c0 .55.45 1 1 1h3c.55 0 1-.45 1-1z" fill=currentColor /></svg></a><li itemscope itemprop=itemListElement itemtype=https://schema.org/ListItem class=breadcrumbs__item><a class=breadcrumbs__link itemprop=item href=/fortran/category/coding-practice><span itemprop=name>Coding practice</span></a><meta itemprop=position content=1><li itemscope itemprop=itemListElement itemtype=https://schema.org/ListItem class="breadcrumbs__item breadcrumbs__item--active"><span class=breadcrumbs__link itemprop=name>Haversine formula</span><meta itemprop=position content=2></ul></nav><div class="theme-doc-markdown markdown"><header><h1>Haversine formula</h1></header><p>Determine the distance between two places on earth given latitude and longitude.
 Read more about <a href=https://en.wikipedia.org/wiki/Haversine_formula target=_blank rel="noopener noreferrer">haversine formula</a> in wikipedia page.</p>
 <!-- -->
 <div class="language-fortran codeBlockContainer_Ckt0 theme-code-block" style=--prism-color:#393A34;--prism-background-color:#f6f8fa><div class=codeBlockTitle_Ktv7>src/18_haversine_formula.f90</div><div class=codeBlockContent_biex><pre tabindex=0 class="prism-code language-fortran codeBlock_bY9V thin-scrollbar" style=color:#393A34;background-color:#f6f8fa><code class="codeBlockLines_e6Vv codeBlockLinesWithNumbering_o6Pm"><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token comment" style=color:#999988;font-style:italic>! calculate the distance between two points on earch/sphere given latitude</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain"></span><span class="token comment" style=color:#999988;font-style:italic>! and longitude</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain"></span><span class="token comment" style=color:#999988;font-style:italic>! haversine is defined as: hav(theta) = sin^2(theta/2) = (1 - cos(theta))/2</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain"></span><span class="token comment" style=color:#999988;font-style:italic>! test: BNA(36.12,-86.67), LAX(33.94,-118.40), Distance 2889.6612 km</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain"></span><span class="token keyword" style=color:#00009f>PROGRAM</span><span class="token plain"> haversine_formula</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>IMPLICIT NONE</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>INTEGER</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> </span><span class="token keyword" style=color:#00009f>PARAMETER</span><span class="token plain"> </span><span class="token operator" style=color:#393A34>::</span><span class="token plain"> DP </span><span class="token operator" style=color:#393A34>=</span><span class="token plain"> </span><span class="token keyword" style=color:#00009f>KIND</span><span class="token punctuation" style=color:#393A34>(</span><span class="token number" style=color:#36acaa>1.0D0</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>REAL</span><span class="token punctuation" style=color:#393A34>(</span><span class="token plain">DP</span><span class="token punctuation" style=color:#393A34>)</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> </span><span class="token keyword" style=color:#00009f>PARAMETER</span><span class="token plain"> </span><span class="token operator" style=color:#393A34>::</span><span class="token plain"> RADIUS_OF_EARTH </span><span class="token operator" style=color:#393A34>=</span><span class="token plain"> </span><span class="token number" style=color:#36acaa>6.3781D6</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>REAL</span><span class="token punctuation" style=color:#393A34>(</span><span class="token plain">DP</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"> </span><span class="token operator" style=color:#393A34>::</span><span class="token plain"> lat1 </span><span class="token operator" style=color:#393A34>=</span><span class="token plain"> </span><span class="token number" style=color:#36acaa>0.0_DP</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>REAL</span><span class="token punctuation" style=color:#393A34>(</span><span class="token plain">DP</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"> </span><span class="token operator" style=color:#393A34>::</span><span class="token plain"> lon1 </span><span class="token operator" style=color:#393A34>=</span><span class="token plain"> </span><span class="token number" style=color:#36acaa>0.0_DP</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>REAL</span><span class="token punctuation" style=color:#393A34>(</span><span class="token plain">DP</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"> </span><span class="token operator" style=color:#393A34>::</span><span class="token plain"> lat2 </span><span class="token operator" style=color:#393A34>=</span><span class="token plain"> </span><span class="token number" style=color:#36acaa>0.0_DP</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>REAL</span><span class="token punctuation" style=color:#393A34>(</span><span class="token plain">DP</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"> </span><span class="token operator" style=color:#393A34>::</span><span class="token plain"> lon2 </span><span class="token operator" style=color:#393A34>=</span><span class="token plain"> </span><span class="token number" style=color:#36acaa>0.0_DP</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>REAL</span><span class="token punctuation" style=color:#393A34>(</span><span class="token plain">DP</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"> </span><span class="token operator" style=color:#393A34>::</span><span class="token plain"> a</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> dist</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>PRINT</span><span class="token plain"> </span><span class="token string" style=color:#e3116c>"(a,$)"</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> </span><span class="token string" style=color:#e3116c>"Latitude of point A = "</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>READ</span><span class="token plain"> </span><span class="token operator" style=color:#393A34>*</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> lat1</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>PRINT</span><span class="token plain"> </span><span class="token string" style=color:#e3116c>"(a,$)"</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> </span><span class="token string" style=color:#e3116c>"Longitude of point A = "</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>READ</span><span class="token plain"> </span><span class="token operator" style=color:#393A34>*</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> lon1</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>PRINT</span><span class="token plain"> </span><span class="token string" style=color:#e3116c>"(a,$)"</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> </span><span class="token string" style=color:#e3116c>"Latitude of point B = "</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>READ</span><span class="token plain"> </span><span class="token operator" style=color:#393A34>*</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> lat2</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>PRINT</span><span class="token plain"> </span><span class="token string" style=color:#e3116c>"(a,$)"</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> </span><span class="token string" style=color:#e3116c>"Longitude of point B = "</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>READ</span><span class="token plain"> </span><span class="token operator" style=color:#393A34>*</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> lon2</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    lat1 </span><span class="token operator" style=color:#393A34>=</span><span class="token plain"> deg2rad</span><span class="token punctuation" style=color:#393A34>(</span><span class="token plain">lat1</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    lon1 </span><span class="token operator" style=color:#393A34>=</span><span class="token plain"> deg2rad</span><span class="token punctuation" style=color:#393A34>(</span><span class="token plain">lon1</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    lat2 </span><span class="token operator" style=color:#393A34>=</span><span class="token plain"> deg2rad</span><span class="token punctuation" style=color:#393A34>(</span><span class="token plain">lat2</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    lon2 </span><span class="token operator" style=color:#393A34>=</span><span class="token plain"> deg2rad</span><span class="token punctuation" style=color:#393A34>(</span><span class="token plain">lon2</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    a </span><span class="token operator" style=color:#393A34>=</span><span class="token plain"> </span><span class="token punctuation" style=color:#393A34>(</span><span class="token plain">SIN</span><span class="token punctuation" style=color:#393A34>(</span><span class="token punctuation" style=color:#393A34>(</span><span class="token plain">lat1 </span><span class="token operator" style=color:#393A34>-</span><span class="token plain"> lat2</span><span class="token punctuation" style=color:#393A34>)</span><span class="token operator" style=color:#393A34>/</span><span class="token number" style=color:#36acaa>2</span><span class="token punctuation" style=color:#393A34>)</span><span class="token punctuation" style=color:#393A34>)</span><span class="token operator" style=color:#393A34>**</span><span class="token number" style=color:#36acaa>2</span><span class="token plain"> </span><span class="token operator" style=color:#393A34>+</span><span class="token plain"> COS</span><span class="token punctuation" style=color:#393A34>(</span><span class="token plain">lat1</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"> </span><span class="token operator" style=color:#393A34>*</span><span class="token plain"> COS</span><span class="token punctuation" style=color:#393A34>(</span><span class="token plain">lat2</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"> </span><span class="token operator" style=color:#393A34>*</span><span class="token plain"> </span><span class="token punctuation" style=color:#393A34>&</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">        </span><span class="token punctuation" style=color:#393A34>(</span><span class="token plain">SIN</span><span class="token punctuation" style=color:#393A34>(</span><span class="token punctuation" style=color:#393A34>(</span><span class="token plain">lon1 </span><span class="token operator" style=color:#393A34>-</span><span class="token plain"> lon2</span><span class="token punctuation" style=color:#393A34>)</span><span class="token operator" style=color:#393A34>/</span><span class="token number" style=color:#36acaa>2</span><span class="token punctuation" style=color:#393A34>)</span><span class="token punctuation" style=color:#393A34>)</span><span class="token operator" style=color:#393A34>**</span><span class="token number" style=color:#36acaa>2</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    dist </span><span class="token operator" style=color:#393A34>=</span><span class="token plain"> </span><span class="token number" style=color:#36acaa>2</span><span class="token plain"> </span><span class="token operator" style=color:#393A34>*</span><span class="token plain"> RADIUS_OF_EARTH </span><span class="token operator" style=color:#393A34>*</span><span class="token plain"> ASIN</span><span class="token punctuation" style=color:#393A34>(</span><span class="token plain">SQRT</span><span class="token punctuation" style=color:#393A34>(</span><span class="token plain">a</span><span class="token punctuation" style=color:#393A34>)</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>PRINT</span><span class="token plain"> </span><span class="token string" style=color:#e3116c>'(A,F12.4,A)'</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> </span><span class="token string" style=color:#e3116c>'Distance: '</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> dist </span><span class="token operator" style=color:#393A34>/</span><span class="token plain"> </span><span class="token number" style=color:#36acaa>1000</span><span class="token punctuation" style=color:#393A34>,</span><span class="token string" style=color:#e3116c>' km'</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain"></span><span class="token keyword" style=color:#00009f>CONTAINS</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>FUNCTION</span><span class="token plain"> deg2rad</span><span class="token punctuation" style=color:#393A34>(</span><span class="token plain">degree</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"> </span><span class="token keyword" style=color:#00009f>RESULT</span><span class="token punctuation" style=color:#393A34>(</span><span class="token plain">rad</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">        </span><span class="token comment" style=color:#999988;font-style:italic>! degrees to radians</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">        </span><span class="token keyword" style=color:#00009f>REAL</span><span class="token punctuation" style=color:#393A34>(</span><span class="token keyword" style=color:#00009f>KIND</span><span class="token operator" style=color:#393A34>=</span><span class="token keyword" style=color:#00009f>KIND</span><span class="token punctuation" style=color:#393A34>(</span><span class="token number" style=color:#36acaa>0.0D0</span><span class="token punctuation" style=color:#393A34>)</span><span class="token punctuation" style=color:#393A34>)</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> </span><span class="token keyword" style=color:#00009f>INTENT</span><span class="token punctuation" style=color:#393A34>(</span><span class="token keyword" style=color:#00009f>IN</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"> </span><span class="token operator" style=color:#393A34>::</span><span class="token plain"> degree</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">        </span><span class="token keyword" style=color:#00009f>REAL</span><span class="token punctuation" style=color:#393A34>(</span><span class="token keyword" style=color:#00009f>KIND</span><span class="token operator" style=color:#393A34>=</span><span class="token keyword" style=color:#00009f>KIND</span><span class="token punctuation" style=color:#393A34>(</span><span class="token number" style=color:#36acaa>0.0D0</span><span class="token punctuation" style=color:#393A34>)</span><span class="token punctuation" style=color:#393A34>)</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> </span><span class="token keyword" style=color:#00009f>PARAMETER</span><span class="token plain"> </span><span class="token operator" style=color:#393A34>::</span><span class="token plain"> deg_to_rad </span><span class="token operator" style=color:#393A34>=</span><span class="token plain"> ATAN</span><span class="token punctuation" style=color:#393A34>(</span><span class="token number" style=color:#36acaa>1.0</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"> </span><span class="token operator" style=color:#393A34>/</span><span class="token plain"> </span><span class="token number" style=color:#36acaa>45</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">        </span><span class="token keyword" style=color:#00009f>REAL</span><span class="token punctuation" style=color:#393A34>(</span><span class="token keyword" style=color:#00009f>KIND</span><span class="token operator" style=color:#393A34>=</span><span class="token keyword" style=color:#00009f>KIND</span><span class="token punctuation" style=color:#393A34>(</span><span class="token number" style=color:#36acaa>0.0D0</span><span class="token punctuation" style=color:#393A34>)</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"> </span><span class="token operator" style=color:#393A34>::</span><span class="token plain"> rad</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">        rad </span><span class="token operator" style=color:#393A34>=</span><span class="token plain"> degree </span><span class="token operator" style=color:#393A34>*</span><span class="token plain"> deg_to_rad</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>END FUNCTION</span><span class="token plain"> deg2rad</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain"></span><span class="token keyword" style=color:#00009f>END PROGRAM</span><span class="token plain"> haversine_formula</span></span><br></span></code></pre><div class=buttonGroup__atx><button type=button aria-label="Copy code to clipboard" title=Copy class=clean-btn><span class=copyButtonIcons_eSgA aria-hidden=true><svg viewBox="0 0 24 24" class=copyButtonIcon_y97N><path fill=currentColor d="M19,21H8V7H19M19,5H8A2,2 0 0,0 6,7V21A2,2 0 0,0 8,23H19A2,2 0 0,0 21,21V7A2,2 0 0,0 19,5M16,1H4A2,2 0 0,0 2,3V17H4V3H16V1Z"/></svg><svg viewBox="0 0 24 24" class=copyButtonSuccessIcon_LjdS><path fill=currentColor d=M21,7L9,19L3.5,13.5L4.91,12.09L9,16.17L19.59,5.59L21,7Z /></svg></span></button></div></div></div></div><footer class="theme-doc-footer docusaurus-mt-lg"><div class="row margin-top--sm theme-doc-footer-edit-meta-row"><div class=col><a href=https://github.com/pranabdas/fortran/blob/main/docs/haversine.mdx target=_blank rel="noopener noreferrer" class=theme-edit-this-page><svg fill=currentColor height=20 width=20 viewBox="0 0 40 40" class=iconEdit_Z9Sw aria-hidden=true><g><path d="m34.5 11.7l-3 3.1-6.3-6.3 3.1-3q0.5-0.5 1.2-0.5t1.1 0.5l3.9 3.9q0.5 0.4 0.5 1.1t-0.5 1.2z m-29.5 17.1l18.4-18.5 6.3 6.3-18.4 18.4h-6.3v-6.2z"/></g></svg>Edit this page</a></div><div class="col lastUpdated_JAkA"></div></div></footer></article><nav class="pagination-nav docusaurus-mt-lg" aria-label="Docs pages"><a class="pagination-nav__link pagination-nav__link--prev" href=/fortran/integration><div class=pagination-nav__sublabel>Previous</div><div class=pagination-nav__label>Numerical integration</div></a><a class="pagination-nav__link pagination-nav__link--next" href=/fortran/inner-product><div class=pagination-nav__sublabel>Next</div><div class=pagination-nav__label>Inner product</div></a></nav></div></div></div></div></main></div></div></div><footer class="footer footer--dark"><div class="container container-fluid"><div class="footer__bottom text--center"><div class=footer__copyright>Copyright © 2024 Pranab Das. All rights
diff --git a/hypotenuse/index.html b/hypotenuse/index.html
index e2b9efa..205a545 100644
--- a/hypotenuse/index.html
+++ b/hypotenuse/index.html
@@ -1,4 +1,4 @@
-<!doctype html><html lang=en dir=ltr class="docs-wrapper plugin-docs plugin-id-default docs-version-current docs-doc-page docs-doc-id-hypotenuse" data-has-hydrated=false><meta charset=UTF-8><meta name=generator content="Docusaurus v3.6.1"><title data-rh=true>Calculate hypotenuse: example of subroutine • Fortran Tutorial</title><meta data-rh=true name=viewport content="width=device-width,initial-scale=1.0"><meta data-rh=true name=twitter:card content=summary_large_image><meta data-rh=true property=og:url content=https://pranabdas.github.io/fortran/hypotenuse><meta data-rh=true property=og:locale content=en><meta data-rh=true name=docusaurus_locale content=en><meta data-rh=true name=docsearch:language content=en><meta data-rh=true name=theme-color content=#06445c><meta data-rh=true name=docusaurus_version content=current><meta data-rh=true name=docusaurus_tag content=docs-default-current><meta data-rh=true name=docsearch:version content=current><meta data-rh=true name=docsearch:docusaurus_tag content=docs-default-current><meta data-rh=true property=og:title content="Calculate hypotenuse: example of subroutine • Fortran Tutorial"><meta data-rh=true name=description content="Hypotenuse can be calculated using following formula:"><meta data-rh=true property=og:description content="Hypotenuse can be calculated using following formula:"><link data-rh=true rel=icon href=/fortran/img/favicon.png><link data-rh=true rel=canonical href=https://pranabdas.github.io/fortran/hypotenuse><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/hypotenuse hreflang=en><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/hypotenuse hreflang=x-default><link rel=stylesheet href=https://pranabdas.github.io/drive/webfonts/katex/katex.min.css><link rel=stylesheet href=/fortran/assets/css/styles.4de1c8a8.css><script src=/fortran/assets/js/runtime~main.866c090c.js defer></script><script src=/fortran/assets/js/main.ec888ba8.js defer></script><body class=navigation-with-keyboard><script>!function(){var t,e=function(){try{return new URLSearchParams(window.location.search).get("docusaurus-theme")}catch(t){}}()||function(){try{return window.localStorage.getItem("theme")}catch(t){}}();t=null!==e?e:window.matchMedia("(prefers-color-scheme: dark)").matches?"dark":(window.matchMedia("(prefers-color-scheme: light)").matches,"light"),document.documentElement.setAttribute("data-theme",t)}(),function(){try{for(var[t,e]of new URLSearchParams(window.location.search).entries())if(t.startsWith("docusaurus-data-")){var a=t.replace("docusaurus-data-","data-");document.documentElement.setAttribute(a,e)}}catch(t){}}()</script><div id=__docusaurus><div role=region aria-label="Skip to main content"><a class=skipToContent_fXgn href=#__docusaurus_skipToContent_fallback>Skip to main content</a></div><nav aria-label=Main class="navbar navbar--fixed-top navbarHideable_m1mJ"><div class=navbar__inner><div class=navbar__items><button aria-label="Toggle navigation bar" aria-expanded=false class="navbar__toggle clean-btn" type=button><svg width=30 height=30 viewBox="0 0 30 30" aria-hidden=true><path stroke=currentColor stroke-linecap=round stroke-miterlimit=10 stroke-width=2 d="M4 7h22M4 15h22M4 23h22"/></svg></button><a class=navbar__brand href=/fortran/><div class=navbar__logo><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--light_NVdE"><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--dark_xIcU"></div><b class="navbar__title text--truncate">Fortran</b></a><div class="navbar__item dropdown dropdown--hoverable"><a aria-current=page class="navbar__link active" aria-haspopup=true aria-expanded=false role=button href=/fortran/>Docs</a><ul class=dropdown__menu><li><a aria-current=page class="dropdown__link dropdown__link--active" href=/fortran/>Fortran Programming</a><li><a href=https://pranabdas.github.io/docs/ rel="noopener noreferrer" class=dropdown__link>~ ~ ~ Other Docs ~ ~ ~</a><li><a href=https://pranabdas.github.io/arpespythontools/ rel="noopener noreferrer" class=dropdown__link>ARPES Python Tools</a><li><a href=https://pranabdas.github.io/c-cpp/ rel="noopener noreferrer" class=dropdown__link>C and C++ Programming</a><li><a href=https://pranabdas.github.io/condmat-notes/ rel="noopener noreferrer" class=dropdown__link>Condensed Matter Notes</a><li><a href=https://pranabdas.github.io/javascript/ rel="noopener noreferrer" class=dropdown__link>Javascript Tutorial</a><li><a href=https://pranabdas.github.io/linux/ rel="noopener noreferrer" class=dropdown__link>Linux Tutorial</a><li><a href=https://pranabdas.github.io/machine-learning/ rel="noopener noreferrer" class=dropdown__link>Machine Learning Notes</a><li><a href=https://pranabdas.github.io/openmx/ rel="noopener noreferrer" class=dropdown__link>OpenMX tutorial</a><li><a href=https://pranabdas.github.io/python-tutorial/ rel="noopener noreferrer" class=dropdown__link>Python Tutorial</a><li><a href=https://pranabdas.github.io/espresso/ rel="noopener noreferrer" class=dropdown__link>Quantum Espresso Tutorial</a><li><a href=https://pranabdas.github.io/rust/ rel="noopener noreferrer" class=dropdown__link>Rust Programming</a><li><a href=https://pranabdas.github.io/arpes-manual/ rel="noopener noreferrer" class=dropdown__link>SUV ARPES Manual</a><li><a href=https://pranabdas.github.io/suvtools/ rel="noopener noreferrer" class=dropdown__link>SUV Python Tools</a></ul></div></div><div class="navbar__items navbar__items--right"><a href=https://github.com/pranabdas/fortran rel="noopener noreferrer" class="navbar__item navbar__link header-github-link" aria-label="GitHub repository" title="Visit project repository in GitHub"></a><a href=https://pranabdas.github.io rel="noopener noreferrer" class="navbar__item navbar__link header-homepage-link" aria-label="About me" title="Go to Pranab's Homepage"></a><div class="toggle_vylO colorModeToggle_DEke"><button class="clean-btn toggleButton_gllP toggleButtonDisabled_aARS" type=button disabled title="Switch between dark and light mode (currently light mode)" aria-label="Switch between dark and light mode (currently light mode)" aria-live=polite aria-pressed=false><svg viewBox="0 0 24 24" width=24 height=24 class=lightToggleIcon_pyhR><path fill=currentColor d="M12,9c1.65,0,3,1.35,3,3s-1.35,3-3,3s-3-1.35-3-3S10.35,9,12,9 M12,7c-2.76,0-5,2.24-5,5s2.24,5,5,5s5-2.24,5-5 S14.76,7,12,7L12,7z M2,13l2,0c0.55,0,1-0.45,1-1s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S1.45,13,2,13z M20,13l2,0c0.55,0,1-0.45,1-1 s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S19.45,13,20,13z M11,2v2c0,0.55,0.45,1,1,1s1-0.45,1-1V2c0-0.55-0.45-1-1-1S11,1.45,11,2z M11,20v2c0,0.55,0.45,1,1,1s1-0.45,1-1v-2c0-0.55-0.45-1-1-1C11.45,19,11,19.45,11,20z M5.99,4.58c-0.39-0.39-1.03-0.39-1.41,0 c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0s0.39-1.03,0-1.41L5.99,4.58z M18.36,16.95 c-0.39-0.39-1.03-0.39-1.41,0c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0c0.39-0.39,0.39-1.03,0-1.41 L18.36,16.95z M19.42,5.99c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06c-0.39,0.39-0.39,1.03,0,1.41 s1.03,0.39,1.41,0L19.42,5.99z M7.05,18.36c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06 c-0.39,0.39-0.39,1.03,0,1.41s1.03,0.39,1.41,0L7.05,18.36z"/></svg><svg viewBox="0 0 24 24" width=24 height=24 class=darkToggleIcon_wfgR><path fill=currentColor d="M9.37,5.51C9.19,6.15,9.1,6.82,9.1,7.5c0,4.08,3.32,7.4,7.4,7.4c0.68,0,1.35-0.09,1.99-0.27C17.45,17.19,14.93,19,12,19 c-3.86,0-7-3.14-7-7C5,9.07,6.81,6.55,9.37,5.51z M12,3c-4.97,0-9,4.03-9,9s4.03,9,9,9s9-4.03,9-9c0-0.46-0.04-0.92-0.1-1.36 c-0.98,1.37-2.58,2.26-4.4,2.26c-2.98,0-5.4-2.42-5.4-5.4c0-1.81,0.89-3.42,2.26-4.4C12.92,3.04,12.46,3,12,3L12,3z"/></svg></button></div><div class=navbarSearchContainer_Bca1><div class="navbar__search searchBarContainer_NW3z" dir=ltr><input placeholder=Search aria-label=Search class=navbar__search-input value=""><div class="loadingRing_RJI3 searchBarLoadingRing_YnHq"><div></div><div></div><div></div><div></div></div></div></div></div></div><div role=presentation class=navbar-sidebar__backdrop></div></nav><div id=__docusaurus_skipToContent_fallback class="main-wrapper mainWrapper_z2l0"><div class=docsWrapper_hBAB><button aria-label="Scroll back to top" class="clean-btn theme-back-to-top-button backToTopButton_sjWU" type=button></button><div class=docRoot_UBD9><aside class="theme-doc-sidebar-container docSidebarContainer_YfHR"><div class=sidebarViewport_aRkj><div class="sidebar_njMd sidebarWithHideableNavbar_wUlq"><a tabindex=-1 class=sidebarLogo_isFc href=/fortran/><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--light_NVdE"><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--dark_xIcU"><b>Fortran</b></a><nav aria-label="Docs sidebar" class="menu thin-scrollbar menu_SIkG"><ul class="theme-doc-sidebar-menu menu__list"><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/>Setup</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/basics>Basics</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/array>Array and Matrix</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/control>Logical control</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/loop>Loop</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/modules>Modules</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/procedures>Procedures</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/complex>Complex number</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/recursion>Recursion</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/types>Custom types</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/pointer>Pointer</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/file>File I/O</a><li class="theme-doc-sidebar-item-category theme-doc-sidebar-item-category-level-1 menu__list-item"><div class=menu__list-item-collapsible><a class="menu__link menu__link--sublist menu__link--active" href=/fortran/category/coding-practice>Coding practice</a><button aria-label="Collapse sidebar category 'Coding practice'" aria-expanded=true type=button class="clean-btn menu__caret"></button></div><ul style=display:block;overflow:visible;height:auto class=menu__list><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/swap>Swap two numbers</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/abs-path>Absolute path</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class="menu__link menu__link--active" aria-current=page tabindex=0 href=/fortran/hypotenuse>Calculate hypotenuse</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/integration>Numerical integration</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/haversine>Haversine formula</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/inner-product>Inner product</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/monte-carlo-pi>Monte Carlo method</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/monte-carlo-integration>Monte Carlo integration</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/time>Time</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/arg-parsing>Argument parsing</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/exec-command>External command</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/blas>BLAS</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/mpi>MPI Basics</a></ul><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/resources>Resources</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/license>License</a></ul></nav><button type=button title="Collapse sidebar" aria-label="Collapse sidebar" class="button button--secondary button--outline collapseSidebarButton_PEFL"><svg width=20 height=20 aria-hidden=true class=collapseSidebarButtonIcon_kv0_><g fill=#7a7a7a><path d="M9.992 10.023c0 .2-.062.399-.172.547l-4.996 7.492a.982.982 0 01-.828.454H1c-.55 0-1-.453-1-1 0-.2.059-.403.168-.551l4.629-6.942L.168 3.078A.939.939 0 010 2.528c0-.548.45-.997 1-.997h2.996c.352 0 .649.18.828.45L9.82 9.472c.11.148.172.347.172.55zm0 0"/><path d="M19.98 10.023c0 .2-.058.399-.168.547l-4.996 7.492a.987.987 0 01-.828.454h-3c-.547 0-.996-.453-.996-1 0-.2.059-.403.168-.551l4.625-6.942-4.625-6.945a.939.939 0 01-.168-.55 1 1 0 01.996-.997h3c.348 0 .649.18.828.45l4.996 7.492c.11.148.168.347.168.55zm0 0"/></g></svg></button></div></div></aside><main class=docMainContainer_TBSr><div class="container padding-top--md padding-bottom--lg"><div class=row><div class="col docItemCol_VOVn"><div class=docItemContainer_Djhp><article><nav class="theme-doc-breadcrumbs breadcrumbsContainer_Z_bl" aria-label=Breadcrumbs><ul class=breadcrumbs itemscope itemtype=https://schema.org/BreadcrumbList><li class=breadcrumbs__item><a aria-label="Home page" class=breadcrumbs__link href=/fortran/><svg viewBox="0 0 24 24" class=breadcrumbHomeIcon_YNFT><path d="M10 19v-5h4v5c0 .55.45 1 1 1h3c.55 0 1-.45 1-1v-7h1.7c.46 0 .68-.57.33-.87L12.67 3.6c-.38-.34-.96-.34-1.34 0l-8.36 7.53c-.34.3-.13.87.33.87H5v7c0 .55.45 1 1 1h3c.55 0 1-.45 1-1z" fill=currentColor /></svg></a><li itemscope itemprop=itemListElement itemtype=https://schema.org/ListItem class=breadcrumbs__item><a class=breadcrumbs__link itemprop=item href=/fortran/category/coding-practice><span itemprop=name>Coding practice</span></a><meta itemprop=position content=1><li itemscope itemprop=itemListElement itemtype=https://schema.org/ListItem class="breadcrumbs__item breadcrumbs__item--active"><span class=breadcrumbs__link itemprop=name>Calculate hypotenuse</span><meta itemprop=position content=2></ul></nav><div class="theme-doc-markdown markdown"><header><h1>Calculate hypotenuse: example of subroutine</h1></header><p>Hypotenuse can be calculated using following formula:</p>
+<!doctype html><html lang=en dir=ltr class="docs-wrapper plugin-docs plugin-id-default docs-version-current docs-doc-page docs-doc-id-hypotenuse" data-has-hydrated=false><meta charset=UTF-8><meta name=generator content="Docusaurus v3.6.1"><title data-rh=true>Calculate hypotenuse: example of subroutine • Fortran Tutorial</title><meta data-rh=true name=viewport content="width=device-width,initial-scale=1.0"><meta data-rh=true name=twitter:card content=summary_large_image><meta data-rh=true property=og:url content=https://pranabdas.github.io/fortran/hypotenuse><meta data-rh=true property=og:locale content=en><meta data-rh=true name=docusaurus_locale content=en><meta data-rh=true name=docsearch:language content=en><meta data-rh=true name=theme-color content=#06445c><meta data-rh=true name=docusaurus_version content=current><meta data-rh=true name=docusaurus_tag content=docs-default-current><meta data-rh=true name=docsearch:version content=current><meta data-rh=true name=docsearch:docusaurus_tag content=docs-default-current><meta data-rh=true property=og:title content="Calculate hypotenuse: example of subroutine • Fortran Tutorial"><meta data-rh=true name=description content="Hypotenuse can be calculated using following formula:"><meta data-rh=true property=og:description content="Hypotenuse can be calculated using following formula:"><link data-rh=true rel=icon href=/fortran/img/favicon.png><link data-rh=true rel=canonical href=https://pranabdas.github.io/fortran/hypotenuse><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/hypotenuse hreflang=en><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/hypotenuse hreflang=x-default><link rel=stylesheet href=https://pranab.pages.dev/assets/fonts/katex/katex.min.css><link rel=stylesheet href=/fortran/assets/css/styles.4de1c8a8.css><script src=/fortran/assets/js/runtime~main.667e3c0f.js defer></script><script src=/fortran/assets/js/main.10795e8f.js defer></script><body class=navigation-with-keyboard><script>!function(){var t,e=function(){try{return new URLSearchParams(window.location.search).get("docusaurus-theme")}catch(t){}}()||function(){try{return window.localStorage.getItem("theme")}catch(t){}}();t=null!==e?e:window.matchMedia("(prefers-color-scheme: dark)").matches?"dark":(window.matchMedia("(prefers-color-scheme: light)").matches,"light"),document.documentElement.setAttribute("data-theme",t)}(),function(){try{for(var[t,e]of new URLSearchParams(window.location.search).entries())if(t.startsWith("docusaurus-data-")){var a=t.replace("docusaurus-data-","data-");document.documentElement.setAttribute(a,e)}}catch(t){}}()</script><div id=__docusaurus><div role=region aria-label="Skip to main content"><a class=skipToContent_fXgn href=#__docusaurus_skipToContent_fallback>Skip to main content</a></div><nav aria-label=Main class="navbar navbar--fixed-top navbarHideable_m1mJ"><div class=navbar__inner><div class=navbar__items><button aria-label="Toggle navigation bar" aria-expanded=false class="navbar__toggle clean-btn" type=button><svg width=30 height=30 viewBox="0 0 30 30" aria-hidden=true><path stroke=currentColor stroke-linecap=round stroke-miterlimit=10 stroke-width=2 d="M4 7h22M4 15h22M4 23h22"/></svg></button><a class=navbar__brand href=/fortran/><div class=navbar__logo><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--light_NVdE"><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--dark_xIcU"></div><b class="navbar__title text--truncate">Fortran</b></a><div class="navbar__item dropdown dropdown--hoverable"><a aria-current=page class="navbar__link active" aria-haspopup=true aria-expanded=false role=button href=/fortran/>Docs</a><ul class=dropdown__menu><li><a aria-current=page class="dropdown__link dropdown__link--active" href=/fortran/>Fortran Programming</a><li><a href=https://pranabdas.github.io/docs/ rel="noopener noreferrer" class=dropdown__link>~ ~ ~ Other Docs ~ ~ ~</a><li><a href=https://pranabdas.github.io/arpespythontools/ rel="noopener noreferrer" class=dropdown__link>ARPES Python Tools</a><li><a href=https://pranabdas.github.io/c-cpp/ rel="noopener noreferrer" class=dropdown__link>C and C++ Programming</a><li><a href=https://pranabdas.github.io/condmat-notes/ rel="noopener noreferrer" class=dropdown__link>Condensed Matter Notes</a><li><a href=https://pranabdas.github.io/javascript/ rel="noopener noreferrer" class=dropdown__link>Javascript Tutorial</a><li><a href=https://pranabdas.github.io/linux/ rel="noopener noreferrer" class=dropdown__link>Linux Tutorial</a><li><a href=https://pranabdas.github.io/machine-learning/ rel="noopener noreferrer" class=dropdown__link>Machine Learning Notes</a><li><a href=https://pranabdas.github.io/openmx/ rel="noopener noreferrer" class=dropdown__link>OpenMX tutorial</a><li><a href=https://pranabdas.github.io/python-tutorial/ rel="noopener noreferrer" class=dropdown__link>Python Tutorial</a><li><a href=https://pranabdas.github.io/espresso/ rel="noopener noreferrer" class=dropdown__link>Quantum Espresso Tutorial</a><li><a href=https://pranabdas.github.io/rust/ rel="noopener noreferrer" class=dropdown__link>Rust Programming</a><li><a href=https://pranabdas.github.io/arpes-manual/ rel="noopener noreferrer" class=dropdown__link>SUV ARPES Manual</a><li><a href=https://pranabdas.github.io/suvtools/ rel="noopener noreferrer" class=dropdown__link>SUV Python Tools</a></ul></div></div><div class="navbar__items navbar__items--right"><a href=https://github.com/pranabdas/fortran rel="noopener noreferrer" class="navbar__item navbar__link header-github-link" aria-label="GitHub repository" title="Visit project repository in GitHub"></a><a href=https://pranabdas.github.io rel="noopener noreferrer" class="navbar__item navbar__link header-homepage-link" aria-label="About me" title="Go to Pranab's Homepage"></a><div class="toggle_vylO colorModeToggle_DEke"><button class="clean-btn toggleButton_gllP toggleButtonDisabled_aARS" type=button disabled title="Switch between dark and light mode (currently light mode)" aria-label="Switch between dark and light mode (currently light mode)" aria-live=polite aria-pressed=false><svg viewBox="0 0 24 24" width=24 height=24 class=lightToggleIcon_pyhR><path fill=currentColor d="M12,9c1.65,0,3,1.35,3,3s-1.35,3-3,3s-3-1.35-3-3S10.35,9,12,9 M12,7c-2.76,0-5,2.24-5,5s2.24,5,5,5s5-2.24,5-5 S14.76,7,12,7L12,7z M2,13l2,0c0.55,0,1-0.45,1-1s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S1.45,13,2,13z M20,13l2,0c0.55,0,1-0.45,1-1 s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S19.45,13,20,13z M11,2v2c0,0.55,0.45,1,1,1s1-0.45,1-1V2c0-0.55-0.45-1-1-1S11,1.45,11,2z M11,20v2c0,0.55,0.45,1,1,1s1-0.45,1-1v-2c0-0.55-0.45-1-1-1C11.45,19,11,19.45,11,20z M5.99,4.58c-0.39-0.39-1.03-0.39-1.41,0 c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0s0.39-1.03,0-1.41L5.99,4.58z M18.36,16.95 c-0.39-0.39-1.03-0.39-1.41,0c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0c0.39-0.39,0.39-1.03,0-1.41 L18.36,16.95z M19.42,5.99c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06c-0.39,0.39-0.39,1.03,0,1.41 s1.03,0.39,1.41,0L19.42,5.99z M7.05,18.36c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06 c-0.39,0.39-0.39,1.03,0,1.41s1.03,0.39,1.41,0L7.05,18.36z"/></svg><svg viewBox="0 0 24 24" width=24 height=24 class=darkToggleIcon_wfgR><path fill=currentColor d="M9.37,5.51C9.19,6.15,9.1,6.82,9.1,7.5c0,4.08,3.32,7.4,7.4,7.4c0.68,0,1.35-0.09,1.99-0.27C17.45,17.19,14.93,19,12,19 c-3.86,0-7-3.14-7-7C5,9.07,6.81,6.55,9.37,5.51z M12,3c-4.97,0-9,4.03-9,9s4.03,9,9,9s9-4.03,9-9c0-0.46-0.04-0.92-0.1-1.36 c-0.98,1.37-2.58,2.26-4.4,2.26c-2.98,0-5.4-2.42-5.4-5.4c0-1.81,0.89-3.42,2.26-4.4C12.92,3.04,12.46,3,12,3L12,3z"/></svg></button></div><div class=navbarSearchContainer_Bca1><div class="navbar__search searchBarContainer_NW3z" dir=ltr><input placeholder=Search aria-label=Search class=navbar__search-input value=""><div class="loadingRing_RJI3 searchBarLoadingRing_YnHq"><div></div><div></div><div></div><div></div></div></div></div></div></div><div role=presentation class=navbar-sidebar__backdrop></div></nav><div id=__docusaurus_skipToContent_fallback class="main-wrapper mainWrapper_z2l0"><div class=docsWrapper_hBAB><button aria-label="Scroll back to top" class="clean-btn theme-back-to-top-button backToTopButton_sjWU" type=button></button><div class=docRoot_UBD9><aside class="theme-doc-sidebar-container docSidebarContainer_YfHR"><div class=sidebarViewport_aRkj><div class="sidebar_njMd sidebarWithHideableNavbar_wUlq"><a tabindex=-1 class=sidebarLogo_isFc href=/fortran/><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--light_NVdE"><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--dark_xIcU"><b>Fortran</b></a><nav aria-label="Docs sidebar" class="menu thin-scrollbar menu_SIkG"><ul class="theme-doc-sidebar-menu menu__list"><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/>Setup</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/basics>Basics</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/array>Array and Matrix</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/control>Logical control</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/loop>Loop</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/modules>Modules</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/procedures>Procedures</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/complex>Complex number</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/recursion>Recursion</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/types>Custom types</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/pointer>Pointer</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/file>File I/O</a><li class="theme-doc-sidebar-item-category theme-doc-sidebar-item-category-level-1 menu__list-item"><div class=menu__list-item-collapsible><a class="menu__link menu__link--sublist menu__link--active" href=/fortran/category/coding-practice>Coding practice</a><button aria-label="Collapse sidebar category 'Coding practice'" aria-expanded=true type=button class="clean-btn menu__caret"></button></div><ul style=display:block;overflow:visible;height:auto class=menu__list><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/swap>Swap two numbers</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/abs-path>Absolute path</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class="menu__link menu__link--active" aria-current=page tabindex=0 href=/fortran/hypotenuse>Calculate hypotenuse</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/integration>Numerical integration</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/haversine>Haversine formula</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/inner-product>Inner product</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/monte-carlo-pi>Monte Carlo method</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/monte-carlo-integration>Monte Carlo integration</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/time>Time</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/arg-parsing>Argument parsing</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/exec-command>External command</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/blas>BLAS</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/mpi>MPI Basics</a></ul><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/resources>Resources</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/license>License</a></ul></nav><button type=button title="Collapse sidebar" aria-label="Collapse sidebar" class="button button--secondary button--outline collapseSidebarButton_PEFL"><svg width=20 height=20 aria-hidden=true class=collapseSidebarButtonIcon_kv0_><g fill=#7a7a7a><path d="M9.992 10.023c0 .2-.062.399-.172.547l-4.996 7.492a.982.982 0 01-.828.454H1c-.55 0-1-.453-1-1 0-.2.059-.403.168-.551l4.629-6.942L.168 3.078A.939.939 0 010 2.528c0-.548.45-.997 1-.997h2.996c.352 0 .649.18.828.45L9.82 9.472c.11.148.172.347.172.55zm0 0"/><path d="M19.98 10.023c0 .2-.058.399-.168.547l-4.996 7.492a.987.987 0 01-.828.454h-3c-.547 0-.996-.453-.996-1 0-.2.059-.403.168-.551l4.625-6.942-4.625-6.945a.939.939 0 01-.168-.55 1 1 0 01.996-.997h3c.348 0 .649.18.828.45l4.996 7.492c.11.148.168.347.168.55zm0 0"/></g></svg></button></div></div></aside><main class=docMainContainer_TBSr><div class="container padding-top--md padding-bottom--lg"><div class=row><div class="col docItemCol_VOVn"><div class=docItemContainer_Djhp><article><nav class="theme-doc-breadcrumbs breadcrumbsContainer_Z_bl" aria-label=Breadcrumbs><ul class=breadcrumbs itemscope itemtype=https://schema.org/BreadcrumbList><li class=breadcrumbs__item><a aria-label="Home page" class=breadcrumbs__link href=/fortran/><svg viewBox="0 0 24 24" class=breadcrumbHomeIcon_YNFT><path d="M10 19v-5h4v5c0 .55.45 1 1 1h3c.55 0 1-.45 1-1v-7h1.7c.46 0 .68-.57.33-.87L12.67 3.6c-.38-.34-.96-.34-1.34 0l-8.36 7.53c-.34.3-.13.87.33.87H5v7c0 .55.45 1 1 1h3c.55 0 1-.45 1-1z" fill=currentColor /></svg></a><li itemscope itemprop=itemListElement itemtype=https://schema.org/ListItem class=breadcrumbs__item><a class=breadcrumbs__link itemprop=item href=/fortran/category/coding-practice><span itemprop=name>Coding practice</span></a><meta itemprop=position content=1><li itemscope itemprop=itemListElement itemtype=https://schema.org/ListItem class="breadcrumbs__item breadcrumbs__item--active"><span class=breadcrumbs__link itemprop=name>Calculate hypotenuse</span><meta itemprop=position content=2></ul></nav><div class="theme-doc-markdown markdown"><header><h1>Calculate hypotenuse: example of subroutine</h1></header><p>Hypotenuse can be calculated using following formula:</p>
 <span class=katex-display><span class=katex><span class=katex-mathml><math display=block><semantics><mrow><mi>c</mi><mo>=</mo><msqrt><mrow><msup><mi>a</mi><mn>2</mn></msup><mo>+</mo><msup><mi>b</mi><mn>2</mn></msup></mrow></msqrt></mrow><annotation encoding=application/x-tex>c = \sqrt{a^2 + b^2}</annotation></semantics></math></span><span class=katex-html aria-hidden=true><span class=base><span class=strut style=height:0.4306em></span><span class="mord mathnormal">c</span><span class=mspace style=margin-right:0.2778em></span><span class=mrel>=</span><span class=mspace style=margin-right:0.2778em></span></span><span class=base><span class=strut style=height:1.24em;vertical-align:-0.1777em></span><span class="mord sqrt"><span class="vlist-t vlist-t2"><span class=vlist-r><span class=vlist style=height:1.0623em><span class=svg-align style=top:-3.2em><span class=pstrut style=height:3.2em></span><span class=mord style=padding-left:1em><span class=mord><span class="mord mathnormal">a</span><span class=msupsub><span class=vlist-t><span class=vlist-r><span class=vlist style=height:0.7401em><span style=top:-2.989em;margin-right:0.05em><span class=pstrut style=height:2.7em></span><span class="sizing reset-size6 size3 mtight"><span class="mord mtight">2</span></span></span></span></span></span></span></span><span class=mspace style=margin-right:0.2222em></span><span class=mbin>+</span><span class=mspace style=margin-right:0.2222em></span><span class=mord><span class="mord mathnormal">b</span><span class=msupsub><span class=vlist-t><span class=vlist-r><span class=vlist style=height:0.7401em><span style=top:-2.989em;margin-right:0.05em><span class=pstrut style=height:2.7em></span><span class="sizing reset-size6 size3 mtight"><span class="mord mtight">2</span></span></span></span></span></span></span></span></span></span><span style=top:-3.0223em><span class=pstrut style=height:3.2em></span><span class=hide-tail style=min-width:1.02em;height:1.28em><svg width=400em height=1.28em viewBox="0 0 400000 1296" preserveAspectRatio="xMinYMin slice"><path d="M263,681c0.7,0,18,39.7,52,119 c34,79.3,68.167,158.7,102.5,238c34.3,79.3,51.8,119.3,52.5,120 c340,-704.7,510.7,-1060.3,512,-1067 l0 -0 c4.7,-7.3,11,-11,19,-11 H40000v40H1012.3 s-271.3,567,-271.3,567c-38.7,80.7,-84,175,-136,283c-52,108,-89.167,185.3,-111.5,232 c-22.3,46.7,-33.8,70.3,-34.5,71c-4.7,4.7,-12.3,7,-23,7s-12,-1,-12,-1 s-109,-253,-109,-253c-72.7,-168,-109.3,-252,-110,-252c-10.7,8,-22,16.7,-34,26 c-22,17.3,-33.3,26,-34,26s-26,-26,-26,-26s76,-59,76,-59s76,-60,76,-60z M1001 80h400000v40h-400000z"/></svg></span></span></span><span class=vlist-s>​</span></span><span class=vlist-r><span class=vlist style=height:0.1777em><span></span></span></span></span></span></span></span></span></span>
 <!-- -->
 <div class="language-fortran codeBlockContainer_Ckt0 theme-code-block" style=--prism-color:#393A34;--prism-background-color:#f6f8fa><div class=codeBlockTitle_Ktv7>src/16_hypotenuse_subroutine.f90</div><div class=codeBlockContent_biex><pre tabindex=0 class="prism-code language-fortran codeBlock_bY9V thin-scrollbar" style=color:#393A34;background-color:#f6f8fa><code class="codeBlockLines_e6Vv codeBlockLinesWithNumbering_o6Pm"><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token comment" style=color:#999988;font-style:italic>! Compile the subroutine: gfortran -c 16_hypotenuse_subroutine.f90</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain"></span><span class="token keyword" style=color:#00009f>SUBROUTINE</span><span class="token plain"> calculate_hypotenuse</span><span class="token punctuation" style=color:#393A34>(</span><span class="token plain">side_a</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> side_b</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> hypotenuse</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>IMPLICIT NONE</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token comment" style=color:#999988;font-style:italic>! declare the intent of dummy variables</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>REAL</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> </span><span class="token keyword" style=color:#00009f>INTENT</span><span class="token punctuation" style=color:#393A34>(</span><span class="token keyword" style=color:#00009f>IN</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"> </span><span class="token operator" style=color:#393A34>::</span><span class="token plain"> side_a</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>REAL</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> </span><span class="token keyword" style=color:#00009f>INTENT</span><span class="token punctuation" style=color:#393A34>(</span><span class="token keyword" style=color:#00009f>IN</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"> </span><span class="token operator" style=color:#393A34>::</span><span class="token plain"> side_b</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>REAL</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> </span><span class="token keyword" style=color:#00009f>INTENT</span><span class="token punctuation" style=color:#393A34>(</span><span class="token keyword" style=color:#00009f>OUT</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"> </span><span class="token operator" style=color:#393A34>::</span><span class="token plain"> hypotenuse</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>REAL</span><span class="token plain"> </span><span class="token operator" style=color:#393A34>::</span><span class="token plain"> temp</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    temp </span><span class="token operator" style=color:#393A34>=</span><span class="token plain"> side_a </span><span class="token operator" style=color:#393A34>*</span><span class="token plain"> side_a </span><span class="token operator" style=color:#393A34>+</span><span class="token plain"> side_b </span><span class="token operator" style=color:#393A34>*</span><span class="token plain"> side_b</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    hypotenuse </span><span class="token operator" style=color:#393A34>=</span><span class="token plain"> SQRT</span><span class="token punctuation" style=color:#393A34>(</span><span class="token plain">temp</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain"></span><span class="token keyword" style=color:#00009f>END SUBROUTINE</span><span class="token plain"> calculate_hypotenuse</span></span><br></span></code></pre><div class=buttonGroup__atx><button type=button aria-label="Copy code to clipboard" title=Copy class=clean-btn><span class=copyButtonIcons_eSgA aria-hidden=true><svg viewBox="0 0 24 24" class=copyButtonIcon_y97N><path fill=currentColor d="M19,21H8V7H19M19,5H8A2,2 0 0,0 6,7V21A2,2 0 0,0 8,23H19A2,2 0 0,0 21,21V7A2,2 0 0,0 19,5M16,1H4A2,2 0 0,0 2,3V17H4V3H16V1Z"/></svg><svg viewBox="0 0 24 24" class=copyButtonSuccessIcon_LjdS><path fill=currentColor d=M21,7L9,19L3.5,13.5L4.91,12.09L9,16.17L19.59,5.59L21,7Z /></svg></span></button></div></div></div>
diff --git a/index.html b/index.html
index 41765b0..05d342a 100644
--- a/index.html
+++ b/index.html
@@ -1,4 +1,4 @@
-<!doctype html><html lang=en dir=ltr class="docs-wrapper plugin-docs plugin-id-default docs-version-current docs-doc-page docs-doc-id-setup" data-has-hydrated=false><meta charset=UTF-8><meta name=generator content="Docusaurus v3.6.1"><title data-rh=true>Setting up Fortran • Fortran Tutorial</title><meta data-rh=true name=viewport content="width=device-width,initial-scale=1.0"><meta data-rh=true name=twitter:card content=summary_large_image><meta data-rh=true property=og:url content=https://pranabdas.github.io/fortran/><meta data-rh=true property=og:locale content=en><meta data-rh=true name=docusaurus_locale content=en><meta data-rh=true name=docsearch:language content=en><meta data-rh=true name=theme-color content=#06445c><meta data-rh=true name=docusaurus_version content=current><meta data-rh=true name=docusaurus_tag content=docs-default-current><meta data-rh=true name=docsearch:version content=current><meta data-rh=true name=docsearch:docusaurus_tag content=docs-default-current><meta data-rh=true property=og:title content="Setting up Fortran • Fortran Tutorial"><meta data-rh=true name=description content="FORTRAN is optimized for high performance scientific computing. I will be"><meta data-rh=true property=og:description content="FORTRAN is optimized for high performance scientific computing. I will be"><meta data-rh=true name=keywords content="fortran programming,scientific programming,numerical programming,numerical integration"><link data-rh=true rel=icon href=/fortran/img/favicon.png><link data-rh=true rel=canonical href=https://pranabdas.github.io/fortran/><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/ hreflang=en><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/ hreflang=x-default><script data-rh=true>document.addEventListener("DOMContentLoaded",function(){void 0===window.docusaurus&&insertBanner()});function insertBanner(){var n=document.createElement("div");n.id="__docusaurus-base-url-issue-banner-container",n.innerHTML='\n<div id="__docusaurus-base-url-issue-banner" style="border: thick solid red; background-color: rgb(255, 230, 179); margin: 20px; padding: 20px; font-size: 20px;">\n   <p style="font-weight: bold; font-size: 30px;">Your Docusaurus site did not load properly.</p>\n   <p>A very common reason is a wrong site <a href="https://docusaurus.io/docs/docusaurus.config.js/#baseUrl" style="font-weight: bold;">baseUrl configuration</a>.</p>\n   <p>Current configured baseUrl = <span style="font-weight: bold; color: red;">/fortran/</span> </p>\n   <p>We suggest trying baseUrl = <span id="__docusaurus-base-url-issue-banner-suggestion-container" style="font-weight: bold; color: green;"></span></p>\n</div>\n',document.body.prepend(n);var e=document.getElementById("__docusaurus-base-url-issue-banner-suggestion-container"),s=window.location.pathname,o="/"===s.substr(-1)?s:s+"/";e.innerHTML=o}</script><link rel=stylesheet href=https://pranabdas.github.io/drive/webfonts/katex/katex.min.css><link rel=stylesheet href=/fortran/assets/css/styles.4de1c8a8.css><script src=/fortran/assets/js/runtime~main.866c090c.js defer></script><script src=/fortran/assets/js/main.ec888ba8.js defer></script><body class=navigation-with-keyboard><script>!function(){var t,e=function(){try{return new URLSearchParams(window.location.search).get("docusaurus-theme")}catch(t){}}()||function(){try{return window.localStorage.getItem("theme")}catch(t){}}();t=null!==e?e:window.matchMedia("(prefers-color-scheme: dark)").matches?"dark":(window.matchMedia("(prefers-color-scheme: light)").matches,"light"),document.documentElement.setAttribute("data-theme",t)}(),function(){try{for(var[t,e]of new URLSearchParams(window.location.search).entries())if(t.startsWith("docusaurus-data-")){var a=t.replace("docusaurus-data-","data-");document.documentElement.setAttribute(a,e)}}catch(t){}}()</script><div id=__docusaurus><div role=region aria-label="Skip to main content"><a class=skipToContent_fXgn href=#__docusaurus_skipToContent_fallback>Skip to main content</a></div><nav aria-label=Main class="navbar navbar--fixed-top navbarHideable_m1mJ"><div class=navbar__inner><div class=navbar__items><button aria-label="Toggle navigation bar" aria-expanded=false class="navbar__toggle clean-btn" type=button><svg width=30 height=30 viewBox="0 0 30 30" aria-hidden=true><path stroke=currentColor stroke-linecap=round stroke-miterlimit=10 stroke-width=2 d="M4 7h22M4 15h22M4 23h22"/></svg></button><a class=navbar__brand href=/fortran/><div class=navbar__logo><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--light_NVdE"><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--dark_xIcU"></div><b class="navbar__title text--truncate">Fortran</b></a><div class="navbar__item dropdown dropdown--hoverable"><a aria-current=page class="navbar__link active" aria-haspopup=true aria-expanded=false role=button href=/fortran/>Docs</a><ul class=dropdown__menu><li><a aria-current=page class="dropdown__link dropdown__link--active" href=/fortran/>Fortran Programming</a><li><a href=https://pranabdas.github.io/docs/ rel="noopener noreferrer" class=dropdown__link>~ ~ ~ Other Docs ~ ~ ~</a><li><a href=https://pranabdas.github.io/arpespythontools/ rel="noopener noreferrer" class=dropdown__link>ARPES Python Tools</a><li><a href=https://pranabdas.github.io/c-cpp/ rel="noopener noreferrer" class=dropdown__link>C and C++ Programming</a><li><a href=https://pranabdas.github.io/condmat-notes/ rel="noopener noreferrer" class=dropdown__link>Condensed Matter Notes</a><li><a href=https://pranabdas.github.io/javascript/ rel="noopener noreferrer" class=dropdown__link>Javascript Tutorial</a><li><a href=https://pranabdas.github.io/linux/ rel="noopener noreferrer" class=dropdown__link>Linux Tutorial</a><li><a href=https://pranabdas.github.io/machine-learning/ rel="noopener noreferrer" class=dropdown__link>Machine Learning Notes</a><li><a href=https://pranabdas.github.io/openmx/ rel="noopener noreferrer" class=dropdown__link>OpenMX tutorial</a><li><a href=https://pranabdas.github.io/python-tutorial/ rel="noopener noreferrer" class=dropdown__link>Python Tutorial</a><li><a href=https://pranabdas.github.io/espresso/ rel="noopener noreferrer" class=dropdown__link>Quantum Espresso Tutorial</a><li><a href=https://pranabdas.github.io/rust/ rel="noopener noreferrer" class=dropdown__link>Rust Programming</a><li><a href=https://pranabdas.github.io/arpes-manual/ rel="noopener noreferrer" class=dropdown__link>SUV ARPES Manual</a><li><a href=https://pranabdas.github.io/suvtools/ rel="noopener noreferrer" class=dropdown__link>SUV Python Tools</a></ul></div></div><div class="navbar__items navbar__items--right"><a href=https://github.com/pranabdas/fortran rel="noopener noreferrer" class="navbar__item navbar__link header-github-link" aria-label="GitHub repository" title="Visit project repository in GitHub"></a><a href=https://pranabdas.github.io rel="noopener noreferrer" class="navbar__item navbar__link header-homepage-link" aria-label="About me" title="Go to Pranab's Homepage"></a><div class="toggle_vylO colorModeToggle_DEke"><button class="clean-btn toggleButton_gllP toggleButtonDisabled_aARS" type=button disabled title="Switch between dark and light mode (currently light mode)" aria-label="Switch between dark and light mode (currently light mode)" aria-live=polite aria-pressed=false><svg viewBox="0 0 24 24" width=24 height=24 class=lightToggleIcon_pyhR><path fill=currentColor d="M12,9c1.65,0,3,1.35,3,3s-1.35,3-3,3s-3-1.35-3-3S10.35,9,12,9 M12,7c-2.76,0-5,2.24-5,5s2.24,5,5,5s5-2.24,5-5 S14.76,7,12,7L12,7z M2,13l2,0c0.55,0,1-0.45,1-1s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S1.45,13,2,13z M20,13l2,0c0.55,0,1-0.45,1-1 s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S19.45,13,20,13z M11,2v2c0,0.55,0.45,1,1,1s1-0.45,1-1V2c0-0.55-0.45-1-1-1S11,1.45,11,2z M11,20v2c0,0.55,0.45,1,1,1s1-0.45,1-1v-2c0-0.55-0.45-1-1-1C11.45,19,11,19.45,11,20z M5.99,4.58c-0.39-0.39-1.03-0.39-1.41,0 c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0s0.39-1.03,0-1.41L5.99,4.58z M18.36,16.95 c-0.39-0.39-1.03-0.39-1.41,0c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0c0.39-0.39,0.39-1.03,0-1.41 L18.36,16.95z M19.42,5.99c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06c-0.39,0.39-0.39,1.03,0,1.41 s1.03,0.39,1.41,0L19.42,5.99z M7.05,18.36c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06 c-0.39,0.39-0.39,1.03,0,1.41s1.03,0.39,1.41,0L7.05,18.36z"/></svg><svg viewBox="0 0 24 24" width=24 height=24 class=darkToggleIcon_wfgR><path fill=currentColor d="M9.37,5.51C9.19,6.15,9.1,6.82,9.1,7.5c0,4.08,3.32,7.4,7.4,7.4c0.68,0,1.35-0.09,1.99-0.27C17.45,17.19,14.93,19,12,19 c-3.86,0-7-3.14-7-7C5,9.07,6.81,6.55,9.37,5.51z M12,3c-4.97,0-9,4.03-9,9s4.03,9,9,9s9-4.03,9-9c0-0.46-0.04-0.92-0.1-1.36 c-0.98,1.37-2.58,2.26-4.4,2.26c-2.98,0-5.4-2.42-5.4-5.4c0-1.81,0.89-3.42,2.26-4.4C12.92,3.04,12.46,3,12,3L12,3z"/></svg></button></div><div class=navbarSearchContainer_Bca1><div class="navbar__search searchBarContainer_NW3z" dir=ltr><input placeholder=Search aria-label=Search class=navbar__search-input value=""><div class="loadingRing_RJI3 searchBarLoadingRing_YnHq"><div></div><div></div><div></div><div></div></div></div></div></div></div><div role=presentation class=navbar-sidebar__backdrop></div></nav><div id=__docusaurus_skipToContent_fallback class="main-wrapper mainWrapper_z2l0"><div class=docsWrapper_hBAB><button aria-label="Scroll back to top" class="clean-btn theme-back-to-top-button backToTopButton_sjWU" type=button></button><div class=docRoot_UBD9><aside class="theme-doc-sidebar-container docSidebarContainer_YfHR"><div class=sidebarViewport_aRkj><div class="sidebar_njMd sidebarWithHideableNavbar_wUlq"><a tabindex=-1 class=sidebarLogo_isFc href=/fortran/><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--light_NVdE"><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--dark_xIcU"><b>Fortran</b></a><nav aria-label="Docs sidebar" class="menu thin-scrollbar menu_SIkG"><ul class="theme-doc-sidebar-menu menu__list"><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class="menu__link menu__link--active" aria-current=page href=/fortran/>Setup</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/basics>Basics</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/array>Array and Matrix</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/control>Logical control</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/loop>Loop</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/modules>Modules</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/procedures>Procedures</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/complex>Complex number</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/recursion>Recursion</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/types>Custom types</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/pointer>Pointer</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/file>File I/O</a><li class="theme-doc-sidebar-item-category theme-doc-sidebar-item-category-level-1 menu__list-item menu__list-item--collapsed"><div class=menu__list-item-collapsible><a class="menu__link menu__link--sublist" href=/fortran/category/coding-practice>Coding practice</a><button aria-label="Expand sidebar category 'Coding practice'" aria-expanded=false type=button class="clean-btn menu__caret"></button></div><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/resources>Resources</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/license>License</a></ul></nav><button type=button title="Collapse sidebar" aria-label="Collapse sidebar" class="button button--secondary button--outline collapseSidebarButton_PEFL"><svg width=20 height=20 aria-hidden=true class=collapseSidebarButtonIcon_kv0_><g fill=#7a7a7a><path d="M9.992 10.023c0 .2-.062.399-.172.547l-4.996 7.492a.982.982 0 01-.828.454H1c-.55 0-1-.453-1-1 0-.2.059-.403.168-.551l4.629-6.942L.168 3.078A.939.939 0 010 2.528c0-.548.45-.997 1-.997h2.996c.352 0 .649.18.828.45L9.82 9.472c.11.148.172.347.172.55zm0 0"/><path d="M19.98 10.023c0 .2-.058.399-.168.547l-4.996 7.492a.987.987 0 01-.828.454h-3c-.547 0-.996-.453-.996-1 0-.2.059-.403.168-.551l4.625-6.942-4.625-6.945a.939.939 0 01-.168-.55 1 1 0 01.996-.997h3c.348 0 .649.18.828.45l4.996 7.492c.11.148.168.347.168.55zm0 0"/></g></svg></button></div></div></aside><main class=docMainContainer_TBSr><div class="container padding-top--md padding-bottom--lg"><div class=row><div class="col docItemCol_VOVn"><div class=docItemContainer_Djhp><article><nav class="theme-doc-breadcrumbs breadcrumbsContainer_Z_bl" aria-label=Breadcrumbs><ul class=breadcrumbs itemscope itemtype=https://schema.org/BreadcrumbList><li class=breadcrumbs__item><a aria-label="Home page" class=breadcrumbs__link href=/fortran/><svg viewBox="0 0 24 24" class=breadcrumbHomeIcon_YNFT><path d="M10 19v-5h4v5c0 .55.45 1 1 1h3c.55 0 1-.45 1-1v-7h1.7c.46 0 .68-.57.33-.87L12.67 3.6c-.38-.34-.96-.34-1.34 0l-8.36 7.53c-.34.3-.13.87.33.87H5v7c0 .55.45 1 1 1h3c.55 0 1-.45 1-1z" fill=currentColor /></svg></a><li itemscope itemprop=itemListElement itemtype=https://schema.org/ListItem class="breadcrumbs__item breadcrumbs__item--active"><span class=breadcrumbs__link itemprop=name>Setup</span><meta itemprop=position content=1></ul></nav><div class="theme-doc-markdown markdown"><header><h1>Setting up Fortran</h1></header><p>FORTRAN is optimized for high performance scientific computing. I will be
+<!doctype html><html lang=en dir=ltr class="docs-wrapper plugin-docs plugin-id-default docs-version-current docs-doc-page docs-doc-id-setup" data-has-hydrated=false><meta charset=UTF-8><meta name=generator content="Docusaurus v3.6.1"><title data-rh=true>Setting up Fortran • Fortran Tutorial</title><meta data-rh=true name=viewport content="width=device-width,initial-scale=1.0"><meta data-rh=true name=twitter:card content=summary_large_image><meta data-rh=true property=og:url content=https://pranabdas.github.io/fortran/><meta data-rh=true property=og:locale content=en><meta data-rh=true name=docusaurus_locale content=en><meta data-rh=true name=docsearch:language content=en><meta data-rh=true name=theme-color content=#06445c><meta data-rh=true name=docusaurus_version content=current><meta data-rh=true name=docusaurus_tag content=docs-default-current><meta data-rh=true name=docsearch:version content=current><meta data-rh=true name=docsearch:docusaurus_tag content=docs-default-current><meta data-rh=true property=og:title content="Setting up Fortran • Fortran Tutorial"><meta data-rh=true name=description content="FORTRAN is optimized for high performance scientific computing. I will be"><meta data-rh=true property=og:description content="FORTRAN is optimized for high performance scientific computing. I will be"><meta data-rh=true name=keywords content="fortran programming,scientific programming,numerical programming,numerical integration"><link data-rh=true rel=icon href=/fortran/img/favicon.png><link data-rh=true rel=canonical href=https://pranabdas.github.io/fortran/><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/ hreflang=en><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/ hreflang=x-default><script data-rh=true>document.addEventListener("DOMContentLoaded",function(){void 0===window.docusaurus&&insertBanner()});function insertBanner(){var n=document.createElement("div");n.id="__docusaurus-base-url-issue-banner-container",n.innerHTML='\n<div id="__docusaurus-base-url-issue-banner" style="border: thick solid red; background-color: rgb(255, 230, 179); margin: 20px; padding: 20px; font-size: 20px;">\n   <p style="font-weight: bold; font-size: 30px;">Your Docusaurus site did not load properly.</p>\n   <p>A very common reason is a wrong site <a href="https://docusaurus.io/docs/docusaurus.config.js/#baseUrl" style="font-weight: bold;">baseUrl configuration</a>.</p>\n   <p>Current configured baseUrl = <span style="font-weight: bold; color: red;">/fortran/</span> </p>\n   <p>We suggest trying baseUrl = <span id="__docusaurus-base-url-issue-banner-suggestion-container" style="font-weight: bold; color: green;"></span></p>\n</div>\n',document.body.prepend(n);var e=document.getElementById("__docusaurus-base-url-issue-banner-suggestion-container"),s=window.location.pathname,o="/"===s.substr(-1)?s:s+"/";e.innerHTML=o}</script><link rel=stylesheet href=https://pranab.pages.dev/assets/fonts/katex/katex.min.css><link rel=stylesheet href=/fortran/assets/css/styles.4de1c8a8.css><script src=/fortran/assets/js/runtime~main.667e3c0f.js defer></script><script src=/fortran/assets/js/main.10795e8f.js defer></script><body class=navigation-with-keyboard><script>!function(){var t,e=function(){try{return new URLSearchParams(window.location.search).get("docusaurus-theme")}catch(t){}}()||function(){try{return window.localStorage.getItem("theme")}catch(t){}}();t=null!==e?e:window.matchMedia("(prefers-color-scheme: dark)").matches?"dark":(window.matchMedia("(prefers-color-scheme: light)").matches,"light"),document.documentElement.setAttribute("data-theme",t)}(),function(){try{for(var[t,e]of new URLSearchParams(window.location.search).entries())if(t.startsWith("docusaurus-data-")){var a=t.replace("docusaurus-data-","data-");document.documentElement.setAttribute(a,e)}}catch(t){}}()</script><div id=__docusaurus><div role=region aria-label="Skip to main content"><a class=skipToContent_fXgn href=#__docusaurus_skipToContent_fallback>Skip to main content</a></div><nav aria-label=Main class="navbar navbar--fixed-top navbarHideable_m1mJ"><div class=navbar__inner><div class=navbar__items><button aria-label="Toggle navigation bar" aria-expanded=false class="navbar__toggle clean-btn" type=button><svg width=30 height=30 viewBox="0 0 30 30" aria-hidden=true><path stroke=currentColor stroke-linecap=round stroke-miterlimit=10 stroke-width=2 d="M4 7h22M4 15h22M4 23h22"/></svg></button><a class=navbar__brand href=/fortran/><div class=navbar__logo><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--light_NVdE"><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--dark_xIcU"></div><b class="navbar__title text--truncate">Fortran</b></a><div class="navbar__item dropdown dropdown--hoverable"><a aria-current=page class="navbar__link active" aria-haspopup=true aria-expanded=false role=button href=/fortran/>Docs</a><ul class=dropdown__menu><li><a aria-current=page class="dropdown__link dropdown__link--active" href=/fortran/>Fortran Programming</a><li><a href=https://pranabdas.github.io/docs/ rel="noopener noreferrer" class=dropdown__link>~ ~ ~ Other Docs ~ ~ ~</a><li><a href=https://pranabdas.github.io/arpespythontools/ rel="noopener noreferrer" class=dropdown__link>ARPES Python Tools</a><li><a href=https://pranabdas.github.io/c-cpp/ rel="noopener noreferrer" class=dropdown__link>C and C++ Programming</a><li><a href=https://pranabdas.github.io/condmat-notes/ rel="noopener noreferrer" class=dropdown__link>Condensed Matter Notes</a><li><a href=https://pranabdas.github.io/javascript/ rel="noopener noreferrer" class=dropdown__link>Javascript Tutorial</a><li><a href=https://pranabdas.github.io/linux/ rel="noopener noreferrer" class=dropdown__link>Linux Tutorial</a><li><a href=https://pranabdas.github.io/machine-learning/ rel="noopener noreferrer" class=dropdown__link>Machine Learning Notes</a><li><a href=https://pranabdas.github.io/openmx/ rel="noopener noreferrer" class=dropdown__link>OpenMX tutorial</a><li><a href=https://pranabdas.github.io/python-tutorial/ rel="noopener noreferrer" class=dropdown__link>Python Tutorial</a><li><a href=https://pranabdas.github.io/espresso/ rel="noopener noreferrer" class=dropdown__link>Quantum Espresso Tutorial</a><li><a href=https://pranabdas.github.io/rust/ rel="noopener noreferrer" class=dropdown__link>Rust Programming</a><li><a href=https://pranabdas.github.io/arpes-manual/ rel="noopener noreferrer" class=dropdown__link>SUV ARPES Manual</a><li><a href=https://pranabdas.github.io/suvtools/ rel="noopener noreferrer" class=dropdown__link>SUV Python Tools</a></ul></div></div><div class="navbar__items navbar__items--right"><a href=https://github.com/pranabdas/fortran rel="noopener noreferrer" class="navbar__item navbar__link header-github-link" aria-label="GitHub repository" title="Visit project repository in GitHub"></a><a href=https://pranabdas.github.io rel="noopener noreferrer" class="navbar__item navbar__link header-homepage-link" aria-label="About me" title="Go to Pranab's Homepage"></a><div class="toggle_vylO colorModeToggle_DEke"><button class="clean-btn toggleButton_gllP toggleButtonDisabled_aARS" type=button disabled title="Switch between dark and light mode (currently light mode)" aria-label="Switch between dark and light mode (currently light mode)" aria-live=polite aria-pressed=false><svg viewBox="0 0 24 24" width=24 height=24 class=lightToggleIcon_pyhR><path fill=currentColor d="M12,9c1.65,0,3,1.35,3,3s-1.35,3-3,3s-3-1.35-3-3S10.35,9,12,9 M12,7c-2.76,0-5,2.24-5,5s2.24,5,5,5s5-2.24,5-5 S14.76,7,12,7L12,7z M2,13l2,0c0.55,0,1-0.45,1-1s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S1.45,13,2,13z M20,13l2,0c0.55,0,1-0.45,1-1 s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S19.45,13,20,13z M11,2v2c0,0.55,0.45,1,1,1s1-0.45,1-1V2c0-0.55-0.45-1-1-1S11,1.45,11,2z M11,20v2c0,0.55,0.45,1,1,1s1-0.45,1-1v-2c0-0.55-0.45-1-1-1C11.45,19,11,19.45,11,20z M5.99,4.58c-0.39-0.39-1.03-0.39-1.41,0 c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0s0.39-1.03,0-1.41L5.99,4.58z M18.36,16.95 c-0.39-0.39-1.03-0.39-1.41,0c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0c0.39-0.39,0.39-1.03,0-1.41 L18.36,16.95z M19.42,5.99c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06c-0.39,0.39-0.39,1.03,0,1.41 s1.03,0.39,1.41,0L19.42,5.99z M7.05,18.36c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06 c-0.39,0.39-0.39,1.03,0,1.41s1.03,0.39,1.41,0L7.05,18.36z"/></svg><svg viewBox="0 0 24 24" width=24 height=24 class=darkToggleIcon_wfgR><path fill=currentColor d="M9.37,5.51C9.19,6.15,9.1,6.82,9.1,7.5c0,4.08,3.32,7.4,7.4,7.4c0.68,0,1.35-0.09,1.99-0.27C17.45,17.19,14.93,19,12,19 c-3.86,0-7-3.14-7-7C5,9.07,6.81,6.55,9.37,5.51z M12,3c-4.97,0-9,4.03-9,9s4.03,9,9,9s9-4.03,9-9c0-0.46-0.04-0.92-0.1-1.36 c-0.98,1.37-2.58,2.26-4.4,2.26c-2.98,0-5.4-2.42-5.4-5.4c0-1.81,0.89-3.42,2.26-4.4C12.92,3.04,12.46,3,12,3L12,3z"/></svg></button></div><div class=navbarSearchContainer_Bca1><div class="navbar__search searchBarContainer_NW3z" dir=ltr><input placeholder=Search aria-label=Search class=navbar__search-input value=""><div class="loadingRing_RJI3 searchBarLoadingRing_YnHq"><div></div><div></div><div></div><div></div></div></div></div></div></div><div role=presentation class=navbar-sidebar__backdrop></div></nav><div id=__docusaurus_skipToContent_fallback class="main-wrapper mainWrapper_z2l0"><div class=docsWrapper_hBAB><button aria-label="Scroll back to top" class="clean-btn theme-back-to-top-button backToTopButton_sjWU" type=button></button><div class=docRoot_UBD9><aside class="theme-doc-sidebar-container docSidebarContainer_YfHR"><div class=sidebarViewport_aRkj><div class="sidebar_njMd sidebarWithHideableNavbar_wUlq"><a tabindex=-1 class=sidebarLogo_isFc href=/fortran/><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--light_NVdE"><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--dark_xIcU"><b>Fortran</b></a><nav aria-label="Docs sidebar" class="menu thin-scrollbar menu_SIkG"><ul class="theme-doc-sidebar-menu menu__list"><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class="menu__link menu__link--active" aria-current=page href=/fortran/>Setup</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/basics>Basics</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/array>Array and Matrix</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/control>Logical control</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/loop>Loop</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/modules>Modules</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/procedures>Procedures</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/complex>Complex number</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/recursion>Recursion</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/types>Custom types</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/pointer>Pointer</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/file>File I/O</a><li class="theme-doc-sidebar-item-category theme-doc-sidebar-item-category-level-1 menu__list-item menu__list-item--collapsed"><div class=menu__list-item-collapsible><a class="menu__link menu__link--sublist" href=/fortran/category/coding-practice>Coding practice</a><button aria-label="Expand sidebar category 'Coding practice'" aria-expanded=false type=button class="clean-btn menu__caret"></button></div><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/resources>Resources</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/license>License</a></ul></nav><button type=button title="Collapse sidebar" aria-label="Collapse sidebar" class="button button--secondary button--outline collapseSidebarButton_PEFL"><svg width=20 height=20 aria-hidden=true class=collapseSidebarButtonIcon_kv0_><g fill=#7a7a7a><path d="M9.992 10.023c0 .2-.062.399-.172.547l-4.996 7.492a.982.982 0 01-.828.454H1c-.55 0-1-.453-1-1 0-.2.059-.403.168-.551l4.629-6.942L.168 3.078A.939.939 0 010 2.528c0-.548.45-.997 1-.997h2.996c.352 0 .649.18.828.45L9.82 9.472c.11.148.172.347.172.55zm0 0"/><path d="M19.98 10.023c0 .2-.058.399-.168.547l-4.996 7.492a.987.987 0 01-.828.454h-3c-.547 0-.996-.453-.996-1 0-.2.059-.403.168-.551l4.625-6.942-4.625-6.945a.939.939 0 01-.168-.55 1 1 0 01.996-.997h3c.348 0 .649.18.828.45l4.996 7.492c.11.148.168.347.168.55zm0 0"/></g></svg></button></div></div></aside><main class=docMainContainer_TBSr><div class="container padding-top--md padding-bottom--lg"><div class=row><div class="col docItemCol_VOVn"><div class=docItemContainer_Djhp><article><nav class="theme-doc-breadcrumbs breadcrumbsContainer_Z_bl" aria-label=Breadcrumbs><ul class=breadcrumbs itemscope itemtype=https://schema.org/BreadcrumbList><li class=breadcrumbs__item><a aria-label="Home page" class=breadcrumbs__link href=/fortran/><svg viewBox="0 0 24 24" class=breadcrumbHomeIcon_YNFT><path d="M10 19v-5h4v5c0 .55.45 1 1 1h3c.55 0 1-.45 1-1v-7h1.7c.46 0 .68-.57.33-.87L12.67 3.6c-.38-.34-.96-.34-1.34 0l-8.36 7.53c-.34.3-.13.87.33.87H5v7c0 .55.45 1 1 1h3c.55 0 1-.45 1-1z" fill=currentColor /></svg></a><li itemscope itemprop=itemListElement itemtype=https://schema.org/ListItem class="breadcrumbs__item breadcrumbs__item--active"><span class=breadcrumbs__link itemprop=name>Setup</span><meta itemprop=position content=1></ul></nav><div class="theme-doc-markdown markdown"><header><h1>Setting up Fortran</h1></header><p>FORTRAN is optimized for high performance scientific computing. I will be
 working on UNIX/ Linux machine for running codes. If you are on Windows, you may
 consider using <a href=https://docs.microsoft.com/en-us/windows/wsl/ target=_blank rel="noopener noreferrer">WSL</a>. We will be
 using <a href=https://gcc.gnu.org/fortran/ target=_blank rel="noopener noreferrer">gfortran</a> compiler.</p>
diff --git a/inner-product/index.html b/inner-product/index.html
index 483c678..1667519 100644
--- a/inner-product/index.html
+++ b/inner-product/index.html
@@ -1,4 +1,4 @@
-<!doctype html><html lang=en dir=ltr class="docs-wrapper plugin-docs plugin-id-default docs-version-current docs-doc-page docs-doc-id-inner-product" data-has-hydrated=false><meta charset=UTF-8><meta name=generator content="Docusaurus v3.6.1"><title data-rh=true>Inner product: dynamic array allocation • Fortran Tutorial</title><meta data-rh=true name=viewport content="width=device-width,initial-scale=1.0"><meta data-rh=true name=twitter:card content=summary_large_image><meta data-rh=true property=og:url content=https://pranabdas.github.io/fortran/inner-product><meta data-rh=true property=og:locale content=en><meta data-rh=true name=docusaurus_locale content=en><meta data-rh=true name=docsearch:language content=en><meta data-rh=true name=theme-color content=#06445c><meta data-rh=true name=docusaurus_version content=current><meta data-rh=true name=docusaurus_tag content=docs-default-current><meta data-rh=true name=docsearch:version content=current><meta data-rh=true name=docsearch:docusaurus_tag content=docs-default-current><meta data-rh=true property=og:title content="Inner product: dynamic array allocation • Fortran Tutorial"><meta data-rh=true name=description content="Example of dynamic array allocation:"><meta data-rh=true property=og:description content="Example of dynamic array allocation:"><link data-rh=true rel=icon href=/fortran/img/favicon.png><link data-rh=true rel=canonical href=https://pranabdas.github.io/fortran/inner-product><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/inner-product hreflang=en><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/inner-product hreflang=x-default><link rel=stylesheet href=https://pranabdas.github.io/drive/webfonts/katex/katex.min.css><link rel=stylesheet href=/fortran/assets/css/styles.4de1c8a8.css><script src=/fortran/assets/js/runtime~main.866c090c.js defer></script><script src=/fortran/assets/js/main.ec888ba8.js defer></script><body class=navigation-with-keyboard><script>!function(){var t,e=function(){try{return new URLSearchParams(window.location.search).get("docusaurus-theme")}catch(t){}}()||function(){try{return window.localStorage.getItem("theme")}catch(t){}}();t=null!==e?e:window.matchMedia("(prefers-color-scheme: dark)").matches?"dark":(window.matchMedia("(prefers-color-scheme: light)").matches,"light"),document.documentElement.setAttribute("data-theme",t)}(),function(){try{for(var[t,e]of new URLSearchParams(window.location.search).entries())if(t.startsWith("docusaurus-data-")){var a=t.replace("docusaurus-data-","data-");document.documentElement.setAttribute(a,e)}}catch(t){}}()</script><div id=__docusaurus><div role=region aria-label="Skip to main content"><a class=skipToContent_fXgn href=#__docusaurus_skipToContent_fallback>Skip to main content</a></div><nav aria-label=Main class="navbar navbar--fixed-top navbarHideable_m1mJ"><div class=navbar__inner><div class=navbar__items><button aria-label="Toggle navigation bar" aria-expanded=false class="navbar__toggle clean-btn" type=button><svg width=30 height=30 viewBox="0 0 30 30" aria-hidden=true><path stroke=currentColor stroke-linecap=round stroke-miterlimit=10 stroke-width=2 d="M4 7h22M4 15h22M4 23h22"/></svg></button><a class=navbar__brand href=/fortran/><div class=navbar__logo><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--light_NVdE"><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--dark_xIcU"></div><b class="navbar__title text--truncate">Fortran</b></a><div class="navbar__item dropdown dropdown--hoverable"><a aria-current=page class="navbar__link active" aria-haspopup=true aria-expanded=false role=button href=/fortran/>Docs</a><ul class=dropdown__menu><li><a aria-current=page class="dropdown__link dropdown__link--active" href=/fortran/>Fortran Programming</a><li><a href=https://pranabdas.github.io/docs/ rel="noopener noreferrer" class=dropdown__link>~ ~ ~ Other Docs ~ ~ ~</a><li><a href=https://pranabdas.github.io/arpespythontools/ rel="noopener noreferrer" class=dropdown__link>ARPES Python Tools</a><li><a href=https://pranabdas.github.io/c-cpp/ rel="noopener noreferrer" class=dropdown__link>C and C++ Programming</a><li><a href=https://pranabdas.github.io/condmat-notes/ rel="noopener noreferrer" class=dropdown__link>Condensed Matter Notes</a><li><a href=https://pranabdas.github.io/javascript/ rel="noopener noreferrer" class=dropdown__link>Javascript Tutorial</a><li><a href=https://pranabdas.github.io/linux/ rel="noopener noreferrer" class=dropdown__link>Linux Tutorial</a><li><a href=https://pranabdas.github.io/machine-learning/ rel="noopener noreferrer" class=dropdown__link>Machine Learning Notes</a><li><a href=https://pranabdas.github.io/openmx/ rel="noopener noreferrer" class=dropdown__link>OpenMX tutorial</a><li><a href=https://pranabdas.github.io/python-tutorial/ rel="noopener noreferrer" class=dropdown__link>Python Tutorial</a><li><a href=https://pranabdas.github.io/espresso/ rel="noopener noreferrer" class=dropdown__link>Quantum Espresso Tutorial</a><li><a href=https://pranabdas.github.io/rust/ rel="noopener noreferrer" class=dropdown__link>Rust Programming</a><li><a href=https://pranabdas.github.io/arpes-manual/ rel="noopener noreferrer" class=dropdown__link>SUV ARPES Manual</a><li><a href=https://pranabdas.github.io/suvtools/ rel="noopener noreferrer" class=dropdown__link>SUV Python Tools</a></ul></div></div><div class="navbar__items navbar__items--right"><a href=https://github.com/pranabdas/fortran rel="noopener noreferrer" class="navbar__item navbar__link header-github-link" aria-label="GitHub repository" title="Visit project repository in GitHub"></a><a href=https://pranabdas.github.io rel="noopener noreferrer" class="navbar__item navbar__link header-homepage-link" aria-label="About me" title="Go to Pranab's Homepage"></a><div class="toggle_vylO colorModeToggle_DEke"><button class="clean-btn toggleButton_gllP toggleButtonDisabled_aARS" type=button disabled title="Switch between dark and light mode (currently light mode)" aria-label="Switch between dark and light mode (currently light mode)" aria-live=polite aria-pressed=false><svg viewBox="0 0 24 24" width=24 height=24 class=lightToggleIcon_pyhR><path fill=currentColor d="M12,9c1.65,0,3,1.35,3,3s-1.35,3-3,3s-3-1.35-3-3S10.35,9,12,9 M12,7c-2.76,0-5,2.24-5,5s2.24,5,5,5s5-2.24,5-5 S14.76,7,12,7L12,7z M2,13l2,0c0.55,0,1-0.45,1-1s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S1.45,13,2,13z M20,13l2,0c0.55,0,1-0.45,1-1 s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S19.45,13,20,13z M11,2v2c0,0.55,0.45,1,1,1s1-0.45,1-1V2c0-0.55-0.45-1-1-1S11,1.45,11,2z M11,20v2c0,0.55,0.45,1,1,1s1-0.45,1-1v-2c0-0.55-0.45-1-1-1C11.45,19,11,19.45,11,20z M5.99,4.58c-0.39-0.39-1.03-0.39-1.41,0 c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0s0.39-1.03,0-1.41L5.99,4.58z M18.36,16.95 c-0.39-0.39-1.03-0.39-1.41,0c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0c0.39-0.39,0.39-1.03,0-1.41 L18.36,16.95z M19.42,5.99c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06c-0.39,0.39-0.39,1.03,0,1.41 s1.03,0.39,1.41,0L19.42,5.99z M7.05,18.36c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06 c-0.39,0.39-0.39,1.03,0,1.41s1.03,0.39,1.41,0L7.05,18.36z"/></svg><svg viewBox="0 0 24 24" width=24 height=24 class=darkToggleIcon_wfgR><path fill=currentColor d="M9.37,5.51C9.19,6.15,9.1,6.82,9.1,7.5c0,4.08,3.32,7.4,7.4,7.4c0.68,0,1.35-0.09,1.99-0.27C17.45,17.19,14.93,19,12,19 c-3.86,0-7-3.14-7-7C5,9.07,6.81,6.55,9.37,5.51z M12,3c-4.97,0-9,4.03-9,9s4.03,9,9,9s9-4.03,9-9c0-0.46-0.04-0.92-0.1-1.36 c-0.98,1.37-2.58,2.26-4.4,2.26c-2.98,0-5.4-2.42-5.4-5.4c0-1.81,0.89-3.42,2.26-4.4C12.92,3.04,12.46,3,12,3L12,3z"/></svg></button></div><div class=navbarSearchContainer_Bca1><div class="navbar__search searchBarContainer_NW3z" dir=ltr><input placeholder=Search aria-label=Search class=navbar__search-input value=""><div class="loadingRing_RJI3 searchBarLoadingRing_YnHq"><div></div><div></div><div></div><div></div></div></div></div></div></div><div role=presentation class=navbar-sidebar__backdrop></div></nav><div id=__docusaurus_skipToContent_fallback class="main-wrapper mainWrapper_z2l0"><div class=docsWrapper_hBAB><button aria-label="Scroll back to top" class="clean-btn theme-back-to-top-button backToTopButton_sjWU" type=button></button><div class=docRoot_UBD9><aside class="theme-doc-sidebar-container docSidebarContainer_YfHR"><div class=sidebarViewport_aRkj><div class="sidebar_njMd sidebarWithHideableNavbar_wUlq"><a tabindex=-1 class=sidebarLogo_isFc href=/fortran/><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--light_NVdE"><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--dark_xIcU"><b>Fortran</b></a><nav aria-label="Docs sidebar" class="menu thin-scrollbar menu_SIkG"><ul class="theme-doc-sidebar-menu menu__list"><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/>Setup</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/basics>Basics</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/array>Array and Matrix</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/control>Logical control</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/loop>Loop</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/modules>Modules</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/procedures>Procedures</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/complex>Complex number</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/recursion>Recursion</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/types>Custom types</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/pointer>Pointer</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/file>File I/O</a><li class="theme-doc-sidebar-item-category theme-doc-sidebar-item-category-level-1 menu__list-item"><div class=menu__list-item-collapsible><a class="menu__link menu__link--sublist menu__link--active" href=/fortran/category/coding-practice>Coding practice</a><button aria-label="Collapse sidebar category 'Coding practice'" aria-expanded=true type=button class="clean-btn menu__caret"></button></div><ul style=display:block;overflow:visible;height:auto class=menu__list><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/swap>Swap two numbers</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/abs-path>Absolute path</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/hypotenuse>Calculate hypotenuse</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/integration>Numerical integration</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/haversine>Haversine formula</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class="menu__link menu__link--active" aria-current=page tabindex=0 href=/fortran/inner-product>Inner product</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/monte-carlo-pi>Monte Carlo method</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/monte-carlo-integration>Monte Carlo integration</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/time>Time</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/arg-parsing>Argument parsing</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/exec-command>External command</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/blas>BLAS</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/mpi>MPI Basics</a></ul><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/resources>Resources</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/license>License</a></ul></nav><button type=button title="Collapse sidebar" aria-label="Collapse sidebar" class="button button--secondary button--outline collapseSidebarButton_PEFL"><svg width=20 height=20 aria-hidden=true class=collapseSidebarButtonIcon_kv0_><g fill=#7a7a7a><path d="M9.992 10.023c0 .2-.062.399-.172.547l-4.996 7.492a.982.982 0 01-.828.454H1c-.55 0-1-.453-1-1 0-.2.059-.403.168-.551l4.629-6.942L.168 3.078A.939.939 0 010 2.528c0-.548.45-.997 1-.997h2.996c.352 0 .649.18.828.45L9.82 9.472c.11.148.172.347.172.55zm0 0"/><path d="M19.98 10.023c0 .2-.058.399-.168.547l-4.996 7.492a.987.987 0 01-.828.454h-3c-.547 0-.996-.453-.996-1 0-.2.059-.403.168-.551l4.625-6.942-4.625-6.945a.939.939 0 01-.168-.55 1 1 0 01.996-.997h3c.348 0 .649.18.828.45l4.996 7.492c.11.148.168.347.168.55zm0 0"/></g></svg></button></div></div></aside><main class=docMainContainer_TBSr><div class="container padding-top--md padding-bottom--lg"><div class=row><div class="col docItemCol_VOVn"><div class=docItemContainer_Djhp><article><nav class="theme-doc-breadcrumbs breadcrumbsContainer_Z_bl" aria-label=Breadcrumbs><ul class=breadcrumbs itemscope itemtype=https://schema.org/BreadcrumbList><li class=breadcrumbs__item><a aria-label="Home page" class=breadcrumbs__link href=/fortran/><svg viewBox="0 0 24 24" class=breadcrumbHomeIcon_YNFT><path d="M10 19v-5h4v5c0 .55.45 1 1 1h3c.55 0 1-.45 1-1v-7h1.7c.46 0 .68-.57.33-.87L12.67 3.6c-.38-.34-.96-.34-1.34 0l-8.36 7.53c-.34.3-.13.87.33.87H5v7c0 .55.45 1 1 1h3c.55 0 1-.45 1-1z" fill=currentColor /></svg></a><li itemscope itemprop=itemListElement itemtype=https://schema.org/ListItem class=breadcrumbs__item><a class=breadcrumbs__link itemprop=item href=/fortran/category/coding-practice><span itemprop=name>Coding practice</span></a><meta itemprop=position content=1><li itemscope itemprop=itemListElement itemtype=https://schema.org/ListItem class="breadcrumbs__item breadcrumbs__item--active"><span class=breadcrumbs__link itemprop=name>Inner product</span><meta itemprop=position content=2></ul></nav><div class="theme-doc-markdown markdown"><header><h1>Inner product: dynamic array allocation</h1></header><p>Example of dynamic array allocation:</p>
+<!doctype html><html lang=en dir=ltr class="docs-wrapper plugin-docs plugin-id-default docs-version-current docs-doc-page docs-doc-id-inner-product" data-has-hydrated=false><meta charset=UTF-8><meta name=generator content="Docusaurus v3.6.1"><title data-rh=true>Inner product: dynamic array allocation • Fortran Tutorial</title><meta data-rh=true name=viewport content="width=device-width,initial-scale=1.0"><meta data-rh=true name=twitter:card content=summary_large_image><meta data-rh=true property=og:url content=https://pranabdas.github.io/fortran/inner-product><meta data-rh=true property=og:locale content=en><meta data-rh=true name=docusaurus_locale content=en><meta data-rh=true name=docsearch:language content=en><meta data-rh=true name=theme-color content=#06445c><meta data-rh=true name=docusaurus_version content=current><meta data-rh=true name=docusaurus_tag content=docs-default-current><meta data-rh=true name=docsearch:version content=current><meta data-rh=true name=docsearch:docusaurus_tag content=docs-default-current><meta data-rh=true property=og:title content="Inner product: dynamic array allocation • Fortran Tutorial"><meta data-rh=true name=description content="Example of dynamic array allocation:"><meta data-rh=true property=og:description content="Example of dynamic array allocation:"><link data-rh=true rel=icon href=/fortran/img/favicon.png><link data-rh=true rel=canonical href=https://pranabdas.github.io/fortran/inner-product><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/inner-product hreflang=en><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/inner-product hreflang=x-default><link rel=stylesheet href=https://pranab.pages.dev/assets/fonts/katex/katex.min.css><link rel=stylesheet href=/fortran/assets/css/styles.4de1c8a8.css><script src=/fortran/assets/js/runtime~main.667e3c0f.js defer></script><script src=/fortran/assets/js/main.10795e8f.js defer></script><body class=navigation-with-keyboard><script>!function(){var t,e=function(){try{return new URLSearchParams(window.location.search).get("docusaurus-theme")}catch(t){}}()||function(){try{return window.localStorage.getItem("theme")}catch(t){}}();t=null!==e?e:window.matchMedia("(prefers-color-scheme: dark)").matches?"dark":(window.matchMedia("(prefers-color-scheme: light)").matches,"light"),document.documentElement.setAttribute("data-theme",t)}(),function(){try{for(var[t,e]of new URLSearchParams(window.location.search).entries())if(t.startsWith("docusaurus-data-")){var a=t.replace("docusaurus-data-","data-");document.documentElement.setAttribute(a,e)}}catch(t){}}()</script><div id=__docusaurus><div role=region aria-label="Skip to main content"><a class=skipToContent_fXgn href=#__docusaurus_skipToContent_fallback>Skip to main content</a></div><nav aria-label=Main class="navbar navbar--fixed-top navbarHideable_m1mJ"><div class=navbar__inner><div class=navbar__items><button aria-label="Toggle navigation bar" aria-expanded=false class="navbar__toggle clean-btn" type=button><svg width=30 height=30 viewBox="0 0 30 30" aria-hidden=true><path stroke=currentColor stroke-linecap=round stroke-miterlimit=10 stroke-width=2 d="M4 7h22M4 15h22M4 23h22"/></svg></button><a class=navbar__brand href=/fortran/><div class=navbar__logo><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--light_NVdE"><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--dark_xIcU"></div><b class="navbar__title text--truncate">Fortran</b></a><div class="navbar__item dropdown dropdown--hoverable"><a aria-current=page class="navbar__link active" aria-haspopup=true aria-expanded=false role=button href=/fortran/>Docs</a><ul class=dropdown__menu><li><a aria-current=page class="dropdown__link dropdown__link--active" href=/fortran/>Fortran Programming</a><li><a href=https://pranabdas.github.io/docs/ rel="noopener noreferrer" class=dropdown__link>~ ~ ~ Other Docs ~ ~ ~</a><li><a href=https://pranabdas.github.io/arpespythontools/ rel="noopener noreferrer" class=dropdown__link>ARPES Python Tools</a><li><a href=https://pranabdas.github.io/c-cpp/ rel="noopener noreferrer" class=dropdown__link>C and C++ Programming</a><li><a href=https://pranabdas.github.io/condmat-notes/ rel="noopener noreferrer" class=dropdown__link>Condensed Matter Notes</a><li><a href=https://pranabdas.github.io/javascript/ rel="noopener noreferrer" class=dropdown__link>Javascript Tutorial</a><li><a href=https://pranabdas.github.io/linux/ rel="noopener noreferrer" class=dropdown__link>Linux Tutorial</a><li><a href=https://pranabdas.github.io/machine-learning/ rel="noopener noreferrer" class=dropdown__link>Machine Learning Notes</a><li><a href=https://pranabdas.github.io/openmx/ rel="noopener noreferrer" class=dropdown__link>OpenMX tutorial</a><li><a href=https://pranabdas.github.io/python-tutorial/ rel="noopener noreferrer" class=dropdown__link>Python Tutorial</a><li><a href=https://pranabdas.github.io/espresso/ rel="noopener noreferrer" class=dropdown__link>Quantum Espresso Tutorial</a><li><a href=https://pranabdas.github.io/rust/ rel="noopener noreferrer" class=dropdown__link>Rust Programming</a><li><a href=https://pranabdas.github.io/arpes-manual/ rel="noopener noreferrer" class=dropdown__link>SUV ARPES Manual</a><li><a href=https://pranabdas.github.io/suvtools/ rel="noopener noreferrer" class=dropdown__link>SUV Python Tools</a></ul></div></div><div class="navbar__items navbar__items--right"><a href=https://github.com/pranabdas/fortran rel="noopener noreferrer" class="navbar__item navbar__link header-github-link" aria-label="GitHub repository" title="Visit project repository in GitHub"></a><a href=https://pranabdas.github.io rel="noopener noreferrer" class="navbar__item navbar__link header-homepage-link" aria-label="About me" title="Go to Pranab's Homepage"></a><div class="toggle_vylO colorModeToggle_DEke"><button class="clean-btn toggleButton_gllP toggleButtonDisabled_aARS" type=button disabled title="Switch between dark and light mode (currently light mode)" aria-label="Switch between dark and light mode (currently light mode)" aria-live=polite aria-pressed=false><svg viewBox="0 0 24 24" width=24 height=24 class=lightToggleIcon_pyhR><path fill=currentColor d="M12,9c1.65,0,3,1.35,3,3s-1.35,3-3,3s-3-1.35-3-3S10.35,9,12,9 M12,7c-2.76,0-5,2.24-5,5s2.24,5,5,5s5-2.24,5-5 S14.76,7,12,7L12,7z M2,13l2,0c0.55,0,1-0.45,1-1s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S1.45,13,2,13z M20,13l2,0c0.55,0,1-0.45,1-1 s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S19.45,13,20,13z M11,2v2c0,0.55,0.45,1,1,1s1-0.45,1-1V2c0-0.55-0.45-1-1-1S11,1.45,11,2z M11,20v2c0,0.55,0.45,1,1,1s1-0.45,1-1v-2c0-0.55-0.45-1-1-1C11.45,19,11,19.45,11,20z M5.99,4.58c-0.39-0.39-1.03-0.39-1.41,0 c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0s0.39-1.03,0-1.41L5.99,4.58z M18.36,16.95 c-0.39-0.39-1.03-0.39-1.41,0c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0c0.39-0.39,0.39-1.03,0-1.41 L18.36,16.95z M19.42,5.99c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06c-0.39,0.39-0.39,1.03,0,1.41 s1.03,0.39,1.41,0L19.42,5.99z M7.05,18.36c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06 c-0.39,0.39-0.39,1.03,0,1.41s1.03,0.39,1.41,0L7.05,18.36z"/></svg><svg viewBox="0 0 24 24" width=24 height=24 class=darkToggleIcon_wfgR><path fill=currentColor d="M9.37,5.51C9.19,6.15,9.1,6.82,9.1,7.5c0,4.08,3.32,7.4,7.4,7.4c0.68,0,1.35-0.09,1.99-0.27C17.45,17.19,14.93,19,12,19 c-3.86,0-7-3.14-7-7C5,9.07,6.81,6.55,9.37,5.51z M12,3c-4.97,0-9,4.03-9,9s4.03,9,9,9s9-4.03,9-9c0-0.46-0.04-0.92-0.1-1.36 c-0.98,1.37-2.58,2.26-4.4,2.26c-2.98,0-5.4-2.42-5.4-5.4c0-1.81,0.89-3.42,2.26-4.4C12.92,3.04,12.46,3,12,3L12,3z"/></svg></button></div><div class=navbarSearchContainer_Bca1><div class="navbar__search searchBarContainer_NW3z" dir=ltr><input placeholder=Search aria-label=Search class=navbar__search-input value=""><div class="loadingRing_RJI3 searchBarLoadingRing_YnHq"><div></div><div></div><div></div><div></div></div></div></div></div></div><div role=presentation class=navbar-sidebar__backdrop></div></nav><div id=__docusaurus_skipToContent_fallback class="main-wrapper mainWrapper_z2l0"><div class=docsWrapper_hBAB><button aria-label="Scroll back to top" class="clean-btn theme-back-to-top-button backToTopButton_sjWU" type=button></button><div class=docRoot_UBD9><aside class="theme-doc-sidebar-container docSidebarContainer_YfHR"><div class=sidebarViewport_aRkj><div class="sidebar_njMd sidebarWithHideableNavbar_wUlq"><a tabindex=-1 class=sidebarLogo_isFc href=/fortran/><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--light_NVdE"><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--dark_xIcU"><b>Fortran</b></a><nav aria-label="Docs sidebar" class="menu thin-scrollbar menu_SIkG"><ul class="theme-doc-sidebar-menu menu__list"><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/>Setup</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/basics>Basics</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/array>Array and Matrix</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/control>Logical control</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/loop>Loop</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/modules>Modules</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/procedures>Procedures</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/complex>Complex number</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/recursion>Recursion</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/types>Custom types</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/pointer>Pointer</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/file>File I/O</a><li class="theme-doc-sidebar-item-category theme-doc-sidebar-item-category-level-1 menu__list-item"><div class=menu__list-item-collapsible><a class="menu__link menu__link--sublist menu__link--active" href=/fortran/category/coding-practice>Coding practice</a><button aria-label="Collapse sidebar category 'Coding practice'" aria-expanded=true type=button class="clean-btn menu__caret"></button></div><ul style=display:block;overflow:visible;height:auto class=menu__list><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/swap>Swap two numbers</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/abs-path>Absolute path</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/hypotenuse>Calculate hypotenuse</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/integration>Numerical integration</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/haversine>Haversine formula</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class="menu__link menu__link--active" aria-current=page tabindex=0 href=/fortran/inner-product>Inner product</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/monte-carlo-pi>Monte Carlo method</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/monte-carlo-integration>Monte Carlo integration</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/time>Time</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/arg-parsing>Argument parsing</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/exec-command>External command</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/blas>BLAS</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/mpi>MPI Basics</a></ul><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/resources>Resources</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/license>License</a></ul></nav><button type=button title="Collapse sidebar" aria-label="Collapse sidebar" class="button button--secondary button--outline collapseSidebarButton_PEFL"><svg width=20 height=20 aria-hidden=true class=collapseSidebarButtonIcon_kv0_><g fill=#7a7a7a><path d="M9.992 10.023c0 .2-.062.399-.172.547l-4.996 7.492a.982.982 0 01-.828.454H1c-.55 0-1-.453-1-1 0-.2.059-.403.168-.551l4.629-6.942L.168 3.078A.939.939 0 010 2.528c0-.548.45-.997 1-.997h2.996c.352 0 .649.18.828.45L9.82 9.472c.11.148.172.347.172.55zm0 0"/><path d="M19.98 10.023c0 .2-.058.399-.168.547l-4.996 7.492a.987.987 0 01-.828.454h-3c-.547 0-.996-.453-.996-1 0-.2.059-.403.168-.551l4.625-6.942-4.625-6.945a.939.939 0 01-.168-.55 1 1 0 01.996-.997h3c.348 0 .649.18.828.45l4.996 7.492c.11.148.168.347.168.55zm0 0"/></g></svg></button></div></div></aside><main class=docMainContainer_TBSr><div class="container padding-top--md padding-bottom--lg"><div class=row><div class="col docItemCol_VOVn"><div class=docItemContainer_Djhp><article><nav class="theme-doc-breadcrumbs breadcrumbsContainer_Z_bl" aria-label=Breadcrumbs><ul class=breadcrumbs itemscope itemtype=https://schema.org/BreadcrumbList><li class=breadcrumbs__item><a aria-label="Home page" class=breadcrumbs__link href=/fortran/><svg viewBox="0 0 24 24" class=breadcrumbHomeIcon_YNFT><path d="M10 19v-5h4v5c0 .55.45 1 1 1h3c.55 0 1-.45 1-1v-7h1.7c.46 0 .68-.57.33-.87L12.67 3.6c-.38-.34-.96-.34-1.34 0l-8.36 7.53c-.34.3-.13.87.33.87H5v7c0 .55.45 1 1 1h3c.55 0 1-.45 1-1z" fill=currentColor /></svg></a><li itemscope itemprop=itemListElement itemtype=https://schema.org/ListItem class=breadcrumbs__item><a class=breadcrumbs__link itemprop=item href=/fortran/category/coding-practice><span itemprop=name>Coding practice</span></a><meta itemprop=position content=1><li itemscope itemprop=itemListElement itemtype=https://schema.org/ListItem class="breadcrumbs__item breadcrumbs__item--active"><span class=breadcrumbs__link itemprop=name>Inner product</span><meta itemprop=position content=2></ul></nav><div class="theme-doc-markdown markdown"><header><h1>Inner product: dynamic array allocation</h1></header><p>Example of dynamic array allocation:</p>
 <!-- -->
 <div class="language-fortran codeBlockContainer_Ckt0 theme-code-block" style=--prism-color:#393A34;--prism-background-color:#f6f8fa><div class=codeBlockTitle_Ktv7>src/19_inner_product.f90</div><div class=codeBlockContent_biex><pre tabindex=0 class="prism-code language-fortran codeBlock_bY9V thin-scrollbar" style=color:#393A34;background-color:#f6f8fa><code class="codeBlockLines_e6Vv codeBlockLinesWithNumbering_o6Pm"><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token keyword" style=color:#00009f>PROGRAM</span><span class="token plain"> inner_product</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>IMPLICIT NONE</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>INTEGER</span><span class="token plain"> length</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>REAL</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> </span><span class="token keyword" style=color:#00009f>DIMENSION</span><span class="token punctuation" style=color:#393A34>(</span><span class="token punctuation" style=color:#393A34>:</span><span class="token punctuation" style=color:#393A34>)</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> </span><span class="token keyword" style=color:#00009f>ALLOCATABLE</span><span class="token plain"> </span><span class="token operator" style=color:#393A34>::</span><span class="token plain"> a</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>REAL</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> </span><span class="token keyword" style=color:#00009f>DIMENSION</span><span class="token punctuation" style=color:#393A34>(</span><span class="token punctuation" style=color:#393A34>:</span><span class="token punctuation" style=color:#393A34>)</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> </span><span class="token keyword" style=color:#00009f>ALLOCATABLE</span><span class="token plain"> </span><span class="token operator" style=color:#393A34>::</span><span class="token plain"> b</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>INTEGER</span><span class="token plain"> i</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>REAL</span><span class="token plain"> </span><span class="token operator" style=color:#393A34>::</span><span class="token plain"> sum </span><span class="token operator" style=color:#393A34>=</span><span class="token plain"> </span><span class="token number" style=color:#36acaa>0.0</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>PRINT</span><span class="token plain"> </span><span class="token string" style=color:#e3116c>"(a,$)"</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> </span><span class="token string" style=color:#e3116c>"Enter length of vectors: "</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>READ</span><span class="token plain"> </span><span class="token operator" style=color:#393A34>*</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> length</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>IF</span><span class="token plain"> </span><span class="token punctuation" style=color:#393A34>(</span><span class="token plain"> length </span><span class="token operator" style=color:#393A34>&lt;</span><span class="token plain"> </span><span class="token number" style=color:#36acaa>1</span><span class="token plain"> </span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"> </span><span class="token keyword" style=color:#00009f>then</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">        </span><span class="token keyword" style=color:#00009f>PRINT</span><span class="token plain"> </span><span class="token operator" style=color:#393A34>*</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> </span><span class="token string" style=color:#e3116c>"Stopping: length must be positive definite."</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">        </span><span class="token keyword" style=color:#00009f>STOP</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>END IF</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>ALLOCATE</span><span class="token punctuation" style=color:#393A34>(</span><span class="token plain">a</span><span class="token punctuation" style=color:#393A34>(</span><span class="token plain">length</span><span class="token punctuation" style=color:#393A34>)</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>ALLOCATE</span><span class="token punctuation" style=color:#393A34>(</span><span class="token plain">b</span><span class="token punctuation" style=color:#393A34>(</span><span class="token plain">length</span><span class="token punctuation" style=color:#393A34>)</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>PRINT</span><span class="token plain"> </span><span class="token operator" style=color:#393A34>*</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> </span><span class="token string" style=color:#e3116c>"Enter first array components:"</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>DO</span><span class="token plain"> i </span><span class="token operator" style=color:#393A34>=</span><span class="token plain"> </span><span class="token number" style=color:#36acaa>1</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> length</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">        </span><span class="token keyword" style=color:#00009f>PRINT</span><span class="token plain"> </span><span class="token string" style=color:#e3116c>'(A,I4,A,$)'</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> </span><span class="token string" style=color:#e3116c>'a['</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> i</span><span class="token punctuation" style=color:#393A34>,</span><span class="token string" style=color:#e3116c>'] = '</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">        </span><span class="token keyword" style=color:#00009f>READ</span><span class="token plain"> </span><span class="token operator" style=color:#393A34>*</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> a</span><span class="token punctuation" style=color:#393A34>(</span><span class="token plain">i</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>END DO</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>PRINT</span><span class="token plain"> </span><span class="token operator" style=color:#393A34>*</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> </span><span class="token string" style=color:#e3116c>"Enter second array components:"</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>DO</span><span class="token plain"> i </span><span class="token operator" style=color:#393A34>=</span><span class="token plain"> </span><span class="token number" style=color:#36acaa>1</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> length</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">        </span><span class="token keyword" style=color:#00009f>PRINT</span><span class="token plain"> </span><span class="token string" style=color:#e3116c>'(A,I4,A,$)'</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> </span><span class="token string" style=color:#e3116c>'a['</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> i</span><span class="token punctuation" style=color:#393A34>,</span><span class="token string" style=color:#e3116c>'] = '</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">        </span><span class="token keyword" style=color:#00009f>READ</span><span class="token plain"> </span><span class="token operator" style=color:#393A34>*</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> b</span><span class="token punctuation" style=color:#393A34>(</span><span class="token plain">i</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>END DO</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>DO</span><span class="token plain"> i </span><span class="token operator" style=color:#393A34>=</span><span class="token plain"> </span><span class="token number" style=color:#36acaa>1</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> length</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">        sum </span><span class="token operator" style=color:#393A34>=</span><span class="token plain"> sum </span><span class="token operator" style=color:#393A34>+</span><span class="token plain"> a</span><span class="token punctuation" style=color:#393A34>(</span><span class="token plain">i</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"> </span><span class="token operator" style=color:#393A34>*</span><span class="token plain"> b</span><span class="token punctuation" style=color:#393A34>(</span><span class="token plain">i</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>END DO</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>PRINT</span><span class="token plain"> </span><span class="token string" style=color:#e3116c>'(A,F8.4)'</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> </span><span class="token string" style=color:#e3116c>'Inner product = '</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> sum</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token comment" style=color:#999988;font-style:italic>! we can use in-built dot_product as well</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>PRINT</span><span class="token plain"> </span><span class="token string" style=color:#e3116c>'(A,F8.4)'</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> </span><span class="token string" style=color:#e3116c>"Result using in-built dot_product = "</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> dot_product</span><span class="token punctuation" style=color:#393A34>(</span><span class="token plain">a</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> b</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>DEALLOCATE</span><span class="token punctuation" style=color:#393A34>(</span><span class="token plain">a</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>DEALLOCATE</span><span class="token punctuation" style=color:#393A34>(</span><span class="token plain">b</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain"></span><span class="token keyword" style=color:#00009f>END PROGRAM</span><span class="token plain"> inner_product</span></span><br></span></code></pre><div class=buttonGroup__atx><button type=button aria-label="Copy code to clipboard" title=Copy class=clean-btn><span class=copyButtonIcons_eSgA aria-hidden=true><svg viewBox="0 0 24 24" class=copyButtonIcon_y97N><path fill=currentColor d="M19,21H8V7H19M19,5H8A2,2 0 0,0 6,7V21A2,2 0 0,0 8,23H19A2,2 0 0,0 21,21V7A2,2 0 0,0 19,5M16,1H4A2,2 0 0,0 2,3V17H4V3H16V1Z"/></svg><svg viewBox="0 0 24 24" class=copyButtonSuccessIcon_LjdS><path fill=currentColor d=M21,7L9,19L3.5,13.5L4.91,12.09L9,16.17L19.59,5.59L21,7Z /></svg></span></button></div></div></div></div><footer class="theme-doc-footer docusaurus-mt-lg"><div class="row margin-top--sm theme-doc-footer-edit-meta-row"><div class=col><a href=https://github.com/pranabdas/fortran/blob/main/docs/inner-product.mdx target=_blank rel="noopener noreferrer" class=theme-edit-this-page><svg fill=currentColor height=20 width=20 viewBox="0 0 40 40" class=iconEdit_Z9Sw aria-hidden=true><g><path d="m34.5 11.7l-3 3.1-6.3-6.3 3.1-3q0.5-0.5 1.2-0.5t1.1 0.5l3.9 3.9q0.5 0.4 0.5 1.1t-0.5 1.2z m-29.5 17.1l18.4-18.5 6.3 6.3-18.4 18.4h-6.3v-6.2z"/></g></svg>Edit this page</a></div><div class="col lastUpdated_JAkA"></div></div></footer></article><nav class="pagination-nav docusaurus-mt-lg" aria-label="Docs pages"><a class="pagination-nav__link pagination-nav__link--prev" href=/fortran/haversine><div class=pagination-nav__sublabel>Previous</div><div class=pagination-nav__label>Haversine formula</div></a><a class="pagination-nav__link pagination-nav__link--next" href=/fortran/monte-carlo-pi><div class=pagination-nav__sublabel>Next</div><div class=pagination-nav__label>Monte Carlo method</div></a></nav></div></div></div></div></main></div></div></div><footer class="footer footer--dark"><div class="container container-fluid"><div class="footer__bottom text--center"><div class=footer__copyright>Copyright © 2024 Pranab Das. All rights
       reserved.</div></div></div></footer></div>
\ No newline at end of file
diff --git a/integration/index.html b/integration/index.html
index 0abb8c2..892b8a4 100644
--- a/integration/index.html
+++ b/integration/index.html
@@ -1,4 +1,4 @@
-<!doctype html><html lang=en dir=ltr class="docs-wrapper plugin-docs plugin-id-default docs-version-current docs-doc-page docs-doc-id-integration" data-has-hydrated=false><meta charset=UTF-8><meta name=generator content="Docusaurus v3.6.1"><title data-rh=true>Numerical integration: Trapezoidal method • Fortran Tutorial</title><meta data-rh=true name=viewport content="width=device-width,initial-scale=1.0"><meta data-rh=true name=twitter:card content=summary_large_image><meta data-rh=true property=og:url content=https://pranabdas.github.io/fortran/integration><meta data-rh=true property=og:locale content=en><meta data-rh=true name=docusaurus_locale content=en><meta data-rh=true name=docsearch:language content=en><meta data-rh=true name=theme-color content=#06445c><meta data-rh=true name=docusaurus_version content=current><meta data-rh=true name=docusaurus_tag content=docs-default-current><meta data-rh=true name=docsearch:version content=current><meta data-rh=true name=docsearch:docusaurus_tag content=docs-default-current><meta data-rh=true property=og:title content="Numerical integration: Trapezoidal method • Fortran Tutorial"><meta data-rh=true name=description content="We will calculate the area under the curve $f(x)$ within the bounds $x=a$ and"><meta data-rh=true property=og:description content="We will calculate the area under the curve $f(x)$ within the bounds $x=a$ and"><link data-rh=true rel=icon href=/fortran/img/favicon.png><link data-rh=true rel=canonical href=https://pranabdas.github.io/fortran/integration><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/integration hreflang=en><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/integration hreflang=x-default><link rel=stylesheet href=https://pranabdas.github.io/drive/webfonts/katex/katex.min.css><link rel=stylesheet href=/fortran/assets/css/styles.4de1c8a8.css><script src=/fortran/assets/js/runtime~main.866c090c.js defer></script><script src=/fortran/assets/js/main.ec888ba8.js defer></script><body class=navigation-with-keyboard><script>!function(){var t,e=function(){try{return new URLSearchParams(window.location.search).get("docusaurus-theme")}catch(t){}}()||function(){try{return window.localStorage.getItem("theme")}catch(t){}}();t=null!==e?e:window.matchMedia("(prefers-color-scheme: dark)").matches?"dark":(window.matchMedia("(prefers-color-scheme: light)").matches,"light"),document.documentElement.setAttribute("data-theme",t)}(),function(){try{for(var[t,e]of new URLSearchParams(window.location.search).entries())if(t.startsWith("docusaurus-data-")){var a=t.replace("docusaurus-data-","data-");document.documentElement.setAttribute(a,e)}}catch(t){}}()</script><div id=__docusaurus><div role=region aria-label="Skip to main content"><a class=skipToContent_fXgn href=#__docusaurus_skipToContent_fallback>Skip to main content</a></div><nav aria-label=Main class="navbar navbar--fixed-top navbarHideable_m1mJ"><div class=navbar__inner><div class=navbar__items><button aria-label="Toggle navigation bar" aria-expanded=false class="navbar__toggle clean-btn" type=button><svg width=30 height=30 viewBox="0 0 30 30" aria-hidden=true><path stroke=currentColor stroke-linecap=round stroke-miterlimit=10 stroke-width=2 d="M4 7h22M4 15h22M4 23h22"/></svg></button><a class=navbar__brand href=/fortran/><div class=navbar__logo><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--light_NVdE"><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--dark_xIcU"></div><b class="navbar__title text--truncate">Fortran</b></a><div class="navbar__item dropdown dropdown--hoverable"><a aria-current=page class="navbar__link active" aria-haspopup=true aria-expanded=false role=button href=/fortran/>Docs</a><ul class=dropdown__menu><li><a aria-current=page class="dropdown__link dropdown__link--active" href=/fortran/>Fortran Programming</a><li><a href=https://pranabdas.github.io/docs/ rel="noopener noreferrer" class=dropdown__link>~ ~ ~ Other Docs ~ ~ ~</a><li><a href=https://pranabdas.github.io/arpespythontools/ rel="noopener noreferrer" class=dropdown__link>ARPES Python Tools</a><li><a href=https://pranabdas.github.io/c-cpp/ rel="noopener noreferrer" class=dropdown__link>C and C++ Programming</a><li><a href=https://pranabdas.github.io/condmat-notes/ rel="noopener noreferrer" class=dropdown__link>Condensed Matter Notes</a><li><a href=https://pranabdas.github.io/javascript/ rel="noopener noreferrer" class=dropdown__link>Javascript Tutorial</a><li><a href=https://pranabdas.github.io/linux/ rel="noopener noreferrer" class=dropdown__link>Linux Tutorial</a><li><a href=https://pranabdas.github.io/machine-learning/ rel="noopener noreferrer" class=dropdown__link>Machine Learning Notes</a><li><a href=https://pranabdas.github.io/openmx/ rel="noopener noreferrer" class=dropdown__link>OpenMX tutorial</a><li><a href=https://pranabdas.github.io/python-tutorial/ rel="noopener noreferrer" class=dropdown__link>Python Tutorial</a><li><a href=https://pranabdas.github.io/espresso/ rel="noopener noreferrer" class=dropdown__link>Quantum Espresso Tutorial</a><li><a href=https://pranabdas.github.io/rust/ rel="noopener noreferrer" class=dropdown__link>Rust Programming</a><li><a href=https://pranabdas.github.io/arpes-manual/ rel="noopener noreferrer" class=dropdown__link>SUV ARPES Manual</a><li><a href=https://pranabdas.github.io/suvtools/ rel="noopener noreferrer" class=dropdown__link>SUV Python Tools</a></ul></div></div><div class="navbar__items navbar__items--right"><a href=https://github.com/pranabdas/fortran rel="noopener noreferrer" class="navbar__item navbar__link header-github-link" aria-label="GitHub repository" title="Visit project repository in GitHub"></a><a href=https://pranabdas.github.io rel="noopener noreferrer" class="navbar__item navbar__link header-homepage-link" aria-label="About me" title="Go to Pranab's Homepage"></a><div class="toggle_vylO colorModeToggle_DEke"><button class="clean-btn toggleButton_gllP toggleButtonDisabled_aARS" type=button disabled title="Switch between dark and light mode (currently light mode)" aria-label="Switch between dark and light mode (currently light mode)" aria-live=polite aria-pressed=false><svg viewBox="0 0 24 24" width=24 height=24 class=lightToggleIcon_pyhR><path fill=currentColor d="M12,9c1.65,0,3,1.35,3,3s-1.35,3-3,3s-3-1.35-3-3S10.35,9,12,9 M12,7c-2.76,0-5,2.24-5,5s2.24,5,5,5s5-2.24,5-5 S14.76,7,12,7L12,7z M2,13l2,0c0.55,0,1-0.45,1-1s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S1.45,13,2,13z M20,13l2,0c0.55,0,1-0.45,1-1 s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S19.45,13,20,13z M11,2v2c0,0.55,0.45,1,1,1s1-0.45,1-1V2c0-0.55-0.45-1-1-1S11,1.45,11,2z M11,20v2c0,0.55,0.45,1,1,1s1-0.45,1-1v-2c0-0.55-0.45-1-1-1C11.45,19,11,19.45,11,20z M5.99,4.58c-0.39-0.39-1.03-0.39-1.41,0 c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0s0.39-1.03,0-1.41L5.99,4.58z M18.36,16.95 c-0.39-0.39-1.03-0.39-1.41,0c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0c0.39-0.39,0.39-1.03,0-1.41 L18.36,16.95z M19.42,5.99c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06c-0.39,0.39-0.39,1.03,0,1.41 s1.03,0.39,1.41,0L19.42,5.99z M7.05,18.36c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06 c-0.39,0.39-0.39,1.03,0,1.41s1.03,0.39,1.41,0L7.05,18.36z"/></svg><svg viewBox="0 0 24 24" width=24 height=24 class=darkToggleIcon_wfgR><path fill=currentColor d="M9.37,5.51C9.19,6.15,9.1,6.82,9.1,7.5c0,4.08,3.32,7.4,7.4,7.4c0.68,0,1.35-0.09,1.99-0.27C17.45,17.19,14.93,19,12,19 c-3.86,0-7-3.14-7-7C5,9.07,6.81,6.55,9.37,5.51z M12,3c-4.97,0-9,4.03-9,9s4.03,9,9,9s9-4.03,9-9c0-0.46-0.04-0.92-0.1-1.36 c-0.98,1.37-2.58,2.26-4.4,2.26c-2.98,0-5.4-2.42-5.4-5.4c0-1.81,0.89-3.42,2.26-4.4C12.92,3.04,12.46,3,12,3L12,3z"/></svg></button></div><div class=navbarSearchContainer_Bca1><div class="navbar__search searchBarContainer_NW3z" dir=ltr><input placeholder=Search aria-label=Search class=navbar__search-input value=""><div class="loadingRing_RJI3 searchBarLoadingRing_YnHq"><div></div><div></div><div></div><div></div></div></div></div></div></div><div role=presentation class=navbar-sidebar__backdrop></div></nav><div id=__docusaurus_skipToContent_fallback class="main-wrapper mainWrapper_z2l0"><div class=docsWrapper_hBAB><button aria-label="Scroll back to top" class="clean-btn theme-back-to-top-button backToTopButton_sjWU" type=button></button><div class=docRoot_UBD9><aside class="theme-doc-sidebar-container docSidebarContainer_YfHR"><div class=sidebarViewport_aRkj><div class="sidebar_njMd sidebarWithHideableNavbar_wUlq"><a tabindex=-1 class=sidebarLogo_isFc href=/fortran/><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--light_NVdE"><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--dark_xIcU"><b>Fortran</b></a><nav aria-label="Docs sidebar" class="menu thin-scrollbar menu_SIkG"><ul class="theme-doc-sidebar-menu menu__list"><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/>Setup</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/basics>Basics</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/array>Array and Matrix</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/control>Logical control</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/loop>Loop</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/modules>Modules</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/procedures>Procedures</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/complex>Complex number</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/recursion>Recursion</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/types>Custom types</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/pointer>Pointer</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/file>File I/O</a><li class="theme-doc-sidebar-item-category theme-doc-sidebar-item-category-level-1 menu__list-item"><div class=menu__list-item-collapsible><a class="menu__link menu__link--sublist menu__link--active" href=/fortran/category/coding-practice>Coding practice</a><button aria-label="Collapse sidebar category 'Coding practice'" aria-expanded=true type=button class="clean-btn menu__caret"></button></div><ul style=display:block;overflow:visible;height:auto class=menu__list><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/swap>Swap two numbers</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/abs-path>Absolute path</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/hypotenuse>Calculate hypotenuse</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class="menu__link menu__link--active" aria-current=page tabindex=0 href=/fortran/integration>Numerical integration</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/haversine>Haversine formula</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/inner-product>Inner product</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/monte-carlo-pi>Monte Carlo method</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/monte-carlo-integration>Monte Carlo integration</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/time>Time</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/arg-parsing>Argument parsing</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/exec-command>External command</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/blas>BLAS</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/mpi>MPI Basics</a></ul><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/resources>Resources</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/license>License</a></ul></nav><button type=button title="Collapse sidebar" aria-label="Collapse sidebar" class="button button--secondary button--outline collapseSidebarButton_PEFL"><svg width=20 height=20 aria-hidden=true class=collapseSidebarButtonIcon_kv0_><g fill=#7a7a7a><path d="M9.992 10.023c0 .2-.062.399-.172.547l-4.996 7.492a.982.982 0 01-.828.454H1c-.55 0-1-.453-1-1 0-.2.059-.403.168-.551l4.629-6.942L.168 3.078A.939.939 0 010 2.528c0-.548.45-.997 1-.997h2.996c.352 0 .649.18.828.45L9.82 9.472c.11.148.172.347.172.55zm0 0"/><path d="M19.98 10.023c0 .2-.058.399-.168.547l-4.996 7.492a.987.987 0 01-.828.454h-3c-.547 0-.996-.453-.996-1 0-.2.059-.403.168-.551l4.625-6.942-4.625-6.945a.939.939 0 01-.168-.55 1 1 0 01.996-.997h3c.348 0 .649.18.828.45l4.996 7.492c.11.148.168.347.168.55zm0 0"/></g></svg></button></div></div></aside><main class=docMainContainer_TBSr><div class="container padding-top--md padding-bottom--lg"><div class=row><div class="col docItemCol_VOVn"><div class=docItemContainer_Djhp><article><nav class="theme-doc-breadcrumbs breadcrumbsContainer_Z_bl" aria-label=Breadcrumbs><ul class=breadcrumbs itemscope itemtype=https://schema.org/BreadcrumbList><li class=breadcrumbs__item><a aria-label="Home page" class=breadcrumbs__link href=/fortran/><svg viewBox="0 0 24 24" class=breadcrumbHomeIcon_YNFT><path d="M10 19v-5h4v5c0 .55.45 1 1 1h3c.55 0 1-.45 1-1v-7h1.7c.46 0 .68-.57.33-.87L12.67 3.6c-.38-.34-.96-.34-1.34 0l-8.36 7.53c-.34.3-.13.87.33.87H5v7c0 .55.45 1 1 1h3c.55 0 1-.45 1-1z" fill=currentColor /></svg></a><li itemscope itemprop=itemListElement itemtype=https://schema.org/ListItem class=breadcrumbs__item><a class=breadcrumbs__link itemprop=item href=/fortran/category/coding-practice><span itemprop=name>Coding practice</span></a><meta itemprop=position content=1><li itemscope itemprop=itemListElement itemtype=https://schema.org/ListItem class="breadcrumbs__item breadcrumbs__item--active"><span class=breadcrumbs__link itemprop=name>Numerical integration</span><meta itemprop=position content=2></ul></nav><div class="tocCollapsible_ETCw theme-doc-toc-mobile tocMobile_ITEo"><button type=button class="clean-btn tocCollapsibleButton_TO0P">On this page</button></div><div class="theme-doc-markdown markdown"><header><h1>Numerical integration: Trapezoidal method</h1></header><p>We will calculate the area under the curve <span class=katex><span class=katex-mathml><math><semantics><mrow><mi>f</mi><mo stretchy=false>(</mo><mi>x</mi><mo stretchy=false>)</mo></mrow><annotation encoding=application/x-tex>f(x)</annotation></semantics></math></span><span class=katex-html aria-hidden=true><span class=base><span class=strut style=height:1em;vertical-align:-0.25em></span><span class="mord mathnormal" style=margin-right:0.10764em>f</span><span class=mopen>(</span><span class="mord mathnormal">x</span><span class=mclose>)</span></span></span></span> within the bounds <span class=katex><span class=katex-mathml><math><semantics><mrow><mi>x</mi><mo>=</mo><mi>a</mi></mrow><annotation encoding=application/x-tex>x=a</annotation></semantics></math></span><span class=katex-html aria-hidden=true><span class=base><span class=strut style=height:0.4306em></span><span class="mord mathnormal">x</span><span class=mspace style=margin-right:0.2778em></span><span class=mrel>=</span><span class=mspace style=margin-right:0.2778em></span></span><span class=base><span class=strut style=height:0.4306em></span><span class="mord mathnormal">a</span></span></span></span> and
+<!doctype html><html lang=en dir=ltr class="docs-wrapper plugin-docs plugin-id-default docs-version-current docs-doc-page docs-doc-id-integration" data-has-hydrated=false><meta charset=UTF-8><meta name=generator content="Docusaurus v3.6.1"><title data-rh=true>Numerical integration: Trapezoidal method • Fortran Tutorial</title><meta data-rh=true name=viewport content="width=device-width,initial-scale=1.0"><meta data-rh=true name=twitter:card content=summary_large_image><meta data-rh=true property=og:url content=https://pranabdas.github.io/fortran/integration><meta data-rh=true property=og:locale content=en><meta data-rh=true name=docusaurus_locale content=en><meta data-rh=true name=docsearch:language content=en><meta data-rh=true name=theme-color content=#06445c><meta data-rh=true name=docusaurus_version content=current><meta data-rh=true name=docusaurus_tag content=docs-default-current><meta data-rh=true name=docsearch:version content=current><meta data-rh=true name=docsearch:docusaurus_tag content=docs-default-current><meta data-rh=true property=og:title content="Numerical integration: Trapezoidal method • Fortran Tutorial"><meta data-rh=true name=description content="We will calculate the area under the curve $f(x)$ within the bounds $x=a$ and"><meta data-rh=true property=og:description content="We will calculate the area under the curve $f(x)$ within the bounds $x=a$ and"><link data-rh=true rel=icon href=/fortran/img/favicon.png><link data-rh=true rel=canonical href=https://pranabdas.github.io/fortran/integration><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/integration hreflang=en><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/integration hreflang=x-default><link rel=stylesheet href=https://pranab.pages.dev/assets/fonts/katex/katex.min.css><link rel=stylesheet href=/fortran/assets/css/styles.4de1c8a8.css><script src=/fortran/assets/js/runtime~main.667e3c0f.js defer></script><script src=/fortran/assets/js/main.10795e8f.js defer></script><body class=navigation-with-keyboard><script>!function(){var t,e=function(){try{return new URLSearchParams(window.location.search).get("docusaurus-theme")}catch(t){}}()||function(){try{return window.localStorage.getItem("theme")}catch(t){}}();t=null!==e?e:window.matchMedia("(prefers-color-scheme: dark)").matches?"dark":(window.matchMedia("(prefers-color-scheme: light)").matches,"light"),document.documentElement.setAttribute("data-theme",t)}(),function(){try{for(var[t,e]of new URLSearchParams(window.location.search).entries())if(t.startsWith("docusaurus-data-")){var a=t.replace("docusaurus-data-","data-");document.documentElement.setAttribute(a,e)}}catch(t){}}()</script><div id=__docusaurus><div role=region aria-label="Skip to main content"><a class=skipToContent_fXgn href=#__docusaurus_skipToContent_fallback>Skip to main content</a></div><nav aria-label=Main class="navbar navbar--fixed-top navbarHideable_m1mJ"><div class=navbar__inner><div class=navbar__items><button aria-label="Toggle navigation bar" aria-expanded=false class="navbar__toggle clean-btn" type=button><svg width=30 height=30 viewBox="0 0 30 30" aria-hidden=true><path stroke=currentColor stroke-linecap=round stroke-miterlimit=10 stroke-width=2 d="M4 7h22M4 15h22M4 23h22"/></svg></button><a class=navbar__brand href=/fortran/><div class=navbar__logo><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--light_NVdE"><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--dark_xIcU"></div><b class="navbar__title text--truncate">Fortran</b></a><div class="navbar__item dropdown dropdown--hoverable"><a aria-current=page class="navbar__link active" aria-haspopup=true aria-expanded=false role=button href=/fortran/>Docs</a><ul class=dropdown__menu><li><a aria-current=page class="dropdown__link dropdown__link--active" href=/fortran/>Fortran Programming</a><li><a href=https://pranabdas.github.io/docs/ rel="noopener noreferrer" class=dropdown__link>~ ~ ~ Other Docs ~ ~ ~</a><li><a href=https://pranabdas.github.io/arpespythontools/ rel="noopener noreferrer" class=dropdown__link>ARPES Python Tools</a><li><a href=https://pranabdas.github.io/c-cpp/ rel="noopener noreferrer" class=dropdown__link>C and C++ Programming</a><li><a href=https://pranabdas.github.io/condmat-notes/ rel="noopener noreferrer" class=dropdown__link>Condensed Matter Notes</a><li><a href=https://pranabdas.github.io/javascript/ rel="noopener noreferrer" class=dropdown__link>Javascript Tutorial</a><li><a href=https://pranabdas.github.io/linux/ rel="noopener noreferrer" class=dropdown__link>Linux Tutorial</a><li><a href=https://pranabdas.github.io/machine-learning/ rel="noopener noreferrer" class=dropdown__link>Machine Learning Notes</a><li><a href=https://pranabdas.github.io/openmx/ rel="noopener noreferrer" class=dropdown__link>OpenMX tutorial</a><li><a href=https://pranabdas.github.io/python-tutorial/ rel="noopener noreferrer" class=dropdown__link>Python Tutorial</a><li><a href=https://pranabdas.github.io/espresso/ rel="noopener noreferrer" class=dropdown__link>Quantum Espresso Tutorial</a><li><a href=https://pranabdas.github.io/rust/ rel="noopener noreferrer" class=dropdown__link>Rust Programming</a><li><a href=https://pranabdas.github.io/arpes-manual/ rel="noopener noreferrer" class=dropdown__link>SUV ARPES Manual</a><li><a href=https://pranabdas.github.io/suvtools/ rel="noopener noreferrer" class=dropdown__link>SUV Python Tools</a></ul></div></div><div class="navbar__items navbar__items--right"><a href=https://github.com/pranabdas/fortran rel="noopener noreferrer" class="navbar__item navbar__link header-github-link" aria-label="GitHub repository" title="Visit project repository in GitHub"></a><a href=https://pranabdas.github.io rel="noopener noreferrer" class="navbar__item navbar__link header-homepage-link" aria-label="About me" title="Go to Pranab's Homepage"></a><div class="toggle_vylO colorModeToggle_DEke"><button class="clean-btn toggleButton_gllP toggleButtonDisabled_aARS" type=button disabled title="Switch between dark and light mode (currently light mode)" aria-label="Switch between dark and light mode (currently light mode)" aria-live=polite aria-pressed=false><svg viewBox="0 0 24 24" width=24 height=24 class=lightToggleIcon_pyhR><path fill=currentColor d="M12,9c1.65,0,3,1.35,3,3s-1.35,3-3,3s-3-1.35-3-3S10.35,9,12,9 M12,7c-2.76,0-5,2.24-5,5s2.24,5,5,5s5-2.24,5-5 S14.76,7,12,7L12,7z M2,13l2,0c0.55,0,1-0.45,1-1s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S1.45,13,2,13z M20,13l2,0c0.55,0,1-0.45,1-1 s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S19.45,13,20,13z M11,2v2c0,0.55,0.45,1,1,1s1-0.45,1-1V2c0-0.55-0.45-1-1-1S11,1.45,11,2z M11,20v2c0,0.55,0.45,1,1,1s1-0.45,1-1v-2c0-0.55-0.45-1-1-1C11.45,19,11,19.45,11,20z M5.99,4.58c-0.39-0.39-1.03-0.39-1.41,0 c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0s0.39-1.03,0-1.41L5.99,4.58z M18.36,16.95 c-0.39-0.39-1.03-0.39-1.41,0c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0c0.39-0.39,0.39-1.03,0-1.41 L18.36,16.95z M19.42,5.99c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06c-0.39,0.39-0.39,1.03,0,1.41 s1.03,0.39,1.41,0L19.42,5.99z M7.05,18.36c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06 c-0.39,0.39-0.39,1.03,0,1.41s1.03,0.39,1.41,0L7.05,18.36z"/></svg><svg viewBox="0 0 24 24" width=24 height=24 class=darkToggleIcon_wfgR><path fill=currentColor d="M9.37,5.51C9.19,6.15,9.1,6.82,9.1,7.5c0,4.08,3.32,7.4,7.4,7.4c0.68,0,1.35-0.09,1.99-0.27C17.45,17.19,14.93,19,12,19 c-3.86,0-7-3.14-7-7C5,9.07,6.81,6.55,9.37,5.51z M12,3c-4.97,0-9,4.03-9,9s4.03,9,9,9s9-4.03,9-9c0-0.46-0.04-0.92-0.1-1.36 c-0.98,1.37-2.58,2.26-4.4,2.26c-2.98,0-5.4-2.42-5.4-5.4c0-1.81,0.89-3.42,2.26-4.4C12.92,3.04,12.46,3,12,3L12,3z"/></svg></button></div><div class=navbarSearchContainer_Bca1><div class="navbar__search searchBarContainer_NW3z" dir=ltr><input placeholder=Search aria-label=Search class=navbar__search-input value=""><div class="loadingRing_RJI3 searchBarLoadingRing_YnHq"><div></div><div></div><div></div><div></div></div></div></div></div></div><div role=presentation class=navbar-sidebar__backdrop></div></nav><div id=__docusaurus_skipToContent_fallback class="main-wrapper mainWrapper_z2l0"><div class=docsWrapper_hBAB><button aria-label="Scroll back to top" class="clean-btn theme-back-to-top-button backToTopButton_sjWU" type=button></button><div class=docRoot_UBD9><aside class="theme-doc-sidebar-container docSidebarContainer_YfHR"><div class=sidebarViewport_aRkj><div class="sidebar_njMd sidebarWithHideableNavbar_wUlq"><a tabindex=-1 class=sidebarLogo_isFc href=/fortran/><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--light_NVdE"><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--dark_xIcU"><b>Fortran</b></a><nav aria-label="Docs sidebar" class="menu thin-scrollbar menu_SIkG"><ul class="theme-doc-sidebar-menu menu__list"><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/>Setup</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/basics>Basics</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/array>Array and Matrix</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/control>Logical control</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/loop>Loop</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/modules>Modules</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/procedures>Procedures</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/complex>Complex number</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/recursion>Recursion</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/types>Custom types</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/pointer>Pointer</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/file>File I/O</a><li class="theme-doc-sidebar-item-category theme-doc-sidebar-item-category-level-1 menu__list-item"><div class=menu__list-item-collapsible><a class="menu__link menu__link--sublist menu__link--active" href=/fortran/category/coding-practice>Coding practice</a><button aria-label="Collapse sidebar category 'Coding practice'" aria-expanded=true type=button class="clean-btn menu__caret"></button></div><ul style=display:block;overflow:visible;height:auto class=menu__list><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/swap>Swap two numbers</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/abs-path>Absolute path</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/hypotenuse>Calculate hypotenuse</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class="menu__link menu__link--active" aria-current=page tabindex=0 href=/fortran/integration>Numerical integration</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/haversine>Haversine formula</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/inner-product>Inner product</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/monte-carlo-pi>Monte Carlo method</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/monte-carlo-integration>Monte Carlo integration</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/time>Time</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/arg-parsing>Argument parsing</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/exec-command>External command</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/blas>BLAS</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/mpi>MPI Basics</a></ul><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/resources>Resources</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/license>License</a></ul></nav><button type=button title="Collapse sidebar" aria-label="Collapse sidebar" class="button button--secondary button--outline collapseSidebarButton_PEFL"><svg width=20 height=20 aria-hidden=true class=collapseSidebarButtonIcon_kv0_><g fill=#7a7a7a><path d="M9.992 10.023c0 .2-.062.399-.172.547l-4.996 7.492a.982.982 0 01-.828.454H1c-.55 0-1-.453-1-1 0-.2.059-.403.168-.551l4.629-6.942L.168 3.078A.939.939 0 010 2.528c0-.548.45-.997 1-.997h2.996c.352 0 .649.18.828.45L9.82 9.472c.11.148.172.347.172.55zm0 0"/><path d="M19.98 10.023c0 .2-.058.399-.168.547l-4.996 7.492a.987.987 0 01-.828.454h-3c-.547 0-.996-.453-.996-1 0-.2.059-.403.168-.551l4.625-6.942-4.625-6.945a.939.939 0 01-.168-.55 1 1 0 01.996-.997h3c.348 0 .649.18.828.45l4.996 7.492c.11.148.168.347.168.55zm0 0"/></g></svg></button></div></div></aside><main class=docMainContainer_TBSr><div class="container padding-top--md padding-bottom--lg"><div class=row><div class="col docItemCol_VOVn"><div class=docItemContainer_Djhp><article><nav class="theme-doc-breadcrumbs breadcrumbsContainer_Z_bl" aria-label=Breadcrumbs><ul class=breadcrumbs itemscope itemtype=https://schema.org/BreadcrumbList><li class=breadcrumbs__item><a aria-label="Home page" class=breadcrumbs__link href=/fortran/><svg viewBox="0 0 24 24" class=breadcrumbHomeIcon_YNFT><path d="M10 19v-5h4v5c0 .55.45 1 1 1h3c.55 0 1-.45 1-1v-7h1.7c.46 0 .68-.57.33-.87L12.67 3.6c-.38-.34-.96-.34-1.34 0l-8.36 7.53c-.34.3-.13.87.33.87H5v7c0 .55.45 1 1 1h3c.55 0 1-.45 1-1z" fill=currentColor /></svg></a><li itemscope itemprop=itemListElement itemtype=https://schema.org/ListItem class=breadcrumbs__item><a class=breadcrumbs__link itemprop=item href=/fortran/category/coding-practice><span itemprop=name>Coding practice</span></a><meta itemprop=position content=1><li itemscope itemprop=itemListElement itemtype=https://schema.org/ListItem class="breadcrumbs__item breadcrumbs__item--active"><span class=breadcrumbs__link itemprop=name>Numerical integration</span><meta itemprop=position content=2></ul></nav><div class="tocCollapsible_ETCw theme-doc-toc-mobile tocMobile_ITEo"><button type=button class="clean-btn tocCollapsibleButton_TO0P">On this page</button></div><div class="theme-doc-markdown markdown"><header><h1>Numerical integration: Trapezoidal method</h1></header><p>We will calculate the area under the curve <span class=katex><span class=katex-mathml><math><semantics><mrow><mi>f</mi><mo stretchy=false>(</mo><mi>x</mi><mo stretchy=false>)</mo></mrow><annotation encoding=application/x-tex>f(x)</annotation></semantics></math></span><span class=katex-html aria-hidden=true><span class=base><span class=strut style=height:1em;vertical-align:-0.25em></span><span class="mord mathnormal" style=margin-right:0.10764em>f</span><span class=mopen>(</span><span class="mord mathnormal">x</span><span class=mclose>)</span></span></span></span> within the bounds <span class=katex><span class=katex-mathml><math><semantics><mrow><mi>x</mi><mo>=</mo><mi>a</mi></mrow><annotation encoding=application/x-tex>x=a</annotation></semantics></math></span><span class=katex-html aria-hidden=true><span class=base><span class=strut style=height:0.4306em></span><span class="mord mathnormal">x</span><span class=mspace style=margin-right:0.2778em></span><span class=mrel>=</span><span class=mspace style=margin-right:0.2778em></span></span><span class=base><span class=strut style=height:0.4306em></span><span class="mord mathnormal">a</span></span></span></span> and
 <span class=katex><span class=katex-mathml><math><semantics><mrow><mi>x</mi><mo>=</mo><mi>b</mi></mrow><annotation encoding=application/x-tex>x=b</annotation></semantics></math></span><span class=katex-html aria-hidden=true><span class=base><span class=strut style=height:0.4306em></span><span class="mord mathnormal">x</span><span class=mspace style=margin-right:0.2778em></span><span class=mrel>=</span><span class=mspace style=margin-right:0.2778em></span></span><span class=base><span class=strut style=height:0.6944em></span><span class="mord mathnormal">b</span></span></span></span>. We will divide the curve into <span class=katex><span class=katex-mathml><math><semantics><mrow><mi>n</mi></mrow><annotation encoding=application/x-tex>n</annotation></semantics></math></span><span class=katex-html aria-hidden=true><span class=base><span class=strut style=height:0.4306em></span><span class="mord mathnormal">n</span></span></span></span> trapezoids with width <span class=katex><span class=katex-mathml><math><semantics><mrow><mi>h</mi><mo>=</mo><mo stretchy=false>(</mo><mi>b</mi><mo>−</mo><mi>a</mi><mo stretchy=false>)</mo><mi mathvariant=normal>/</mi><mi>n</mi></mrow><annotation encoding=application/x-tex>h=(b-a)/n</annotation></semantics></math></span><span class=katex-html aria-hidden=true><span class=base><span class=strut style=height:0.6944em></span><span class="mord mathnormal">h</span><span class=mspace style=margin-right:0.2778em></span><span class=mrel>=</span><span class=mspace style=margin-right:0.2778em></span></span><span class=base><span class=strut style=height:1em;vertical-align:-0.25em></span><span class=mopen>(</span><span class="mord mathnormal">b</span><span class=mspace style=margin-right:0.2222em></span><span class=mbin>−</span><span class=mspace style=margin-right:0.2222em></span></span><span class=base><span class=strut style=height:1em;vertical-align:-0.25em></span><span class="mord mathnormal">a</span><span class=mclose>)</span><span class=mord>/</span><span class="mord mathnormal">n</span></span></span></span>. Area
 under the curve:</p>
 <span class=katex-display><span class=katex><span class=katex-mathml><math display=block><semantics><mrow><msub><mi>A</mi><mi>n</mi></msub><mo>=</mo><mi>h</mi><mrow><mo fence=true>[</mo><mfrac><mrow><mi>f</mi><mo stretchy=false>(</mo><mi>a</mi><mo stretchy=false>)</mo></mrow><mn>2</mn></mfrac><mo>+</mo><mi>f</mi><mo stretchy=false>(</mo><mi>a</mi><mo>+</mo><mi>h</mi><mo stretchy=false>)</mo><mo>+</mo><mi>f</mi><mo stretchy=false>(</mo><mi>a</mi><mo>+</mo><mn>2</mn><mi>h</mi><mo stretchy=false>)</mo><mo>+</mo><mo>⋯</mo><mo>+</mo><mfrac><mrow><mi>f</mi><mo stretchy=false>(</mo><mi>b</mi><mo stretchy=false>)</mo></mrow><mn>2</mn></mfrac><mo fence=true>]</mo></mrow></mrow><annotation encoding=application/x-tex>A_n = h \left[\frac{f(a)}{2} + f(a+h) + f(a+2h) + \cdots + \frac{f(b)}{2}\right]</annotation></semantics></math></span><span class=katex-html aria-hidden=true><span class=base><span class=strut style=height:0.8333em;vertical-align:-0.15em></span><span class=mord><span class="mord mathnormal">A</span><span class=msupsub><span class="vlist-t vlist-t2"><span class=vlist-r><span class=vlist style=height:0.1514em><span style=top:-2.55em;margin-left:0em;margin-right:0.05em><span class=pstrut style=height:2.7em></span><span class="sizing reset-size6 size3 mtight"><span class="mord mathnormal mtight">n</span></span></span></span><span class=vlist-s>​</span></span><span class=vlist-r><span class=vlist style=height:0.15em><span></span></span></span></span></span></span><span class=mspace style=margin-right:0.2778em></span><span class=mrel>=</span><span class=mspace style=margin-right:0.2778em></span></span><span class=base><span class=strut style=height:2.4em;vertical-align:-0.95em></span><span class="mord mathnormal">h</span><span class=mspace style=margin-right:0.1667em></span><span class=minner><span class="mopen delimcenter" style=top:0em><span class="delimsizing size3">[</span></span><span class=mord><span class="mopen nulldelimiter"></span><span class=mfrac><span class="vlist-t vlist-t2"><span class=vlist-r><span class=vlist style=height:1.427em><span style=top:-2.314em><span class=pstrut style=height:3em></span><span class=mord><span class=mord>2</span></span></span><span style=top:-3.23em><span class=pstrut style=height:3em></span><span class=frac-line style=border-bottom-width:0.04em></span></span><span style=top:-3.677em><span class=pstrut style=height:3em></span><span class=mord><span class="mord mathnormal" style=margin-right:0.10764em>f</span><span class=mopen>(</span><span class="mord mathnormal">a</span><span class=mclose>)</span></span></span></span><span class=vlist-s>​</span></span><span class=vlist-r><span class=vlist style=height:0.686em><span></span></span></span></span></span><span class="mclose nulldelimiter"></span></span><span class=mspace style=margin-right:0.2222em></span><span class=mbin>+</span><span class=mspace style=margin-right:0.2222em></span><span class="mord mathnormal" style=margin-right:0.10764em>f</span><span class=mopen>(</span><span class="mord mathnormal">a</span><span class=mspace style=margin-right:0.2222em></span><span class=mbin>+</span><span class=mspace style=margin-right:0.2222em></span><span class="mord mathnormal">h</span><span class=mclose>)</span><span class=mspace style=margin-right:0.2222em></span><span class=mbin>+</span><span class=mspace style=margin-right:0.2222em></span><span class="mord mathnormal" style=margin-right:0.10764em>f</span><span class=mopen>(</span><span class="mord mathnormal">a</span><span class=mspace style=margin-right:0.2222em></span><span class=mbin>+</span><span class=mspace style=margin-right:0.2222em></span><span class=mord>2</span><span class="mord mathnormal">h</span><span class=mclose>)</span><span class=mspace style=margin-right:0.2222em></span><span class=mbin>+</span><span class=mspace style=margin-right:0.2222em></span><span class=minner>⋯</span><span class=mspace style=margin-right:0.2222em></span><span class=mbin>+</span><span class=mspace style=margin-right:0.2222em></span><span class=mord><span class="mopen nulldelimiter"></span><span class=mfrac><span class="vlist-t vlist-t2"><span class=vlist-r><span class=vlist style=height:1.427em><span style=top:-2.314em><span class=pstrut style=height:3em></span><span class=mord><span class=mord>2</span></span></span><span style=top:-3.23em><span class=pstrut style=height:3em></span><span class=frac-line style=border-bottom-width:0.04em></span></span><span style=top:-3.677em><span class=pstrut style=height:3em></span><span class=mord><span class="mord mathnormal" style=margin-right:0.10764em>f</span><span class=mopen>(</span><span class="mord mathnormal">b</span><span class=mclose>)</span></span></span></span><span class=vlist-s>​</span></span><span class=vlist-r><span class=vlist style=height:0.686em><span></span></span></span></span></span><span class="mclose nulldelimiter"></span></span><span class="mclose delimcenter" style=top:0em><span class="delimsizing size3">]</span></span></span></span></span></span></span>
diff --git a/license/index.html b/license/index.html
index 0630a0c..2a0319a 100644
--- a/license/index.html
+++ b/license/index.html
@@ -1,4 +1,4 @@
-<!doctype html><html lang=en dir=ltr class="docs-wrapper plugin-docs plugin-id-default docs-version-current docs-doc-page docs-doc-id-license" data-has-hydrated=false><meta charset=UTF-8><meta name=generator content="Docusaurus v3.6.1"><title data-rh=true>License • Fortran Tutorial</title><meta data-rh=true name=viewport content="width=device-width,initial-scale=1.0"><meta data-rh=true name=twitter:card content=summary_large_image><meta data-rh=true property=og:url content=https://pranabdas.github.io/fortran/license><meta data-rh=true property=og:locale content=en><meta data-rh=true name=docusaurus_locale content=en><meta data-rh=true name=docsearch:language content=en><meta data-rh=true name=theme-color content=#06445c><meta data-rh=true name=docusaurus_version content=current><meta data-rh=true name=docusaurus_tag content=docs-default-current><meta data-rh=true name=docsearch:version content=current><meta data-rh=true name=docsearch:docusaurus_tag content=docs-default-current><meta data-rh=true property=og:title content="License • Fortran Tutorial"><meta data-rh=true name=description content=CC-BY><meta data-rh=true property=og:description content=CC-BY><link data-rh=true rel=icon href=/fortran/img/favicon.png><link data-rh=true rel=canonical href=https://pranabdas.github.io/fortran/license><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/license hreflang=en><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/license hreflang=x-default><link rel=stylesheet href=https://pranabdas.github.io/drive/webfonts/katex/katex.min.css><link rel=stylesheet href=/fortran/assets/css/styles.4de1c8a8.css><script src=/fortran/assets/js/runtime~main.866c090c.js defer></script><script src=/fortran/assets/js/main.ec888ba8.js defer></script><body class=navigation-with-keyboard><script>!function(){var t,e=function(){try{return new URLSearchParams(window.location.search).get("docusaurus-theme")}catch(t){}}()||function(){try{return window.localStorage.getItem("theme")}catch(t){}}();t=null!==e?e:window.matchMedia("(prefers-color-scheme: dark)").matches?"dark":(window.matchMedia("(prefers-color-scheme: light)").matches,"light"),document.documentElement.setAttribute("data-theme",t)}(),function(){try{for(var[t,e]of new URLSearchParams(window.location.search).entries())if(t.startsWith("docusaurus-data-")){var a=t.replace("docusaurus-data-","data-");document.documentElement.setAttribute(a,e)}}catch(t){}}()</script><div id=__docusaurus><div role=region aria-label="Skip to main content"><a class=skipToContent_fXgn href=#__docusaurus_skipToContent_fallback>Skip to main content</a></div><nav aria-label=Main class="navbar navbar--fixed-top navbarHideable_m1mJ"><div class=navbar__inner><div class=navbar__items><button aria-label="Toggle navigation bar" aria-expanded=false class="navbar__toggle clean-btn" type=button><svg width=30 height=30 viewBox="0 0 30 30" aria-hidden=true><path stroke=currentColor stroke-linecap=round stroke-miterlimit=10 stroke-width=2 d="M4 7h22M4 15h22M4 23h22"/></svg></button><a class=navbar__brand href=/fortran/><div class=navbar__logo><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--light_NVdE"><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--dark_xIcU"></div><b class="navbar__title text--truncate">Fortran</b></a><div class="navbar__item dropdown dropdown--hoverable"><a aria-current=page class="navbar__link active" aria-haspopup=true aria-expanded=false role=button href=/fortran/>Docs</a><ul class=dropdown__menu><li><a aria-current=page class="dropdown__link dropdown__link--active" href=/fortran/>Fortran Programming</a><li><a href=https://pranabdas.github.io/docs/ rel="noopener noreferrer" class=dropdown__link>~ ~ ~ Other Docs ~ ~ ~</a><li><a href=https://pranabdas.github.io/arpespythontools/ rel="noopener noreferrer" class=dropdown__link>ARPES Python Tools</a><li><a href=https://pranabdas.github.io/c-cpp/ rel="noopener noreferrer" class=dropdown__link>C and C++ Programming</a><li><a href=https://pranabdas.github.io/condmat-notes/ rel="noopener noreferrer" class=dropdown__link>Condensed Matter Notes</a><li><a href=https://pranabdas.github.io/javascript/ rel="noopener noreferrer" class=dropdown__link>Javascript Tutorial</a><li><a href=https://pranabdas.github.io/linux/ rel="noopener noreferrer" class=dropdown__link>Linux Tutorial</a><li><a href=https://pranabdas.github.io/machine-learning/ rel="noopener noreferrer" class=dropdown__link>Machine Learning Notes</a><li><a href=https://pranabdas.github.io/openmx/ rel="noopener noreferrer" class=dropdown__link>OpenMX tutorial</a><li><a href=https://pranabdas.github.io/python-tutorial/ rel="noopener noreferrer" class=dropdown__link>Python Tutorial</a><li><a href=https://pranabdas.github.io/espresso/ rel="noopener noreferrer" class=dropdown__link>Quantum Espresso Tutorial</a><li><a href=https://pranabdas.github.io/rust/ rel="noopener noreferrer" class=dropdown__link>Rust Programming</a><li><a href=https://pranabdas.github.io/arpes-manual/ rel="noopener noreferrer" class=dropdown__link>SUV ARPES Manual</a><li><a href=https://pranabdas.github.io/suvtools/ rel="noopener noreferrer" class=dropdown__link>SUV Python Tools</a></ul></div></div><div class="navbar__items navbar__items--right"><a href=https://github.com/pranabdas/fortran rel="noopener noreferrer" class="navbar__item navbar__link header-github-link" aria-label="GitHub repository" title="Visit project repository in GitHub"></a><a href=https://pranabdas.github.io rel="noopener noreferrer" class="navbar__item navbar__link header-homepage-link" aria-label="About me" title="Go to Pranab's Homepage"></a><div class="toggle_vylO colorModeToggle_DEke"><button class="clean-btn toggleButton_gllP toggleButtonDisabled_aARS" type=button disabled title="Switch between dark and light mode (currently light mode)" aria-label="Switch between dark and light mode (currently light mode)" aria-live=polite aria-pressed=false><svg viewBox="0 0 24 24" width=24 height=24 class=lightToggleIcon_pyhR><path fill=currentColor d="M12,9c1.65,0,3,1.35,3,3s-1.35,3-3,3s-3-1.35-3-3S10.35,9,12,9 M12,7c-2.76,0-5,2.24-5,5s2.24,5,5,5s5-2.24,5-5 S14.76,7,12,7L12,7z M2,13l2,0c0.55,0,1-0.45,1-1s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S1.45,13,2,13z M20,13l2,0c0.55,0,1-0.45,1-1 s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S19.45,13,20,13z M11,2v2c0,0.55,0.45,1,1,1s1-0.45,1-1V2c0-0.55-0.45-1-1-1S11,1.45,11,2z M11,20v2c0,0.55,0.45,1,1,1s1-0.45,1-1v-2c0-0.55-0.45-1-1-1C11.45,19,11,19.45,11,20z M5.99,4.58c-0.39-0.39-1.03-0.39-1.41,0 c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0s0.39-1.03,0-1.41L5.99,4.58z M18.36,16.95 c-0.39-0.39-1.03-0.39-1.41,0c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0c0.39-0.39,0.39-1.03,0-1.41 L18.36,16.95z M19.42,5.99c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06c-0.39,0.39-0.39,1.03,0,1.41 s1.03,0.39,1.41,0L19.42,5.99z M7.05,18.36c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06 c-0.39,0.39-0.39,1.03,0,1.41s1.03,0.39,1.41,0L7.05,18.36z"/></svg><svg viewBox="0 0 24 24" width=24 height=24 class=darkToggleIcon_wfgR><path fill=currentColor d="M9.37,5.51C9.19,6.15,9.1,6.82,9.1,7.5c0,4.08,3.32,7.4,7.4,7.4c0.68,0,1.35-0.09,1.99-0.27C17.45,17.19,14.93,19,12,19 c-3.86,0-7-3.14-7-7C5,9.07,6.81,6.55,9.37,5.51z M12,3c-4.97,0-9,4.03-9,9s4.03,9,9,9s9-4.03,9-9c0-0.46-0.04-0.92-0.1-1.36 c-0.98,1.37-2.58,2.26-4.4,2.26c-2.98,0-5.4-2.42-5.4-5.4c0-1.81,0.89-3.42,2.26-4.4C12.92,3.04,12.46,3,12,3L12,3z"/></svg></button></div><div class=navbarSearchContainer_Bca1><div class="navbar__search searchBarContainer_NW3z" dir=ltr><input placeholder=Search aria-label=Search class=navbar__search-input value=""><div class="loadingRing_RJI3 searchBarLoadingRing_YnHq"><div></div><div></div><div></div><div></div></div></div></div></div></div><div role=presentation class=navbar-sidebar__backdrop></div></nav><div id=__docusaurus_skipToContent_fallback class="main-wrapper mainWrapper_z2l0"><div class=docsWrapper_hBAB><button aria-label="Scroll back to top" class="clean-btn theme-back-to-top-button backToTopButton_sjWU" type=button></button><div class=docRoot_UBD9><aside class="theme-doc-sidebar-container docSidebarContainer_YfHR"><div class=sidebarViewport_aRkj><div class="sidebar_njMd sidebarWithHideableNavbar_wUlq"><a tabindex=-1 class=sidebarLogo_isFc href=/fortran/><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--light_NVdE"><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--dark_xIcU"><b>Fortran</b></a><nav aria-label="Docs sidebar" class="menu thin-scrollbar menu_SIkG"><ul class="theme-doc-sidebar-menu menu__list"><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/>Setup</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/basics>Basics</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/array>Array and Matrix</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/control>Logical control</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/loop>Loop</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/modules>Modules</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/procedures>Procedures</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/complex>Complex number</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/recursion>Recursion</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/types>Custom types</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/pointer>Pointer</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/file>File I/O</a><li class="theme-doc-sidebar-item-category theme-doc-sidebar-item-category-level-1 menu__list-item menu__list-item--collapsed"><div class=menu__list-item-collapsible><a class="menu__link menu__link--sublist" href=/fortran/category/coding-practice>Coding practice</a><button aria-label="Expand sidebar category 'Coding practice'" aria-expanded=false type=button class="clean-btn menu__caret"></button></div><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/resources>Resources</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class="menu__link menu__link--active" aria-current=page href=/fortran/license>License</a></ul></nav><button type=button title="Collapse sidebar" aria-label="Collapse sidebar" class="button button--secondary button--outline collapseSidebarButton_PEFL"><svg width=20 height=20 aria-hidden=true class=collapseSidebarButtonIcon_kv0_><g fill=#7a7a7a><path d="M9.992 10.023c0 .2-.062.399-.172.547l-4.996 7.492a.982.982 0 01-.828.454H1c-.55 0-1-.453-1-1 0-.2.059-.403.168-.551l4.629-6.942L.168 3.078A.939.939 0 010 2.528c0-.548.45-.997 1-.997h2.996c.352 0 .649.18.828.45L9.82 9.472c.11.148.172.347.172.55zm0 0"/><path d="M19.98 10.023c0 .2-.058.399-.168.547l-4.996 7.492a.987.987 0 01-.828.454h-3c-.547 0-.996-.453-.996-1 0-.2.059-.403.168-.551l4.625-6.942-4.625-6.945a.939.939 0 01-.168-.55 1 1 0 01.996-.997h3c.348 0 .649.18.828.45l4.996 7.492c.11.148.168.347.168.55zm0 0"/></g></svg></button></div></div></aside><main class=docMainContainer_TBSr><div class="container padding-top--md padding-bottom--lg"><div class=row><div class="col docItemCol_VOVn"><div class=docItemContainer_Djhp><article><nav class="theme-doc-breadcrumbs breadcrumbsContainer_Z_bl" aria-label=Breadcrumbs><ul class=breadcrumbs itemscope itemtype=https://schema.org/BreadcrumbList><li class=breadcrumbs__item><a aria-label="Home page" class=breadcrumbs__link href=/fortran/><svg viewBox="0 0 24 24" class=breadcrumbHomeIcon_YNFT><path d="M10 19v-5h4v5c0 .55.45 1 1 1h3c.55 0 1-.45 1-1v-7h1.7c.46 0 .68-.57.33-.87L12.67 3.6c-.38-.34-.96-.34-1.34 0l-8.36 7.53c-.34.3-.13.87.33.87H5v7c0 .55.45 1 1 1h3c.55 0 1-.45 1-1z" fill=currentColor /></svg></a><li itemscope itemprop=itemListElement itemtype=https://schema.org/ListItem class="breadcrumbs__item breadcrumbs__item--active"><span class=breadcrumbs__link itemprop=name>License</span><meta itemprop=position content=1></ul></nav><div class="theme-doc-markdown markdown"><header><h1>License</h1></header><p><img decoding=async loading=lazy alt=CC-BY src="data:image/svg+xml;base64,PD94bWwgdmVyc2lvbj0iMS4wIiBlbmNvZGluZz0iVVRGLTgiID8+PCFET0NUWVBFIHN2ZyBQVUJMSUMgIi0vL1czQy8vRFREIFNWRyAxLjEgQmFzaWMvL0VOIiAiaHR0cDovL3d3dy53My5vcmcvR3JhcGhpY3MvU1ZHLzEuMS9EVEQvc3ZnMTEtYmFzaWMuZHRkIj4NCjxzdmcgeG1sbnM9Imh0dHA6Ly93d3cudzMub3JnLzIwMDAvc3ZnIiB4bWxuczp4bGluaz0iaHR0cDovL3d3dy53My5vcmcvMTk5OS94bGluayIgd2lkdGg9Ijg4IiBoZWlnaHQ9IjMxIiB2aWV3Qm94PSIwIDAgODggMzEiIGJhc2VQcm9maWxlPSJiYXNpYyIgdmVyc2lvbj0iMS4xIj4NCjxnIGlkPSJzdXJmYWNlMSI+DQo8cGF0aCBzdHlsZT0iIHN0cm9rZTpub25lO2ZpbGwtcnVsZTpub256ZXJvO2ZpbGw6cmdiKDY2LjY2NjY2NyUsNjkuODAzOTIyJSw2Ny4wNTg4MjQlKTtmaWxsLW9wYWNpdHk6MTsiIGQ9Ik0gMi4zMDA3ODEgMC4zNzUgTCA4NS40Mjk2ODggMC41MjM0MzggQyA4Ni41ODk4NDQgMC41MjM0MzggODcuNjI4OTA2IDAuMzUxNTYzIDg3LjYyODkwNiAyLjg1NTQ2OSBMIDg3LjUyNzM0NCAzMC40MTAxNTYgTCAwLjIwMzEyNSAzMC40MTAxNTYgTCAwLjIwMzEyNSAyLjc1MzkwNiBDIDAuMjAzMTI1IDEuNTE5NTMxIDAuMzI0MjE5IDAuMzc1IDIuMzAwNzgxIDAuMzc1IFogIi8+DQo8cGF0aCBzdHlsZT0iIHN0cm9rZTpub25lO2ZpbGwtcnVsZTpub256ZXJvO2ZpbGw6cmdiKDAlLDAlLDAlKTtmaWxsLW9wYWNpdHk6MTsiIGQ9Ik0gODYuMzUxNTYzIDAgTCAxLjY0ODQzOCAwIEMgMC43MzgyODEgMCAwIDAuNzQyMTg4IDAgMS42NTYyNSBMIDAgMzAuNjI1IEMgMCAzMC44MzIwMzEgMC4xNjc5NjkgMzEgMC4zNzEwOTQgMzEgTCA4Ny42Mjg5MDYgMzEgQyA4Ny44MzIwMzEgMzEgODggMzAuODMyMDMxIDg4IDMwLjYyNSBMIDg4IDEuNjU2MjUgQyA4OCAwLjc0MjE4OCA4Ny4yNjE3MTkgMCA4Ni4zNTE1NjMgMCBaIE0gMS42NDg0MzggMC43NSBMIDg2LjM1MTU2MyAwLjc1IEMgODYuODUxNTYzIDAuNzUgODcuMjUzOTA2IDEuMTU2MjUgODcuMjUzOTA2IDEuNjU2MjUgQyA4Ny4yNTM5MDYgMS42NTYyNSA4Ny4yNTM5MDYgMTMuMzU1NDY5IDg3LjI1MzkwNiAyMS43ODkwNjMgTCAyNi41MTU2MjUgMjEuNzg5MDYzIEMgMjQuMjk2ODc1IDI1LjgyODEyNSAyMC4wMjM0MzggMjguNTcwMzEzIDE1LjExNzE4OCAyOC41NzAzMTMgQyAxMC4yMDcwMzEgMjguNTcwMzEzIDUuOTMzNTk0IDI1LjgzMjAzMSAzLjcxNDg0NCAyMS43ODkwNjMgTCAwLjc0NjA5NCAyMS43ODkwNjMgQyAwLjc0NjA5NCAxMy4zNTU0NjkgMC43NDYwOTQgMS42NTYyNSAwLjc0NjA5NCAxLjY1NjI1IEMgMC43NDYwOTQgMS4xNTYyNSAxLjE0ODQzOCAwLjc1IDEuNjQ4NDM4IDAuNzUgWiAiLz4NCjxwYXRoIHN0eWxlPSIgc3Ryb2tlOm5vbmU7ZmlsbC1ydWxlOm5vbnplcm87ZmlsbDpyZ2IoMTAwJSwxMDAlLDEwMCUpO2ZpbGwtb3BhY2l0eToxOyIgZD0iTSA1NC4xMjUgMjQuMTcxODc1IEMgNTQuMzU5Mzc1IDI0LjE3MTg3NSA1NC41NzAzMTMgMjQuMTkxNDA2IDU0Ljc2MTcxOSAyNC4yMzA0NjkgQyA1NC45NTMxMjUgMjQuMjczNDM4IDU1LjExMzI4MSAyNC4zMzk4NDQgNTUuMjUgMjQuNDMzNTk0IEMgNTUuMzg2NzE5IDI0LjUyNzM0NCA1NS40OTIxODggMjQuNjUyMzQ0IDU1LjU2NjQwNiAyNC44MDg1OTQgQyA1NS42NDA2MjUgMjQuOTYwOTM4IDU1LjY3OTY4OCAyNS4xNTIzNDQgNTUuNjc5Njg4IDI1LjM4MjgxMyBDIDU1LjY3OTY4OCAyNS42Mjg5MDYgNTUuNjI1IDI1LjgzMjAzMSA1NS41MTE3MTkgMjUuOTk2MDk0IEMgNTUuNDAyMzQ0IDI2LjE2MDE1NiA1NS4yMzgyODEgMjYuMjk2ODc1IDU1LjAxOTUzMSAyNi40MDIzNDQgQyA1NS4zMjAzMTMgMjYuNDg4MjgxIDU1LjU0Mjk2OSAyNi42NDA2MjUgNTUuNjkxNDA2IDI2Ljg1NTQ2OSBDIDU1LjgzOTg0NCAyNy4wNzQyMTkgNTUuOTE0MDYzIDI3LjMzNTkzOCA1NS45MTQwNjMgMjcuNjQwNjI1IEMgNTUuOTE0MDYzIDI3Ljg4NjcxOSA1NS44NjcxODggMjguMTAxNTYzIDU1Ljc2OTUzMSAyOC4yODEyNSBDIDU1LjY3NTc4MSAyOC40NjA5MzggNTUuNTQ2ODc1IDI4LjYwOTM3NSA1NS4zODY3MTkgMjguNzIyNjU2IEMgNTUuMjIyNjU2IDI4LjgzNTkzOCA1NS4wMzkwNjMgMjguOTIxODc1IDU0LjgzMjAzMSAyOC45NzY1NjMgQyA1NC42MjUgMjkuMDMxMjUgNTQuNDE0MDYzIDI5LjA1ODU5NCA1NC4xOTUzMTMgMjkuMDU4NTk0IEwgNTEuODM1OTM4IDI5LjA1ODU5NCBMIDUxLjgzNTkzOCAyNC4xNzE4NzUgWiBNIDUzLjk4ODI4MSAyNi4xNDg0MzggQyA1NC4xNzk2ODggMjYuMTQ4NDM4IDU0LjMzNTkzOCAyNi4xMDE1NjMgNTQuNDYwOTM4IDI2LjAxMTcxOSBDIDU0LjU4MjAzMSAyNS45MTc5NjkgNTQuNjQ0NTMxIDI1Ljc3MzQzOCA1NC42NDQ1MzEgMjUuNTY2NDA2IEMgNTQuNjQ0NTMxIDI1LjQ1MzEyNSA1NC42MjUgMjUuMzU5Mzc1IDU0LjU4MjAzMSAyNS4yODkwNjMgQyA1NC41NDI5NjkgMjUuMjE0ODQ0IDU0LjQ4ODI4MSAyNS4xNTYyNSA1NC40MTc5NjkgMjUuMTE3MTg4IEMgNTQuMzUxNTYzIDI1LjA3NDIxOSA1NC4yNzM0MzggMjUuMDQ2ODc1IDU0LjE4MzU5NCAyNS4wMzEyNSBDIDU0LjA5NzY1NiAyNS4wMTU2MjUgNTQuMDAzOTA2IDI1LjAwNzgxMyA1My45MTAxNTYgMjUuMDA3ODEzIEwgNTIuOTA2MjUgMjUuMDA3ODEzIEwgNTIuOTA2MjUgMjYuMTQ4NDM4IFogTSA1NC4wNTA3ODEgMjguMjIyNjU2IEMgNTQuMTU2MjUgMjguMjIyNjU2IDU0LjI1NzgxMyAyOC4yMTA5MzggNTQuMzUxNTYzIDI4LjE5MTQwNiBDIDU0LjQ0OTIxOSAyOC4xNzE4NzUgNTQuNTMxMjUgMjguMTM2NzE5IDU0LjYwNTQ2OSAyOC4wODk4NDQgQyA1NC42NzU3ODEgMjguMDM5MDYzIDU0LjczNDM3NSAyNy45NzY1NjMgNTQuNzc3MzQ0IDI3Ljg5NDUzMSBDIDU0LjgyMDMxMyAyNy44MTI1IDU0Ljg0Mzc1IDI3LjcwNzAzMSA1NC44NDM3NSAyNy41NzgxMjUgQyA1NC44NDM3NSAyNy4zMjgxMjUgNTQuNzczNDM4IDI3LjE0ODQzOCA1NC42MzI4MTMgMjcuMDQyOTY5IEMgNTQuNDkyMTg4IDI2LjkzMzU5NCA1NC4zMDQ2ODggMjYuODgyODEzIDU0LjA3NDIxOSAyNi44ODI4MTMgTCA1Mi45MDYyNSAyNi44ODI4MTMgTCA1Mi45MDYyNSAyOC4yMjI2NTYgWiAiLz4NCjxwYXRoIHN0eWxlPSIgc3Ryb2tlOm5vbmU7ZmlsbC1ydWxlOm5vbnplcm87ZmlsbDpyZ2IoMTAwJSwxMDAlLDEwMCUpO2ZpbGwtb3BhY2l0eToxOyIgZD0iTSA1Ni4xMDE1NjMgMjQuMTcxODc1IEwgNTcuMzAwNzgxIDI0LjE3MTg3NSBMIDU4LjQzNzUgMjYuMTAxNTYzIEwgNTkuNTY2NDA2IDI0LjE3MTg3NSBMIDYwLjc1NzgxMyAyNC4xNzE4NzUgTCA1OC45NTcwMzEgMjcuMTgzNTk0IEwgNTguOTU3MDMxIDI5LjA1ODU5NCBMIDU3Ljg4NjcxOSAyOS4wNTg1OTQgTCA1Ny44ODY3MTkgMjcuMTU2MjUgWiAiLz4NCjxwYXRoIHN0eWxlPSIgc3Ryb2tlOm5vbmU7ZmlsbC1ydWxlOm5vbnplcm87ZmlsbDpyZ2IoMTAwJSwxMDAlLDEwMCUpO2ZpbGwtb3BhY2l0eToxOyIgZD0iTSAyNS4xMjEwOTQgMTQuNDcyNjU2IEMgMjUuMTI1IDIwLjAyNzM0NCAyMC42NDg0MzggMjQuNTM1MTU2IDE1LjEyNSAyNC41MzkwNjMgQyA5LjYwNTQ2OSAyNC41NDI5NjkgNS4xMjUgMjAuMDM5MDYzIDUuMTIxMDk0IDE0LjQ4NDM3NSBDIDUuMTIxMDk0IDE0LjQ4MDQ2OSA1LjEyMTA5NCAxNC40NzY1NjMgNS4xMjEwOTQgMTQuNDcyNjU2IEMgNS4xMTcxODggOC45MTQwNjMgOS41OTM3NSA0LjQwNjI1IDE1LjExMzI4MSA0LjQwMjM0NCBDIDIwLjYzNjcxOSA0LjM5ODQzOCAyNS4xMTcxODggOC45MDIzNDQgMjUuMTIxMDk0IDE0LjQ2MDkzOCBDIDI1LjEyMTA5NCAxNC40NjA5MzggMjUuMTIxMDk0IDE0LjQ2ODc1IDI1LjEyMTA5NCAxNC40NzI2NTYgWiAiLz4NCjxwYXRoIHN0eWxlPSIgc3Ryb2tlOm5vbmU7ZmlsbC1ydWxlOm5vbnplcm87ZmlsbDpyZ2IoMCUsMCUsMCUpO2ZpbGwtb3BhY2l0eToxOyIgZD0iTSAyMy4yNSA2LjI3MzQzOCBDIDI1LjQ2NDg0NCA4LjUwNzgxMyAyNi41NzQyMTkgMTEuMjM4MjgxIDI2LjU3NDIxOSAxNC40NzI2NTYgQyAyNi41NzQyMTkgMTcuNzAzMTI1IDI1LjQ4NDM3NSAyMC40MDYyNSAyMy4zMDQ2ODggMjIuNTgyMDMxIEMgMjAuOTkyMTg4IDI0Ljg3MTA5NCAxOC4yNjE3MTkgMjYuMDE1NjI1IDE1LjEwNTQ2OSAyNi4wMTU2MjUgQyAxMS45OTIxODggMjYuMDE1NjI1IDkuMzA0Njg4IDI0Ljg3ODkwNiA3LjA1MDc4MSAyMi42MDkzNzUgQyA0Ljc5Mjk2OSAyMC4zMzk4NDQgMy42Njc5NjkgMTcuNjI1IDMuNjY3OTY5IDE0LjQ3MjY1NiBDIDMuNjY3OTY5IDExLjMxNjQwNiA0Ljc5Mjk2OSA4LjU4MjAzMSA3LjA1MDc4MSA2LjI3MzQzOCBDIDkuMjQ2MDk0IDQuMDQyOTY5IDExLjkzMzU5NCAyLjkyNTc4MSAxNS4xMDU0NjkgMi45MjU3ODEgQyAxOC4zMTY0MDYgMi45MjU3ODEgMjEuMDMxMjUgNC4wNDI5NjkgMjMuMjUgNi4yNzM0MzggWiBNIDguNTQyOTY5IDcuNzc3MzQ0IEMgNi42Njc5NjkgOS42Nzk2ODggNS43MzA0NjkgMTEuOTE0MDYzIDUuNzMwNDY5IDE0LjQ3MjY1NiBDIDUuNzMwNDY5IDE3LjAzNTE1NiA2LjY2MDE1NiAxOS4yNDYwOTQgOC41MTE3MTkgMjEuMTEzMjgxIEMgMTAuMzY3MTg4IDIyLjk4MDQ2OSAxMi41NzgxMjUgMjMuOTE0MDYzIDE1LjE0MDYyNSAyMy45MTQwNjMgQyAxNy43MDMxMjUgMjMuOTE0MDYzIDE5LjkyOTY4OCAyMi45NzI2NTYgMjEuODI0MjE5IDIxLjA4NTkzOCBDIDIzLjYyMTA5NCAxOS4zMzIwMzEgMjQuNTE5NTMxIDE3LjEyODkwNiAyNC41MTk1MzEgMTQuNDcyNjU2IEMgMjQuNTE5NTMxIDExLjgzNTkzOCAyMy42MDU0NjkgOS42MDE1NjMgMjEuNzgxMjUgNy43NjE3MTkgQyAxOS45NTMxMjUgNS45MjE4NzUgMTcuNzQyMTg4IDUuMDAzOTA2IDE1LjE0MDYyNSA1LjAwMzkwNiBDIDEyLjUzOTA2MyA1LjAwMzkwNiAxMC4zMzk4NDQgNS45Mjk2ODggOC41NDI5NjkgNy43NzczNDQgWiBNIDEzLjQ3NjU2MyAxMy4zNDc2NTYgQyAxMy4xODc1IDEyLjcxODc1IDEyLjc2MTcxOSAxMi40MDYyNSAxMi4xODc1IDEyLjQwNjI1IEMgMTEuMTc1NzgxIDEyLjQwNjI1IDEwLjY3MTg3NSAxMy4wODk4NDQgMTAuNjcxODc1IDE0LjQ2MDkzOCBDIDEwLjY3MTg3NSAxNS44MjgxMjUgMTEuMTc1NzgxIDE2LjUxMTcxOSAxMi4xODc1IDE2LjUxMTcxOSBDIDEyLjg1NTQ2OSAxNi41MTE3MTkgMTMuMzMyMDMxIDE2LjE3OTY4OCAxMy42MTcxODggMTUuNTExNzE5IEwgMTUuMDE5NTMxIDE2LjI2MTcxOSBDIDE0LjM1MTU2MyAxNy40NTcwMzEgMTMuMzUxNTYzIDE4LjA1NDY4OCAxMi4wMTU2MjUgMTguMDU0Njg4IEMgMTAuOTg0Mzc1IDE4LjA1NDY4OCAxMC4xNTYyNSAxNy43MzgyODEgOS41MzkwNjMgMTcuMTAxNTYzIEMgOC45MTc5NjkgMTYuNDY0ODQ0IDguNjA1NDY5IDE1LjU4OTg0NCA4LjYwNTQ2OSAxNC40NzI2NTYgQyA4LjYwNTQ2OSAxMy4zNzEwOTQgOC45MjU3ODEgMTIuNSA5LjU2NjQwNiAxMS44NTU0NjkgQyAxMC4yMDcwMzEgMTEuMjEwOTM4IDExLjAwMzkwNiAxMC44ODY3MTkgMTEuOTU3MDMxIDEwLjg4NjcxOSBDIDEzLjM3MTA5NCAxMC44ODY3MTkgMTQuMzc4OTA2IDExLjQ0OTIxOSAxNC45OTIxODggMTIuNTY2NDA2IFogTSAyMC4wNjY0MDYgMTMuMzQ3NjU2IEMgMTkuNzgxMjUgMTIuNzE4NzUgMTkuMzU5Mzc1IDEyLjQwNjI1IDE4LjgwODU5NCAxMi40MDYyNSBDIDE3Ljc3NzM0NCAxMi40MDYyNSAxNy4yNTc4MTMgMTMuMDg5ODQ0IDE3LjI1NzgxMyAxNC40NjA5MzggQyAxNy4yNTc4MTMgMTUuODI4MTI1IDE3Ljc3NzM0NCAxNi41MTE3MTkgMTguODA4NTk0IDE2LjUxMTcxOSBDIDE5LjQ3NjU2MyAxNi41MTE3MTkgMTkuOTQ1MzEzIDE2LjE3OTY4OCAyMC4yMTA5MzggMTUuNTExNzE5IEwgMjEuNjQ0NTMxIDE2LjI2MTcxOSBDIDIwLjk3NjU2MyAxNy40NTcwMzEgMTkuOTc2NTYzIDE4LjA1NDY4OCAxOC42NDA2MjUgMTguMDU0Njg4IEMgMTcuNjEzMjgxIDE4LjA1NDY4OCAxNi43ODkwNjMgMTcuNzM4MjgxIDE2LjE3MTg3NSAxNy4xMDE1NjMgQyAxNS41NTA3ODEgMTYuNDY0ODQ0IDE1LjI0MjE4OCAxNS41ODk4NDQgMTUuMjQyMTg4IDE0LjQ3MjY1NiBDIDE1LjI0MjE4OCAxMy4zNzEwOTQgMTUuNTU0Njg4IDEyLjUgMTYuMTgzNTk0IDExLjg1NTQ2OSBDIDE2LjgxMjUgMTEuMjEwOTM4IDE3LjYxMzI4MSAxMC44ODY3MTkgMTguNTg1OTM4IDEwLjg4NjcxOSBDIDE5Ljk5NjA5NCAxMC44ODY3MTkgMjEuMDAzOTA2IDExLjQ0OTIxOSAyMS42MTMyODEgMTIuNTY2NDA2IFogIi8+DQo8cGF0aCBzdHlsZT0iIHN0cm9rZTpub25lO2ZpbGwtcnVsZTpub256ZXJvO2ZpbGw6cmdiKDEwMCUsMTAwJSwxMDAlKTtmaWxsLW9wYWNpdHk6MTsiIGQ9Ik0gNjMuODA0Njg4IDExLjIzMDQ2OSBDIDYzLjgwNDY4OCAxNS42MDkzNzUgNjAuMjc3MzQ0IDE5LjE1NjI1IDU1LjkyOTY4OCAxOS4xNTYyNSBDIDUxLjU3ODEyNSAxOS4xNTYyNSA0OC4wNTQ2ODggMTUuNjA5Mzc1IDQ4LjA1NDY4OCAxMS4yMzA0NjkgQyA0OC4wNTQ2ODggNi44NTU0NjkgNTEuNTc4MTI1IDMuMzA0Njg4IDU1LjkyOTY4OCAzLjMwNDY4OCBDIDYwLjI3NzM0NCAzLjMwNDY4OCA2My44MDQ2ODggNi44NTU0NjkgNjMuODA0Njg4IDExLjIzMDQ2OSBaICIvPg0KPHBhdGggc3R5bGU9IiBzdHJva2U6bm9uZTtmaWxsLXJ1bGU6bm9uemVybztmaWxsOnJnYigwJSwwJSwwJSk7ZmlsbC1vcGFjaXR5OjE7IiBkPSJNIDU4LjIwNzAzMSA4LjkzNzUgQyA1OC4yMDcwMzEgOC42MzI4MTMgNTcuOTYwOTM4IDguMzg2NzE5IDU3LjY2MDE1NiA4LjM4NjcxOSBMIDU0LjE3OTY4OCA4LjM4NjcxOSBDIDUzLjg3ODkwNiA4LjM4NjcxOSA1My42MzI4MTMgOC42MzI4MTMgNTMuNjMyODEzIDguOTM3NSBMIDUzLjYzMjgxMyAxMi40Mzc1IEwgNTQuNjAxNTYzIDEyLjQzNzUgTCA1NC42MDE1NjMgMTYuNTg1OTM4IEwgNTcuMjM4MjgxIDE2LjU4NTkzOCBMIDU3LjIzODI4MSAxMi40Mzc1IEwgNTguMjA3MDMxIDEyLjQzNzUgWiAiLz4NCjxwYXRoIHN0eWxlPSIgc3Ryb2tlOm5vbmU7ZmlsbC1ydWxlOm5vbnplcm87ZmlsbDpyZ2IoMCUsMCUsMCUpO2ZpbGwtb3BhY2l0eToxOyIgZD0iTSA1Ny4xMDkzNzUgNi43MjY1NjMgQyA1Ny4xMDkzNzUgNy4zODY3MTkgNTYuNTc4MTI1IDcuOTI1NzgxIDU1LjkyMTg3NSA3LjkyNTc4MSBDIDU1LjI2MTcxOSA3LjkyNTc4MSA1NC43MzA0NjkgNy4zODY3MTkgNTQuNzMwNDY5IDYuNzI2NTYzIEMgNTQuNzMwNDY5IDYuMDY2NDA2IDU1LjI2MTcxOSA1LjUzMTI1IDU1LjkyMTg3NSA1LjUzMTI1IEMgNTYuNTc4MTI1IDUuNTMxMjUgNTcuMTA5Mzc1IDYuMDY2NDA2IDU3LjEwOTM3NSA2LjcyNjU2MyBaICIvPg0KPHBhdGggc3R5bGU9IiBzdHJva2U6bm9uZTtmaWxsLXJ1bGU6ZXZlbm9kZDtmaWxsOnJnYigwJSwwJSwwJSk7ZmlsbC1vcGFjaXR5OjE7IiBkPSJNIDU1LjkxMDE1NiAyLjUgQyA1My41NTQ2ODggMi41IDUxLjU1ODU5NCAzLjMyODEyNSA0OS45MjU3ODEgNC45ODA0NjkgQyA0OC4yNTM5MDYgNi42OTE0MDYgNDcuNDE3OTY5IDguNzE4NzUgNDcuNDE3OTY5IDExLjA1ODU5NCBDIDQ3LjQxNzk2OSAxMy4zOTQ1MzEgNDguMjUzOTA2IDE1LjQwNjI1IDQ5LjkyNTc4MSAxNy4wODk4NDQgQyA1MS42MDE1NjMgMTguNzczNDM4IDUzLjU5NzY1NiAxOS42MTMyODEgNTUuOTEwMTU2IDE5LjYxMzI4MSBDIDU4LjI1IDE5LjYxMzI4MSA2MC4yODEyNSAxOC43NjU2MjUgNjEuOTk2MDk0IDE3LjA3MDMxMyBDIDYzLjYxMzI4MSAxNS40NTcwMzEgNjQuNDI1NzgxIDEzLjQ1MzEyNSA2NC40MjU3ODEgMTEuMDU4NTk0IEMgNjQuNDI1NzgxIDguNjYwMTU2IDYzLjYwMTU2MyA2LjYzNjcxOSA2MS45NTcwMzEgNC45ODA0NjkgQyA2MC4zMDg1OTQgMy4zMjgxMjUgNTguMjkyOTY5IDIuNSA1NS45MTAxNTYgMi41IFogTSA1NS45Mjk2ODggNC4wMzkwNjMgQyA1Ny44NTkzNzUgNC4wMzkwNjMgNTkuNSA0LjcyMjY1NiA2MC44NDc2NTYgNi4wOTM3NSBDIDYyLjIxMDkzOCA3LjQ0OTIxOSA2Mi44OTA2MjUgOS4xMDE1NjMgNjIuODkwNjI1IDExLjA1ODU5NCBDIDYyLjg5MDYyNSAxMy4wMjM0MzggNjIuMjIyNjU2IDE0LjY2MDE1NiA2MC44OTA2MjUgMTUuOTU3MDMxIEMgNTkuNDg0Mzc1IDE3LjM1NTQ2OSA1Ny44MzIwMzEgMTguMDU0Njg4IDU1LjkyOTY4OCAxOC4wNTQ2ODggQyA1NC4wMjczNDQgMTguMDU0Njg4IDUyLjM5MDYyNSAxNy4zNjMyODEgNTEuMDExNzE5IDE1Ljk3NjU2MyBDIDQ5LjYzNjcxOSAxNC41OTM3NSA0OC45NDkyMTkgMTIuOTUzMTI1IDQ4Ljk0OTIxOSAxMS4wNTg1OTQgQyA0OC45NDkyMTkgOS4xNjAxNTYgNDkuNjQ0NTMxIDcuNTAzOTA2IDUxLjAzNTE1NiA2LjA5Mzc1IEMgNTIuMzY3MTg4IDQuNzIyNjU2IDU0IDQuMDM5MDYzIDU1LjkyOTY4OCA0LjAzOTA2MyBaICIvPg0KPC9nPg0KPC9zdmc+DQo=" width=88 height=31 class=img_ev3q></p>
+<!doctype html><html lang=en dir=ltr class="docs-wrapper plugin-docs plugin-id-default docs-version-current docs-doc-page docs-doc-id-license" data-has-hydrated=false><meta charset=UTF-8><meta name=generator content="Docusaurus v3.6.1"><title data-rh=true>License • Fortran Tutorial</title><meta data-rh=true name=viewport content="width=device-width,initial-scale=1.0"><meta data-rh=true name=twitter:card content=summary_large_image><meta data-rh=true property=og:url content=https://pranabdas.github.io/fortran/license><meta data-rh=true property=og:locale content=en><meta data-rh=true name=docusaurus_locale content=en><meta data-rh=true name=docsearch:language content=en><meta data-rh=true name=theme-color content=#06445c><meta data-rh=true name=docusaurus_version content=current><meta data-rh=true name=docusaurus_tag content=docs-default-current><meta data-rh=true name=docsearch:version content=current><meta data-rh=true name=docsearch:docusaurus_tag content=docs-default-current><meta data-rh=true property=og:title content="License • Fortran Tutorial"><meta data-rh=true name=description content=CC-BY><meta data-rh=true property=og:description content=CC-BY><link data-rh=true rel=icon href=/fortran/img/favicon.png><link data-rh=true rel=canonical href=https://pranabdas.github.io/fortran/license><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/license hreflang=en><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/license hreflang=x-default><link rel=stylesheet href=https://pranab.pages.dev/assets/fonts/katex/katex.min.css><link rel=stylesheet href=/fortran/assets/css/styles.4de1c8a8.css><script src=/fortran/assets/js/runtime~main.667e3c0f.js defer></script><script src=/fortran/assets/js/main.10795e8f.js defer></script><body class=navigation-with-keyboard><script>!function(){var t,e=function(){try{return new URLSearchParams(window.location.search).get("docusaurus-theme")}catch(t){}}()||function(){try{return window.localStorage.getItem("theme")}catch(t){}}();t=null!==e?e:window.matchMedia("(prefers-color-scheme: dark)").matches?"dark":(window.matchMedia("(prefers-color-scheme: light)").matches,"light"),document.documentElement.setAttribute("data-theme",t)}(),function(){try{for(var[t,e]of new URLSearchParams(window.location.search).entries())if(t.startsWith("docusaurus-data-")){var a=t.replace("docusaurus-data-","data-");document.documentElement.setAttribute(a,e)}}catch(t){}}()</script><div id=__docusaurus><div role=region aria-label="Skip to main content"><a class=skipToContent_fXgn href=#__docusaurus_skipToContent_fallback>Skip to main content</a></div><nav aria-label=Main class="navbar navbar--fixed-top navbarHideable_m1mJ"><div class=navbar__inner><div class=navbar__items><button aria-label="Toggle navigation bar" aria-expanded=false class="navbar__toggle clean-btn" type=button><svg width=30 height=30 viewBox="0 0 30 30" aria-hidden=true><path stroke=currentColor stroke-linecap=round stroke-miterlimit=10 stroke-width=2 d="M4 7h22M4 15h22M4 23h22"/></svg></button><a class=navbar__brand href=/fortran/><div class=navbar__logo><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--light_NVdE"><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--dark_xIcU"></div><b class="navbar__title text--truncate">Fortran</b></a><div class="navbar__item dropdown dropdown--hoverable"><a aria-current=page class="navbar__link active" aria-haspopup=true aria-expanded=false role=button href=/fortran/>Docs</a><ul class=dropdown__menu><li><a aria-current=page class="dropdown__link dropdown__link--active" href=/fortran/>Fortran Programming</a><li><a href=https://pranabdas.github.io/docs/ rel="noopener noreferrer" class=dropdown__link>~ ~ ~ Other Docs ~ ~ ~</a><li><a href=https://pranabdas.github.io/arpespythontools/ rel="noopener noreferrer" class=dropdown__link>ARPES Python Tools</a><li><a href=https://pranabdas.github.io/c-cpp/ rel="noopener noreferrer" class=dropdown__link>C and C++ Programming</a><li><a href=https://pranabdas.github.io/condmat-notes/ rel="noopener noreferrer" class=dropdown__link>Condensed Matter Notes</a><li><a href=https://pranabdas.github.io/javascript/ rel="noopener noreferrer" class=dropdown__link>Javascript Tutorial</a><li><a href=https://pranabdas.github.io/linux/ rel="noopener noreferrer" class=dropdown__link>Linux Tutorial</a><li><a href=https://pranabdas.github.io/machine-learning/ rel="noopener noreferrer" class=dropdown__link>Machine Learning Notes</a><li><a href=https://pranabdas.github.io/openmx/ rel="noopener noreferrer" class=dropdown__link>OpenMX tutorial</a><li><a href=https://pranabdas.github.io/python-tutorial/ rel="noopener noreferrer" class=dropdown__link>Python Tutorial</a><li><a href=https://pranabdas.github.io/espresso/ rel="noopener noreferrer" class=dropdown__link>Quantum Espresso Tutorial</a><li><a href=https://pranabdas.github.io/rust/ rel="noopener noreferrer" class=dropdown__link>Rust Programming</a><li><a href=https://pranabdas.github.io/arpes-manual/ rel="noopener noreferrer" class=dropdown__link>SUV ARPES Manual</a><li><a href=https://pranabdas.github.io/suvtools/ rel="noopener noreferrer" class=dropdown__link>SUV Python Tools</a></ul></div></div><div class="navbar__items navbar__items--right"><a href=https://github.com/pranabdas/fortran rel="noopener noreferrer" class="navbar__item navbar__link header-github-link" aria-label="GitHub repository" title="Visit project repository in GitHub"></a><a href=https://pranabdas.github.io rel="noopener noreferrer" class="navbar__item navbar__link header-homepage-link" aria-label="About me" title="Go to Pranab's Homepage"></a><div class="toggle_vylO colorModeToggle_DEke"><button class="clean-btn toggleButton_gllP toggleButtonDisabled_aARS" type=button disabled title="Switch between dark and light mode (currently light mode)" aria-label="Switch between dark and light mode (currently light mode)" aria-live=polite aria-pressed=false><svg viewBox="0 0 24 24" width=24 height=24 class=lightToggleIcon_pyhR><path fill=currentColor d="M12,9c1.65,0,3,1.35,3,3s-1.35,3-3,3s-3-1.35-3-3S10.35,9,12,9 M12,7c-2.76,0-5,2.24-5,5s2.24,5,5,5s5-2.24,5-5 S14.76,7,12,7L12,7z M2,13l2,0c0.55,0,1-0.45,1-1s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S1.45,13,2,13z M20,13l2,0c0.55,0,1-0.45,1-1 s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S19.45,13,20,13z M11,2v2c0,0.55,0.45,1,1,1s1-0.45,1-1V2c0-0.55-0.45-1-1-1S11,1.45,11,2z M11,20v2c0,0.55,0.45,1,1,1s1-0.45,1-1v-2c0-0.55-0.45-1-1-1C11.45,19,11,19.45,11,20z M5.99,4.58c-0.39-0.39-1.03-0.39-1.41,0 c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0s0.39-1.03,0-1.41L5.99,4.58z M18.36,16.95 c-0.39-0.39-1.03-0.39-1.41,0c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0c0.39-0.39,0.39-1.03,0-1.41 L18.36,16.95z M19.42,5.99c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06c-0.39,0.39-0.39,1.03,0,1.41 s1.03,0.39,1.41,0L19.42,5.99z M7.05,18.36c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06 c-0.39,0.39-0.39,1.03,0,1.41s1.03,0.39,1.41,0L7.05,18.36z"/></svg><svg viewBox="0 0 24 24" width=24 height=24 class=darkToggleIcon_wfgR><path fill=currentColor d="M9.37,5.51C9.19,6.15,9.1,6.82,9.1,7.5c0,4.08,3.32,7.4,7.4,7.4c0.68,0,1.35-0.09,1.99-0.27C17.45,17.19,14.93,19,12,19 c-3.86,0-7-3.14-7-7C5,9.07,6.81,6.55,9.37,5.51z M12,3c-4.97,0-9,4.03-9,9s4.03,9,9,9s9-4.03,9-9c0-0.46-0.04-0.92-0.1-1.36 c-0.98,1.37-2.58,2.26-4.4,2.26c-2.98,0-5.4-2.42-5.4-5.4c0-1.81,0.89-3.42,2.26-4.4C12.92,3.04,12.46,3,12,3L12,3z"/></svg></button></div><div class=navbarSearchContainer_Bca1><div class="navbar__search searchBarContainer_NW3z" dir=ltr><input placeholder=Search aria-label=Search class=navbar__search-input value=""><div class="loadingRing_RJI3 searchBarLoadingRing_YnHq"><div></div><div></div><div></div><div></div></div></div></div></div></div><div role=presentation class=navbar-sidebar__backdrop></div></nav><div id=__docusaurus_skipToContent_fallback class="main-wrapper mainWrapper_z2l0"><div class=docsWrapper_hBAB><button aria-label="Scroll back to top" class="clean-btn theme-back-to-top-button backToTopButton_sjWU" type=button></button><div class=docRoot_UBD9><aside class="theme-doc-sidebar-container docSidebarContainer_YfHR"><div class=sidebarViewport_aRkj><div class="sidebar_njMd sidebarWithHideableNavbar_wUlq"><a tabindex=-1 class=sidebarLogo_isFc href=/fortran/><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--light_NVdE"><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--dark_xIcU"><b>Fortran</b></a><nav aria-label="Docs sidebar" class="menu thin-scrollbar menu_SIkG"><ul class="theme-doc-sidebar-menu menu__list"><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/>Setup</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/basics>Basics</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/array>Array and Matrix</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/control>Logical control</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/loop>Loop</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/modules>Modules</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/procedures>Procedures</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/complex>Complex number</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/recursion>Recursion</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/types>Custom types</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/pointer>Pointer</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/file>File I/O</a><li class="theme-doc-sidebar-item-category theme-doc-sidebar-item-category-level-1 menu__list-item menu__list-item--collapsed"><div class=menu__list-item-collapsible><a class="menu__link menu__link--sublist" href=/fortran/category/coding-practice>Coding practice</a><button aria-label="Expand sidebar category 'Coding practice'" aria-expanded=false type=button class="clean-btn menu__caret"></button></div><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/resources>Resources</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class="menu__link menu__link--active" aria-current=page href=/fortran/license>License</a></ul></nav><button type=button title="Collapse sidebar" aria-label="Collapse sidebar" class="button button--secondary button--outline collapseSidebarButton_PEFL"><svg width=20 height=20 aria-hidden=true class=collapseSidebarButtonIcon_kv0_><g fill=#7a7a7a><path d="M9.992 10.023c0 .2-.062.399-.172.547l-4.996 7.492a.982.982 0 01-.828.454H1c-.55 0-1-.453-1-1 0-.2.059-.403.168-.551l4.629-6.942L.168 3.078A.939.939 0 010 2.528c0-.548.45-.997 1-.997h2.996c.352 0 .649.18.828.45L9.82 9.472c.11.148.172.347.172.55zm0 0"/><path d="M19.98 10.023c0 .2-.058.399-.168.547l-4.996 7.492a.987.987 0 01-.828.454h-3c-.547 0-.996-.453-.996-1 0-.2.059-.403.168-.551l4.625-6.942-4.625-6.945a.939.939 0 01-.168-.55 1 1 0 01.996-.997h3c.348 0 .649.18.828.45l4.996 7.492c.11.148.168.347.168.55zm0 0"/></g></svg></button></div></div></aside><main class=docMainContainer_TBSr><div class="container padding-top--md padding-bottom--lg"><div class=row><div class="col docItemCol_VOVn"><div class=docItemContainer_Djhp><article><nav class="theme-doc-breadcrumbs breadcrumbsContainer_Z_bl" aria-label=Breadcrumbs><ul class=breadcrumbs itemscope itemtype=https://schema.org/BreadcrumbList><li class=breadcrumbs__item><a aria-label="Home page" class=breadcrumbs__link href=/fortran/><svg viewBox="0 0 24 24" class=breadcrumbHomeIcon_YNFT><path d="M10 19v-5h4v5c0 .55.45 1 1 1h3c.55 0 1-.45 1-1v-7h1.7c.46 0 .68-.57.33-.87L12.67 3.6c-.38-.34-.96-.34-1.34 0l-8.36 7.53c-.34.3-.13.87.33.87H5v7c0 .55.45 1 1 1h3c.55 0 1-.45 1-1z" fill=currentColor /></svg></a><li itemscope itemprop=itemListElement itemtype=https://schema.org/ListItem class="breadcrumbs__item breadcrumbs__item--active"><span class=breadcrumbs__link itemprop=name>License</span><meta itemprop=position content=1></ul></nav><div class="theme-doc-markdown markdown"><header><h1>License</h1></header><p><img decoding=async loading=lazy alt=CC-BY src="data:image/svg+xml;base64,PD94bWwgdmVyc2lvbj0iMS4wIiBlbmNvZGluZz0iVVRGLTgiID8+PCFET0NUWVBFIHN2ZyBQVUJMSUMgIi0vL1czQy8vRFREIFNWRyAxLjEgQmFzaWMvL0VOIiAiaHR0cDovL3d3dy53My5vcmcvR3JhcGhpY3MvU1ZHLzEuMS9EVEQvc3ZnMTEtYmFzaWMuZHRkIj4NCjxzdmcgeG1sbnM9Imh0dHA6Ly93d3cudzMub3JnLzIwMDAvc3ZnIiB4bWxuczp4bGluaz0iaHR0cDovL3d3dy53My5vcmcvMTk5OS94bGluayIgd2lkdGg9Ijg4IiBoZWlnaHQ9IjMxIiB2aWV3Qm94PSIwIDAgODggMzEiIGJhc2VQcm9maWxlPSJiYXNpYyIgdmVyc2lvbj0iMS4xIj4NCjxnIGlkPSJzdXJmYWNlMSI+DQo8cGF0aCBzdHlsZT0iIHN0cm9rZTpub25lO2ZpbGwtcnVsZTpub256ZXJvO2ZpbGw6cmdiKDY2LjY2NjY2NyUsNjkuODAzOTIyJSw2Ny4wNTg4MjQlKTtmaWxsLW9wYWNpdHk6MTsiIGQ9Ik0gMi4zMDA3ODEgMC4zNzUgTCA4NS40Mjk2ODggMC41MjM0MzggQyA4Ni41ODk4NDQgMC41MjM0MzggODcuNjI4OTA2IDAuMzUxNTYzIDg3LjYyODkwNiAyLjg1NTQ2OSBMIDg3LjUyNzM0NCAzMC40MTAxNTYgTCAwLjIwMzEyNSAzMC40MTAxNTYgTCAwLjIwMzEyNSAyLjc1MzkwNiBDIDAuMjAzMTI1IDEuNTE5NTMxIDAuMzI0MjE5IDAuMzc1IDIuMzAwNzgxIDAuMzc1IFogIi8+DQo8cGF0aCBzdHlsZT0iIHN0cm9rZTpub25lO2ZpbGwtcnVsZTpub256ZXJvO2ZpbGw6cmdiKDAlLDAlLDAlKTtmaWxsLW9wYWNpdHk6MTsiIGQ9Ik0gODYuMzUxNTYzIDAgTCAxLjY0ODQzOCAwIEMgMC43MzgyODEgMCAwIDAuNzQyMTg4IDAgMS42NTYyNSBMIDAgMzAuNjI1IEMgMCAzMC44MzIwMzEgMC4xNjc5NjkgMzEgMC4zNzEwOTQgMzEgTCA4Ny42Mjg5MDYgMzEgQyA4Ny44MzIwMzEgMzEgODggMzAuODMyMDMxIDg4IDMwLjYyNSBMIDg4IDEuNjU2MjUgQyA4OCAwLjc0MjE4OCA4Ny4yNjE3MTkgMCA4Ni4zNTE1NjMgMCBaIE0gMS42NDg0MzggMC43NSBMIDg2LjM1MTU2MyAwLjc1IEMgODYuODUxNTYzIDAuNzUgODcuMjUzOTA2IDEuMTU2MjUgODcuMjUzOTA2IDEuNjU2MjUgQyA4Ny4yNTM5MDYgMS42NTYyNSA4Ny4yNTM5MDYgMTMuMzU1NDY5IDg3LjI1MzkwNiAyMS43ODkwNjMgTCAyNi41MTU2MjUgMjEuNzg5MDYzIEMgMjQuMjk2ODc1IDI1LjgyODEyNSAyMC4wMjM0MzggMjguNTcwMzEzIDE1LjExNzE4OCAyOC41NzAzMTMgQyAxMC4yMDcwMzEgMjguNTcwMzEzIDUuOTMzNTk0IDI1LjgzMjAzMSAzLjcxNDg0NCAyMS43ODkwNjMgTCAwLjc0NjA5NCAyMS43ODkwNjMgQyAwLjc0NjA5NCAxMy4zNTU0NjkgMC43NDYwOTQgMS42NTYyNSAwLjc0NjA5NCAxLjY1NjI1IEMgMC43NDYwOTQgMS4xNTYyNSAxLjE0ODQzOCAwLjc1IDEuNjQ4NDM4IDAuNzUgWiAiLz4NCjxwYXRoIHN0eWxlPSIgc3Ryb2tlOm5vbmU7ZmlsbC1ydWxlOm5vbnplcm87ZmlsbDpyZ2IoMTAwJSwxMDAlLDEwMCUpO2ZpbGwtb3BhY2l0eToxOyIgZD0iTSA1NC4xMjUgMjQuMTcxODc1IEMgNTQuMzU5Mzc1IDI0LjE3MTg3NSA1NC41NzAzMTMgMjQuMTkxNDA2IDU0Ljc2MTcxOSAyNC4yMzA0NjkgQyA1NC45NTMxMjUgMjQuMjczNDM4IDU1LjExMzI4MSAyNC4zMzk4NDQgNTUuMjUgMjQuNDMzNTk0IEMgNTUuMzg2NzE5IDI0LjUyNzM0NCA1NS40OTIxODggMjQuNjUyMzQ0IDU1LjU2NjQwNiAyNC44MDg1OTQgQyA1NS42NDA2MjUgMjQuOTYwOTM4IDU1LjY3OTY4OCAyNS4xNTIzNDQgNTUuNjc5Njg4IDI1LjM4MjgxMyBDIDU1LjY3OTY4OCAyNS42Mjg5MDYgNTUuNjI1IDI1LjgzMjAzMSA1NS41MTE3MTkgMjUuOTk2MDk0IEMgNTUuNDAyMzQ0IDI2LjE2MDE1NiA1NS4yMzgyODEgMjYuMjk2ODc1IDU1LjAxOTUzMSAyNi40MDIzNDQgQyA1NS4zMjAzMTMgMjYuNDg4MjgxIDU1LjU0Mjk2OSAyNi42NDA2MjUgNTUuNjkxNDA2IDI2Ljg1NTQ2OSBDIDU1LjgzOTg0NCAyNy4wNzQyMTkgNTUuOTE0MDYzIDI3LjMzNTkzOCA1NS45MTQwNjMgMjcuNjQwNjI1IEMgNTUuOTE0MDYzIDI3Ljg4NjcxOSA1NS44NjcxODggMjguMTAxNTYzIDU1Ljc2OTUzMSAyOC4yODEyNSBDIDU1LjY3NTc4MSAyOC40NjA5MzggNTUuNTQ2ODc1IDI4LjYwOTM3NSA1NS4zODY3MTkgMjguNzIyNjU2IEMgNTUuMjIyNjU2IDI4LjgzNTkzOCA1NS4wMzkwNjMgMjguOTIxODc1IDU0LjgzMjAzMSAyOC45NzY1NjMgQyA1NC42MjUgMjkuMDMxMjUgNTQuNDE0MDYzIDI5LjA1ODU5NCA1NC4xOTUzMTMgMjkuMDU4NTk0IEwgNTEuODM1OTM4IDI5LjA1ODU5NCBMIDUxLjgzNTkzOCAyNC4xNzE4NzUgWiBNIDUzLjk4ODI4MSAyNi4xNDg0MzggQyA1NC4xNzk2ODggMjYuMTQ4NDM4IDU0LjMzNTkzOCAyNi4xMDE1NjMgNTQuNDYwOTM4IDI2LjAxMTcxOSBDIDU0LjU4MjAzMSAyNS45MTc5NjkgNTQuNjQ0NTMxIDI1Ljc3MzQzOCA1NC42NDQ1MzEgMjUuNTY2NDA2IEMgNTQuNjQ0NTMxIDI1LjQ1MzEyNSA1NC42MjUgMjUuMzU5Mzc1IDU0LjU4MjAzMSAyNS4yODkwNjMgQyA1NC41NDI5NjkgMjUuMjE0ODQ0IDU0LjQ4ODI4MSAyNS4xNTYyNSA1NC40MTc5NjkgMjUuMTE3MTg4IEMgNTQuMzUxNTYzIDI1LjA3NDIxOSA1NC4yNzM0MzggMjUuMDQ2ODc1IDU0LjE4MzU5NCAyNS4wMzEyNSBDIDU0LjA5NzY1NiAyNS4wMTU2MjUgNTQuMDAzOTA2IDI1LjAwNzgxMyA1My45MTAxNTYgMjUuMDA3ODEzIEwgNTIuOTA2MjUgMjUuMDA3ODEzIEwgNTIuOTA2MjUgMjYuMTQ4NDM4IFogTSA1NC4wNTA3ODEgMjguMjIyNjU2IEMgNTQuMTU2MjUgMjguMjIyNjU2IDU0LjI1NzgxMyAyOC4yMTA5MzggNTQuMzUxNTYzIDI4LjE5MTQwNiBDIDU0LjQ0OTIxOSAyOC4xNzE4NzUgNTQuNTMxMjUgMjguMTM2NzE5IDU0LjYwNTQ2OSAyOC4wODk4NDQgQyA1NC42NzU3ODEgMjguMDM5MDYzIDU0LjczNDM3NSAyNy45NzY1NjMgNTQuNzc3MzQ0IDI3Ljg5NDUzMSBDIDU0LjgyMDMxMyAyNy44MTI1IDU0Ljg0Mzc1IDI3LjcwNzAzMSA1NC44NDM3NSAyNy41NzgxMjUgQyA1NC44NDM3NSAyNy4zMjgxMjUgNTQuNzczNDM4IDI3LjE0ODQzOCA1NC42MzI4MTMgMjcuMDQyOTY5IEMgNTQuNDkyMTg4IDI2LjkzMzU5NCA1NC4zMDQ2ODggMjYuODgyODEzIDU0LjA3NDIxOSAyNi44ODI4MTMgTCA1Mi45MDYyNSAyNi44ODI4MTMgTCA1Mi45MDYyNSAyOC4yMjI2NTYgWiAiLz4NCjxwYXRoIHN0eWxlPSIgc3Ryb2tlOm5vbmU7ZmlsbC1ydWxlOm5vbnplcm87ZmlsbDpyZ2IoMTAwJSwxMDAlLDEwMCUpO2ZpbGwtb3BhY2l0eToxOyIgZD0iTSA1Ni4xMDE1NjMgMjQuMTcxODc1IEwgNTcuMzAwNzgxIDI0LjE3MTg3NSBMIDU4LjQzNzUgMjYuMTAxNTYzIEwgNTkuNTY2NDA2IDI0LjE3MTg3NSBMIDYwLjc1NzgxMyAyNC4xNzE4NzUgTCA1OC45NTcwMzEgMjcuMTgzNTk0IEwgNTguOTU3MDMxIDI5LjA1ODU5NCBMIDU3Ljg4NjcxOSAyOS4wNTg1OTQgTCA1Ny44ODY3MTkgMjcuMTU2MjUgWiAiLz4NCjxwYXRoIHN0eWxlPSIgc3Ryb2tlOm5vbmU7ZmlsbC1ydWxlOm5vbnplcm87ZmlsbDpyZ2IoMTAwJSwxMDAlLDEwMCUpO2ZpbGwtb3BhY2l0eToxOyIgZD0iTSAyNS4xMjEwOTQgMTQuNDcyNjU2IEMgMjUuMTI1IDIwLjAyNzM0NCAyMC42NDg0MzggMjQuNTM1MTU2IDE1LjEyNSAyNC41MzkwNjMgQyA5LjYwNTQ2OSAyNC41NDI5NjkgNS4xMjUgMjAuMDM5MDYzIDUuMTIxMDk0IDE0LjQ4NDM3NSBDIDUuMTIxMDk0IDE0LjQ4MDQ2OSA1LjEyMTA5NCAxNC40NzY1NjMgNS4xMjEwOTQgMTQuNDcyNjU2IEMgNS4xMTcxODggOC45MTQwNjMgOS41OTM3NSA0LjQwNjI1IDE1LjExMzI4MSA0LjQwMjM0NCBDIDIwLjYzNjcxOSA0LjM5ODQzOCAyNS4xMTcxODggOC45MDIzNDQgMjUuMTIxMDk0IDE0LjQ2MDkzOCBDIDI1LjEyMTA5NCAxNC40NjA5MzggMjUuMTIxMDk0IDE0LjQ2ODc1IDI1LjEyMTA5NCAxNC40NzI2NTYgWiAiLz4NCjxwYXRoIHN0eWxlPSIgc3Ryb2tlOm5vbmU7ZmlsbC1ydWxlOm5vbnplcm87ZmlsbDpyZ2IoMCUsMCUsMCUpO2ZpbGwtb3BhY2l0eToxOyIgZD0iTSAyMy4yNSA2LjI3MzQzOCBDIDI1LjQ2NDg0NCA4LjUwNzgxMyAyNi41NzQyMTkgMTEuMjM4MjgxIDI2LjU3NDIxOSAxNC40NzI2NTYgQyAyNi41NzQyMTkgMTcuNzAzMTI1IDI1LjQ4NDM3NSAyMC40MDYyNSAyMy4zMDQ2ODggMjIuNTgyMDMxIEMgMjAuOTkyMTg4IDI0Ljg3MTA5NCAxOC4yNjE3MTkgMjYuMDE1NjI1IDE1LjEwNTQ2OSAyNi4wMTU2MjUgQyAxMS45OTIxODggMjYuMDE1NjI1IDkuMzA0Njg4IDI0Ljg3ODkwNiA3LjA1MDc4MSAyMi42MDkzNzUgQyA0Ljc5Mjk2OSAyMC4zMzk4NDQgMy42Njc5NjkgMTcuNjI1IDMuNjY3OTY5IDE0LjQ3MjY1NiBDIDMuNjY3OTY5IDExLjMxNjQwNiA0Ljc5Mjk2OSA4LjU4MjAzMSA3LjA1MDc4MSA2LjI3MzQzOCBDIDkuMjQ2MDk0IDQuMDQyOTY5IDExLjkzMzU5NCAyLjkyNTc4MSAxNS4xMDU0NjkgMi45MjU3ODEgQyAxOC4zMTY0MDYgMi45MjU3ODEgMjEuMDMxMjUgNC4wNDI5NjkgMjMuMjUgNi4yNzM0MzggWiBNIDguNTQyOTY5IDcuNzc3MzQ0IEMgNi42Njc5NjkgOS42Nzk2ODggNS43MzA0NjkgMTEuOTE0MDYzIDUuNzMwNDY5IDE0LjQ3MjY1NiBDIDUuNzMwNDY5IDE3LjAzNTE1NiA2LjY2MDE1NiAxOS4yNDYwOTQgOC41MTE3MTkgMjEuMTEzMjgxIEMgMTAuMzY3MTg4IDIyLjk4MDQ2OSAxMi41NzgxMjUgMjMuOTE0MDYzIDE1LjE0MDYyNSAyMy45MTQwNjMgQyAxNy43MDMxMjUgMjMuOTE0MDYzIDE5LjkyOTY4OCAyMi45NzI2NTYgMjEuODI0MjE5IDIxLjA4NTkzOCBDIDIzLjYyMTA5NCAxOS4zMzIwMzEgMjQuNTE5NTMxIDE3LjEyODkwNiAyNC41MTk1MzEgMTQuNDcyNjU2IEMgMjQuNTE5NTMxIDExLjgzNTkzOCAyMy42MDU0NjkgOS42MDE1NjMgMjEuNzgxMjUgNy43NjE3MTkgQyAxOS45NTMxMjUgNS45MjE4NzUgMTcuNzQyMTg4IDUuMDAzOTA2IDE1LjE0MDYyNSA1LjAwMzkwNiBDIDEyLjUzOTA2MyA1LjAwMzkwNiAxMC4zMzk4NDQgNS45Mjk2ODggOC41NDI5NjkgNy43NzczNDQgWiBNIDEzLjQ3NjU2MyAxMy4zNDc2NTYgQyAxMy4xODc1IDEyLjcxODc1IDEyLjc2MTcxOSAxMi40MDYyNSAxMi4xODc1IDEyLjQwNjI1IEMgMTEuMTc1NzgxIDEyLjQwNjI1IDEwLjY3MTg3NSAxMy4wODk4NDQgMTAuNjcxODc1IDE0LjQ2MDkzOCBDIDEwLjY3MTg3NSAxNS44MjgxMjUgMTEuMTc1NzgxIDE2LjUxMTcxOSAxMi4xODc1IDE2LjUxMTcxOSBDIDEyLjg1NTQ2OSAxNi41MTE3MTkgMTMuMzMyMDMxIDE2LjE3OTY4OCAxMy42MTcxODggMTUuNTExNzE5IEwgMTUuMDE5NTMxIDE2LjI2MTcxOSBDIDE0LjM1MTU2MyAxNy40NTcwMzEgMTMuMzUxNTYzIDE4LjA1NDY4OCAxMi4wMTU2MjUgMTguMDU0Njg4IEMgMTAuOTg0Mzc1IDE4LjA1NDY4OCAxMC4xNTYyNSAxNy43MzgyODEgOS41MzkwNjMgMTcuMTAxNTYzIEMgOC45MTc5NjkgMTYuNDY0ODQ0IDguNjA1NDY5IDE1LjU4OTg0NCA4LjYwNTQ2OSAxNC40NzI2NTYgQyA4LjYwNTQ2OSAxMy4zNzEwOTQgOC45MjU3ODEgMTIuNSA5LjU2NjQwNiAxMS44NTU0NjkgQyAxMC4yMDcwMzEgMTEuMjEwOTM4IDExLjAwMzkwNiAxMC44ODY3MTkgMTEuOTU3MDMxIDEwLjg4NjcxOSBDIDEzLjM3MTA5NCAxMC44ODY3MTkgMTQuMzc4OTA2IDExLjQ0OTIxOSAxNC45OTIxODggMTIuNTY2NDA2IFogTSAyMC4wNjY0MDYgMTMuMzQ3NjU2IEMgMTkuNzgxMjUgMTIuNzE4NzUgMTkuMzU5Mzc1IDEyLjQwNjI1IDE4LjgwODU5NCAxMi40MDYyNSBDIDE3Ljc3NzM0NCAxMi40MDYyNSAxNy4yNTc4MTMgMTMuMDg5ODQ0IDE3LjI1NzgxMyAxNC40NjA5MzggQyAxNy4yNTc4MTMgMTUuODI4MTI1IDE3Ljc3NzM0NCAxNi41MTE3MTkgMTguODA4NTk0IDE2LjUxMTcxOSBDIDE5LjQ3NjU2MyAxNi41MTE3MTkgMTkuOTQ1MzEzIDE2LjE3OTY4OCAyMC4yMTA5MzggMTUuNTExNzE5IEwgMjEuNjQ0NTMxIDE2LjI2MTcxOSBDIDIwLjk3NjU2MyAxNy40NTcwMzEgMTkuOTc2NTYzIDE4LjA1NDY4OCAxOC42NDA2MjUgMTguMDU0Njg4IEMgMTcuNjEzMjgxIDE4LjA1NDY4OCAxNi43ODkwNjMgMTcuNzM4MjgxIDE2LjE3MTg3NSAxNy4xMDE1NjMgQyAxNS41NTA3ODEgMTYuNDY0ODQ0IDE1LjI0MjE4OCAxNS41ODk4NDQgMTUuMjQyMTg4IDE0LjQ3MjY1NiBDIDE1LjI0MjE4OCAxMy4zNzEwOTQgMTUuNTU0Njg4IDEyLjUgMTYuMTgzNTk0IDExLjg1NTQ2OSBDIDE2LjgxMjUgMTEuMjEwOTM4IDE3LjYxMzI4MSAxMC44ODY3MTkgMTguNTg1OTM4IDEwLjg4NjcxOSBDIDE5Ljk5NjA5NCAxMC44ODY3MTkgMjEuMDAzOTA2IDExLjQ0OTIxOSAyMS42MTMyODEgMTIuNTY2NDA2IFogIi8+DQo8cGF0aCBzdHlsZT0iIHN0cm9rZTpub25lO2ZpbGwtcnVsZTpub256ZXJvO2ZpbGw6cmdiKDEwMCUsMTAwJSwxMDAlKTtmaWxsLW9wYWNpdHk6MTsiIGQ9Ik0gNjMuODA0Njg4IDExLjIzMDQ2OSBDIDYzLjgwNDY4OCAxNS42MDkzNzUgNjAuMjc3MzQ0IDE5LjE1NjI1IDU1LjkyOTY4OCAxOS4xNTYyNSBDIDUxLjU3ODEyNSAxOS4xNTYyNSA0OC4wNTQ2ODggMTUuNjA5Mzc1IDQ4LjA1NDY4OCAxMS4yMzA0NjkgQyA0OC4wNTQ2ODggNi44NTU0NjkgNTEuNTc4MTI1IDMuMzA0Njg4IDU1LjkyOTY4OCAzLjMwNDY4OCBDIDYwLjI3NzM0NCAzLjMwNDY4OCA2My44MDQ2ODggNi44NTU0NjkgNjMuODA0Njg4IDExLjIzMDQ2OSBaICIvPg0KPHBhdGggc3R5bGU9IiBzdHJva2U6bm9uZTtmaWxsLXJ1bGU6bm9uemVybztmaWxsOnJnYigwJSwwJSwwJSk7ZmlsbC1vcGFjaXR5OjE7IiBkPSJNIDU4LjIwNzAzMSA4LjkzNzUgQyA1OC4yMDcwMzEgOC42MzI4MTMgNTcuOTYwOTM4IDguMzg2NzE5IDU3LjY2MDE1NiA4LjM4NjcxOSBMIDU0LjE3OTY4OCA4LjM4NjcxOSBDIDUzLjg3ODkwNiA4LjM4NjcxOSA1My42MzI4MTMgOC42MzI4MTMgNTMuNjMyODEzIDguOTM3NSBMIDUzLjYzMjgxMyAxMi40Mzc1IEwgNTQuNjAxNTYzIDEyLjQzNzUgTCA1NC42MDE1NjMgMTYuNTg1OTM4IEwgNTcuMjM4MjgxIDE2LjU4NTkzOCBMIDU3LjIzODI4MSAxMi40Mzc1IEwgNTguMjA3MDMxIDEyLjQzNzUgWiAiLz4NCjxwYXRoIHN0eWxlPSIgc3Ryb2tlOm5vbmU7ZmlsbC1ydWxlOm5vbnplcm87ZmlsbDpyZ2IoMCUsMCUsMCUpO2ZpbGwtb3BhY2l0eToxOyIgZD0iTSA1Ny4xMDkzNzUgNi43MjY1NjMgQyA1Ny4xMDkzNzUgNy4zODY3MTkgNTYuNTc4MTI1IDcuOTI1NzgxIDU1LjkyMTg3NSA3LjkyNTc4MSBDIDU1LjI2MTcxOSA3LjkyNTc4MSA1NC43MzA0NjkgNy4zODY3MTkgNTQuNzMwNDY5IDYuNzI2NTYzIEMgNTQuNzMwNDY5IDYuMDY2NDA2IDU1LjI2MTcxOSA1LjUzMTI1IDU1LjkyMTg3NSA1LjUzMTI1IEMgNTYuNTc4MTI1IDUuNTMxMjUgNTcuMTA5Mzc1IDYuMDY2NDA2IDU3LjEwOTM3NSA2LjcyNjU2MyBaICIvPg0KPHBhdGggc3R5bGU9IiBzdHJva2U6bm9uZTtmaWxsLXJ1bGU6ZXZlbm9kZDtmaWxsOnJnYigwJSwwJSwwJSk7ZmlsbC1vcGFjaXR5OjE7IiBkPSJNIDU1LjkxMDE1NiAyLjUgQyA1My41NTQ2ODggMi41IDUxLjU1ODU5NCAzLjMyODEyNSA0OS45MjU3ODEgNC45ODA0NjkgQyA0OC4yNTM5MDYgNi42OTE0MDYgNDcuNDE3OTY5IDguNzE4NzUgNDcuNDE3OTY5IDExLjA1ODU5NCBDIDQ3LjQxNzk2OSAxMy4zOTQ1MzEgNDguMjUzOTA2IDE1LjQwNjI1IDQ5LjkyNTc4MSAxNy4wODk4NDQgQyA1MS42MDE1NjMgMTguNzczNDM4IDUzLjU5NzY1NiAxOS42MTMyODEgNTUuOTEwMTU2IDE5LjYxMzI4MSBDIDU4LjI1IDE5LjYxMzI4MSA2MC4yODEyNSAxOC43NjU2MjUgNjEuOTk2MDk0IDE3LjA3MDMxMyBDIDYzLjYxMzI4MSAxNS40NTcwMzEgNjQuNDI1NzgxIDEzLjQ1MzEyNSA2NC40MjU3ODEgMTEuMDU4NTk0IEMgNjQuNDI1NzgxIDguNjYwMTU2IDYzLjYwMTU2MyA2LjYzNjcxOSA2MS45NTcwMzEgNC45ODA0NjkgQyA2MC4zMDg1OTQgMy4zMjgxMjUgNTguMjkyOTY5IDIuNSA1NS45MTAxNTYgMi41IFogTSA1NS45Mjk2ODggNC4wMzkwNjMgQyA1Ny44NTkzNzUgNC4wMzkwNjMgNTkuNSA0LjcyMjY1NiA2MC44NDc2NTYgNi4wOTM3NSBDIDYyLjIxMDkzOCA3LjQ0OTIxOSA2Mi44OTA2MjUgOS4xMDE1NjMgNjIuODkwNjI1IDExLjA1ODU5NCBDIDYyLjg5MDYyNSAxMy4wMjM0MzggNjIuMjIyNjU2IDE0LjY2MDE1NiA2MC44OTA2MjUgMTUuOTU3MDMxIEMgNTkuNDg0Mzc1IDE3LjM1NTQ2OSA1Ny44MzIwMzEgMTguMDU0Njg4IDU1LjkyOTY4OCAxOC4wNTQ2ODggQyA1NC4wMjczNDQgMTguMDU0Njg4IDUyLjM5MDYyNSAxNy4zNjMyODEgNTEuMDExNzE5IDE1Ljk3NjU2MyBDIDQ5LjYzNjcxOSAxNC41OTM3NSA0OC45NDkyMTkgMTIuOTUzMTI1IDQ4Ljk0OTIxOSAxMS4wNTg1OTQgQyA0OC45NDkyMTkgOS4xNjAxNTYgNDkuNjQ0NTMxIDcuNTAzOTA2IDUxLjAzNTE1NiA2LjA5Mzc1IEMgNTIuMzY3MTg4IDQuNzIyNjU2IDU0IDQuMDM5MDYzIDU1LjkyOTY4OCA0LjAzOTA2MyBaICIvPg0KPC9nPg0KPC9zdmc+DQo=" width=88 height=31 class=img_ev3q></p>
 <p>This work is licensed under a Creative Commons Attribution 4.0 International
 License. Any third party materials in this work are not included in the
 article’s Creative Commons license, and users will need to obtain permission
diff --git a/loop/index.html b/loop/index.html
index 61a840a..e76f69e 100644
--- a/loop/index.html
+++ b/loop/index.html
@@ -1,4 +1,4 @@
-<!doctype html><html lang=en dir=ltr class="docs-wrapper plugin-docs plugin-id-default docs-version-current docs-doc-page docs-doc-id-loop" data-has-hydrated=false><meta charset=UTF-8><meta name=generator content="Docusaurus v3.6.1"><title data-rh=true>Loop • Fortran Tutorial</title><meta data-rh=true name=viewport content="width=device-width,initial-scale=1.0"><meta data-rh=true name=twitter:card content=summary_large_image><meta data-rh=true property=og:url content=https://pranabdas.github.io/fortran/loop><meta data-rh=true property=og:locale content=en><meta data-rh=true name=docusaurus_locale content=en><meta data-rh=true name=docsearch:language content=en><meta data-rh=true name=theme-color content=#06445c><meta data-rh=true name=docusaurus_version content=current><meta data-rh=true name=docusaurus_tag content=docs-default-current><meta data-rh=true name=docsearch:version content=current><meta data-rh=true name=docsearch:docusaurus_tag content=docs-default-current><meta data-rh=true property=og:title content="Loop • Fortran Tutorial"><meta data-rh=true name=description content="DO Loop"><meta data-rh=true property=og:description content="DO Loop"><link data-rh=true rel=icon href=/fortran/img/favicon.png><link data-rh=true rel=canonical href=https://pranabdas.github.io/fortran/loop><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/loop hreflang=en><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/loop hreflang=x-default><link rel=stylesheet href=https://pranabdas.github.io/drive/webfonts/katex/katex.min.css><link rel=stylesheet href=/fortran/assets/css/styles.4de1c8a8.css><script src=/fortran/assets/js/runtime~main.866c090c.js defer></script><script src=/fortran/assets/js/main.ec888ba8.js defer></script><body class=navigation-with-keyboard><script>!function(){var t,e=function(){try{return new URLSearchParams(window.location.search).get("docusaurus-theme")}catch(t){}}()||function(){try{return window.localStorage.getItem("theme")}catch(t){}}();t=null!==e?e:window.matchMedia("(prefers-color-scheme: dark)").matches?"dark":(window.matchMedia("(prefers-color-scheme: light)").matches,"light"),document.documentElement.setAttribute("data-theme",t)}(),function(){try{for(var[t,e]of new URLSearchParams(window.location.search).entries())if(t.startsWith("docusaurus-data-")){var a=t.replace("docusaurus-data-","data-");document.documentElement.setAttribute(a,e)}}catch(t){}}()</script><div id=__docusaurus><div role=region aria-label="Skip to main content"><a class=skipToContent_fXgn href=#__docusaurus_skipToContent_fallback>Skip to main content</a></div><nav aria-label=Main class="navbar navbar--fixed-top navbarHideable_m1mJ"><div class=navbar__inner><div class=navbar__items><button aria-label="Toggle navigation bar" aria-expanded=false class="navbar__toggle clean-btn" type=button><svg width=30 height=30 viewBox="0 0 30 30" aria-hidden=true><path stroke=currentColor stroke-linecap=round stroke-miterlimit=10 stroke-width=2 d="M4 7h22M4 15h22M4 23h22"/></svg></button><a class=navbar__brand href=/fortran/><div class=navbar__logo><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--light_NVdE"><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--dark_xIcU"></div><b class="navbar__title text--truncate">Fortran</b></a><div class="navbar__item dropdown dropdown--hoverable"><a aria-current=page class="navbar__link active" aria-haspopup=true aria-expanded=false role=button href=/fortran/>Docs</a><ul class=dropdown__menu><li><a aria-current=page class="dropdown__link dropdown__link--active" href=/fortran/>Fortran Programming</a><li><a href=https://pranabdas.github.io/docs/ rel="noopener noreferrer" class=dropdown__link>~ ~ ~ Other Docs ~ ~ ~</a><li><a href=https://pranabdas.github.io/arpespythontools/ rel="noopener noreferrer" class=dropdown__link>ARPES Python Tools</a><li><a href=https://pranabdas.github.io/c-cpp/ rel="noopener noreferrer" class=dropdown__link>C and C++ Programming</a><li><a href=https://pranabdas.github.io/condmat-notes/ rel="noopener noreferrer" class=dropdown__link>Condensed Matter Notes</a><li><a href=https://pranabdas.github.io/javascript/ rel="noopener noreferrer" class=dropdown__link>Javascript Tutorial</a><li><a href=https://pranabdas.github.io/linux/ rel="noopener noreferrer" class=dropdown__link>Linux Tutorial</a><li><a href=https://pranabdas.github.io/machine-learning/ rel="noopener noreferrer" class=dropdown__link>Machine Learning Notes</a><li><a href=https://pranabdas.github.io/openmx/ rel="noopener noreferrer" class=dropdown__link>OpenMX tutorial</a><li><a href=https://pranabdas.github.io/python-tutorial/ rel="noopener noreferrer" class=dropdown__link>Python Tutorial</a><li><a href=https://pranabdas.github.io/espresso/ rel="noopener noreferrer" class=dropdown__link>Quantum Espresso Tutorial</a><li><a href=https://pranabdas.github.io/rust/ rel="noopener noreferrer" class=dropdown__link>Rust Programming</a><li><a href=https://pranabdas.github.io/arpes-manual/ rel="noopener noreferrer" class=dropdown__link>SUV ARPES Manual</a><li><a href=https://pranabdas.github.io/suvtools/ rel="noopener noreferrer" class=dropdown__link>SUV Python Tools</a></ul></div></div><div class="navbar__items navbar__items--right"><a href=https://github.com/pranabdas/fortran rel="noopener noreferrer" class="navbar__item navbar__link header-github-link" aria-label="GitHub repository" title="Visit project repository in GitHub"></a><a href=https://pranabdas.github.io rel="noopener noreferrer" class="navbar__item navbar__link header-homepage-link" aria-label="About me" title="Go to Pranab's Homepage"></a><div class="toggle_vylO colorModeToggle_DEke"><button class="clean-btn toggleButton_gllP toggleButtonDisabled_aARS" type=button disabled title="Switch between dark and light mode (currently light mode)" aria-label="Switch between dark and light mode (currently light mode)" aria-live=polite aria-pressed=false><svg viewBox="0 0 24 24" width=24 height=24 class=lightToggleIcon_pyhR><path fill=currentColor d="M12,9c1.65,0,3,1.35,3,3s-1.35,3-3,3s-3-1.35-3-3S10.35,9,12,9 M12,7c-2.76,0-5,2.24-5,5s2.24,5,5,5s5-2.24,5-5 S14.76,7,12,7L12,7z M2,13l2,0c0.55,0,1-0.45,1-1s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S1.45,13,2,13z M20,13l2,0c0.55,0,1-0.45,1-1 s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S19.45,13,20,13z M11,2v2c0,0.55,0.45,1,1,1s1-0.45,1-1V2c0-0.55-0.45-1-1-1S11,1.45,11,2z M11,20v2c0,0.55,0.45,1,1,1s1-0.45,1-1v-2c0-0.55-0.45-1-1-1C11.45,19,11,19.45,11,20z M5.99,4.58c-0.39-0.39-1.03-0.39-1.41,0 c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0s0.39-1.03,0-1.41L5.99,4.58z M18.36,16.95 c-0.39-0.39-1.03-0.39-1.41,0c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0c0.39-0.39,0.39-1.03,0-1.41 L18.36,16.95z M19.42,5.99c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06c-0.39,0.39-0.39,1.03,0,1.41 s1.03,0.39,1.41,0L19.42,5.99z M7.05,18.36c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06 c-0.39,0.39-0.39,1.03,0,1.41s1.03,0.39,1.41,0L7.05,18.36z"/></svg><svg viewBox="0 0 24 24" width=24 height=24 class=darkToggleIcon_wfgR><path fill=currentColor d="M9.37,5.51C9.19,6.15,9.1,6.82,9.1,7.5c0,4.08,3.32,7.4,7.4,7.4c0.68,0,1.35-0.09,1.99-0.27C17.45,17.19,14.93,19,12,19 c-3.86,0-7-3.14-7-7C5,9.07,6.81,6.55,9.37,5.51z M12,3c-4.97,0-9,4.03-9,9s4.03,9,9,9s9-4.03,9-9c0-0.46-0.04-0.92-0.1-1.36 c-0.98,1.37-2.58,2.26-4.4,2.26c-2.98,0-5.4-2.42-5.4-5.4c0-1.81,0.89-3.42,2.26-4.4C12.92,3.04,12.46,3,12,3L12,3z"/></svg></button></div><div class=navbarSearchContainer_Bca1><div class="navbar__search searchBarContainer_NW3z" dir=ltr><input placeholder=Search aria-label=Search class=navbar__search-input value=""><div class="loadingRing_RJI3 searchBarLoadingRing_YnHq"><div></div><div></div><div></div><div></div></div></div></div></div></div><div role=presentation class=navbar-sidebar__backdrop></div></nav><div id=__docusaurus_skipToContent_fallback class="main-wrapper mainWrapper_z2l0"><div class=docsWrapper_hBAB><button aria-label="Scroll back to top" class="clean-btn theme-back-to-top-button backToTopButton_sjWU" type=button></button><div class=docRoot_UBD9><aside class="theme-doc-sidebar-container docSidebarContainer_YfHR"><div class=sidebarViewport_aRkj><div class="sidebar_njMd sidebarWithHideableNavbar_wUlq"><a tabindex=-1 class=sidebarLogo_isFc href=/fortran/><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--light_NVdE"><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--dark_xIcU"><b>Fortran</b></a><nav aria-label="Docs sidebar" class="menu thin-scrollbar menu_SIkG"><ul class="theme-doc-sidebar-menu menu__list"><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/>Setup</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/basics>Basics</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/array>Array and Matrix</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/control>Logical control</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class="menu__link menu__link--active" aria-current=page href=/fortran/loop>Loop</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/modules>Modules</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/procedures>Procedures</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/complex>Complex number</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/recursion>Recursion</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/types>Custom types</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/pointer>Pointer</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/file>File I/O</a><li class="theme-doc-sidebar-item-category theme-doc-sidebar-item-category-level-1 menu__list-item menu__list-item--collapsed"><div class=menu__list-item-collapsible><a class="menu__link menu__link--sublist" href=/fortran/category/coding-practice>Coding practice</a><button aria-label="Expand sidebar category 'Coding practice'" aria-expanded=false type=button class="clean-btn menu__caret"></button></div><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/resources>Resources</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/license>License</a></ul></nav><button type=button title="Collapse sidebar" aria-label="Collapse sidebar" class="button button--secondary button--outline collapseSidebarButton_PEFL"><svg width=20 height=20 aria-hidden=true class=collapseSidebarButtonIcon_kv0_><g fill=#7a7a7a><path d="M9.992 10.023c0 .2-.062.399-.172.547l-4.996 7.492a.982.982 0 01-.828.454H1c-.55 0-1-.453-1-1 0-.2.059-.403.168-.551l4.629-6.942L.168 3.078A.939.939 0 010 2.528c0-.548.45-.997 1-.997h2.996c.352 0 .649.18.828.45L9.82 9.472c.11.148.172.347.172.55zm0 0"/><path d="M19.98 10.023c0 .2-.058.399-.168.547l-4.996 7.492a.987.987 0 01-.828.454h-3c-.547 0-.996-.453-.996-1 0-.2.059-.403.168-.551l4.625-6.942-4.625-6.945a.939.939 0 01-.168-.55 1 1 0 01.996-.997h3c.348 0 .649.18.828.45l4.996 7.492c.11.148.168.347.168.55zm0 0"/></g></svg></button></div></div></aside><main class=docMainContainer_TBSr><div class="container padding-top--md padding-bottom--lg"><div class=row><div class="col docItemCol_VOVn"><div class=docItemContainer_Djhp><article><nav class="theme-doc-breadcrumbs breadcrumbsContainer_Z_bl" aria-label=Breadcrumbs><ul class=breadcrumbs itemscope itemtype=https://schema.org/BreadcrumbList><li class=breadcrumbs__item><a aria-label="Home page" class=breadcrumbs__link href=/fortran/><svg viewBox="0 0 24 24" class=breadcrumbHomeIcon_YNFT><path d="M10 19v-5h4v5c0 .55.45 1 1 1h3c.55 0 1-.45 1-1v-7h1.7c.46 0 .68-.57.33-.87L12.67 3.6c-.38-.34-.96-.34-1.34 0l-8.36 7.53c-.34.3-.13.87.33.87H5v7c0 .55.45 1 1 1h3c.55 0 1-.45 1-1z" fill=currentColor /></svg></a><li itemscope itemprop=itemListElement itemtype=https://schema.org/ListItem class="breadcrumbs__item breadcrumbs__item--active"><span class=breadcrumbs__link itemprop=name>Loop</span><meta itemprop=position content=1></ul></nav><div class="tocCollapsible_ETCw theme-doc-toc-mobile tocMobile_ITEo"><button type=button class="clean-btn tocCollapsibleButton_TO0P">On this page</button></div><div class="theme-doc-markdown markdown"><header><h1>Loop</h1></header><h2 class="anchor anchorWithHideOnScrollNavbar_WYt5" id=do-loop>DO Loop<a href=#do-loop class=hash-link aria-label="Direct link to DO Loop" title="Direct link to DO Loop">​</a></h2>
+<!doctype html><html lang=en dir=ltr class="docs-wrapper plugin-docs plugin-id-default docs-version-current docs-doc-page docs-doc-id-loop" data-has-hydrated=false><meta charset=UTF-8><meta name=generator content="Docusaurus v3.6.1"><title data-rh=true>Loop • Fortran Tutorial</title><meta data-rh=true name=viewport content="width=device-width,initial-scale=1.0"><meta data-rh=true name=twitter:card content=summary_large_image><meta data-rh=true property=og:url content=https://pranabdas.github.io/fortran/loop><meta data-rh=true property=og:locale content=en><meta data-rh=true name=docusaurus_locale content=en><meta data-rh=true name=docsearch:language content=en><meta data-rh=true name=theme-color content=#06445c><meta data-rh=true name=docusaurus_version content=current><meta data-rh=true name=docusaurus_tag content=docs-default-current><meta data-rh=true name=docsearch:version content=current><meta data-rh=true name=docsearch:docusaurus_tag content=docs-default-current><meta data-rh=true property=og:title content="Loop • Fortran Tutorial"><meta data-rh=true name=description content="DO Loop"><meta data-rh=true property=og:description content="DO Loop"><link data-rh=true rel=icon href=/fortran/img/favicon.png><link data-rh=true rel=canonical href=https://pranabdas.github.io/fortran/loop><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/loop hreflang=en><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/loop hreflang=x-default><link rel=stylesheet href=https://pranab.pages.dev/assets/fonts/katex/katex.min.css><link rel=stylesheet href=/fortran/assets/css/styles.4de1c8a8.css><script src=/fortran/assets/js/runtime~main.667e3c0f.js defer></script><script src=/fortran/assets/js/main.10795e8f.js defer></script><body class=navigation-with-keyboard><script>!function(){var t,e=function(){try{return new URLSearchParams(window.location.search).get("docusaurus-theme")}catch(t){}}()||function(){try{return window.localStorage.getItem("theme")}catch(t){}}();t=null!==e?e:window.matchMedia("(prefers-color-scheme: dark)").matches?"dark":(window.matchMedia("(prefers-color-scheme: light)").matches,"light"),document.documentElement.setAttribute("data-theme",t)}(),function(){try{for(var[t,e]of new URLSearchParams(window.location.search).entries())if(t.startsWith("docusaurus-data-")){var a=t.replace("docusaurus-data-","data-");document.documentElement.setAttribute(a,e)}}catch(t){}}()</script><div id=__docusaurus><div role=region aria-label="Skip to main content"><a class=skipToContent_fXgn href=#__docusaurus_skipToContent_fallback>Skip to main content</a></div><nav aria-label=Main class="navbar navbar--fixed-top navbarHideable_m1mJ"><div class=navbar__inner><div class=navbar__items><button aria-label="Toggle navigation bar" aria-expanded=false class="navbar__toggle clean-btn" type=button><svg width=30 height=30 viewBox="0 0 30 30" aria-hidden=true><path stroke=currentColor stroke-linecap=round stroke-miterlimit=10 stroke-width=2 d="M4 7h22M4 15h22M4 23h22"/></svg></button><a class=navbar__brand href=/fortran/><div class=navbar__logo><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--light_NVdE"><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--dark_xIcU"></div><b class="navbar__title text--truncate">Fortran</b></a><div class="navbar__item dropdown dropdown--hoverable"><a aria-current=page class="navbar__link active" aria-haspopup=true aria-expanded=false role=button href=/fortran/>Docs</a><ul class=dropdown__menu><li><a aria-current=page class="dropdown__link dropdown__link--active" href=/fortran/>Fortran Programming</a><li><a href=https://pranabdas.github.io/docs/ rel="noopener noreferrer" class=dropdown__link>~ ~ ~ Other Docs ~ ~ ~</a><li><a href=https://pranabdas.github.io/arpespythontools/ rel="noopener noreferrer" class=dropdown__link>ARPES Python Tools</a><li><a href=https://pranabdas.github.io/c-cpp/ rel="noopener noreferrer" class=dropdown__link>C and C++ Programming</a><li><a href=https://pranabdas.github.io/condmat-notes/ rel="noopener noreferrer" class=dropdown__link>Condensed Matter Notes</a><li><a href=https://pranabdas.github.io/javascript/ rel="noopener noreferrer" class=dropdown__link>Javascript Tutorial</a><li><a href=https://pranabdas.github.io/linux/ rel="noopener noreferrer" class=dropdown__link>Linux Tutorial</a><li><a href=https://pranabdas.github.io/machine-learning/ rel="noopener noreferrer" class=dropdown__link>Machine Learning Notes</a><li><a href=https://pranabdas.github.io/openmx/ rel="noopener noreferrer" class=dropdown__link>OpenMX tutorial</a><li><a href=https://pranabdas.github.io/python-tutorial/ rel="noopener noreferrer" class=dropdown__link>Python Tutorial</a><li><a href=https://pranabdas.github.io/espresso/ rel="noopener noreferrer" class=dropdown__link>Quantum Espresso Tutorial</a><li><a href=https://pranabdas.github.io/rust/ rel="noopener noreferrer" class=dropdown__link>Rust Programming</a><li><a href=https://pranabdas.github.io/arpes-manual/ rel="noopener noreferrer" class=dropdown__link>SUV ARPES Manual</a><li><a href=https://pranabdas.github.io/suvtools/ rel="noopener noreferrer" class=dropdown__link>SUV Python Tools</a></ul></div></div><div class="navbar__items navbar__items--right"><a href=https://github.com/pranabdas/fortran rel="noopener noreferrer" class="navbar__item navbar__link header-github-link" aria-label="GitHub repository" title="Visit project repository in GitHub"></a><a href=https://pranabdas.github.io rel="noopener noreferrer" class="navbar__item navbar__link header-homepage-link" aria-label="About me" title="Go to Pranab's Homepage"></a><div class="toggle_vylO colorModeToggle_DEke"><button class="clean-btn toggleButton_gllP toggleButtonDisabled_aARS" type=button disabled title="Switch between dark and light mode (currently light mode)" aria-label="Switch between dark and light mode (currently light mode)" aria-live=polite aria-pressed=false><svg viewBox="0 0 24 24" width=24 height=24 class=lightToggleIcon_pyhR><path fill=currentColor d="M12,9c1.65,0,3,1.35,3,3s-1.35,3-3,3s-3-1.35-3-3S10.35,9,12,9 M12,7c-2.76,0-5,2.24-5,5s2.24,5,5,5s5-2.24,5-5 S14.76,7,12,7L12,7z M2,13l2,0c0.55,0,1-0.45,1-1s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S1.45,13,2,13z M20,13l2,0c0.55,0,1-0.45,1-1 s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S19.45,13,20,13z M11,2v2c0,0.55,0.45,1,1,1s1-0.45,1-1V2c0-0.55-0.45-1-1-1S11,1.45,11,2z M11,20v2c0,0.55,0.45,1,1,1s1-0.45,1-1v-2c0-0.55-0.45-1-1-1C11.45,19,11,19.45,11,20z M5.99,4.58c-0.39-0.39-1.03-0.39-1.41,0 c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0s0.39-1.03,0-1.41L5.99,4.58z M18.36,16.95 c-0.39-0.39-1.03-0.39-1.41,0c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0c0.39-0.39,0.39-1.03,0-1.41 L18.36,16.95z M19.42,5.99c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06c-0.39,0.39-0.39,1.03,0,1.41 s1.03,0.39,1.41,0L19.42,5.99z M7.05,18.36c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06 c-0.39,0.39-0.39,1.03,0,1.41s1.03,0.39,1.41,0L7.05,18.36z"/></svg><svg viewBox="0 0 24 24" width=24 height=24 class=darkToggleIcon_wfgR><path fill=currentColor d="M9.37,5.51C9.19,6.15,9.1,6.82,9.1,7.5c0,4.08,3.32,7.4,7.4,7.4c0.68,0,1.35-0.09,1.99-0.27C17.45,17.19,14.93,19,12,19 c-3.86,0-7-3.14-7-7C5,9.07,6.81,6.55,9.37,5.51z M12,3c-4.97,0-9,4.03-9,9s4.03,9,9,9s9-4.03,9-9c0-0.46-0.04-0.92-0.1-1.36 c-0.98,1.37-2.58,2.26-4.4,2.26c-2.98,0-5.4-2.42-5.4-5.4c0-1.81,0.89-3.42,2.26-4.4C12.92,3.04,12.46,3,12,3L12,3z"/></svg></button></div><div class=navbarSearchContainer_Bca1><div class="navbar__search searchBarContainer_NW3z" dir=ltr><input placeholder=Search aria-label=Search class=navbar__search-input value=""><div class="loadingRing_RJI3 searchBarLoadingRing_YnHq"><div></div><div></div><div></div><div></div></div></div></div></div></div><div role=presentation class=navbar-sidebar__backdrop></div></nav><div id=__docusaurus_skipToContent_fallback class="main-wrapper mainWrapper_z2l0"><div class=docsWrapper_hBAB><button aria-label="Scroll back to top" class="clean-btn theme-back-to-top-button backToTopButton_sjWU" type=button></button><div class=docRoot_UBD9><aside class="theme-doc-sidebar-container docSidebarContainer_YfHR"><div class=sidebarViewport_aRkj><div class="sidebar_njMd sidebarWithHideableNavbar_wUlq"><a tabindex=-1 class=sidebarLogo_isFc href=/fortran/><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--light_NVdE"><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--dark_xIcU"><b>Fortran</b></a><nav aria-label="Docs sidebar" class="menu thin-scrollbar menu_SIkG"><ul class="theme-doc-sidebar-menu menu__list"><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/>Setup</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/basics>Basics</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/array>Array and Matrix</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/control>Logical control</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class="menu__link menu__link--active" aria-current=page href=/fortran/loop>Loop</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/modules>Modules</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/procedures>Procedures</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/complex>Complex number</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/recursion>Recursion</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/types>Custom types</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/pointer>Pointer</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/file>File I/O</a><li class="theme-doc-sidebar-item-category theme-doc-sidebar-item-category-level-1 menu__list-item menu__list-item--collapsed"><div class=menu__list-item-collapsible><a class="menu__link menu__link--sublist" href=/fortran/category/coding-practice>Coding practice</a><button aria-label="Expand sidebar category 'Coding practice'" aria-expanded=false type=button class="clean-btn menu__caret"></button></div><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/resources>Resources</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/license>License</a></ul></nav><button type=button title="Collapse sidebar" aria-label="Collapse sidebar" class="button button--secondary button--outline collapseSidebarButton_PEFL"><svg width=20 height=20 aria-hidden=true class=collapseSidebarButtonIcon_kv0_><g fill=#7a7a7a><path d="M9.992 10.023c0 .2-.062.399-.172.547l-4.996 7.492a.982.982 0 01-.828.454H1c-.55 0-1-.453-1-1 0-.2.059-.403.168-.551l4.629-6.942L.168 3.078A.939.939 0 010 2.528c0-.548.45-.997 1-.997h2.996c.352 0 .649.18.828.45L9.82 9.472c.11.148.172.347.172.55zm0 0"/><path d="M19.98 10.023c0 .2-.058.399-.168.547l-4.996 7.492a.987.987 0 01-.828.454h-3c-.547 0-.996-.453-.996-1 0-.2.059-.403.168-.551l4.625-6.942-4.625-6.945a.939.939 0 01-.168-.55 1 1 0 01.996-.997h3c.348 0 .649.18.828.45l4.996 7.492c.11.148.168.347.168.55zm0 0"/></g></svg></button></div></div></aside><main class=docMainContainer_TBSr><div class="container padding-top--md padding-bottom--lg"><div class=row><div class="col docItemCol_VOVn"><div class=docItemContainer_Djhp><article><nav class="theme-doc-breadcrumbs breadcrumbsContainer_Z_bl" aria-label=Breadcrumbs><ul class=breadcrumbs itemscope itemtype=https://schema.org/BreadcrumbList><li class=breadcrumbs__item><a aria-label="Home page" class=breadcrumbs__link href=/fortran/><svg viewBox="0 0 24 24" class=breadcrumbHomeIcon_YNFT><path d="M10 19v-5h4v5c0 .55.45 1 1 1h3c.55 0 1-.45 1-1v-7h1.7c.46 0 .68-.57.33-.87L12.67 3.6c-.38-.34-.96-.34-1.34 0l-8.36 7.53c-.34.3-.13.87.33.87H5v7c0 .55.45 1 1 1h3c.55 0 1-.45 1-1z" fill=currentColor /></svg></a><li itemscope itemprop=itemListElement itemtype=https://schema.org/ListItem class="breadcrumbs__item breadcrumbs__item--active"><span class=breadcrumbs__link itemprop=name>Loop</span><meta itemprop=position content=1></ul></nav><div class="tocCollapsible_ETCw theme-doc-toc-mobile tocMobile_ITEo"><button type=button class="clean-btn tocCollapsibleButton_TO0P">On this page</button></div><div class="theme-doc-markdown markdown"><header><h1>Loop</h1></header><h2 class="anchor anchorWithHideOnScrollNavbar_WYt5" id=do-loop>DO Loop<a href=#do-loop class=hash-link aria-label="Direct link to DO Loop" title="Direct link to DO Loop">​</a></h2>
 <p>Calculate factorial:</p>
 <!-- -->
 <div class="language-fortran codeBlockContainer_Ckt0 theme-code-block" style=--prism-color:#393A34;--prism-background-color:#f6f8fa><div class=codeBlockTitle_Ktv7>src/07_factorial.f90</div><div class=codeBlockContent_biex><pre tabindex=0 class="prism-code language-fortran codeBlock_bY9V thin-scrollbar" style=color:#393A34;background-color:#f6f8fa><code class="codeBlockLines_e6Vv codeBlockLinesWithNumbering_o6Pm"><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token comment" style=color:#999988;font-style:italic>! Program : Find factorial</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain"></span><span class="token keyword" style=color:#00009f>PROGRAM</span><span class="token plain"> factorial</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">  </span><span class="token keyword" style=color:#00009f>IMPLICIT NONE</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">  </span><span class="token keyword" style=color:#00009f>INTEGER</span><span class="token plain"> </span><span class="token operator" style=color:#393A34>::</span><span class="token plain"> input</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> ii</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> output </span><span class="token operator" style=color:#393A34>=</span><span class="token plain"> </span><span class="token number" style=color:#36acaa>1</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">  </span><span class="token keyword" style=color:#00009f>PRINT</span><span class="token plain"> </span><span class="token operator" style=color:#393A34>*</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> </span><span class="token string" style=color:#e3116c>"Input = "</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">  </span><span class="token keyword" style=color:#00009f>READ</span><span class="token plain"> </span><span class="token operator" style=color:#393A34>*</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> input</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">  </span><span class="token keyword" style=color:#00009f>DO</span><span class="token plain"> ii </span><span class="token operator" style=color:#393A34>=</span><span class="token plain"> </span><span class="token number" style=color:#36acaa>1</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> input</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    output </span><span class="token operator" style=color:#393A34>=</span><span class="token plain"> output </span><span class="token operator" style=color:#393A34>*</span><span class="token plain"> ii</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">  </span><span class="token keyword" style=color:#00009f>ENDDO</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">  </span><span class="token keyword" style=color:#00009f>PRINT</span><span class="token plain"> </span><span class="token operator" style=color:#393A34>*</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> input</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> </span><span class="token string" style=color:#e3116c>"! = "</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> output</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain"></span><span class="token keyword" style=color:#00009f>END PROGRAM</span><span class="token plain"> factorial</span></span><br></span></code></pre><div class=buttonGroup__atx><button type=button aria-label="Copy code to clipboard" title=Copy class=clean-btn><span class=copyButtonIcons_eSgA aria-hidden=true><svg viewBox="0 0 24 24" class=copyButtonIcon_y97N><path fill=currentColor d="M19,21H8V7H19M19,5H8A2,2 0 0,0 6,7V21A2,2 0 0,0 8,23H19A2,2 0 0,0 21,21V7A2,2 0 0,0 19,5M16,1H4A2,2 0 0,0 2,3V17H4V3H16V1Z"/></svg><svg viewBox="0 0 24 24" class=copyButtonSuccessIcon_LjdS><path fill=currentColor d=M21,7L9,19L3.5,13.5L4.91,12.09L9,16.17L19.59,5.59L21,7Z /></svg></span></button></div></div></div>
diff --git a/modules/index.html b/modules/index.html
index b29e917..7a6588c 100644
--- a/modules/index.html
+++ b/modules/index.html
@@ -1,4 +1,4 @@
-<!doctype html><html lang=en dir=ltr class="docs-wrapper plugin-docs plugin-id-default docs-version-current docs-doc-page docs-doc-id-modules" data-has-hydrated=false><meta charset=UTF-8><meta name=generator content="Docusaurus v3.6.1"><title data-rh=true>Modules • Fortran Tutorial</title><meta data-rh=true name=viewport content="width=device-width,initial-scale=1.0"><meta data-rh=true name=twitter:card content=summary_large_image><meta data-rh=true property=og:url content=https://pranabdas.github.io/fortran/modules><meta data-rh=true property=og:locale content=en><meta data-rh=true name=docusaurus_locale content=en><meta data-rh=true name=docsearch:language content=en><meta data-rh=true name=theme-color content=#06445c><meta data-rh=true name=docusaurus_version content=current><meta data-rh=true name=docusaurus_tag content=docs-default-current><meta data-rh=true name=docsearch:version content=current><meta data-rh=true name=docsearch:docusaurus_tag content=docs-default-current><meta data-rh=true property=og:title content="Modules • Fortran Tutorial"><meta data-rh=true name=description content="Large programs can be organized in separate modules and procedures. Here is an"><meta data-rh=true property=og:description content="Large programs can be organized in separate modules and procedures. Here is an"><link data-rh=true rel=icon href=/fortran/img/favicon.png><link data-rh=true rel=canonical href=https://pranabdas.github.io/fortran/modules><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/modules hreflang=en><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/modules hreflang=x-default><link rel=stylesheet href=https://pranabdas.github.io/drive/webfonts/katex/katex.min.css><link rel=stylesheet href=/fortran/assets/css/styles.4de1c8a8.css><script src=/fortran/assets/js/runtime~main.866c090c.js defer></script><script src=/fortran/assets/js/main.ec888ba8.js defer></script><body class=navigation-with-keyboard><script>!function(){var t,e=function(){try{return new URLSearchParams(window.location.search).get("docusaurus-theme")}catch(t){}}()||function(){try{return window.localStorage.getItem("theme")}catch(t){}}();t=null!==e?e:window.matchMedia("(prefers-color-scheme: dark)").matches?"dark":(window.matchMedia("(prefers-color-scheme: light)").matches,"light"),document.documentElement.setAttribute("data-theme",t)}(),function(){try{for(var[t,e]of new URLSearchParams(window.location.search).entries())if(t.startsWith("docusaurus-data-")){var a=t.replace("docusaurus-data-","data-");document.documentElement.setAttribute(a,e)}}catch(t){}}()</script><div id=__docusaurus><div role=region aria-label="Skip to main content"><a class=skipToContent_fXgn href=#__docusaurus_skipToContent_fallback>Skip to main content</a></div><nav aria-label=Main class="navbar navbar--fixed-top navbarHideable_m1mJ"><div class=navbar__inner><div class=navbar__items><button aria-label="Toggle navigation bar" aria-expanded=false class="navbar__toggle clean-btn" type=button><svg width=30 height=30 viewBox="0 0 30 30" aria-hidden=true><path stroke=currentColor stroke-linecap=round stroke-miterlimit=10 stroke-width=2 d="M4 7h22M4 15h22M4 23h22"/></svg></button><a class=navbar__brand href=/fortran/><div class=navbar__logo><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--light_NVdE"><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--dark_xIcU"></div><b class="navbar__title text--truncate">Fortran</b></a><div class="navbar__item dropdown dropdown--hoverable"><a aria-current=page class="navbar__link active" aria-haspopup=true aria-expanded=false role=button href=/fortran/>Docs</a><ul class=dropdown__menu><li><a aria-current=page class="dropdown__link dropdown__link--active" href=/fortran/>Fortran Programming</a><li><a href=https://pranabdas.github.io/docs/ rel="noopener noreferrer" class=dropdown__link>~ ~ ~ Other Docs ~ ~ ~</a><li><a href=https://pranabdas.github.io/arpespythontools/ rel="noopener noreferrer" class=dropdown__link>ARPES Python Tools</a><li><a href=https://pranabdas.github.io/c-cpp/ rel="noopener noreferrer" class=dropdown__link>C and C++ Programming</a><li><a href=https://pranabdas.github.io/condmat-notes/ rel="noopener noreferrer" class=dropdown__link>Condensed Matter Notes</a><li><a href=https://pranabdas.github.io/javascript/ rel="noopener noreferrer" class=dropdown__link>Javascript Tutorial</a><li><a href=https://pranabdas.github.io/linux/ rel="noopener noreferrer" class=dropdown__link>Linux Tutorial</a><li><a href=https://pranabdas.github.io/machine-learning/ rel="noopener noreferrer" class=dropdown__link>Machine Learning Notes</a><li><a href=https://pranabdas.github.io/openmx/ rel="noopener noreferrer" class=dropdown__link>OpenMX tutorial</a><li><a href=https://pranabdas.github.io/python-tutorial/ rel="noopener noreferrer" class=dropdown__link>Python Tutorial</a><li><a href=https://pranabdas.github.io/espresso/ rel="noopener noreferrer" class=dropdown__link>Quantum Espresso Tutorial</a><li><a href=https://pranabdas.github.io/rust/ rel="noopener noreferrer" class=dropdown__link>Rust Programming</a><li><a href=https://pranabdas.github.io/arpes-manual/ rel="noopener noreferrer" class=dropdown__link>SUV ARPES Manual</a><li><a href=https://pranabdas.github.io/suvtools/ rel="noopener noreferrer" class=dropdown__link>SUV Python Tools</a></ul></div></div><div class="navbar__items navbar__items--right"><a href=https://github.com/pranabdas/fortran rel="noopener noreferrer" class="navbar__item navbar__link header-github-link" aria-label="GitHub repository" title="Visit project repository in GitHub"></a><a href=https://pranabdas.github.io rel="noopener noreferrer" class="navbar__item navbar__link header-homepage-link" aria-label="About me" title="Go to Pranab's Homepage"></a><div class="toggle_vylO colorModeToggle_DEke"><button class="clean-btn toggleButton_gllP toggleButtonDisabled_aARS" type=button disabled title="Switch between dark and light mode (currently light mode)" aria-label="Switch between dark and light mode (currently light mode)" aria-live=polite aria-pressed=false><svg viewBox="0 0 24 24" width=24 height=24 class=lightToggleIcon_pyhR><path fill=currentColor d="M12,9c1.65,0,3,1.35,3,3s-1.35,3-3,3s-3-1.35-3-3S10.35,9,12,9 M12,7c-2.76,0-5,2.24-5,5s2.24,5,5,5s5-2.24,5-5 S14.76,7,12,7L12,7z M2,13l2,0c0.55,0,1-0.45,1-1s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S1.45,13,2,13z M20,13l2,0c0.55,0,1-0.45,1-1 s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S19.45,13,20,13z M11,2v2c0,0.55,0.45,1,1,1s1-0.45,1-1V2c0-0.55-0.45-1-1-1S11,1.45,11,2z M11,20v2c0,0.55,0.45,1,1,1s1-0.45,1-1v-2c0-0.55-0.45-1-1-1C11.45,19,11,19.45,11,20z M5.99,4.58c-0.39-0.39-1.03-0.39-1.41,0 c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0s0.39-1.03,0-1.41L5.99,4.58z M18.36,16.95 c-0.39-0.39-1.03-0.39-1.41,0c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0c0.39-0.39,0.39-1.03,0-1.41 L18.36,16.95z M19.42,5.99c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06c-0.39,0.39-0.39,1.03,0,1.41 s1.03,0.39,1.41,0L19.42,5.99z M7.05,18.36c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06 c-0.39,0.39-0.39,1.03,0,1.41s1.03,0.39,1.41,0L7.05,18.36z"/></svg><svg viewBox="0 0 24 24" width=24 height=24 class=darkToggleIcon_wfgR><path fill=currentColor d="M9.37,5.51C9.19,6.15,9.1,6.82,9.1,7.5c0,4.08,3.32,7.4,7.4,7.4c0.68,0,1.35-0.09,1.99-0.27C17.45,17.19,14.93,19,12,19 c-3.86,0-7-3.14-7-7C5,9.07,6.81,6.55,9.37,5.51z M12,3c-4.97,0-9,4.03-9,9s4.03,9,9,9s9-4.03,9-9c0-0.46-0.04-0.92-0.1-1.36 c-0.98,1.37-2.58,2.26-4.4,2.26c-2.98,0-5.4-2.42-5.4-5.4c0-1.81,0.89-3.42,2.26-4.4C12.92,3.04,12.46,3,12,3L12,3z"/></svg></button></div><div class=navbarSearchContainer_Bca1><div class="navbar__search searchBarContainer_NW3z" dir=ltr><input placeholder=Search aria-label=Search class=navbar__search-input value=""><div class="loadingRing_RJI3 searchBarLoadingRing_YnHq"><div></div><div></div><div></div><div></div></div></div></div></div></div><div role=presentation class=navbar-sidebar__backdrop></div></nav><div id=__docusaurus_skipToContent_fallback class="main-wrapper mainWrapper_z2l0"><div class=docsWrapper_hBAB><button aria-label="Scroll back to top" class="clean-btn theme-back-to-top-button backToTopButton_sjWU" type=button></button><div class=docRoot_UBD9><aside class="theme-doc-sidebar-container docSidebarContainer_YfHR"><div class=sidebarViewport_aRkj><div class="sidebar_njMd sidebarWithHideableNavbar_wUlq"><a tabindex=-1 class=sidebarLogo_isFc href=/fortran/><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--light_NVdE"><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--dark_xIcU"><b>Fortran</b></a><nav aria-label="Docs sidebar" class="menu thin-scrollbar menu_SIkG"><ul class="theme-doc-sidebar-menu menu__list"><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/>Setup</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/basics>Basics</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/array>Array and Matrix</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/control>Logical control</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/loop>Loop</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class="menu__link menu__link--active" aria-current=page href=/fortran/modules>Modules</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/procedures>Procedures</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/complex>Complex number</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/recursion>Recursion</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/types>Custom types</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/pointer>Pointer</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/file>File I/O</a><li class="theme-doc-sidebar-item-category theme-doc-sidebar-item-category-level-1 menu__list-item menu__list-item--collapsed"><div class=menu__list-item-collapsible><a class="menu__link menu__link--sublist" href=/fortran/category/coding-practice>Coding practice</a><button aria-label="Expand sidebar category 'Coding practice'" aria-expanded=false type=button class="clean-btn menu__caret"></button></div><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/resources>Resources</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/license>License</a></ul></nav><button type=button title="Collapse sidebar" aria-label="Collapse sidebar" class="button button--secondary button--outline collapseSidebarButton_PEFL"><svg width=20 height=20 aria-hidden=true class=collapseSidebarButtonIcon_kv0_><g fill=#7a7a7a><path d="M9.992 10.023c0 .2-.062.399-.172.547l-4.996 7.492a.982.982 0 01-.828.454H1c-.55 0-1-.453-1-1 0-.2.059-.403.168-.551l4.629-6.942L.168 3.078A.939.939 0 010 2.528c0-.548.45-.997 1-.997h2.996c.352 0 .649.18.828.45L9.82 9.472c.11.148.172.347.172.55zm0 0"/><path d="M19.98 10.023c0 .2-.058.399-.168.547l-4.996 7.492a.987.987 0 01-.828.454h-3c-.547 0-.996-.453-.996-1 0-.2.059-.403.168-.551l4.625-6.942-4.625-6.945a.939.939 0 01-.168-.55 1 1 0 01.996-.997h3c.348 0 .649.18.828.45l4.996 7.492c.11.148.168.347.168.55zm0 0"/></g></svg></button></div></div></aside><main class=docMainContainer_TBSr><div class="container padding-top--md padding-bottom--lg"><div class=row><div class="col docItemCol_VOVn"><div class=docItemContainer_Djhp><article><nav class="theme-doc-breadcrumbs breadcrumbsContainer_Z_bl" aria-label=Breadcrumbs><ul class=breadcrumbs itemscope itemtype=https://schema.org/BreadcrumbList><li class=breadcrumbs__item><a aria-label="Home page" class=breadcrumbs__link href=/fortran/><svg viewBox="0 0 24 24" class=breadcrumbHomeIcon_YNFT><path d="M10 19v-5h4v5c0 .55.45 1 1 1h3c.55 0 1-.45 1-1v-7h1.7c.46 0 .68-.57.33-.87L12.67 3.6c-.38-.34-.96-.34-1.34 0l-8.36 7.53c-.34.3-.13.87.33.87H5v7c0 .55.45 1 1 1h3c.55 0 1-.45 1-1z" fill=currentColor /></svg></a><li itemscope itemprop=itemListElement itemtype=https://schema.org/ListItem class="breadcrumbs__item breadcrumbs__item--active"><span class=breadcrumbs__link itemprop=name>Modules</span><meta itemprop=position content=1></ul></nav><div class="tocCollapsible_ETCw theme-doc-toc-mobile tocMobile_ITEo"><button type=button class="clean-btn tocCollapsibleButton_TO0P">On this page</button></div><div class="theme-doc-markdown markdown"><header><h1>Modules</h1></header><p>Large programs can be organized in separate modules and procedures. Here is an
+<!doctype html><html lang=en dir=ltr class="docs-wrapper plugin-docs plugin-id-default docs-version-current docs-doc-page docs-doc-id-modules" data-has-hydrated=false><meta charset=UTF-8><meta name=generator content="Docusaurus v3.6.1"><title data-rh=true>Modules • Fortran Tutorial</title><meta data-rh=true name=viewport content="width=device-width,initial-scale=1.0"><meta data-rh=true name=twitter:card content=summary_large_image><meta data-rh=true property=og:url content=https://pranabdas.github.io/fortran/modules><meta data-rh=true property=og:locale content=en><meta data-rh=true name=docusaurus_locale content=en><meta data-rh=true name=docsearch:language content=en><meta data-rh=true name=theme-color content=#06445c><meta data-rh=true name=docusaurus_version content=current><meta data-rh=true name=docusaurus_tag content=docs-default-current><meta data-rh=true name=docsearch:version content=current><meta data-rh=true name=docsearch:docusaurus_tag content=docs-default-current><meta data-rh=true property=og:title content="Modules • Fortran Tutorial"><meta data-rh=true name=description content="Large programs can be organized in separate modules and procedures. Here is an"><meta data-rh=true property=og:description content="Large programs can be organized in separate modules and procedures. Here is an"><link data-rh=true rel=icon href=/fortran/img/favicon.png><link data-rh=true rel=canonical href=https://pranabdas.github.io/fortran/modules><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/modules hreflang=en><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/modules hreflang=x-default><link rel=stylesheet href=https://pranab.pages.dev/assets/fonts/katex/katex.min.css><link rel=stylesheet href=/fortran/assets/css/styles.4de1c8a8.css><script src=/fortran/assets/js/runtime~main.667e3c0f.js defer></script><script src=/fortran/assets/js/main.10795e8f.js defer></script><body class=navigation-with-keyboard><script>!function(){var t,e=function(){try{return new URLSearchParams(window.location.search).get("docusaurus-theme")}catch(t){}}()||function(){try{return window.localStorage.getItem("theme")}catch(t){}}();t=null!==e?e:window.matchMedia("(prefers-color-scheme: dark)").matches?"dark":(window.matchMedia("(prefers-color-scheme: light)").matches,"light"),document.documentElement.setAttribute("data-theme",t)}(),function(){try{for(var[t,e]of new URLSearchParams(window.location.search).entries())if(t.startsWith("docusaurus-data-")){var a=t.replace("docusaurus-data-","data-");document.documentElement.setAttribute(a,e)}}catch(t){}}()</script><div id=__docusaurus><div role=region aria-label="Skip to main content"><a class=skipToContent_fXgn href=#__docusaurus_skipToContent_fallback>Skip to main content</a></div><nav aria-label=Main class="navbar navbar--fixed-top navbarHideable_m1mJ"><div class=navbar__inner><div class=navbar__items><button aria-label="Toggle navigation bar" aria-expanded=false class="navbar__toggle clean-btn" type=button><svg width=30 height=30 viewBox="0 0 30 30" aria-hidden=true><path stroke=currentColor stroke-linecap=round stroke-miterlimit=10 stroke-width=2 d="M4 7h22M4 15h22M4 23h22"/></svg></button><a class=navbar__brand href=/fortran/><div class=navbar__logo><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--light_NVdE"><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--dark_xIcU"></div><b class="navbar__title text--truncate">Fortran</b></a><div class="navbar__item dropdown dropdown--hoverable"><a aria-current=page class="navbar__link active" aria-haspopup=true aria-expanded=false role=button href=/fortran/>Docs</a><ul class=dropdown__menu><li><a aria-current=page class="dropdown__link dropdown__link--active" href=/fortran/>Fortran Programming</a><li><a href=https://pranabdas.github.io/docs/ rel="noopener noreferrer" class=dropdown__link>~ ~ ~ Other Docs ~ ~ ~</a><li><a href=https://pranabdas.github.io/arpespythontools/ rel="noopener noreferrer" class=dropdown__link>ARPES Python Tools</a><li><a href=https://pranabdas.github.io/c-cpp/ rel="noopener noreferrer" class=dropdown__link>C and C++ Programming</a><li><a href=https://pranabdas.github.io/condmat-notes/ rel="noopener noreferrer" class=dropdown__link>Condensed Matter Notes</a><li><a href=https://pranabdas.github.io/javascript/ rel="noopener noreferrer" class=dropdown__link>Javascript Tutorial</a><li><a href=https://pranabdas.github.io/linux/ rel="noopener noreferrer" class=dropdown__link>Linux Tutorial</a><li><a href=https://pranabdas.github.io/machine-learning/ rel="noopener noreferrer" class=dropdown__link>Machine Learning Notes</a><li><a href=https://pranabdas.github.io/openmx/ rel="noopener noreferrer" class=dropdown__link>OpenMX tutorial</a><li><a href=https://pranabdas.github.io/python-tutorial/ rel="noopener noreferrer" class=dropdown__link>Python Tutorial</a><li><a href=https://pranabdas.github.io/espresso/ rel="noopener noreferrer" class=dropdown__link>Quantum Espresso Tutorial</a><li><a href=https://pranabdas.github.io/rust/ rel="noopener noreferrer" class=dropdown__link>Rust Programming</a><li><a href=https://pranabdas.github.io/arpes-manual/ rel="noopener noreferrer" class=dropdown__link>SUV ARPES Manual</a><li><a href=https://pranabdas.github.io/suvtools/ rel="noopener noreferrer" class=dropdown__link>SUV Python Tools</a></ul></div></div><div class="navbar__items navbar__items--right"><a href=https://github.com/pranabdas/fortran rel="noopener noreferrer" class="navbar__item navbar__link header-github-link" aria-label="GitHub repository" title="Visit project repository in GitHub"></a><a href=https://pranabdas.github.io rel="noopener noreferrer" class="navbar__item navbar__link header-homepage-link" aria-label="About me" title="Go to Pranab's Homepage"></a><div class="toggle_vylO colorModeToggle_DEke"><button class="clean-btn toggleButton_gllP toggleButtonDisabled_aARS" type=button disabled title="Switch between dark and light mode (currently light mode)" aria-label="Switch between dark and light mode (currently light mode)" aria-live=polite aria-pressed=false><svg viewBox="0 0 24 24" width=24 height=24 class=lightToggleIcon_pyhR><path fill=currentColor d="M12,9c1.65,0,3,1.35,3,3s-1.35,3-3,3s-3-1.35-3-3S10.35,9,12,9 M12,7c-2.76,0-5,2.24-5,5s2.24,5,5,5s5-2.24,5-5 S14.76,7,12,7L12,7z M2,13l2,0c0.55,0,1-0.45,1-1s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S1.45,13,2,13z M20,13l2,0c0.55,0,1-0.45,1-1 s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S19.45,13,20,13z M11,2v2c0,0.55,0.45,1,1,1s1-0.45,1-1V2c0-0.55-0.45-1-1-1S11,1.45,11,2z M11,20v2c0,0.55,0.45,1,1,1s1-0.45,1-1v-2c0-0.55-0.45-1-1-1C11.45,19,11,19.45,11,20z M5.99,4.58c-0.39-0.39-1.03-0.39-1.41,0 c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0s0.39-1.03,0-1.41L5.99,4.58z M18.36,16.95 c-0.39-0.39-1.03-0.39-1.41,0c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0c0.39-0.39,0.39-1.03,0-1.41 L18.36,16.95z M19.42,5.99c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06c-0.39,0.39-0.39,1.03,0,1.41 s1.03,0.39,1.41,0L19.42,5.99z M7.05,18.36c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06 c-0.39,0.39-0.39,1.03,0,1.41s1.03,0.39,1.41,0L7.05,18.36z"/></svg><svg viewBox="0 0 24 24" width=24 height=24 class=darkToggleIcon_wfgR><path fill=currentColor d="M9.37,5.51C9.19,6.15,9.1,6.82,9.1,7.5c0,4.08,3.32,7.4,7.4,7.4c0.68,0,1.35-0.09,1.99-0.27C17.45,17.19,14.93,19,12,19 c-3.86,0-7-3.14-7-7C5,9.07,6.81,6.55,9.37,5.51z M12,3c-4.97,0-9,4.03-9,9s4.03,9,9,9s9-4.03,9-9c0-0.46-0.04-0.92-0.1-1.36 c-0.98,1.37-2.58,2.26-4.4,2.26c-2.98,0-5.4-2.42-5.4-5.4c0-1.81,0.89-3.42,2.26-4.4C12.92,3.04,12.46,3,12,3L12,3z"/></svg></button></div><div class=navbarSearchContainer_Bca1><div class="navbar__search searchBarContainer_NW3z" dir=ltr><input placeholder=Search aria-label=Search class=navbar__search-input value=""><div class="loadingRing_RJI3 searchBarLoadingRing_YnHq"><div></div><div></div><div></div><div></div></div></div></div></div></div><div role=presentation class=navbar-sidebar__backdrop></div></nav><div id=__docusaurus_skipToContent_fallback class="main-wrapper mainWrapper_z2l0"><div class=docsWrapper_hBAB><button aria-label="Scroll back to top" class="clean-btn theme-back-to-top-button backToTopButton_sjWU" type=button></button><div class=docRoot_UBD9><aside class="theme-doc-sidebar-container docSidebarContainer_YfHR"><div class=sidebarViewport_aRkj><div class="sidebar_njMd sidebarWithHideableNavbar_wUlq"><a tabindex=-1 class=sidebarLogo_isFc href=/fortran/><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--light_NVdE"><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--dark_xIcU"><b>Fortran</b></a><nav aria-label="Docs sidebar" class="menu thin-scrollbar menu_SIkG"><ul class="theme-doc-sidebar-menu menu__list"><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/>Setup</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/basics>Basics</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/array>Array and Matrix</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/control>Logical control</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/loop>Loop</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class="menu__link menu__link--active" aria-current=page href=/fortran/modules>Modules</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/procedures>Procedures</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/complex>Complex number</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/recursion>Recursion</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/types>Custom types</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/pointer>Pointer</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/file>File I/O</a><li class="theme-doc-sidebar-item-category theme-doc-sidebar-item-category-level-1 menu__list-item menu__list-item--collapsed"><div class=menu__list-item-collapsible><a class="menu__link menu__link--sublist" href=/fortran/category/coding-practice>Coding practice</a><button aria-label="Expand sidebar category 'Coding practice'" aria-expanded=false type=button class="clean-btn menu__caret"></button></div><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/resources>Resources</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/license>License</a></ul></nav><button type=button title="Collapse sidebar" aria-label="Collapse sidebar" class="button button--secondary button--outline collapseSidebarButton_PEFL"><svg width=20 height=20 aria-hidden=true class=collapseSidebarButtonIcon_kv0_><g fill=#7a7a7a><path d="M9.992 10.023c0 .2-.062.399-.172.547l-4.996 7.492a.982.982 0 01-.828.454H1c-.55 0-1-.453-1-1 0-.2.059-.403.168-.551l4.629-6.942L.168 3.078A.939.939 0 010 2.528c0-.548.45-.997 1-.997h2.996c.352 0 .649.18.828.45L9.82 9.472c.11.148.172.347.172.55zm0 0"/><path d="M19.98 10.023c0 .2-.058.399-.168.547l-4.996 7.492a.987.987 0 01-.828.454h-3c-.547 0-.996-.453-.996-1 0-.2.059-.403.168-.551l4.625-6.942-4.625-6.945a.939.939 0 01-.168-.55 1 1 0 01.996-.997h3c.348 0 .649.18.828.45l4.996 7.492c.11.148.168.347.168.55zm0 0"/></g></svg></button></div></div></aside><main class=docMainContainer_TBSr><div class="container padding-top--md padding-bottom--lg"><div class=row><div class="col docItemCol_VOVn"><div class=docItemContainer_Djhp><article><nav class="theme-doc-breadcrumbs breadcrumbsContainer_Z_bl" aria-label=Breadcrumbs><ul class=breadcrumbs itemscope itemtype=https://schema.org/BreadcrumbList><li class=breadcrumbs__item><a aria-label="Home page" class=breadcrumbs__link href=/fortran/><svg viewBox="0 0 24 24" class=breadcrumbHomeIcon_YNFT><path d="M10 19v-5h4v5c0 .55.45 1 1 1h3c.55 0 1-.45 1-1v-7h1.7c.46 0 .68-.57.33-.87L12.67 3.6c-.38-.34-.96-.34-1.34 0l-8.36 7.53c-.34.3-.13.87.33.87H5v7c0 .55.45 1 1 1h3c.55 0 1-.45 1-1z" fill=currentColor /></svg></a><li itemscope itemprop=itemListElement itemtype=https://schema.org/ListItem class="breadcrumbs__item breadcrumbs__item--active"><span class=breadcrumbs__link itemprop=name>Modules</span><meta itemprop=position content=1></ul></nav><div class="tocCollapsible_ETCw theme-doc-toc-mobile tocMobile_ITEo"><button type=button class="clean-btn tocCollapsibleButton_TO0P">On this page</button></div><div class="theme-doc-markdown markdown"><header><h1>Modules</h1></header><p>Large programs can be organized in separate modules and procedures. Here is an
 example. We store various mathematical and physical constants in a module named
 <code>constants_module</code>.</p>
 <!-- -->
diff --git a/monte-carlo-integration/index.html b/monte-carlo-integration/index.html
index ecfa897..f03fb85 100644
--- a/monte-carlo-integration/index.html
+++ b/monte-carlo-integration/index.html
@@ -1,2 +1,2 @@
-<!doctype html><html lang=en dir=ltr class="docs-wrapper plugin-docs plugin-id-default docs-version-current docs-doc-page docs-doc-id-monte-carlo-integration" data-has-hydrated=false><meta charset=UTF-8><meta name=generator content="Docusaurus v3.6.1"><title data-rh=true>Area under the curve by Monte Carlo method • Fortran Tutorial</title><meta data-rh=true name=viewport content="width=device-width,initial-scale=1.0"><meta data-rh=true name=twitter:card content=summary_large_image><meta data-rh=true property=og:url content=https://pranabdas.github.io/fortran/monte-carlo-integration><meta data-rh=true property=og:locale content=en><meta data-rh=true name=docusaurus_locale content=en><meta data-rh=true name=docsearch:language content=en><meta data-rh=true name=theme-color content=#06445c><meta data-rh=true name=docusaurus_version content=current><meta data-rh=true name=docusaurus_tag content=docs-default-current><meta data-rh=true name=docsearch:version content=current><meta data-rh=true name=docsearch:docusaurus_tag content=docs-default-current><meta data-rh=true property=og:title content="Area under the curve by Monte Carlo method • Fortran Tutorial"><link data-rh=true rel=icon href=/fortran/img/favicon.png><link data-rh=true rel=canonical href=https://pranabdas.github.io/fortran/monte-carlo-integration><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/monte-carlo-integration hreflang=en><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/monte-carlo-integration hreflang=x-default><link rel=stylesheet href=https://pranabdas.github.io/drive/webfonts/katex/katex.min.css><link rel=stylesheet href=/fortran/assets/css/styles.4de1c8a8.css><script src=/fortran/assets/js/runtime~main.866c090c.js defer></script><script src=/fortran/assets/js/main.ec888ba8.js defer></script><body class=navigation-with-keyboard><script>!function(){var t,e=function(){try{return new URLSearchParams(window.location.search).get("docusaurus-theme")}catch(t){}}()||function(){try{return window.localStorage.getItem("theme")}catch(t){}}();t=null!==e?e:window.matchMedia("(prefers-color-scheme: dark)").matches?"dark":(window.matchMedia("(prefers-color-scheme: light)").matches,"light"),document.documentElement.setAttribute("data-theme",t)}(),function(){try{for(var[t,e]of new URLSearchParams(window.location.search).entries())if(t.startsWith("docusaurus-data-")){var a=t.replace("docusaurus-data-","data-");document.documentElement.setAttribute(a,e)}}catch(t){}}()</script><div id=__docusaurus><div role=region aria-label="Skip to main content"><a class=skipToContent_fXgn href=#__docusaurus_skipToContent_fallback>Skip to main content</a></div><nav aria-label=Main class="navbar navbar--fixed-top navbarHideable_m1mJ"><div class=navbar__inner><div class=navbar__items><button aria-label="Toggle navigation bar" aria-expanded=false class="navbar__toggle clean-btn" type=button><svg width=30 height=30 viewBox="0 0 30 30" aria-hidden=true><path stroke=currentColor stroke-linecap=round stroke-miterlimit=10 stroke-width=2 d="M4 7h22M4 15h22M4 23h22"/></svg></button><a class=navbar__brand href=/fortran/><div class=navbar__logo><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--light_NVdE"><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--dark_xIcU"></div><b class="navbar__title text--truncate">Fortran</b></a><div class="navbar__item dropdown dropdown--hoverable"><a aria-current=page class="navbar__link active" aria-haspopup=true aria-expanded=false role=button href=/fortran/>Docs</a><ul class=dropdown__menu><li><a aria-current=page class="dropdown__link dropdown__link--active" href=/fortran/>Fortran Programming</a><li><a href=https://pranabdas.github.io/docs/ rel="noopener noreferrer" class=dropdown__link>~ ~ ~ Other Docs ~ ~ ~</a><li><a href=https://pranabdas.github.io/arpespythontools/ rel="noopener noreferrer" class=dropdown__link>ARPES Python Tools</a><li><a href=https://pranabdas.github.io/c-cpp/ rel="noopener noreferrer" class=dropdown__link>C and C++ Programming</a><li><a href=https://pranabdas.github.io/condmat-notes/ rel="noopener noreferrer" class=dropdown__link>Condensed Matter Notes</a><li><a href=https://pranabdas.github.io/javascript/ rel="noopener noreferrer" class=dropdown__link>Javascript Tutorial</a><li><a href=https://pranabdas.github.io/linux/ rel="noopener noreferrer" class=dropdown__link>Linux Tutorial</a><li><a href=https://pranabdas.github.io/machine-learning/ rel="noopener noreferrer" class=dropdown__link>Machine Learning Notes</a><li><a href=https://pranabdas.github.io/openmx/ rel="noopener noreferrer" class=dropdown__link>OpenMX tutorial</a><li><a href=https://pranabdas.github.io/python-tutorial/ rel="noopener noreferrer" class=dropdown__link>Python Tutorial</a><li><a href=https://pranabdas.github.io/espresso/ rel="noopener noreferrer" class=dropdown__link>Quantum Espresso Tutorial</a><li><a href=https://pranabdas.github.io/rust/ rel="noopener noreferrer" class=dropdown__link>Rust Programming</a><li><a href=https://pranabdas.github.io/arpes-manual/ rel="noopener noreferrer" class=dropdown__link>SUV ARPES Manual</a><li><a href=https://pranabdas.github.io/suvtools/ rel="noopener noreferrer" class=dropdown__link>SUV Python Tools</a></ul></div></div><div class="navbar__items navbar__items--right"><a href=https://github.com/pranabdas/fortran rel="noopener noreferrer" class="navbar__item navbar__link header-github-link" aria-label="GitHub repository" title="Visit project repository in GitHub"></a><a href=https://pranabdas.github.io rel="noopener noreferrer" class="navbar__item navbar__link header-homepage-link" aria-label="About me" title="Go to Pranab's Homepage"></a><div class="toggle_vylO colorModeToggle_DEke"><button class="clean-btn toggleButton_gllP toggleButtonDisabled_aARS" type=button disabled title="Switch between dark and light mode (currently light mode)" aria-label="Switch between dark and light mode (currently light mode)" aria-live=polite aria-pressed=false><svg viewBox="0 0 24 24" width=24 height=24 class=lightToggleIcon_pyhR><path fill=currentColor d="M12,9c1.65,0,3,1.35,3,3s-1.35,3-3,3s-3-1.35-3-3S10.35,9,12,9 M12,7c-2.76,0-5,2.24-5,5s2.24,5,5,5s5-2.24,5-5 S14.76,7,12,7L12,7z M2,13l2,0c0.55,0,1-0.45,1-1s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S1.45,13,2,13z M20,13l2,0c0.55,0,1-0.45,1-1 s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S19.45,13,20,13z M11,2v2c0,0.55,0.45,1,1,1s1-0.45,1-1V2c0-0.55-0.45-1-1-1S11,1.45,11,2z M11,20v2c0,0.55,0.45,1,1,1s1-0.45,1-1v-2c0-0.55-0.45-1-1-1C11.45,19,11,19.45,11,20z M5.99,4.58c-0.39-0.39-1.03-0.39-1.41,0 c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0s0.39-1.03,0-1.41L5.99,4.58z M18.36,16.95 c-0.39-0.39-1.03-0.39-1.41,0c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0c0.39-0.39,0.39-1.03,0-1.41 L18.36,16.95z M19.42,5.99c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06c-0.39,0.39-0.39,1.03,0,1.41 s1.03,0.39,1.41,0L19.42,5.99z M7.05,18.36c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06 c-0.39,0.39-0.39,1.03,0,1.41s1.03,0.39,1.41,0L7.05,18.36z"/></svg><svg viewBox="0 0 24 24" width=24 height=24 class=darkToggleIcon_wfgR><path fill=currentColor d="M9.37,5.51C9.19,6.15,9.1,6.82,9.1,7.5c0,4.08,3.32,7.4,7.4,7.4c0.68,0,1.35-0.09,1.99-0.27C17.45,17.19,14.93,19,12,19 c-3.86,0-7-3.14-7-7C5,9.07,6.81,6.55,9.37,5.51z M12,3c-4.97,0-9,4.03-9,9s4.03,9,9,9s9-4.03,9-9c0-0.46-0.04-0.92-0.1-1.36 c-0.98,1.37-2.58,2.26-4.4,2.26c-2.98,0-5.4-2.42-5.4-5.4c0-1.81,0.89-3.42,2.26-4.4C12.92,3.04,12.46,3,12,3L12,3z"/></svg></button></div><div class=navbarSearchContainer_Bca1><div class="navbar__search searchBarContainer_NW3z" dir=ltr><input placeholder=Search aria-label=Search class=navbar__search-input value=""><div class="loadingRing_RJI3 searchBarLoadingRing_YnHq"><div></div><div></div><div></div><div></div></div></div></div></div></div><div role=presentation class=navbar-sidebar__backdrop></div></nav><div id=__docusaurus_skipToContent_fallback class="main-wrapper mainWrapper_z2l0"><div class=docsWrapper_hBAB><button aria-label="Scroll back to top" class="clean-btn theme-back-to-top-button backToTopButton_sjWU" type=button></button><div class=docRoot_UBD9><aside class="theme-doc-sidebar-container docSidebarContainer_YfHR"><div class=sidebarViewport_aRkj><div class="sidebar_njMd sidebarWithHideableNavbar_wUlq"><a tabindex=-1 class=sidebarLogo_isFc href=/fortran/><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--light_NVdE"><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--dark_xIcU"><b>Fortran</b></a><nav aria-label="Docs sidebar" class="menu thin-scrollbar menu_SIkG"><ul class="theme-doc-sidebar-menu menu__list"><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/>Setup</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/basics>Basics</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/array>Array and Matrix</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/control>Logical control</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/loop>Loop</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/modules>Modules</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/procedures>Procedures</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/complex>Complex number</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/recursion>Recursion</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/types>Custom types</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/pointer>Pointer</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/file>File I/O</a><li class="theme-doc-sidebar-item-category theme-doc-sidebar-item-category-level-1 menu__list-item"><div class=menu__list-item-collapsible><a class="menu__link menu__link--sublist menu__link--active" href=/fortran/category/coding-practice>Coding practice</a><button aria-label="Collapse sidebar category 'Coding practice'" aria-expanded=true type=button class="clean-btn menu__caret"></button></div><ul style=display:block;overflow:visible;height:auto class=menu__list><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/swap>Swap two numbers</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/abs-path>Absolute path</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/hypotenuse>Calculate hypotenuse</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/integration>Numerical integration</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/haversine>Haversine formula</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/inner-product>Inner product</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/monte-carlo-pi>Monte Carlo method</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class="menu__link menu__link--active" aria-current=page tabindex=0 href=/fortran/monte-carlo-integration>Monte Carlo integration</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/time>Time</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/arg-parsing>Argument parsing</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/exec-command>External command</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/blas>BLAS</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/mpi>MPI Basics</a></ul><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/resources>Resources</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/license>License</a></ul></nav><button type=button title="Collapse sidebar" aria-label="Collapse sidebar" class="button button--secondary button--outline collapseSidebarButton_PEFL"><svg width=20 height=20 aria-hidden=true class=collapseSidebarButtonIcon_kv0_><g fill=#7a7a7a><path d="M9.992 10.023c0 .2-.062.399-.172.547l-4.996 7.492a.982.982 0 01-.828.454H1c-.55 0-1-.453-1-1 0-.2.059-.403.168-.551l4.629-6.942L.168 3.078A.939.939 0 010 2.528c0-.548.45-.997 1-.997h2.996c.352 0 .649.18.828.45L9.82 9.472c.11.148.172.347.172.55zm0 0"/><path d="M19.98 10.023c0 .2-.058.399-.168.547l-4.996 7.492a.987.987 0 01-.828.454h-3c-.547 0-.996-.453-.996-1 0-.2.059-.403.168-.551l4.625-6.942-4.625-6.945a.939.939 0 01-.168-.55 1 1 0 01.996-.997h3c.348 0 .649.18.828.45l4.996 7.492c.11.148.168.347.168.55zm0 0"/></g></svg></button></div></div></aside><main class=docMainContainer_TBSr><div class="container padding-top--md padding-bottom--lg"><div class=row><div class="col docItemCol_VOVn"><div class=docItemContainer_Djhp><article><nav class="theme-doc-breadcrumbs breadcrumbsContainer_Z_bl" aria-label=Breadcrumbs><ul class=breadcrumbs itemscope itemtype=https://schema.org/BreadcrumbList><li class=breadcrumbs__item><a aria-label="Home page" class=breadcrumbs__link href=/fortran/><svg viewBox="0 0 24 24" class=breadcrumbHomeIcon_YNFT><path d="M10 19v-5h4v5c0 .55.45 1 1 1h3c.55 0 1-.45 1-1v-7h1.7c.46 0 .68-.57.33-.87L12.67 3.6c-.38-.34-.96-.34-1.34 0l-8.36 7.53c-.34.3-.13.87.33.87H5v7c0 .55.45 1 1 1h3c.55 0 1-.45 1-1z" fill=currentColor /></svg></a><li itemscope itemprop=itemListElement itemtype=https://schema.org/ListItem class=breadcrumbs__item><a class=breadcrumbs__link itemprop=item href=/fortran/category/coding-practice><span itemprop=name>Coding practice</span></a><meta itemprop=position content=1><li itemscope itemprop=itemListElement itemtype=https://schema.org/ListItem class="breadcrumbs__item breadcrumbs__item--active"><span class=breadcrumbs__link itemprop=name>Monte Carlo integration</span><meta itemprop=position content=2></ul></nav><div class="theme-doc-markdown markdown"><header><h1>Area under the curve by Monte Carlo method</h1></header><div class="language-fortran codeBlockContainer_Ckt0 theme-code-block" style=--prism-color:#393A34;--prism-background-color:#f6f8fa><div class=codeBlockTitle_Ktv7>src/20_monte_carlo_integration.f90</div><div class=codeBlockContent_biex><pre tabindex=0 class="prism-code language-fortran codeBlock_bY9V thin-scrollbar" style=color:#393A34;background-color:#f6f8fa><code class="codeBlockLines_e6Vv codeBlockLinesWithNumbering_o6Pm"><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token comment" style=color:#999988;font-style:italic>! Monte carlo method of integration</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain"></span><span class="token comment" style=color:#999988;font-style:italic>! calculate area under the curve y = x^2 within x limits [1, 3]</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain"></span><span class="token keyword" style=color:#00009f>PROGRAM</span><span class="token plain"> area_under_curve</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>IMPLICIT NONE</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>INTEGER</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> </span><span class="token keyword" style=color:#00009f>PARAMETER</span><span class="token plain"> </span><span class="token operator" style=color:#393A34>::</span><span class="token plain"> iteration </span><span class="token operator" style=color:#393A34>=</span><span class="token plain"> </span><span class="token number" style=color:#36acaa>1000000</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>REAL</span><span class="token plain"> </span><span class="token operator" style=color:#393A34>::</span><span class="token plain"> x_lo </span><span class="token operator" style=color:#393A34>=</span><span class="token plain"> </span><span class="token number" style=color:#36acaa>1.0</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>REAL</span><span class="token plain"> </span><span class="token operator" style=color:#393A34>::</span><span class="token plain"> x_hi </span><span class="token operator" style=color:#393A34>=</span><span class="token plain"> </span><span class="token number" style=color:#36acaa>3.0</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>REAL</span><span class="token plain"> </span><span class="token operator" style=color:#393A34>::</span><span class="token plain"> x</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> y</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> y_lo </span><span class="token operator" style=color:#393A34>=</span><span class="token plain"> </span><span class="token number" style=color:#36acaa>0.0</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> y_hi</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> area</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> area_rect</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>INTEGER</span><span class="token plain"> </span><span class="token operator" style=color:#393A34>::</span><span class="token plain"> i</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> monte_area </span><span class="token operator" style=color:#393A34>=</span><span class="token plain"> </span><span class="token number" style=color:#36acaa>0</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    y_hi </span><span class="token operator" style=color:#393A34>=</span><span class="token plain"> x_hi </span><span class="token operator" style=color:#393A34>**</span><span class="token plain"> </span><span class="token number" style=color:#36acaa>2</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    area_rect </span><span class="token operator" style=color:#393A34>=</span><span class="token plain"> y_hi </span><span class="token operator" style=color:#393A34>*</span><span class="token plain"> </span><span class="token punctuation" style=color:#393A34>(</span><span class="token plain">x_hi </span><span class="token operator" style=color:#393A34>-</span><span class="token plain"> x_lo</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>DO</span><span class="token plain"> i </span><span class="token operator" style=color:#393A34>=</span><span class="token plain"> </span><span class="token number" style=color:#36acaa>1</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> iteration</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">        </span><span class="token keyword" style=color:#00009f>CALL</span><span class="token plain"> random_number</span><span class="token punctuation" style=color:#393A34>(</span><span class="token plain">x</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">        </span><span class="token keyword" style=color:#00009f>CALL</span><span class="token plain"> random_number</span><span class="token punctuation" style=color:#393A34>(</span><span class="token plain">y</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">        x </span><span class="token operator" style=color:#393A34>=</span><span class="token plain"> x_lo </span><span class="token operator" style=color:#393A34>+</span><span class="token plain"> x </span><span class="token operator" style=color:#393A34>*</span><span class="token plain"> </span><span class="token punctuation" style=color:#393A34>(</span><span class="token plain">x_hi </span><span class="token operator" style=color:#393A34>-</span><span class="token plain"> x_lo</span><span class="token punctuation" style=color:#393A34>)</span><span class="token punctuation" style=color:#393A34>;</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">        y </span><span class="token operator" style=color:#393A34>=</span><span class="token plain"> y </span><span class="token operator" style=color:#393A34>*</span><span class="token plain"> </span><span class="token punctuation" style=color:#393A34>(</span><span class="token plain">y_hi </span><span class="token operator" style=color:#393A34>-</span><span class="token plain"> y_lo</span><span class="token punctuation" style=color:#393A34>)</span><span class="token punctuation" style=color:#393A34>;</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">        </span><span class="token keyword" style=color:#00009f>IF</span><span class="token plain"> </span><span class="token punctuation" style=color:#393A34>(</span><span class="token plain">y </span><span class="token operator" style=color:#393A34>&lt;</span><span class="token plain"> x </span><span class="token operator" style=color:#393A34>**</span><span class="token plain"> </span><span class="token number" style=color:#36acaa>2</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"> </span><span class="token keyword" style=color:#00009f>THEN</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">            monte_area </span><span class="token operator" style=color:#393A34>=</span><span class="token plain"> monte_area </span><span class="token operator" style=color:#393A34>+</span><span class="token plain"> </span><span class="token number" style=color:#36acaa>1</span><span class="token punctuation" style=color:#393A34>;</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">        </span><span class="token keyword" style=color:#00009f>END IF</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>END DO</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    area </span><span class="token operator" style=color:#393A34>=</span><span class="token plain"> area_rect </span><span class="token operator" style=color:#393A34>*</span><span class="token plain"> monte_area </span><span class="token operator" style=color:#393A34>/</span><span class="token plain"> iteration</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>PRINT</span><span class="token plain"> </span><span class="token operator" style=color:#393A34>*</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> </span><span class="token string" style=color:#e3116c>"Area = "</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> area</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>PRINT</span><span class="token plain"> </span><span class="token operator" style=color:#393A34>*</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> </span><span class="token string" style=color:#e3116c>"Analytical result = "</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> </span><span class="token punctuation" style=color:#393A34>(</span><span class="token number" style=color:#36acaa>27.0</span><span class="token plain"> </span><span class="token operator" style=color:#393A34>-</span><span class="token plain"> </span><span class="token number" style=color:#36acaa>1</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"> </span><span class="token operator" style=color:#393A34>/</span><span class="token plain"> </span><span class="token number" style=color:#36acaa>3</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain"></span><span class="token keyword" style=color:#00009f>END PROGRAM</span><span class="token plain"> area_under_curve</span></span><br></span></code></pre><div class=buttonGroup__atx><button type=button aria-label="Copy code to clipboard" title=Copy class=clean-btn><span class=copyButtonIcons_eSgA aria-hidden=true><svg viewBox="0 0 24 24" class=copyButtonIcon_y97N><path fill=currentColor d="M19,21H8V7H19M19,5H8A2,2 0 0,0 6,7V21A2,2 0 0,0 8,23H19A2,2 0 0,0 21,21V7A2,2 0 0,0 19,5M16,1H4A2,2 0 0,0 2,3V17H4V3H16V1Z"/></svg><svg viewBox="0 0 24 24" class=copyButtonSuccessIcon_LjdS><path fill=currentColor d=M21,7L9,19L3.5,13.5L4.91,12.09L9,16.17L19.59,5.59L21,7Z /></svg></span></button></div></div></div></div><footer class="theme-doc-footer docusaurus-mt-lg"><div class="row margin-top--sm theme-doc-footer-edit-meta-row"><div class=col><a href=https://github.com/pranabdas/fortran/blob/main/docs/monte-carlo-integration.mdx target=_blank rel="noopener noreferrer" class=theme-edit-this-page><svg fill=currentColor height=20 width=20 viewBox="0 0 40 40" class=iconEdit_Z9Sw aria-hidden=true><g><path d="m34.5 11.7l-3 3.1-6.3-6.3 3.1-3q0.5-0.5 1.2-0.5t1.1 0.5l3.9 3.9q0.5 0.4 0.5 1.1t-0.5 1.2z m-29.5 17.1l18.4-18.5 6.3 6.3-18.4 18.4h-6.3v-6.2z"/></g></svg>Edit this page</a></div><div class="col lastUpdated_JAkA"></div></div></footer></article><nav class="pagination-nav docusaurus-mt-lg" aria-label="Docs pages"><a class="pagination-nav__link pagination-nav__link--prev" href=/fortran/monte-carlo-pi><div class=pagination-nav__sublabel>Previous</div><div class=pagination-nav__label>Monte Carlo method</div></a><a class="pagination-nav__link pagination-nav__link--next" href=/fortran/time><div class=pagination-nav__sublabel>Next</div><div class=pagination-nav__label>Time</div></a></nav></div></div></div></div></main></div></div></div><footer class="footer footer--dark"><div class="container container-fluid"><div class="footer__bottom text--center"><div class=footer__copyright>Copyright © 2024 Pranab Das. All rights
+<!doctype html><html lang=en dir=ltr class="docs-wrapper plugin-docs plugin-id-default docs-version-current docs-doc-page docs-doc-id-monte-carlo-integration" data-has-hydrated=false><meta charset=UTF-8><meta name=generator content="Docusaurus v3.6.1"><title data-rh=true>Area under the curve by Monte Carlo method • Fortran Tutorial</title><meta data-rh=true name=viewport content="width=device-width,initial-scale=1.0"><meta data-rh=true name=twitter:card content=summary_large_image><meta data-rh=true property=og:url content=https://pranabdas.github.io/fortran/monte-carlo-integration><meta data-rh=true property=og:locale content=en><meta data-rh=true name=docusaurus_locale content=en><meta data-rh=true name=docsearch:language content=en><meta data-rh=true name=theme-color content=#06445c><meta data-rh=true name=docusaurus_version content=current><meta data-rh=true name=docusaurus_tag content=docs-default-current><meta data-rh=true name=docsearch:version content=current><meta data-rh=true name=docsearch:docusaurus_tag content=docs-default-current><meta data-rh=true property=og:title content="Area under the curve by Monte Carlo method • Fortran Tutorial"><link data-rh=true rel=icon href=/fortran/img/favicon.png><link data-rh=true rel=canonical href=https://pranabdas.github.io/fortran/monte-carlo-integration><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/monte-carlo-integration hreflang=en><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/monte-carlo-integration hreflang=x-default><link rel=stylesheet href=https://pranab.pages.dev/assets/fonts/katex/katex.min.css><link rel=stylesheet href=/fortran/assets/css/styles.4de1c8a8.css><script src=/fortran/assets/js/runtime~main.667e3c0f.js defer></script><script src=/fortran/assets/js/main.10795e8f.js defer></script><body class=navigation-with-keyboard><script>!function(){var t,e=function(){try{return new URLSearchParams(window.location.search).get("docusaurus-theme")}catch(t){}}()||function(){try{return window.localStorage.getItem("theme")}catch(t){}}();t=null!==e?e:window.matchMedia("(prefers-color-scheme: dark)").matches?"dark":(window.matchMedia("(prefers-color-scheme: light)").matches,"light"),document.documentElement.setAttribute("data-theme",t)}(),function(){try{for(var[t,e]of new URLSearchParams(window.location.search).entries())if(t.startsWith("docusaurus-data-")){var a=t.replace("docusaurus-data-","data-");document.documentElement.setAttribute(a,e)}}catch(t){}}()</script><div id=__docusaurus><div role=region aria-label="Skip to main content"><a class=skipToContent_fXgn href=#__docusaurus_skipToContent_fallback>Skip to main content</a></div><nav aria-label=Main class="navbar navbar--fixed-top navbarHideable_m1mJ"><div class=navbar__inner><div class=navbar__items><button aria-label="Toggle navigation bar" aria-expanded=false class="navbar__toggle clean-btn" type=button><svg width=30 height=30 viewBox="0 0 30 30" aria-hidden=true><path stroke=currentColor stroke-linecap=round stroke-miterlimit=10 stroke-width=2 d="M4 7h22M4 15h22M4 23h22"/></svg></button><a class=navbar__brand href=/fortran/><div class=navbar__logo><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--light_NVdE"><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--dark_xIcU"></div><b class="navbar__title text--truncate">Fortran</b></a><div class="navbar__item dropdown dropdown--hoverable"><a aria-current=page class="navbar__link active" aria-haspopup=true aria-expanded=false role=button href=/fortran/>Docs</a><ul class=dropdown__menu><li><a aria-current=page class="dropdown__link dropdown__link--active" href=/fortran/>Fortran Programming</a><li><a href=https://pranabdas.github.io/docs/ rel="noopener noreferrer" class=dropdown__link>~ ~ ~ Other Docs ~ ~ ~</a><li><a href=https://pranabdas.github.io/arpespythontools/ rel="noopener noreferrer" class=dropdown__link>ARPES Python Tools</a><li><a href=https://pranabdas.github.io/c-cpp/ rel="noopener noreferrer" class=dropdown__link>C and C++ Programming</a><li><a href=https://pranabdas.github.io/condmat-notes/ rel="noopener noreferrer" class=dropdown__link>Condensed Matter Notes</a><li><a href=https://pranabdas.github.io/javascript/ rel="noopener noreferrer" class=dropdown__link>Javascript Tutorial</a><li><a href=https://pranabdas.github.io/linux/ rel="noopener noreferrer" class=dropdown__link>Linux Tutorial</a><li><a href=https://pranabdas.github.io/machine-learning/ rel="noopener noreferrer" class=dropdown__link>Machine Learning Notes</a><li><a href=https://pranabdas.github.io/openmx/ rel="noopener noreferrer" class=dropdown__link>OpenMX tutorial</a><li><a href=https://pranabdas.github.io/python-tutorial/ rel="noopener noreferrer" class=dropdown__link>Python Tutorial</a><li><a href=https://pranabdas.github.io/espresso/ rel="noopener noreferrer" class=dropdown__link>Quantum Espresso Tutorial</a><li><a href=https://pranabdas.github.io/rust/ rel="noopener noreferrer" class=dropdown__link>Rust Programming</a><li><a href=https://pranabdas.github.io/arpes-manual/ rel="noopener noreferrer" class=dropdown__link>SUV ARPES Manual</a><li><a href=https://pranabdas.github.io/suvtools/ rel="noopener noreferrer" class=dropdown__link>SUV Python Tools</a></ul></div></div><div class="navbar__items navbar__items--right"><a href=https://github.com/pranabdas/fortran rel="noopener noreferrer" class="navbar__item navbar__link header-github-link" aria-label="GitHub repository" title="Visit project repository in GitHub"></a><a href=https://pranabdas.github.io rel="noopener noreferrer" class="navbar__item navbar__link header-homepage-link" aria-label="About me" title="Go to Pranab's Homepage"></a><div class="toggle_vylO colorModeToggle_DEke"><button class="clean-btn toggleButton_gllP toggleButtonDisabled_aARS" type=button disabled title="Switch between dark and light mode (currently light mode)" aria-label="Switch between dark and light mode (currently light mode)" aria-live=polite aria-pressed=false><svg viewBox="0 0 24 24" width=24 height=24 class=lightToggleIcon_pyhR><path fill=currentColor d="M12,9c1.65,0,3,1.35,3,3s-1.35,3-3,3s-3-1.35-3-3S10.35,9,12,9 M12,7c-2.76,0-5,2.24-5,5s2.24,5,5,5s5-2.24,5-5 S14.76,7,12,7L12,7z M2,13l2,0c0.55,0,1-0.45,1-1s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S1.45,13,2,13z M20,13l2,0c0.55,0,1-0.45,1-1 s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S19.45,13,20,13z M11,2v2c0,0.55,0.45,1,1,1s1-0.45,1-1V2c0-0.55-0.45-1-1-1S11,1.45,11,2z M11,20v2c0,0.55,0.45,1,1,1s1-0.45,1-1v-2c0-0.55-0.45-1-1-1C11.45,19,11,19.45,11,20z M5.99,4.58c-0.39-0.39-1.03-0.39-1.41,0 c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0s0.39-1.03,0-1.41L5.99,4.58z M18.36,16.95 c-0.39-0.39-1.03-0.39-1.41,0c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0c0.39-0.39,0.39-1.03,0-1.41 L18.36,16.95z M19.42,5.99c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06c-0.39,0.39-0.39,1.03,0,1.41 s1.03,0.39,1.41,0L19.42,5.99z M7.05,18.36c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06 c-0.39,0.39-0.39,1.03,0,1.41s1.03,0.39,1.41,0L7.05,18.36z"/></svg><svg viewBox="0 0 24 24" width=24 height=24 class=darkToggleIcon_wfgR><path fill=currentColor d="M9.37,5.51C9.19,6.15,9.1,6.82,9.1,7.5c0,4.08,3.32,7.4,7.4,7.4c0.68,0,1.35-0.09,1.99-0.27C17.45,17.19,14.93,19,12,19 c-3.86,0-7-3.14-7-7C5,9.07,6.81,6.55,9.37,5.51z M12,3c-4.97,0-9,4.03-9,9s4.03,9,9,9s9-4.03,9-9c0-0.46-0.04-0.92-0.1-1.36 c-0.98,1.37-2.58,2.26-4.4,2.26c-2.98,0-5.4-2.42-5.4-5.4c0-1.81,0.89-3.42,2.26-4.4C12.92,3.04,12.46,3,12,3L12,3z"/></svg></button></div><div class=navbarSearchContainer_Bca1><div class="navbar__search searchBarContainer_NW3z" dir=ltr><input placeholder=Search aria-label=Search class=navbar__search-input value=""><div class="loadingRing_RJI3 searchBarLoadingRing_YnHq"><div></div><div></div><div></div><div></div></div></div></div></div></div><div role=presentation class=navbar-sidebar__backdrop></div></nav><div id=__docusaurus_skipToContent_fallback class="main-wrapper mainWrapper_z2l0"><div class=docsWrapper_hBAB><button aria-label="Scroll back to top" class="clean-btn theme-back-to-top-button backToTopButton_sjWU" type=button></button><div class=docRoot_UBD9><aside class="theme-doc-sidebar-container docSidebarContainer_YfHR"><div class=sidebarViewport_aRkj><div class="sidebar_njMd sidebarWithHideableNavbar_wUlq"><a tabindex=-1 class=sidebarLogo_isFc href=/fortran/><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--light_NVdE"><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--dark_xIcU"><b>Fortran</b></a><nav aria-label="Docs sidebar" class="menu thin-scrollbar menu_SIkG"><ul class="theme-doc-sidebar-menu menu__list"><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/>Setup</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/basics>Basics</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/array>Array and Matrix</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/control>Logical control</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/loop>Loop</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/modules>Modules</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/procedures>Procedures</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/complex>Complex number</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/recursion>Recursion</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/types>Custom types</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/pointer>Pointer</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/file>File I/O</a><li class="theme-doc-sidebar-item-category theme-doc-sidebar-item-category-level-1 menu__list-item"><div class=menu__list-item-collapsible><a class="menu__link menu__link--sublist menu__link--active" href=/fortran/category/coding-practice>Coding practice</a><button aria-label="Collapse sidebar category 'Coding practice'" aria-expanded=true type=button class="clean-btn menu__caret"></button></div><ul style=display:block;overflow:visible;height:auto class=menu__list><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/swap>Swap two numbers</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/abs-path>Absolute path</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/hypotenuse>Calculate hypotenuse</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/integration>Numerical integration</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/haversine>Haversine formula</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/inner-product>Inner product</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/monte-carlo-pi>Monte Carlo method</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class="menu__link menu__link--active" aria-current=page tabindex=0 href=/fortran/monte-carlo-integration>Monte Carlo integration</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/time>Time</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/arg-parsing>Argument parsing</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/exec-command>External command</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/blas>BLAS</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/mpi>MPI Basics</a></ul><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/resources>Resources</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/license>License</a></ul></nav><button type=button title="Collapse sidebar" aria-label="Collapse sidebar" class="button button--secondary button--outline collapseSidebarButton_PEFL"><svg width=20 height=20 aria-hidden=true class=collapseSidebarButtonIcon_kv0_><g fill=#7a7a7a><path d="M9.992 10.023c0 .2-.062.399-.172.547l-4.996 7.492a.982.982 0 01-.828.454H1c-.55 0-1-.453-1-1 0-.2.059-.403.168-.551l4.629-6.942L.168 3.078A.939.939 0 010 2.528c0-.548.45-.997 1-.997h2.996c.352 0 .649.18.828.45L9.82 9.472c.11.148.172.347.172.55zm0 0"/><path d="M19.98 10.023c0 .2-.058.399-.168.547l-4.996 7.492a.987.987 0 01-.828.454h-3c-.547 0-.996-.453-.996-1 0-.2.059-.403.168-.551l4.625-6.942-4.625-6.945a.939.939 0 01-.168-.55 1 1 0 01.996-.997h3c.348 0 .649.18.828.45l4.996 7.492c.11.148.168.347.168.55zm0 0"/></g></svg></button></div></div></aside><main class=docMainContainer_TBSr><div class="container padding-top--md padding-bottom--lg"><div class=row><div class="col docItemCol_VOVn"><div class=docItemContainer_Djhp><article><nav class="theme-doc-breadcrumbs breadcrumbsContainer_Z_bl" aria-label=Breadcrumbs><ul class=breadcrumbs itemscope itemtype=https://schema.org/BreadcrumbList><li class=breadcrumbs__item><a aria-label="Home page" class=breadcrumbs__link href=/fortran/><svg viewBox="0 0 24 24" class=breadcrumbHomeIcon_YNFT><path d="M10 19v-5h4v5c0 .55.45 1 1 1h3c.55 0 1-.45 1-1v-7h1.7c.46 0 .68-.57.33-.87L12.67 3.6c-.38-.34-.96-.34-1.34 0l-8.36 7.53c-.34.3-.13.87.33.87H5v7c0 .55.45 1 1 1h3c.55 0 1-.45 1-1z" fill=currentColor /></svg></a><li itemscope itemprop=itemListElement itemtype=https://schema.org/ListItem class=breadcrumbs__item><a class=breadcrumbs__link itemprop=item href=/fortran/category/coding-practice><span itemprop=name>Coding practice</span></a><meta itemprop=position content=1><li itemscope itemprop=itemListElement itemtype=https://schema.org/ListItem class="breadcrumbs__item breadcrumbs__item--active"><span class=breadcrumbs__link itemprop=name>Monte Carlo integration</span><meta itemprop=position content=2></ul></nav><div class="theme-doc-markdown markdown"><header><h1>Area under the curve by Monte Carlo method</h1></header><div class="language-fortran codeBlockContainer_Ckt0 theme-code-block" style=--prism-color:#393A34;--prism-background-color:#f6f8fa><div class=codeBlockTitle_Ktv7>src/20_monte_carlo_integration.f90</div><div class=codeBlockContent_biex><pre tabindex=0 class="prism-code language-fortran codeBlock_bY9V thin-scrollbar" style=color:#393A34;background-color:#f6f8fa><code class="codeBlockLines_e6Vv codeBlockLinesWithNumbering_o6Pm"><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token comment" style=color:#999988;font-style:italic>! Monte carlo method of integration</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain"></span><span class="token comment" style=color:#999988;font-style:italic>! calculate area under the curve y = x^2 within x limits [1, 3]</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain"></span><span class="token keyword" style=color:#00009f>PROGRAM</span><span class="token plain"> area_under_curve</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>IMPLICIT NONE</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>INTEGER</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> </span><span class="token keyword" style=color:#00009f>PARAMETER</span><span class="token plain"> </span><span class="token operator" style=color:#393A34>::</span><span class="token plain"> iteration </span><span class="token operator" style=color:#393A34>=</span><span class="token plain"> </span><span class="token number" style=color:#36acaa>1000000</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>REAL</span><span class="token plain"> </span><span class="token operator" style=color:#393A34>::</span><span class="token plain"> x_lo </span><span class="token operator" style=color:#393A34>=</span><span class="token plain"> </span><span class="token number" style=color:#36acaa>1.0</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>REAL</span><span class="token plain"> </span><span class="token operator" style=color:#393A34>::</span><span class="token plain"> x_hi </span><span class="token operator" style=color:#393A34>=</span><span class="token plain"> </span><span class="token number" style=color:#36acaa>3.0</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>REAL</span><span class="token plain"> </span><span class="token operator" style=color:#393A34>::</span><span class="token plain"> x</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> y</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> y_lo </span><span class="token operator" style=color:#393A34>=</span><span class="token plain"> </span><span class="token number" style=color:#36acaa>0.0</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> y_hi</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> area</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> area_rect</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>INTEGER</span><span class="token plain"> </span><span class="token operator" style=color:#393A34>::</span><span class="token plain"> i</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> monte_area </span><span class="token operator" style=color:#393A34>=</span><span class="token plain"> </span><span class="token number" style=color:#36acaa>0</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    y_hi </span><span class="token operator" style=color:#393A34>=</span><span class="token plain"> x_hi </span><span class="token operator" style=color:#393A34>**</span><span class="token plain"> </span><span class="token number" style=color:#36acaa>2</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    area_rect </span><span class="token operator" style=color:#393A34>=</span><span class="token plain"> y_hi </span><span class="token operator" style=color:#393A34>*</span><span class="token plain"> </span><span class="token punctuation" style=color:#393A34>(</span><span class="token plain">x_hi </span><span class="token operator" style=color:#393A34>-</span><span class="token plain"> x_lo</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>DO</span><span class="token plain"> i </span><span class="token operator" style=color:#393A34>=</span><span class="token plain"> </span><span class="token number" style=color:#36acaa>1</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> iteration</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">        </span><span class="token keyword" style=color:#00009f>CALL</span><span class="token plain"> random_number</span><span class="token punctuation" style=color:#393A34>(</span><span class="token plain">x</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">        </span><span class="token keyword" style=color:#00009f>CALL</span><span class="token plain"> random_number</span><span class="token punctuation" style=color:#393A34>(</span><span class="token plain">y</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">        x </span><span class="token operator" style=color:#393A34>=</span><span class="token plain"> x_lo </span><span class="token operator" style=color:#393A34>+</span><span class="token plain"> x </span><span class="token operator" style=color:#393A34>*</span><span class="token plain"> </span><span class="token punctuation" style=color:#393A34>(</span><span class="token plain">x_hi </span><span class="token operator" style=color:#393A34>-</span><span class="token plain"> x_lo</span><span class="token punctuation" style=color:#393A34>)</span><span class="token punctuation" style=color:#393A34>;</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">        y </span><span class="token operator" style=color:#393A34>=</span><span class="token plain"> y </span><span class="token operator" style=color:#393A34>*</span><span class="token plain"> </span><span class="token punctuation" style=color:#393A34>(</span><span class="token plain">y_hi </span><span class="token operator" style=color:#393A34>-</span><span class="token plain"> y_lo</span><span class="token punctuation" style=color:#393A34>)</span><span class="token punctuation" style=color:#393A34>;</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">        </span><span class="token keyword" style=color:#00009f>IF</span><span class="token plain"> </span><span class="token punctuation" style=color:#393A34>(</span><span class="token plain">y </span><span class="token operator" style=color:#393A34>&lt;</span><span class="token plain"> x </span><span class="token operator" style=color:#393A34>**</span><span class="token plain"> </span><span class="token number" style=color:#36acaa>2</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"> </span><span class="token keyword" style=color:#00009f>THEN</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">            monte_area </span><span class="token operator" style=color:#393A34>=</span><span class="token plain"> monte_area </span><span class="token operator" style=color:#393A34>+</span><span class="token plain"> </span><span class="token number" style=color:#36acaa>1</span><span class="token punctuation" style=color:#393A34>;</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">        </span><span class="token keyword" style=color:#00009f>END IF</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>END DO</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    area </span><span class="token operator" style=color:#393A34>=</span><span class="token plain"> area_rect </span><span class="token operator" style=color:#393A34>*</span><span class="token plain"> monte_area </span><span class="token operator" style=color:#393A34>/</span><span class="token plain"> iteration</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>PRINT</span><span class="token plain"> </span><span class="token operator" style=color:#393A34>*</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> </span><span class="token string" style=color:#e3116c>"Area = "</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> area</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>PRINT</span><span class="token plain"> </span><span class="token operator" style=color:#393A34>*</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> </span><span class="token string" style=color:#e3116c>"Analytical result = "</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> </span><span class="token punctuation" style=color:#393A34>(</span><span class="token number" style=color:#36acaa>27.0</span><span class="token plain"> </span><span class="token operator" style=color:#393A34>-</span><span class="token plain"> </span><span class="token number" style=color:#36acaa>1</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"> </span><span class="token operator" style=color:#393A34>/</span><span class="token plain"> </span><span class="token number" style=color:#36acaa>3</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain"></span><span class="token keyword" style=color:#00009f>END PROGRAM</span><span class="token plain"> area_under_curve</span></span><br></span></code></pre><div class=buttonGroup__atx><button type=button aria-label="Copy code to clipboard" title=Copy class=clean-btn><span class=copyButtonIcons_eSgA aria-hidden=true><svg viewBox="0 0 24 24" class=copyButtonIcon_y97N><path fill=currentColor d="M19,21H8V7H19M19,5H8A2,2 0 0,0 6,7V21A2,2 0 0,0 8,23H19A2,2 0 0,0 21,21V7A2,2 0 0,0 19,5M16,1H4A2,2 0 0,0 2,3V17H4V3H16V1Z"/></svg><svg viewBox="0 0 24 24" class=copyButtonSuccessIcon_LjdS><path fill=currentColor d=M21,7L9,19L3.5,13.5L4.91,12.09L9,16.17L19.59,5.59L21,7Z /></svg></span></button></div></div></div></div><footer class="theme-doc-footer docusaurus-mt-lg"><div class="row margin-top--sm theme-doc-footer-edit-meta-row"><div class=col><a href=https://github.com/pranabdas/fortran/blob/main/docs/monte-carlo-integration.mdx target=_blank rel="noopener noreferrer" class=theme-edit-this-page><svg fill=currentColor height=20 width=20 viewBox="0 0 40 40" class=iconEdit_Z9Sw aria-hidden=true><g><path d="m34.5 11.7l-3 3.1-6.3-6.3 3.1-3q0.5-0.5 1.2-0.5t1.1 0.5l3.9 3.9q0.5 0.4 0.5 1.1t-0.5 1.2z m-29.5 17.1l18.4-18.5 6.3 6.3-18.4 18.4h-6.3v-6.2z"/></g></svg>Edit this page</a></div><div class="col lastUpdated_JAkA"></div></div></footer></article><nav class="pagination-nav docusaurus-mt-lg" aria-label="Docs pages"><a class="pagination-nav__link pagination-nav__link--prev" href=/fortran/monte-carlo-pi><div class=pagination-nav__sublabel>Previous</div><div class=pagination-nav__label>Monte Carlo method</div></a><a class="pagination-nav__link pagination-nav__link--next" href=/fortran/time><div class=pagination-nav__sublabel>Next</div><div class=pagination-nav__label>Time</div></a></nav></div></div></div></div></main></div></div></div><footer class="footer footer--dark"><div class="container container-fluid"><div class="footer__bottom text--center"><div class=footer__copyright>Copyright © 2024 Pranab Das. All rights
       reserved.</div></div></div></footer></div>
\ No newline at end of file
diff --git a/monte-carlo-pi/index.html b/monte-carlo-pi/index.html
index 2eaabf0..ab6a8cc 100644
--- a/monte-carlo-pi/index.html
+++ b/monte-carlo-pi/index.html
@@ -1,4 +1,4 @@
-<!doctype html><html lang=en dir=ltr class="docs-wrapper plugin-docs plugin-id-default docs-version-current docs-doc-page docs-doc-id-monte-carlo-pi" data-has-hydrated=false><meta charset=UTF-8><meta name=generator content="Docusaurus v3.6.1"><title data-rh=true>Determine value of pi by Monte Carlo method • Fortran Tutorial</title><meta data-rh=true name=viewport content="width=device-width,initial-scale=1.0"><meta data-rh=true name=twitter:card content=summary_large_image><meta data-rh=true property=og:url content=https://pranabdas.github.io/fortran/monte-carlo-pi><meta data-rh=true property=og:locale content=en><meta data-rh=true name=docusaurus_locale content=en><meta data-rh=true name=docsearch:language content=en><meta data-rh=true name=theme-color content=#06445c><meta data-rh=true name=docusaurus_version content=current><meta data-rh=true name=docusaurus_tag content=docs-default-current><meta data-rh=true name=docsearch:version content=current><meta data-rh=true name=docsearch:docusaurus_tag content=docs-default-current><meta data-rh=true property=og:title content="Determine value of pi by Monte Carlo method • Fortran Tutorial"><meta data-rh=true name=description content="We will approximate value of $\pi$ by Monte Carlo method. We will generate"><meta data-rh=true property=og:description content="We will approximate value of $\pi$ by Monte Carlo method. We will generate"><link data-rh=true rel=icon href=/fortran/img/favicon.png><link data-rh=true rel=canonical href=https://pranabdas.github.io/fortran/monte-carlo-pi><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/monte-carlo-pi hreflang=en><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/monte-carlo-pi hreflang=x-default><link rel=stylesheet href=https://pranabdas.github.io/drive/webfonts/katex/katex.min.css><link rel=stylesheet href=/fortran/assets/css/styles.4de1c8a8.css><script src=/fortran/assets/js/runtime~main.866c090c.js defer></script><script src=/fortran/assets/js/main.ec888ba8.js defer></script><body class=navigation-with-keyboard><script>!function(){var t,e=function(){try{return new URLSearchParams(window.location.search).get("docusaurus-theme")}catch(t){}}()||function(){try{return window.localStorage.getItem("theme")}catch(t){}}();t=null!==e?e:window.matchMedia("(prefers-color-scheme: dark)").matches?"dark":(window.matchMedia("(prefers-color-scheme: light)").matches,"light"),document.documentElement.setAttribute("data-theme",t)}(),function(){try{for(var[t,e]of new URLSearchParams(window.location.search).entries())if(t.startsWith("docusaurus-data-")){var a=t.replace("docusaurus-data-","data-");document.documentElement.setAttribute(a,e)}}catch(t){}}()</script><div id=__docusaurus><div role=region aria-label="Skip to main content"><a class=skipToContent_fXgn href=#__docusaurus_skipToContent_fallback>Skip to main content</a></div><nav aria-label=Main class="navbar navbar--fixed-top navbarHideable_m1mJ"><div class=navbar__inner><div class=navbar__items><button aria-label="Toggle navigation bar" aria-expanded=false class="navbar__toggle clean-btn" type=button><svg width=30 height=30 viewBox="0 0 30 30" aria-hidden=true><path stroke=currentColor stroke-linecap=round stroke-miterlimit=10 stroke-width=2 d="M4 7h22M4 15h22M4 23h22"/></svg></button><a class=navbar__brand href=/fortran/><div class=navbar__logo><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--light_NVdE"><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--dark_xIcU"></div><b class="navbar__title text--truncate">Fortran</b></a><div class="navbar__item dropdown dropdown--hoverable"><a aria-current=page class="navbar__link active" aria-haspopup=true aria-expanded=false role=button href=/fortran/>Docs</a><ul class=dropdown__menu><li><a aria-current=page class="dropdown__link dropdown__link--active" href=/fortran/>Fortran Programming</a><li><a href=https://pranabdas.github.io/docs/ rel="noopener noreferrer" class=dropdown__link>~ ~ ~ Other Docs ~ ~ ~</a><li><a href=https://pranabdas.github.io/arpespythontools/ rel="noopener noreferrer" class=dropdown__link>ARPES Python Tools</a><li><a href=https://pranabdas.github.io/c-cpp/ rel="noopener noreferrer" class=dropdown__link>C and C++ Programming</a><li><a href=https://pranabdas.github.io/condmat-notes/ rel="noopener noreferrer" class=dropdown__link>Condensed Matter Notes</a><li><a href=https://pranabdas.github.io/javascript/ rel="noopener noreferrer" class=dropdown__link>Javascript Tutorial</a><li><a href=https://pranabdas.github.io/linux/ rel="noopener noreferrer" class=dropdown__link>Linux Tutorial</a><li><a href=https://pranabdas.github.io/machine-learning/ rel="noopener noreferrer" class=dropdown__link>Machine Learning Notes</a><li><a href=https://pranabdas.github.io/openmx/ rel="noopener noreferrer" class=dropdown__link>OpenMX tutorial</a><li><a href=https://pranabdas.github.io/python-tutorial/ rel="noopener noreferrer" class=dropdown__link>Python Tutorial</a><li><a href=https://pranabdas.github.io/espresso/ rel="noopener noreferrer" class=dropdown__link>Quantum Espresso Tutorial</a><li><a href=https://pranabdas.github.io/rust/ rel="noopener noreferrer" class=dropdown__link>Rust Programming</a><li><a href=https://pranabdas.github.io/arpes-manual/ rel="noopener noreferrer" class=dropdown__link>SUV ARPES Manual</a><li><a href=https://pranabdas.github.io/suvtools/ rel="noopener noreferrer" class=dropdown__link>SUV Python Tools</a></ul></div></div><div class="navbar__items navbar__items--right"><a href=https://github.com/pranabdas/fortran rel="noopener noreferrer" class="navbar__item navbar__link header-github-link" aria-label="GitHub repository" title="Visit project repository in GitHub"></a><a href=https://pranabdas.github.io rel="noopener noreferrer" class="navbar__item navbar__link header-homepage-link" aria-label="About me" title="Go to Pranab's Homepage"></a><div class="toggle_vylO colorModeToggle_DEke"><button class="clean-btn toggleButton_gllP toggleButtonDisabled_aARS" type=button disabled title="Switch between dark and light mode (currently light mode)" aria-label="Switch between dark and light mode (currently light mode)" aria-live=polite aria-pressed=false><svg viewBox="0 0 24 24" width=24 height=24 class=lightToggleIcon_pyhR><path fill=currentColor d="M12,9c1.65,0,3,1.35,3,3s-1.35,3-3,3s-3-1.35-3-3S10.35,9,12,9 M12,7c-2.76,0-5,2.24-5,5s2.24,5,5,5s5-2.24,5-5 S14.76,7,12,7L12,7z M2,13l2,0c0.55,0,1-0.45,1-1s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S1.45,13,2,13z M20,13l2,0c0.55,0,1-0.45,1-1 s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S19.45,13,20,13z M11,2v2c0,0.55,0.45,1,1,1s1-0.45,1-1V2c0-0.55-0.45-1-1-1S11,1.45,11,2z M11,20v2c0,0.55,0.45,1,1,1s1-0.45,1-1v-2c0-0.55-0.45-1-1-1C11.45,19,11,19.45,11,20z M5.99,4.58c-0.39-0.39-1.03-0.39-1.41,0 c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0s0.39-1.03,0-1.41L5.99,4.58z M18.36,16.95 c-0.39-0.39-1.03-0.39-1.41,0c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0c0.39-0.39,0.39-1.03,0-1.41 L18.36,16.95z M19.42,5.99c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06c-0.39,0.39-0.39,1.03,0,1.41 s1.03,0.39,1.41,0L19.42,5.99z M7.05,18.36c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06 c-0.39,0.39-0.39,1.03,0,1.41s1.03,0.39,1.41,0L7.05,18.36z"/></svg><svg viewBox="0 0 24 24" width=24 height=24 class=darkToggleIcon_wfgR><path fill=currentColor d="M9.37,5.51C9.19,6.15,9.1,6.82,9.1,7.5c0,4.08,3.32,7.4,7.4,7.4c0.68,0,1.35-0.09,1.99-0.27C17.45,17.19,14.93,19,12,19 c-3.86,0-7-3.14-7-7C5,9.07,6.81,6.55,9.37,5.51z M12,3c-4.97,0-9,4.03-9,9s4.03,9,9,9s9-4.03,9-9c0-0.46-0.04-0.92-0.1-1.36 c-0.98,1.37-2.58,2.26-4.4,2.26c-2.98,0-5.4-2.42-5.4-5.4c0-1.81,0.89-3.42,2.26-4.4C12.92,3.04,12.46,3,12,3L12,3z"/></svg></button></div><div class=navbarSearchContainer_Bca1><div class="navbar__search searchBarContainer_NW3z" dir=ltr><input placeholder=Search aria-label=Search class=navbar__search-input value=""><div class="loadingRing_RJI3 searchBarLoadingRing_YnHq"><div></div><div></div><div></div><div></div></div></div></div></div></div><div role=presentation class=navbar-sidebar__backdrop></div></nav><div id=__docusaurus_skipToContent_fallback class="main-wrapper mainWrapper_z2l0"><div class=docsWrapper_hBAB><button aria-label="Scroll back to top" class="clean-btn theme-back-to-top-button backToTopButton_sjWU" type=button></button><div class=docRoot_UBD9><aside class="theme-doc-sidebar-container docSidebarContainer_YfHR"><div class=sidebarViewport_aRkj><div class="sidebar_njMd sidebarWithHideableNavbar_wUlq"><a tabindex=-1 class=sidebarLogo_isFc href=/fortran/><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--light_NVdE"><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--dark_xIcU"><b>Fortran</b></a><nav aria-label="Docs sidebar" class="menu thin-scrollbar menu_SIkG"><ul class="theme-doc-sidebar-menu menu__list"><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/>Setup</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/basics>Basics</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/array>Array and Matrix</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/control>Logical control</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/loop>Loop</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/modules>Modules</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/procedures>Procedures</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/complex>Complex number</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/recursion>Recursion</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/types>Custom types</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/pointer>Pointer</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/file>File I/O</a><li class="theme-doc-sidebar-item-category theme-doc-sidebar-item-category-level-1 menu__list-item"><div class=menu__list-item-collapsible><a class="menu__link menu__link--sublist menu__link--active" href=/fortran/category/coding-practice>Coding practice</a><button aria-label="Collapse sidebar category 'Coding practice'" aria-expanded=true type=button class="clean-btn menu__caret"></button></div><ul style=display:block;overflow:visible;height:auto class=menu__list><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/swap>Swap two numbers</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/abs-path>Absolute path</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/hypotenuse>Calculate hypotenuse</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/integration>Numerical integration</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/haversine>Haversine formula</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/inner-product>Inner product</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class="menu__link menu__link--active" aria-current=page tabindex=0 href=/fortran/monte-carlo-pi>Monte Carlo method</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/monte-carlo-integration>Monte Carlo integration</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/time>Time</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/arg-parsing>Argument parsing</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/exec-command>External command</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/blas>BLAS</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/mpi>MPI Basics</a></ul><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/resources>Resources</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/license>License</a></ul></nav><button type=button title="Collapse sidebar" aria-label="Collapse sidebar" class="button button--secondary button--outline collapseSidebarButton_PEFL"><svg width=20 height=20 aria-hidden=true class=collapseSidebarButtonIcon_kv0_><g fill=#7a7a7a><path d="M9.992 10.023c0 .2-.062.399-.172.547l-4.996 7.492a.982.982 0 01-.828.454H1c-.55 0-1-.453-1-1 0-.2.059-.403.168-.551l4.629-6.942L.168 3.078A.939.939 0 010 2.528c0-.548.45-.997 1-.997h2.996c.352 0 .649.18.828.45L9.82 9.472c.11.148.172.347.172.55zm0 0"/><path d="M19.98 10.023c0 .2-.058.399-.168.547l-4.996 7.492a.987.987 0 01-.828.454h-3c-.547 0-.996-.453-.996-1 0-.2.059-.403.168-.551l4.625-6.942-4.625-6.945a.939.939 0 01-.168-.55 1 1 0 01.996-.997h3c.348 0 .649.18.828.45l4.996 7.492c.11.148.168.347.168.55zm0 0"/></g></svg></button></div></div></aside><main class=docMainContainer_TBSr><div class="container padding-top--md padding-bottom--lg"><div class=row><div class="col docItemCol_VOVn"><div class=docItemContainer_Djhp><article><nav class="theme-doc-breadcrumbs breadcrumbsContainer_Z_bl" aria-label=Breadcrumbs><ul class=breadcrumbs itemscope itemtype=https://schema.org/BreadcrumbList><li class=breadcrumbs__item><a aria-label="Home page" class=breadcrumbs__link href=/fortran/><svg viewBox="0 0 24 24" class=breadcrumbHomeIcon_YNFT><path d="M10 19v-5h4v5c0 .55.45 1 1 1h3c.55 0 1-.45 1-1v-7h1.7c.46 0 .68-.57.33-.87L12.67 3.6c-.38-.34-.96-.34-1.34 0l-8.36 7.53c-.34.3-.13.87.33.87H5v7c0 .55.45 1 1 1h3c.55 0 1-.45 1-1z" fill=currentColor /></svg></a><li itemscope itemprop=itemListElement itemtype=https://schema.org/ListItem class=breadcrumbs__item><a class=breadcrumbs__link itemprop=item href=/fortran/category/coding-practice><span itemprop=name>Coding practice</span></a><meta itemprop=position content=1><li itemscope itemprop=itemListElement itemtype=https://schema.org/ListItem class="breadcrumbs__item breadcrumbs__item--active"><span class=breadcrumbs__link itemprop=name>Monte Carlo method</span><meta itemprop=position content=2></ul></nav><div class="theme-doc-markdown markdown"><header><h1>Determine value of pi by Monte Carlo method</h1></header><p>We will approximate value of <span class=katex><span class=katex-mathml><math><semantics><mrow><mi>π</mi></mrow><annotation encoding=application/x-tex>\pi</annotation></semantics></math></span><span class=katex-html aria-hidden=true><span class=base><span class=strut style=height:0.4306em></span><span class="mord mathnormal" style=margin-right:0.03588em>π</span></span></span></span> by Monte Carlo method. We will generate
+<!doctype html><html lang=en dir=ltr class="docs-wrapper plugin-docs plugin-id-default docs-version-current docs-doc-page docs-doc-id-monte-carlo-pi" data-has-hydrated=false><meta charset=UTF-8><meta name=generator content="Docusaurus v3.6.1"><title data-rh=true>Determine value of pi by Monte Carlo method • Fortran Tutorial</title><meta data-rh=true name=viewport content="width=device-width,initial-scale=1.0"><meta data-rh=true name=twitter:card content=summary_large_image><meta data-rh=true property=og:url content=https://pranabdas.github.io/fortran/monte-carlo-pi><meta data-rh=true property=og:locale content=en><meta data-rh=true name=docusaurus_locale content=en><meta data-rh=true name=docsearch:language content=en><meta data-rh=true name=theme-color content=#06445c><meta data-rh=true name=docusaurus_version content=current><meta data-rh=true name=docusaurus_tag content=docs-default-current><meta data-rh=true name=docsearch:version content=current><meta data-rh=true name=docsearch:docusaurus_tag content=docs-default-current><meta data-rh=true property=og:title content="Determine value of pi by Monte Carlo method • Fortran Tutorial"><meta data-rh=true name=description content="We will approximate value of $\pi$ by Monte Carlo method. We will generate"><meta data-rh=true property=og:description content="We will approximate value of $\pi$ by Monte Carlo method. We will generate"><link data-rh=true rel=icon href=/fortran/img/favicon.png><link data-rh=true rel=canonical href=https://pranabdas.github.io/fortran/monte-carlo-pi><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/monte-carlo-pi hreflang=en><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/monte-carlo-pi hreflang=x-default><link rel=stylesheet href=https://pranab.pages.dev/assets/fonts/katex/katex.min.css><link rel=stylesheet href=/fortran/assets/css/styles.4de1c8a8.css><script src=/fortran/assets/js/runtime~main.667e3c0f.js defer></script><script src=/fortran/assets/js/main.10795e8f.js defer></script><body class=navigation-with-keyboard><script>!function(){var t,e=function(){try{return new URLSearchParams(window.location.search).get("docusaurus-theme")}catch(t){}}()||function(){try{return window.localStorage.getItem("theme")}catch(t){}}();t=null!==e?e:window.matchMedia("(prefers-color-scheme: dark)").matches?"dark":(window.matchMedia("(prefers-color-scheme: light)").matches,"light"),document.documentElement.setAttribute("data-theme",t)}(),function(){try{for(var[t,e]of new URLSearchParams(window.location.search).entries())if(t.startsWith("docusaurus-data-")){var a=t.replace("docusaurus-data-","data-");document.documentElement.setAttribute(a,e)}}catch(t){}}()</script><div id=__docusaurus><div role=region aria-label="Skip to main content"><a class=skipToContent_fXgn href=#__docusaurus_skipToContent_fallback>Skip to main content</a></div><nav aria-label=Main class="navbar navbar--fixed-top navbarHideable_m1mJ"><div class=navbar__inner><div class=navbar__items><button aria-label="Toggle navigation bar" aria-expanded=false class="navbar__toggle clean-btn" type=button><svg width=30 height=30 viewBox="0 0 30 30" aria-hidden=true><path stroke=currentColor stroke-linecap=round stroke-miterlimit=10 stroke-width=2 d="M4 7h22M4 15h22M4 23h22"/></svg></button><a class=navbar__brand href=/fortran/><div class=navbar__logo><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--light_NVdE"><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--dark_xIcU"></div><b class="navbar__title text--truncate">Fortran</b></a><div class="navbar__item dropdown dropdown--hoverable"><a aria-current=page class="navbar__link active" aria-haspopup=true aria-expanded=false role=button href=/fortran/>Docs</a><ul class=dropdown__menu><li><a aria-current=page class="dropdown__link dropdown__link--active" href=/fortran/>Fortran Programming</a><li><a href=https://pranabdas.github.io/docs/ rel="noopener noreferrer" class=dropdown__link>~ ~ ~ Other Docs ~ ~ ~</a><li><a href=https://pranabdas.github.io/arpespythontools/ rel="noopener noreferrer" class=dropdown__link>ARPES Python Tools</a><li><a href=https://pranabdas.github.io/c-cpp/ rel="noopener noreferrer" class=dropdown__link>C and C++ Programming</a><li><a href=https://pranabdas.github.io/condmat-notes/ rel="noopener noreferrer" class=dropdown__link>Condensed Matter Notes</a><li><a href=https://pranabdas.github.io/javascript/ rel="noopener noreferrer" class=dropdown__link>Javascript Tutorial</a><li><a href=https://pranabdas.github.io/linux/ rel="noopener noreferrer" class=dropdown__link>Linux Tutorial</a><li><a href=https://pranabdas.github.io/machine-learning/ rel="noopener noreferrer" class=dropdown__link>Machine Learning Notes</a><li><a href=https://pranabdas.github.io/openmx/ rel="noopener noreferrer" class=dropdown__link>OpenMX tutorial</a><li><a href=https://pranabdas.github.io/python-tutorial/ rel="noopener noreferrer" class=dropdown__link>Python Tutorial</a><li><a href=https://pranabdas.github.io/espresso/ rel="noopener noreferrer" class=dropdown__link>Quantum Espresso Tutorial</a><li><a href=https://pranabdas.github.io/rust/ rel="noopener noreferrer" class=dropdown__link>Rust Programming</a><li><a href=https://pranabdas.github.io/arpes-manual/ rel="noopener noreferrer" class=dropdown__link>SUV ARPES Manual</a><li><a href=https://pranabdas.github.io/suvtools/ rel="noopener noreferrer" class=dropdown__link>SUV Python Tools</a></ul></div></div><div class="navbar__items navbar__items--right"><a href=https://github.com/pranabdas/fortran rel="noopener noreferrer" class="navbar__item navbar__link header-github-link" aria-label="GitHub repository" title="Visit project repository in GitHub"></a><a href=https://pranabdas.github.io rel="noopener noreferrer" class="navbar__item navbar__link header-homepage-link" aria-label="About me" title="Go to Pranab's Homepage"></a><div class="toggle_vylO colorModeToggle_DEke"><button class="clean-btn toggleButton_gllP toggleButtonDisabled_aARS" type=button disabled title="Switch between dark and light mode (currently light mode)" aria-label="Switch between dark and light mode (currently light mode)" aria-live=polite aria-pressed=false><svg viewBox="0 0 24 24" width=24 height=24 class=lightToggleIcon_pyhR><path fill=currentColor d="M12,9c1.65,0,3,1.35,3,3s-1.35,3-3,3s-3-1.35-3-3S10.35,9,12,9 M12,7c-2.76,0-5,2.24-5,5s2.24,5,5,5s5-2.24,5-5 S14.76,7,12,7L12,7z M2,13l2,0c0.55,0,1-0.45,1-1s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S1.45,13,2,13z M20,13l2,0c0.55,0,1-0.45,1-1 s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S19.45,13,20,13z M11,2v2c0,0.55,0.45,1,1,1s1-0.45,1-1V2c0-0.55-0.45-1-1-1S11,1.45,11,2z M11,20v2c0,0.55,0.45,1,1,1s1-0.45,1-1v-2c0-0.55-0.45-1-1-1C11.45,19,11,19.45,11,20z M5.99,4.58c-0.39-0.39-1.03-0.39-1.41,0 c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0s0.39-1.03,0-1.41L5.99,4.58z M18.36,16.95 c-0.39-0.39-1.03-0.39-1.41,0c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0c0.39-0.39,0.39-1.03,0-1.41 L18.36,16.95z M19.42,5.99c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06c-0.39,0.39-0.39,1.03,0,1.41 s1.03,0.39,1.41,0L19.42,5.99z M7.05,18.36c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06 c-0.39,0.39-0.39,1.03,0,1.41s1.03,0.39,1.41,0L7.05,18.36z"/></svg><svg viewBox="0 0 24 24" width=24 height=24 class=darkToggleIcon_wfgR><path fill=currentColor d="M9.37,5.51C9.19,6.15,9.1,6.82,9.1,7.5c0,4.08,3.32,7.4,7.4,7.4c0.68,0,1.35-0.09,1.99-0.27C17.45,17.19,14.93,19,12,19 c-3.86,0-7-3.14-7-7C5,9.07,6.81,6.55,9.37,5.51z M12,3c-4.97,0-9,4.03-9,9s4.03,9,9,9s9-4.03,9-9c0-0.46-0.04-0.92-0.1-1.36 c-0.98,1.37-2.58,2.26-4.4,2.26c-2.98,0-5.4-2.42-5.4-5.4c0-1.81,0.89-3.42,2.26-4.4C12.92,3.04,12.46,3,12,3L12,3z"/></svg></button></div><div class=navbarSearchContainer_Bca1><div class="navbar__search searchBarContainer_NW3z" dir=ltr><input placeholder=Search aria-label=Search class=navbar__search-input value=""><div class="loadingRing_RJI3 searchBarLoadingRing_YnHq"><div></div><div></div><div></div><div></div></div></div></div></div></div><div role=presentation class=navbar-sidebar__backdrop></div></nav><div id=__docusaurus_skipToContent_fallback class="main-wrapper mainWrapper_z2l0"><div class=docsWrapper_hBAB><button aria-label="Scroll back to top" class="clean-btn theme-back-to-top-button backToTopButton_sjWU" type=button></button><div class=docRoot_UBD9><aside class="theme-doc-sidebar-container docSidebarContainer_YfHR"><div class=sidebarViewport_aRkj><div class="sidebar_njMd sidebarWithHideableNavbar_wUlq"><a tabindex=-1 class=sidebarLogo_isFc href=/fortran/><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--light_NVdE"><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--dark_xIcU"><b>Fortran</b></a><nav aria-label="Docs sidebar" class="menu thin-scrollbar menu_SIkG"><ul class="theme-doc-sidebar-menu menu__list"><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/>Setup</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/basics>Basics</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/array>Array and Matrix</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/control>Logical control</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/loop>Loop</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/modules>Modules</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/procedures>Procedures</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/complex>Complex number</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/recursion>Recursion</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/types>Custom types</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/pointer>Pointer</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/file>File I/O</a><li class="theme-doc-sidebar-item-category theme-doc-sidebar-item-category-level-1 menu__list-item"><div class=menu__list-item-collapsible><a class="menu__link menu__link--sublist menu__link--active" href=/fortran/category/coding-practice>Coding practice</a><button aria-label="Collapse sidebar category 'Coding practice'" aria-expanded=true type=button class="clean-btn menu__caret"></button></div><ul style=display:block;overflow:visible;height:auto class=menu__list><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/swap>Swap two numbers</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/abs-path>Absolute path</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/hypotenuse>Calculate hypotenuse</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/integration>Numerical integration</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/haversine>Haversine formula</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/inner-product>Inner product</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class="menu__link menu__link--active" aria-current=page tabindex=0 href=/fortran/monte-carlo-pi>Monte Carlo method</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/monte-carlo-integration>Monte Carlo integration</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/time>Time</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/arg-parsing>Argument parsing</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/exec-command>External command</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/blas>BLAS</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/mpi>MPI Basics</a></ul><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/resources>Resources</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/license>License</a></ul></nav><button type=button title="Collapse sidebar" aria-label="Collapse sidebar" class="button button--secondary button--outline collapseSidebarButton_PEFL"><svg width=20 height=20 aria-hidden=true class=collapseSidebarButtonIcon_kv0_><g fill=#7a7a7a><path d="M9.992 10.023c0 .2-.062.399-.172.547l-4.996 7.492a.982.982 0 01-.828.454H1c-.55 0-1-.453-1-1 0-.2.059-.403.168-.551l4.629-6.942L.168 3.078A.939.939 0 010 2.528c0-.548.45-.997 1-.997h2.996c.352 0 .649.18.828.45L9.82 9.472c.11.148.172.347.172.55zm0 0"/><path d="M19.98 10.023c0 .2-.058.399-.168.547l-4.996 7.492a.987.987 0 01-.828.454h-3c-.547 0-.996-.453-.996-1 0-.2.059-.403.168-.551l4.625-6.942-4.625-6.945a.939.939 0 01-.168-.55 1 1 0 01.996-.997h3c.348 0 .649.18.828.45l4.996 7.492c.11.148.168.347.168.55zm0 0"/></g></svg></button></div></div></aside><main class=docMainContainer_TBSr><div class="container padding-top--md padding-bottom--lg"><div class=row><div class="col docItemCol_VOVn"><div class=docItemContainer_Djhp><article><nav class="theme-doc-breadcrumbs breadcrumbsContainer_Z_bl" aria-label=Breadcrumbs><ul class=breadcrumbs itemscope itemtype=https://schema.org/BreadcrumbList><li class=breadcrumbs__item><a aria-label="Home page" class=breadcrumbs__link href=/fortran/><svg viewBox="0 0 24 24" class=breadcrumbHomeIcon_YNFT><path d="M10 19v-5h4v5c0 .55.45 1 1 1h3c.55 0 1-.45 1-1v-7h1.7c.46 0 .68-.57.33-.87L12.67 3.6c-.38-.34-.96-.34-1.34 0l-8.36 7.53c-.34.3-.13.87.33.87H5v7c0 .55.45 1 1 1h3c.55 0 1-.45 1-1z" fill=currentColor /></svg></a><li itemscope itemprop=itemListElement itemtype=https://schema.org/ListItem class=breadcrumbs__item><a class=breadcrumbs__link itemprop=item href=/fortran/category/coding-practice><span itemprop=name>Coding practice</span></a><meta itemprop=position content=1><li itemscope itemprop=itemListElement itemtype=https://schema.org/ListItem class="breadcrumbs__item breadcrumbs__item--active"><span class=breadcrumbs__link itemprop=name>Monte Carlo method</span><meta itemprop=position content=2></ul></nav><div class="theme-doc-markdown markdown"><header><h1>Determine value of pi by Monte Carlo method</h1></header><p>We will approximate value of <span class=katex><span class=katex-mathml><math><semantics><mrow><mi>π</mi></mrow><annotation encoding=application/x-tex>\pi</annotation></semantics></math></span><span class=katex-html aria-hidden=true><span class=base><span class=strut style=height:0.4306em></span><span class="mord mathnormal" style=margin-right:0.03588em>π</span></span></span></span> by Monte Carlo method. We will generate
 random number in a square of radius 2 unit; x = (-1, 1) and y = (-1, 1). We will
 count how many points are inside the circle of radius 1 unit. Area of the square
 = 4 square unit, while the are of circle is <span class=katex><span class=katex-mathml><math><semantics><mrow><mi>π</mi></mrow><annotation encoding=application/x-tex>\pi</annotation></semantics></math></span><span class=katex-html aria-hidden=true><span class=base><span class=strut style=height:0.4306em></span><span class="mord mathnormal" style=margin-right:0.03588em>π</span></span></span></span> (unit radius circle). Use this
diff --git a/mpi/index.html b/mpi/index.html
index 4b1db2c..f2fa983 100644
--- a/mpi/index.html
+++ b/mpi/index.html
@@ -1,4 +1,4 @@
-<!doctype html><html lang=en dir=ltr class="docs-wrapper plugin-docs plugin-id-default docs-version-current docs-doc-page docs-doc-id-mpi" data-has-hydrated=false><meta charset=UTF-8><meta name=generator content="Docusaurus v3.6.1"><title data-rh=true>Message Passing Interface (MPI) Basics • Fortran Tutorial</title><meta data-rh=true name=viewport content="width=device-width,initial-scale=1.0"><meta data-rh=true name=twitter:card content=summary_large_image><meta data-rh=true property=og:url content=https://pranabdas.github.io/fortran/mpi><meta data-rh=true property=og:locale content=en><meta data-rh=true name=docusaurus_locale content=en><meta data-rh=true name=docsearch:language content=en><meta data-rh=true name=theme-color content=#06445c><meta data-rh=true name=docusaurus_version content=current><meta data-rh=true name=docusaurus_tag content=docs-default-current><meta data-rh=true name=docsearch:version content=current><meta data-rh=true name=docsearch:docusaurus_tag content=docs-default-current><meta data-rh=true property=og:title content="Message Passing Interface (MPI) Basics • Fortran Tutorial"><meta data-rh=true name=description content="MPI Hello World"><meta data-rh=true property=og:description content="MPI Hello World"><link data-rh=true rel=icon href=/fortran/img/favicon.png><link data-rh=true rel=canonical href=https://pranabdas.github.io/fortran/mpi><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/mpi hreflang=en><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/mpi hreflang=x-default><link rel=stylesheet href=https://pranabdas.github.io/drive/webfonts/katex/katex.min.css><link rel=stylesheet href=/fortran/assets/css/styles.4de1c8a8.css><script src=/fortran/assets/js/runtime~main.866c090c.js defer></script><script src=/fortran/assets/js/main.ec888ba8.js defer></script><body class=navigation-with-keyboard><script>!function(){var t,e=function(){try{return new URLSearchParams(window.location.search).get("docusaurus-theme")}catch(t){}}()||function(){try{return window.localStorage.getItem("theme")}catch(t){}}();t=null!==e?e:window.matchMedia("(prefers-color-scheme: dark)").matches?"dark":(window.matchMedia("(prefers-color-scheme: light)").matches,"light"),document.documentElement.setAttribute("data-theme",t)}(),function(){try{for(var[t,e]of new URLSearchParams(window.location.search).entries())if(t.startsWith("docusaurus-data-")){var a=t.replace("docusaurus-data-","data-");document.documentElement.setAttribute(a,e)}}catch(t){}}()</script><div id=__docusaurus><div role=region aria-label="Skip to main content"><a class=skipToContent_fXgn href=#__docusaurus_skipToContent_fallback>Skip to main content</a></div><nav aria-label=Main class="navbar navbar--fixed-top navbarHideable_m1mJ"><div class=navbar__inner><div class=navbar__items><button aria-label="Toggle navigation bar" aria-expanded=false class="navbar__toggle clean-btn" type=button><svg width=30 height=30 viewBox="0 0 30 30" aria-hidden=true><path stroke=currentColor stroke-linecap=round stroke-miterlimit=10 stroke-width=2 d="M4 7h22M4 15h22M4 23h22"/></svg></button><a class=navbar__brand href=/fortran/><div class=navbar__logo><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--light_NVdE"><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--dark_xIcU"></div><b class="navbar__title text--truncate">Fortran</b></a><div class="navbar__item dropdown dropdown--hoverable"><a aria-current=page class="navbar__link active" aria-haspopup=true aria-expanded=false role=button href=/fortran/>Docs</a><ul class=dropdown__menu><li><a aria-current=page class="dropdown__link dropdown__link--active" href=/fortran/>Fortran Programming</a><li><a href=https://pranabdas.github.io/docs/ rel="noopener noreferrer" class=dropdown__link>~ ~ ~ Other Docs ~ ~ ~</a><li><a href=https://pranabdas.github.io/arpespythontools/ rel="noopener noreferrer" class=dropdown__link>ARPES Python Tools</a><li><a href=https://pranabdas.github.io/c-cpp/ rel="noopener noreferrer" class=dropdown__link>C and C++ Programming</a><li><a href=https://pranabdas.github.io/condmat-notes/ rel="noopener noreferrer" class=dropdown__link>Condensed Matter Notes</a><li><a href=https://pranabdas.github.io/javascript/ rel="noopener noreferrer" class=dropdown__link>Javascript Tutorial</a><li><a href=https://pranabdas.github.io/linux/ rel="noopener noreferrer" class=dropdown__link>Linux Tutorial</a><li><a href=https://pranabdas.github.io/machine-learning/ rel="noopener noreferrer" class=dropdown__link>Machine Learning Notes</a><li><a href=https://pranabdas.github.io/openmx/ rel="noopener noreferrer" class=dropdown__link>OpenMX tutorial</a><li><a href=https://pranabdas.github.io/python-tutorial/ rel="noopener noreferrer" class=dropdown__link>Python Tutorial</a><li><a href=https://pranabdas.github.io/espresso/ rel="noopener noreferrer" class=dropdown__link>Quantum Espresso Tutorial</a><li><a href=https://pranabdas.github.io/rust/ rel="noopener noreferrer" class=dropdown__link>Rust Programming</a><li><a href=https://pranabdas.github.io/arpes-manual/ rel="noopener noreferrer" class=dropdown__link>SUV ARPES Manual</a><li><a href=https://pranabdas.github.io/suvtools/ rel="noopener noreferrer" class=dropdown__link>SUV Python Tools</a></ul></div></div><div class="navbar__items navbar__items--right"><a href=https://github.com/pranabdas/fortran rel="noopener noreferrer" class="navbar__item navbar__link header-github-link" aria-label="GitHub repository" title="Visit project repository in GitHub"></a><a href=https://pranabdas.github.io rel="noopener noreferrer" class="navbar__item navbar__link header-homepage-link" aria-label="About me" title="Go to Pranab's Homepage"></a><div class="toggle_vylO colorModeToggle_DEke"><button class="clean-btn toggleButton_gllP toggleButtonDisabled_aARS" type=button disabled title="Switch between dark and light mode (currently light mode)" aria-label="Switch between dark and light mode (currently light mode)" aria-live=polite aria-pressed=false><svg viewBox="0 0 24 24" width=24 height=24 class=lightToggleIcon_pyhR><path fill=currentColor d="M12,9c1.65,0,3,1.35,3,3s-1.35,3-3,3s-3-1.35-3-3S10.35,9,12,9 M12,7c-2.76,0-5,2.24-5,5s2.24,5,5,5s5-2.24,5-5 S14.76,7,12,7L12,7z M2,13l2,0c0.55,0,1-0.45,1-1s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S1.45,13,2,13z M20,13l2,0c0.55,0,1-0.45,1-1 s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S19.45,13,20,13z M11,2v2c0,0.55,0.45,1,1,1s1-0.45,1-1V2c0-0.55-0.45-1-1-1S11,1.45,11,2z M11,20v2c0,0.55,0.45,1,1,1s1-0.45,1-1v-2c0-0.55-0.45-1-1-1C11.45,19,11,19.45,11,20z M5.99,4.58c-0.39-0.39-1.03-0.39-1.41,0 c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0s0.39-1.03,0-1.41L5.99,4.58z M18.36,16.95 c-0.39-0.39-1.03-0.39-1.41,0c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0c0.39-0.39,0.39-1.03,0-1.41 L18.36,16.95z M19.42,5.99c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06c-0.39,0.39-0.39,1.03,0,1.41 s1.03,0.39,1.41,0L19.42,5.99z M7.05,18.36c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06 c-0.39,0.39-0.39,1.03,0,1.41s1.03,0.39,1.41,0L7.05,18.36z"/></svg><svg viewBox="0 0 24 24" width=24 height=24 class=darkToggleIcon_wfgR><path fill=currentColor d="M9.37,5.51C9.19,6.15,9.1,6.82,9.1,7.5c0,4.08,3.32,7.4,7.4,7.4c0.68,0,1.35-0.09,1.99-0.27C17.45,17.19,14.93,19,12,19 c-3.86,0-7-3.14-7-7C5,9.07,6.81,6.55,9.37,5.51z M12,3c-4.97,0-9,4.03-9,9s4.03,9,9,9s9-4.03,9-9c0-0.46-0.04-0.92-0.1-1.36 c-0.98,1.37-2.58,2.26-4.4,2.26c-2.98,0-5.4-2.42-5.4-5.4c0-1.81,0.89-3.42,2.26-4.4C12.92,3.04,12.46,3,12,3L12,3z"/></svg></button></div><div class=navbarSearchContainer_Bca1><div class="navbar__search searchBarContainer_NW3z" dir=ltr><input placeholder=Search aria-label=Search class=navbar__search-input value=""><div class="loadingRing_RJI3 searchBarLoadingRing_YnHq"><div></div><div></div><div></div><div></div></div></div></div></div></div><div role=presentation class=navbar-sidebar__backdrop></div></nav><div id=__docusaurus_skipToContent_fallback class="main-wrapper mainWrapper_z2l0"><div class=docsWrapper_hBAB><button aria-label="Scroll back to top" class="clean-btn theme-back-to-top-button backToTopButton_sjWU" type=button></button><div class=docRoot_UBD9><aside class="theme-doc-sidebar-container docSidebarContainer_YfHR"><div class=sidebarViewport_aRkj><div class="sidebar_njMd sidebarWithHideableNavbar_wUlq"><a tabindex=-1 class=sidebarLogo_isFc href=/fortran/><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--light_NVdE"><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--dark_xIcU"><b>Fortran</b></a><nav aria-label="Docs sidebar" class="menu thin-scrollbar menu_SIkG"><ul class="theme-doc-sidebar-menu menu__list"><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/>Setup</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/basics>Basics</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/array>Array and Matrix</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/control>Logical control</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/loop>Loop</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/modules>Modules</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/procedures>Procedures</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/complex>Complex number</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/recursion>Recursion</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/types>Custom types</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/pointer>Pointer</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/file>File I/O</a><li class="theme-doc-sidebar-item-category theme-doc-sidebar-item-category-level-1 menu__list-item"><div class=menu__list-item-collapsible><a class="menu__link menu__link--sublist menu__link--active" href=/fortran/category/coding-practice>Coding practice</a><button aria-label="Collapse sidebar category 'Coding practice'" aria-expanded=true type=button class="clean-btn menu__caret"></button></div><ul style=display:block;overflow:visible;height:auto class=menu__list><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/swap>Swap two numbers</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/abs-path>Absolute path</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/hypotenuse>Calculate hypotenuse</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/integration>Numerical integration</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/haversine>Haversine formula</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/inner-product>Inner product</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/monte-carlo-pi>Monte Carlo method</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/monte-carlo-integration>Monte Carlo integration</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/time>Time</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/arg-parsing>Argument parsing</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/exec-command>External command</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/blas>BLAS</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class="menu__link menu__link--active" aria-current=page tabindex=0 href=/fortran/mpi>MPI Basics</a></ul><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/resources>Resources</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/license>License</a></ul></nav><button type=button title="Collapse sidebar" aria-label="Collapse sidebar" class="button button--secondary button--outline collapseSidebarButton_PEFL"><svg width=20 height=20 aria-hidden=true class=collapseSidebarButtonIcon_kv0_><g fill=#7a7a7a><path d="M9.992 10.023c0 .2-.062.399-.172.547l-4.996 7.492a.982.982 0 01-.828.454H1c-.55 0-1-.453-1-1 0-.2.059-.403.168-.551l4.629-6.942L.168 3.078A.939.939 0 010 2.528c0-.548.45-.997 1-.997h2.996c.352 0 .649.18.828.45L9.82 9.472c.11.148.172.347.172.55zm0 0"/><path d="M19.98 10.023c0 .2-.058.399-.168.547l-4.996 7.492a.987.987 0 01-.828.454h-3c-.547 0-.996-.453-.996-1 0-.2.059-.403.168-.551l4.625-6.942-4.625-6.945a.939.939 0 01-.168-.55 1 1 0 01.996-.997h3c.348 0 .649.18.828.45l4.996 7.492c.11.148.168.347.168.55zm0 0"/></g></svg></button></div></div></aside><main class=docMainContainer_TBSr><div class="container padding-top--md padding-bottom--lg"><div class=row><div class="col docItemCol_VOVn"><div class=docItemContainer_Djhp><article><nav class="theme-doc-breadcrumbs breadcrumbsContainer_Z_bl" aria-label=Breadcrumbs><ul class=breadcrumbs itemscope itemtype=https://schema.org/BreadcrumbList><li class=breadcrumbs__item><a aria-label="Home page" class=breadcrumbs__link href=/fortran/><svg viewBox="0 0 24 24" class=breadcrumbHomeIcon_YNFT><path d="M10 19v-5h4v5c0 .55.45 1 1 1h3c.55 0 1-.45 1-1v-7h1.7c.46 0 .68-.57.33-.87L12.67 3.6c-.38-.34-.96-.34-1.34 0l-8.36 7.53c-.34.3-.13.87.33.87H5v7c0 .55.45 1 1 1h3c.55 0 1-.45 1-1z" fill=currentColor /></svg></a><li itemscope itemprop=itemListElement itemtype=https://schema.org/ListItem class=breadcrumbs__item><a class=breadcrumbs__link itemprop=item href=/fortran/category/coding-practice><span itemprop=name>Coding practice</span></a><meta itemprop=position content=1><li itemscope itemprop=itemListElement itemtype=https://schema.org/ListItem class="breadcrumbs__item breadcrumbs__item--active"><span class=breadcrumbs__link itemprop=name>MPI Basics</span><meta itemprop=position content=2></ul></nav><div class="tocCollapsible_ETCw theme-doc-toc-mobile tocMobile_ITEo"><button type=button class="clean-btn tocCollapsibleButton_TO0P">On this page</button></div><div class="theme-doc-markdown markdown"><header><h1>Message Passing Interface (MPI) Basics</h1></header><h2 class="anchor anchorWithHideOnScrollNavbar_WYt5" id=mpi-hello-world>MPI Hello World<a href=#mpi-hello-world class=hash-link aria-label="Direct link to MPI Hello World" title="Direct link to MPI Hello World">​</a></h2>
+<!doctype html><html lang=en dir=ltr class="docs-wrapper plugin-docs plugin-id-default docs-version-current docs-doc-page docs-doc-id-mpi" data-has-hydrated=false><meta charset=UTF-8><meta name=generator content="Docusaurus v3.6.1"><title data-rh=true>Message Passing Interface (MPI) Basics • Fortran Tutorial</title><meta data-rh=true name=viewport content="width=device-width,initial-scale=1.0"><meta data-rh=true name=twitter:card content=summary_large_image><meta data-rh=true property=og:url content=https://pranabdas.github.io/fortran/mpi><meta data-rh=true property=og:locale content=en><meta data-rh=true name=docusaurus_locale content=en><meta data-rh=true name=docsearch:language content=en><meta data-rh=true name=theme-color content=#06445c><meta data-rh=true name=docusaurus_version content=current><meta data-rh=true name=docusaurus_tag content=docs-default-current><meta data-rh=true name=docsearch:version content=current><meta data-rh=true name=docsearch:docusaurus_tag content=docs-default-current><meta data-rh=true property=og:title content="Message Passing Interface (MPI) Basics • Fortran Tutorial"><meta data-rh=true name=description content="MPI Hello World"><meta data-rh=true property=og:description content="MPI Hello World"><link data-rh=true rel=icon href=/fortran/img/favicon.png><link data-rh=true rel=canonical href=https://pranabdas.github.io/fortran/mpi><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/mpi hreflang=en><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/mpi hreflang=x-default><link rel=stylesheet href=https://pranab.pages.dev/assets/fonts/katex/katex.min.css><link rel=stylesheet href=/fortran/assets/css/styles.4de1c8a8.css><script src=/fortran/assets/js/runtime~main.667e3c0f.js defer></script><script src=/fortran/assets/js/main.10795e8f.js defer></script><body class=navigation-with-keyboard><script>!function(){var t,e=function(){try{return new URLSearchParams(window.location.search).get("docusaurus-theme")}catch(t){}}()||function(){try{return window.localStorage.getItem("theme")}catch(t){}}();t=null!==e?e:window.matchMedia("(prefers-color-scheme: dark)").matches?"dark":(window.matchMedia("(prefers-color-scheme: light)").matches,"light"),document.documentElement.setAttribute("data-theme",t)}(),function(){try{for(var[t,e]of new URLSearchParams(window.location.search).entries())if(t.startsWith("docusaurus-data-")){var a=t.replace("docusaurus-data-","data-");document.documentElement.setAttribute(a,e)}}catch(t){}}()</script><div id=__docusaurus><div role=region aria-label="Skip to main content"><a class=skipToContent_fXgn href=#__docusaurus_skipToContent_fallback>Skip to main content</a></div><nav aria-label=Main class="navbar navbar--fixed-top navbarHideable_m1mJ"><div class=navbar__inner><div class=navbar__items><button aria-label="Toggle navigation bar" aria-expanded=false class="navbar__toggle clean-btn" type=button><svg width=30 height=30 viewBox="0 0 30 30" aria-hidden=true><path stroke=currentColor stroke-linecap=round stroke-miterlimit=10 stroke-width=2 d="M4 7h22M4 15h22M4 23h22"/></svg></button><a class=navbar__brand href=/fortran/><div class=navbar__logo><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--light_NVdE"><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--dark_xIcU"></div><b class="navbar__title text--truncate">Fortran</b></a><div class="navbar__item dropdown dropdown--hoverable"><a aria-current=page class="navbar__link active" aria-haspopup=true aria-expanded=false role=button href=/fortran/>Docs</a><ul class=dropdown__menu><li><a aria-current=page class="dropdown__link dropdown__link--active" href=/fortran/>Fortran Programming</a><li><a href=https://pranabdas.github.io/docs/ rel="noopener noreferrer" class=dropdown__link>~ ~ ~ Other Docs ~ ~ ~</a><li><a href=https://pranabdas.github.io/arpespythontools/ rel="noopener noreferrer" class=dropdown__link>ARPES Python Tools</a><li><a href=https://pranabdas.github.io/c-cpp/ rel="noopener noreferrer" class=dropdown__link>C and C++ Programming</a><li><a href=https://pranabdas.github.io/condmat-notes/ rel="noopener noreferrer" class=dropdown__link>Condensed Matter Notes</a><li><a href=https://pranabdas.github.io/javascript/ rel="noopener noreferrer" class=dropdown__link>Javascript Tutorial</a><li><a href=https://pranabdas.github.io/linux/ rel="noopener noreferrer" class=dropdown__link>Linux Tutorial</a><li><a href=https://pranabdas.github.io/machine-learning/ rel="noopener noreferrer" class=dropdown__link>Machine Learning Notes</a><li><a href=https://pranabdas.github.io/openmx/ rel="noopener noreferrer" class=dropdown__link>OpenMX tutorial</a><li><a href=https://pranabdas.github.io/python-tutorial/ rel="noopener noreferrer" class=dropdown__link>Python Tutorial</a><li><a href=https://pranabdas.github.io/espresso/ rel="noopener noreferrer" class=dropdown__link>Quantum Espresso Tutorial</a><li><a href=https://pranabdas.github.io/rust/ rel="noopener noreferrer" class=dropdown__link>Rust Programming</a><li><a href=https://pranabdas.github.io/arpes-manual/ rel="noopener noreferrer" class=dropdown__link>SUV ARPES Manual</a><li><a href=https://pranabdas.github.io/suvtools/ rel="noopener noreferrer" class=dropdown__link>SUV Python Tools</a></ul></div></div><div class="navbar__items navbar__items--right"><a href=https://github.com/pranabdas/fortran rel="noopener noreferrer" class="navbar__item navbar__link header-github-link" aria-label="GitHub repository" title="Visit project repository in GitHub"></a><a href=https://pranabdas.github.io rel="noopener noreferrer" class="navbar__item navbar__link header-homepage-link" aria-label="About me" title="Go to Pranab's Homepage"></a><div class="toggle_vylO colorModeToggle_DEke"><button class="clean-btn toggleButton_gllP toggleButtonDisabled_aARS" type=button disabled title="Switch between dark and light mode (currently light mode)" aria-label="Switch between dark and light mode (currently light mode)" aria-live=polite aria-pressed=false><svg viewBox="0 0 24 24" width=24 height=24 class=lightToggleIcon_pyhR><path fill=currentColor d="M12,9c1.65,0,3,1.35,3,3s-1.35,3-3,3s-3-1.35-3-3S10.35,9,12,9 M12,7c-2.76,0-5,2.24-5,5s2.24,5,5,5s5-2.24,5-5 S14.76,7,12,7L12,7z M2,13l2,0c0.55,0,1-0.45,1-1s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S1.45,13,2,13z M20,13l2,0c0.55,0,1-0.45,1-1 s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S19.45,13,20,13z M11,2v2c0,0.55,0.45,1,1,1s1-0.45,1-1V2c0-0.55-0.45-1-1-1S11,1.45,11,2z M11,20v2c0,0.55,0.45,1,1,1s1-0.45,1-1v-2c0-0.55-0.45-1-1-1C11.45,19,11,19.45,11,20z M5.99,4.58c-0.39-0.39-1.03-0.39-1.41,0 c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0s0.39-1.03,0-1.41L5.99,4.58z M18.36,16.95 c-0.39-0.39-1.03-0.39-1.41,0c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0c0.39-0.39,0.39-1.03,0-1.41 L18.36,16.95z M19.42,5.99c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06c-0.39,0.39-0.39,1.03,0,1.41 s1.03,0.39,1.41,0L19.42,5.99z M7.05,18.36c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06 c-0.39,0.39-0.39,1.03,0,1.41s1.03,0.39,1.41,0L7.05,18.36z"/></svg><svg viewBox="0 0 24 24" width=24 height=24 class=darkToggleIcon_wfgR><path fill=currentColor d="M9.37,5.51C9.19,6.15,9.1,6.82,9.1,7.5c0,4.08,3.32,7.4,7.4,7.4c0.68,0,1.35-0.09,1.99-0.27C17.45,17.19,14.93,19,12,19 c-3.86,0-7-3.14-7-7C5,9.07,6.81,6.55,9.37,5.51z M12,3c-4.97,0-9,4.03-9,9s4.03,9,9,9s9-4.03,9-9c0-0.46-0.04-0.92-0.1-1.36 c-0.98,1.37-2.58,2.26-4.4,2.26c-2.98,0-5.4-2.42-5.4-5.4c0-1.81,0.89-3.42,2.26-4.4C12.92,3.04,12.46,3,12,3L12,3z"/></svg></button></div><div class=navbarSearchContainer_Bca1><div class="navbar__search searchBarContainer_NW3z" dir=ltr><input placeholder=Search aria-label=Search class=navbar__search-input value=""><div class="loadingRing_RJI3 searchBarLoadingRing_YnHq"><div></div><div></div><div></div><div></div></div></div></div></div></div><div role=presentation class=navbar-sidebar__backdrop></div></nav><div id=__docusaurus_skipToContent_fallback class="main-wrapper mainWrapper_z2l0"><div class=docsWrapper_hBAB><button aria-label="Scroll back to top" class="clean-btn theme-back-to-top-button backToTopButton_sjWU" type=button></button><div class=docRoot_UBD9><aside class="theme-doc-sidebar-container docSidebarContainer_YfHR"><div class=sidebarViewport_aRkj><div class="sidebar_njMd sidebarWithHideableNavbar_wUlq"><a tabindex=-1 class=sidebarLogo_isFc href=/fortran/><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--light_NVdE"><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--dark_xIcU"><b>Fortran</b></a><nav aria-label="Docs sidebar" class="menu thin-scrollbar menu_SIkG"><ul class="theme-doc-sidebar-menu menu__list"><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/>Setup</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/basics>Basics</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/array>Array and Matrix</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/control>Logical control</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/loop>Loop</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/modules>Modules</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/procedures>Procedures</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/complex>Complex number</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/recursion>Recursion</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/types>Custom types</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/pointer>Pointer</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/file>File I/O</a><li class="theme-doc-sidebar-item-category theme-doc-sidebar-item-category-level-1 menu__list-item"><div class=menu__list-item-collapsible><a class="menu__link menu__link--sublist menu__link--active" href=/fortran/category/coding-practice>Coding practice</a><button aria-label="Collapse sidebar category 'Coding practice'" aria-expanded=true type=button class="clean-btn menu__caret"></button></div><ul style=display:block;overflow:visible;height:auto class=menu__list><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/swap>Swap two numbers</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/abs-path>Absolute path</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/hypotenuse>Calculate hypotenuse</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/integration>Numerical integration</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/haversine>Haversine formula</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/inner-product>Inner product</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/monte-carlo-pi>Monte Carlo method</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/monte-carlo-integration>Monte Carlo integration</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/time>Time</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/arg-parsing>Argument parsing</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/exec-command>External command</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/blas>BLAS</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class="menu__link menu__link--active" aria-current=page tabindex=0 href=/fortran/mpi>MPI Basics</a></ul><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/resources>Resources</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/license>License</a></ul></nav><button type=button title="Collapse sidebar" aria-label="Collapse sidebar" class="button button--secondary button--outline collapseSidebarButton_PEFL"><svg width=20 height=20 aria-hidden=true class=collapseSidebarButtonIcon_kv0_><g fill=#7a7a7a><path d="M9.992 10.023c0 .2-.062.399-.172.547l-4.996 7.492a.982.982 0 01-.828.454H1c-.55 0-1-.453-1-1 0-.2.059-.403.168-.551l4.629-6.942L.168 3.078A.939.939 0 010 2.528c0-.548.45-.997 1-.997h2.996c.352 0 .649.18.828.45L9.82 9.472c.11.148.172.347.172.55zm0 0"/><path d="M19.98 10.023c0 .2-.058.399-.168.547l-4.996 7.492a.987.987 0 01-.828.454h-3c-.547 0-.996-.453-.996-1 0-.2.059-.403.168-.551l4.625-6.942-4.625-6.945a.939.939 0 01-.168-.55 1 1 0 01.996-.997h3c.348 0 .649.18.828.45l4.996 7.492c.11.148.168.347.168.55zm0 0"/></g></svg></button></div></div></aside><main class=docMainContainer_TBSr><div class="container padding-top--md padding-bottom--lg"><div class=row><div class="col docItemCol_VOVn"><div class=docItemContainer_Djhp><article><nav class="theme-doc-breadcrumbs breadcrumbsContainer_Z_bl" aria-label=Breadcrumbs><ul class=breadcrumbs itemscope itemtype=https://schema.org/BreadcrumbList><li class=breadcrumbs__item><a aria-label="Home page" class=breadcrumbs__link href=/fortran/><svg viewBox="0 0 24 24" class=breadcrumbHomeIcon_YNFT><path d="M10 19v-5h4v5c0 .55.45 1 1 1h3c.55 0 1-.45 1-1v-7h1.7c.46 0 .68-.57.33-.87L12.67 3.6c-.38-.34-.96-.34-1.34 0l-8.36 7.53c-.34.3-.13.87.33.87H5v7c0 .55.45 1 1 1h3c.55 0 1-.45 1-1z" fill=currentColor /></svg></a><li itemscope itemprop=itemListElement itemtype=https://schema.org/ListItem class=breadcrumbs__item><a class=breadcrumbs__link itemprop=item href=/fortran/category/coding-practice><span itemprop=name>Coding practice</span></a><meta itemprop=position content=1><li itemscope itemprop=itemListElement itemtype=https://schema.org/ListItem class="breadcrumbs__item breadcrumbs__item--active"><span class=breadcrumbs__link itemprop=name>MPI Basics</span><meta itemprop=position content=2></ul></nav><div class="tocCollapsible_ETCw theme-doc-toc-mobile tocMobile_ITEo"><button type=button class="clean-btn tocCollapsibleButton_TO0P">On this page</button></div><div class="theme-doc-markdown markdown"><header><h1>Message Passing Interface (MPI) Basics</h1></header><h2 class="anchor anchorWithHideOnScrollNavbar_WYt5" id=mpi-hello-world>MPI Hello World<a href=#mpi-hello-world class=hash-link aria-label="Direct link to MPI Hello World" title="Direct link to MPI Hello World">​</a></h2>
 <!-- -->
 <div class="language-fortran codeBlockContainer_Ckt0 theme-code-block" style=--prism-color:#393A34;--prism-background-color:#f6f8fa><div class=codeBlockTitle_Ktv7>src/29_MPI_hello_world.f90</div><div class=codeBlockContent_biex><pre tabindex=0 class="prism-code language-fortran codeBlock_bY9V thin-scrollbar" style=color:#393A34;background-color:#f6f8fa><code class="codeBlockLines_e6Vv codeBlockLinesWithNumbering_o6Pm"><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token keyword" style=color:#00009f>PROGRAM</span><span class="token plain"> hello_world_mpi</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>INCLUDE</span><span class="token plain"> </span><span class="token string" style=color:#e3116c>'mpif.h'</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>INTEGER</span><span class="token plain"> process_rank</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> size_of_cluster</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> ierror</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>CHARACTER</span><span class="token operator" style=color:#393A34>*</span><span class="token plain"> </span><span class="token punctuation" style=color:#393A34>(</span><span class="token plain">MPI_MAX_PROCESSOR_NAME</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"> processor_name</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>CALL</span><span class="token plain"> MPI_INIT</span><span class="token punctuation" style=color:#393A34>(</span><span class="token plain">ierror</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>CALL</span><span class="token plain"> MPI_COMM_SIZE</span><span class="token punctuation" style=color:#393A34>(</span><span class="token plain">MPI_COMM_WORLD</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> size_of_cluster</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> ierror</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>CALL</span><span class="token plain"> MPI_COMM_RANK</span><span class="token punctuation" style=color:#393A34>(</span><span class="token plain">MPI_COMM_WORLD</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> process_rank</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> ierror</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>CALL</span><span class="token plain"> MPI_GET_PROCESSOR_NAME</span><span class="token punctuation" style=color:#393A34>(</span><span class="token plain">processor_name</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> namelen</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> ierr</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>WRITE</span><span class="token punctuation" style=color:#393A34>(</span><span class="token operator" style=color:#393A34>*</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> </span><span class="token number" style=color:#36acaa>10</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"> process_rank</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> size_of_cluster</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> processor_name</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain"></span><span class="token number" style=color:#36acaa>10</span><span class="token plain">  </span><span class="token keyword" style=color:#00009f>FORMAT</span><span class="token punctuation" style=color:#393A34>(</span><span class="token string" style=color:#e3116c>'Hello from process: '</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> I2</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> </span><span class="token string" style=color:#e3116c>' of'</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> I2</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> </span><span class="token string" style=color:#e3116c>' on '</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> </span><span class="token number" style=color:#36acaa>20</span><span class="token plain">A</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>CALL</span><span class="token plain"> MPI_FINALIZE</span><span class="token punctuation" style=color:#393A34>(</span><span class="token plain">ierror</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain"></span><span class="token keyword" style=color:#00009f>END PROGRAM</span></span><br></span></code></pre><div class=buttonGroup__atx><button type=button aria-label="Copy code to clipboard" title=Copy class=clean-btn><span class=copyButtonIcons_eSgA aria-hidden=true><svg viewBox="0 0 24 24" class=copyButtonIcon_y97N><path fill=currentColor d="M19,21H8V7H19M19,5H8A2,2 0 0,0 6,7V21A2,2 0 0,0 8,23H19A2,2 0 0,0 21,21V7A2,2 0 0,0 19,5M16,1H4A2,2 0 0,0 2,3V17H4V3H16V1Z"/></svg><svg viewBox="0 0 24 24" class=copyButtonSuccessIcon_LjdS><path fill=currentColor d=M21,7L9,19L3.5,13.5L4.91,12.09L9,16.17L19.59,5.59L21,7Z /></svg></span></button></div></div></div>
 <p>Compile the code:</p>
diff --git a/pointer/index.html b/pointer/index.html
index 271847a..dd4d4e1 100644
--- a/pointer/index.html
+++ b/pointer/index.html
@@ -1,4 +1,4 @@
-<!doctype html><html lang=en dir=ltr class="docs-wrapper plugin-docs plugin-id-default docs-version-current docs-doc-page docs-doc-id-pointer" data-has-hydrated=false><meta charset=UTF-8><meta name=generator content="Docusaurus v3.6.1"><title data-rh=true>Pointer • Fortran Tutorial</title><meta data-rh=true name=viewport content="width=device-width,initial-scale=1.0"><meta data-rh=true name=twitter:card content=summary_large_image><meta data-rh=true property=og:url content=https://pranabdas.github.io/fortran/pointer><meta data-rh=true property=og:locale content=en><meta data-rh=true name=docusaurus_locale content=en><meta data-rh=true name=docsearch:language content=en><meta data-rh=true name=theme-color content=#06445c><meta data-rh=true name=docusaurus_version content=current><meta data-rh=true name=docusaurus_tag content=docs-default-current><meta data-rh=true name=docsearch:version content=current><meta data-rh=true name=docsearch:docusaurus_tag content=docs-default-current><meta data-rh=true property=og:title content="Pointer • Fortran Tutorial"><meta data-rh=true name=description content="Pointer in FORTRAN is an alias to a variable or procedure."><meta data-rh=true property=og:description content="Pointer in FORTRAN is an alias to a variable or procedure."><link data-rh=true rel=icon href=/fortran/img/favicon.png><link data-rh=true rel=canonical href=https://pranabdas.github.io/fortran/pointer><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/pointer hreflang=en><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/pointer hreflang=x-default><link rel=stylesheet href=https://pranabdas.github.io/drive/webfonts/katex/katex.min.css><link rel=stylesheet href=/fortran/assets/css/styles.4de1c8a8.css><script src=/fortran/assets/js/runtime~main.866c090c.js defer></script><script src=/fortran/assets/js/main.ec888ba8.js defer></script><body class=navigation-with-keyboard><script>!function(){var t,e=function(){try{return new URLSearchParams(window.location.search).get("docusaurus-theme")}catch(t){}}()||function(){try{return window.localStorage.getItem("theme")}catch(t){}}();t=null!==e?e:window.matchMedia("(prefers-color-scheme: dark)").matches?"dark":(window.matchMedia("(prefers-color-scheme: light)").matches,"light"),document.documentElement.setAttribute("data-theme",t)}(),function(){try{for(var[t,e]of new URLSearchParams(window.location.search).entries())if(t.startsWith("docusaurus-data-")){var a=t.replace("docusaurus-data-","data-");document.documentElement.setAttribute(a,e)}}catch(t){}}()</script><div id=__docusaurus><div role=region aria-label="Skip to main content"><a class=skipToContent_fXgn href=#__docusaurus_skipToContent_fallback>Skip to main content</a></div><nav aria-label=Main class="navbar navbar--fixed-top navbarHideable_m1mJ"><div class=navbar__inner><div class=navbar__items><button aria-label="Toggle navigation bar" aria-expanded=false class="navbar__toggle clean-btn" type=button><svg width=30 height=30 viewBox="0 0 30 30" aria-hidden=true><path stroke=currentColor stroke-linecap=round stroke-miterlimit=10 stroke-width=2 d="M4 7h22M4 15h22M4 23h22"/></svg></button><a class=navbar__brand href=/fortran/><div class=navbar__logo><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--light_NVdE"><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--dark_xIcU"></div><b class="navbar__title text--truncate">Fortran</b></a><div class="navbar__item dropdown dropdown--hoverable"><a aria-current=page class="navbar__link active" aria-haspopup=true aria-expanded=false role=button href=/fortran/>Docs</a><ul class=dropdown__menu><li><a aria-current=page class="dropdown__link dropdown__link--active" href=/fortran/>Fortran Programming</a><li><a href=https://pranabdas.github.io/docs/ rel="noopener noreferrer" class=dropdown__link>~ ~ ~ Other Docs ~ ~ ~</a><li><a href=https://pranabdas.github.io/arpespythontools/ rel="noopener noreferrer" class=dropdown__link>ARPES Python Tools</a><li><a href=https://pranabdas.github.io/c-cpp/ rel="noopener noreferrer" class=dropdown__link>C and C++ Programming</a><li><a href=https://pranabdas.github.io/condmat-notes/ rel="noopener noreferrer" class=dropdown__link>Condensed Matter Notes</a><li><a href=https://pranabdas.github.io/javascript/ rel="noopener noreferrer" class=dropdown__link>Javascript Tutorial</a><li><a href=https://pranabdas.github.io/linux/ rel="noopener noreferrer" class=dropdown__link>Linux Tutorial</a><li><a href=https://pranabdas.github.io/machine-learning/ rel="noopener noreferrer" class=dropdown__link>Machine Learning Notes</a><li><a href=https://pranabdas.github.io/openmx/ rel="noopener noreferrer" class=dropdown__link>OpenMX tutorial</a><li><a href=https://pranabdas.github.io/python-tutorial/ rel="noopener noreferrer" class=dropdown__link>Python Tutorial</a><li><a href=https://pranabdas.github.io/espresso/ rel="noopener noreferrer" class=dropdown__link>Quantum Espresso Tutorial</a><li><a href=https://pranabdas.github.io/rust/ rel="noopener noreferrer" class=dropdown__link>Rust Programming</a><li><a href=https://pranabdas.github.io/arpes-manual/ rel="noopener noreferrer" class=dropdown__link>SUV ARPES Manual</a><li><a href=https://pranabdas.github.io/suvtools/ rel="noopener noreferrer" class=dropdown__link>SUV Python Tools</a></ul></div></div><div class="navbar__items navbar__items--right"><a href=https://github.com/pranabdas/fortran rel="noopener noreferrer" class="navbar__item navbar__link header-github-link" aria-label="GitHub repository" title="Visit project repository in GitHub"></a><a href=https://pranabdas.github.io rel="noopener noreferrer" class="navbar__item navbar__link header-homepage-link" aria-label="About me" title="Go to Pranab's Homepage"></a><div class="toggle_vylO colorModeToggle_DEke"><button class="clean-btn toggleButton_gllP toggleButtonDisabled_aARS" type=button disabled title="Switch between dark and light mode (currently light mode)" aria-label="Switch between dark and light mode (currently light mode)" aria-live=polite aria-pressed=false><svg viewBox="0 0 24 24" width=24 height=24 class=lightToggleIcon_pyhR><path fill=currentColor d="M12,9c1.65,0,3,1.35,3,3s-1.35,3-3,3s-3-1.35-3-3S10.35,9,12,9 M12,7c-2.76,0-5,2.24-5,5s2.24,5,5,5s5-2.24,5-5 S14.76,7,12,7L12,7z M2,13l2,0c0.55,0,1-0.45,1-1s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S1.45,13,2,13z M20,13l2,0c0.55,0,1-0.45,1-1 s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S19.45,13,20,13z M11,2v2c0,0.55,0.45,1,1,1s1-0.45,1-1V2c0-0.55-0.45-1-1-1S11,1.45,11,2z M11,20v2c0,0.55,0.45,1,1,1s1-0.45,1-1v-2c0-0.55-0.45-1-1-1C11.45,19,11,19.45,11,20z M5.99,4.58c-0.39-0.39-1.03-0.39-1.41,0 c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0s0.39-1.03,0-1.41L5.99,4.58z M18.36,16.95 c-0.39-0.39-1.03-0.39-1.41,0c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0c0.39-0.39,0.39-1.03,0-1.41 L18.36,16.95z M19.42,5.99c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06c-0.39,0.39-0.39,1.03,0,1.41 s1.03,0.39,1.41,0L19.42,5.99z M7.05,18.36c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06 c-0.39,0.39-0.39,1.03,0,1.41s1.03,0.39,1.41,0L7.05,18.36z"/></svg><svg viewBox="0 0 24 24" width=24 height=24 class=darkToggleIcon_wfgR><path fill=currentColor d="M9.37,5.51C9.19,6.15,9.1,6.82,9.1,7.5c0,4.08,3.32,7.4,7.4,7.4c0.68,0,1.35-0.09,1.99-0.27C17.45,17.19,14.93,19,12,19 c-3.86,0-7-3.14-7-7C5,9.07,6.81,6.55,9.37,5.51z M12,3c-4.97,0-9,4.03-9,9s4.03,9,9,9s9-4.03,9-9c0-0.46-0.04-0.92-0.1-1.36 c-0.98,1.37-2.58,2.26-4.4,2.26c-2.98,0-5.4-2.42-5.4-5.4c0-1.81,0.89-3.42,2.26-4.4C12.92,3.04,12.46,3,12,3L12,3z"/></svg></button></div><div class=navbarSearchContainer_Bca1><div class="navbar__search searchBarContainer_NW3z" dir=ltr><input placeholder=Search aria-label=Search class=navbar__search-input value=""><div class="loadingRing_RJI3 searchBarLoadingRing_YnHq"><div></div><div></div><div></div><div></div></div></div></div></div></div><div role=presentation class=navbar-sidebar__backdrop></div></nav><div id=__docusaurus_skipToContent_fallback class="main-wrapper mainWrapper_z2l0"><div class=docsWrapper_hBAB><button aria-label="Scroll back to top" class="clean-btn theme-back-to-top-button backToTopButton_sjWU" type=button></button><div class=docRoot_UBD9><aside class="theme-doc-sidebar-container docSidebarContainer_YfHR"><div class=sidebarViewport_aRkj><div class="sidebar_njMd sidebarWithHideableNavbar_wUlq"><a tabindex=-1 class=sidebarLogo_isFc href=/fortran/><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--light_NVdE"><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--dark_xIcU"><b>Fortran</b></a><nav aria-label="Docs sidebar" class="menu thin-scrollbar menu_SIkG"><ul class="theme-doc-sidebar-menu menu__list"><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/>Setup</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/basics>Basics</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/array>Array and Matrix</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/control>Logical control</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/loop>Loop</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/modules>Modules</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/procedures>Procedures</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/complex>Complex number</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/recursion>Recursion</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/types>Custom types</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class="menu__link menu__link--active" aria-current=page href=/fortran/pointer>Pointer</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/file>File I/O</a><li class="theme-doc-sidebar-item-category theme-doc-sidebar-item-category-level-1 menu__list-item menu__list-item--collapsed"><div class=menu__list-item-collapsible><a class="menu__link menu__link--sublist" href=/fortran/category/coding-practice>Coding practice</a><button aria-label="Expand sidebar category 'Coding practice'" aria-expanded=false type=button class="clean-btn menu__caret"></button></div><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/resources>Resources</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/license>License</a></ul></nav><button type=button title="Collapse sidebar" aria-label="Collapse sidebar" class="button button--secondary button--outline collapseSidebarButton_PEFL"><svg width=20 height=20 aria-hidden=true class=collapseSidebarButtonIcon_kv0_><g fill=#7a7a7a><path d="M9.992 10.023c0 .2-.062.399-.172.547l-4.996 7.492a.982.982 0 01-.828.454H1c-.55 0-1-.453-1-1 0-.2.059-.403.168-.551l4.629-6.942L.168 3.078A.939.939 0 010 2.528c0-.548.45-.997 1-.997h2.996c.352 0 .649.18.828.45L9.82 9.472c.11.148.172.347.172.55zm0 0"/><path d="M19.98 10.023c0 .2-.058.399-.168.547l-4.996 7.492a.987.987 0 01-.828.454h-3c-.547 0-.996-.453-.996-1 0-.2.059-.403.168-.551l4.625-6.942-4.625-6.945a.939.939 0 01-.168-.55 1 1 0 01.996-.997h3c.348 0 .649.18.828.45l4.996 7.492c.11.148.168.347.168.55zm0 0"/></g></svg></button></div></div></aside><main class=docMainContainer_TBSr><div class="container padding-top--md padding-bottom--lg"><div class=row><div class="col docItemCol_VOVn"><div class=docItemContainer_Djhp><article><nav class="theme-doc-breadcrumbs breadcrumbsContainer_Z_bl" aria-label=Breadcrumbs><ul class=breadcrumbs itemscope itemtype=https://schema.org/BreadcrumbList><li class=breadcrumbs__item><a aria-label="Home page" class=breadcrumbs__link href=/fortran/><svg viewBox="0 0 24 24" class=breadcrumbHomeIcon_YNFT><path d="M10 19v-5h4v5c0 .55.45 1 1 1h3c.55 0 1-.45 1-1v-7h1.7c.46 0 .68-.57.33-.87L12.67 3.6c-.38-.34-.96-.34-1.34 0l-8.36 7.53c-.34.3-.13.87.33.87H5v7c0 .55.45 1 1 1h3c.55 0 1-.45 1-1z" fill=currentColor /></svg></a><li itemscope itemprop=itemListElement itemtype=https://schema.org/ListItem class="breadcrumbs__item breadcrumbs__item--active"><span class=breadcrumbs__link itemprop=name>Pointer</span><meta itemprop=position content=1></ul></nav><div class="theme-doc-markdown markdown"><header><h1>Pointer</h1></header><p>Pointer in FORTRAN is an alias to a variable or procedure.</p>
+<!doctype html><html lang=en dir=ltr class="docs-wrapper plugin-docs plugin-id-default docs-version-current docs-doc-page docs-doc-id-pointer" data-has-hydrated=false><meta charset=UTF-8><meta name=generator content="Docusaurus v3.6.1"><title data-rh=true>Pointer • Fortran Tutorial</title><meta data-rh=true name=viewport content="width=device-width,initial-scale=1.0"><meta data-rh=true name=twitter:card content=summary_large_image><meta data-rh=true property=og:url content=https://pranabdas.github.io/fortran/pointer><meta data-rh=true property=og:locale content=en><meta data-rh=true name=docusaurus_locale content=en><meta data-rh=true name=docsearch:language content=en><meta data-rh=true name=theme-color content=#06445c><meta data-rh=true name=docusaurus_version content=current><meta data-rh=true name=docusaurus_tag content=docs-default-current><meta data-rh=true name=docsearch:version content=current><meta data-rh=true name=docsearch:docusaurus_tag content=docs-default-current><meta data-rh=true property=og:title content="Pointer • Fortran Tutorial"><meta data-rh=true name=description content="Pointer in FORTRAN is an alias to a variable or procedure."><meta data-rh=true property=og:description content="Pointer in FORTRAN is an alias to a variable or procedure."><link data-rh=true rel=icon href=/fortran/img/favicon.png><link data-rh=true rel=canonical href=https://pranabdas.github.io/fortran/pointer><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/pointer hreflang=en><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/pointer hreflang=x-default><link rel=stylesheet href=https://pranab.pages.dev/assets/fonts/katex/katex.min.css><link rel=stylesheet href=/fortran/assets/css/styles.4de1c8a8.css><script src=/fortran/assets/js/runtime~main.667e3c0f.js defer></script><script src=/fortran/assets/js/main.10795e8f.js defer></script><body class=navigation-with-keyboard><script>!function(){var t,e=function(){try{return new URLSearchParams(window.location.search).get("docusaurus-theme")}catch(t){}}()||function(){try{return window.localStorage.getItem("theme")}catch(t){}}();t=null!==e?e:window.matchMedia("(prefers-color-scheme: dark)").matches?"dark":(window.matchMedia("(prefers-color-scheme: light)").matches,"light"),document.documentElement.setAttribute("data-theme",t)}(),function(){try{for(var[t,e]of new URLSearchParams(window.location.search).entries())if(t.startsWith("docusaurus-data-")){var a=t.replace("docusaurus-data-","data-");document.documentElement.setAttribute(a,e)}}catch(t){}}()</script><div id=__docusaurus><div role=region aria-label="Skip to main content"><a class=skipToContent_fXgn href=#__docusaurus_skipToContent_fallback>Skip to main content</a></div><nav aria-label=Main class="navbar navbar--fixed-top navbarHideable_m1mJ"><div class=navbar__inner><div class=navbar__items><button aria-label="Toggle navigation bar" aria-expanded=false class="navbar__toggle clean-btn" type=button><svg width=30 height=30 viewBox="0 0 30 30" aria-hidden=true><path stroke=currentColor stroke-linecap=round stroke-miterlimit=10 stroke-width=2 d="M4 7h22M4 15h22M4 23h22"/></svg></button><a class=navbar__brand href=/fortran/><div class=navbar__logo><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--light_NVdE"><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--dark_xIcU"></div><b class="navbar__title text--truncate">Fortran</b></a><div class="navbar__item dropdown dropdown--hoverable"><a aria-current=page class="navbar__link active" aria-haspopup=true aria-expanded=false role=button href=/fortran/>Docs</a><ul class=dropdown__menu><li><a aria-current=page class="dropdown__link dropdown__link--active" href=/fortran/>Fortran Programming</a><li><a href=https://pranabdas.github.io/docs/ rel="noopener noreferrer" class=dropdown__link>~ ~ ~ Other Docs ~ ~ ~</a><li><a href=https://pranabdas.github.io/arpespythontools/ rel="noopener noreferrer" class=dropdown__link>ARPES Python Tools</a><li><a href=https://pranabdas.github.io/c-cpp/ rel="noopener noreferrer" class=dropdown__link>C and C++ Programming</a><li><a href=https://pranabdas.github.io/condmat-notes/ rel="noopener noreferrer" class=dropdown__link>Condensed Matter Notes</a><li><a href=https://pranabdas.github.io/javascript/ rel="noopener noreferrer" class=dropdown__link>Javascript Tutorial</a><li><a href=https://pranabdas.github.io/linux/ rel="noopener noreferrer" class=dropdown__link>Linux Tutorial</a><li><a href=https://pranabdas.github.io/machine-learning/ rel="noopener noreferrer" class=dropdown__link>Machine Learning Notes</a><li><a href=https://pranabdas.github.io/openmx/ rel="noopener noreferrer" class=dropdown__link>OpenMX tutorial</a><li><a href=https://pranabdas.github.io/python-tutorial/ rel="noopener noreferrer" class=dropdown__link>Python Tutorial</a><li><a href=https://pranabdas.github.io/espresso/ rel="noopener noreferrer" class=dropdown__link>Quantum Espresso Tutorial</a><li><a href=https://pranabdas.github.io/rust/ rel="noopener noreferrer" class=dropdown__link>Rust Programming</a><li><a href=https://pranabdas.github.io/arpes-manual/ rel="noopener noreferrer" class=dropdown__link>SUV ARPES Manual</a><li><a href=https://pranabdas.github.io/suvtools/ rel="noopener noreferrer" class=dropdown__link>SUV Python Tools</a></ul></div></div><div class="navbar__items navbar__items--right"><a href=https://github.com/pranabdas/fortran rel="noopener noreferrer" class="navbar__item navbar__link header-github-link" aria-label="GitHub repository" title="Visit project repository in GitHub"></a><a href=https://pranabdas.github.io rel="noopener noreferrer" class="navbar__item navbar__link header-homepage-link" aria-label="About me" title="Go to Pranab's Homepage"></a><div class="toggle_vylO colorModeToggle_DEke"><button class="clean-btn toggleButton_gllP toggleButtonDisabled_aARS" type=button disabled title="Switch between dark and light mode (currently light mode)" aria-label="Switch between dark and light mode (currently light mode)" aria-live=polite aria-pressed=false><svg viewBox="0 0 24 24" width=24 height=24 class=lightToggleIcon_pyhR><path fill=currentColor d="M12,9c1.65,0,3,1.35,3,3s-1.35,3-3,3s-3-1.35-3-3S10.35,9,12,9 M12,7c-2.76,0-5,2.24-5,5s2.24,5,5,5s5-2.24,5-5 S14.76,7,12,7L12,7z M2,13l2,0c0.55,0,1-0.45,1-1s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S1.45,13,2,13z M20,13l2,0c0.55,0,1-0.45,1-1 s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S19.45,13,20,13z M11,2v2c0,0.55,0.45,1,1,1s1-0.45,1-1V2c0-0.55-0.45-1-1-1S11,1.45,11,2z M11,20v2c0,0.55,0.45,1,1,1s1-0.45,1-1v-2c0-0.55-0.45-1-1-1C11.45,19,11,19.45,11,20z M5.99,4.58c-0.39-0.39-1.03-0.39-1.41,0 c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0s0.39-1.03,0-1.41L5.99,4.58z M18.36,16.95 c-0.39-0.39-1.03-0.39-1.41,0c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0c0.39-0.39,0.39-1.03,0-1.41 L18.36,16.95z M19.42,5.99c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06c-0.39,0.39-0.39,1.03,0,1.41 s1.03,0.39,1.41,0L19.42,5.99z M7.05,18.36c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06 c-0.39,0.39-0.39,1.03,0,1.41s1.03,0.39,1.41,0L7.05,18.36z"/></svg><svg viewBox="0 0 24 24" width=24 height=24 class=darkToggleIcon_wfgR><path fill=currentColor d="M9.37,5.51C9.19,6.15,9.1,6.82,9.1,7.5c0,4.08,3.32,7.4,7.4,7.4c0.68,0,1.35-0.09,1.99-0.27C17.45,17.19,14.93,19,12,19 c-3.86,0-7-3.14-7-7C5,9.07,6.81,6.55,9.37,5.51z M12,3c-4.97,0-9,4.03-9,9s4.03,9,9,9s9-4.03,9-9c0-0.46-0.04-0.92-0.1-1.36 c-0.98,1.37-2.58,2.26-4.4,2.26c-2.98,0-5.4-2.42-5.4-5.4c0-1.81,0.89-3.42,2.26-4.4C12.92,3.04,12.46,3,12,3L12,3z"/></svg></button></div><div class=navbarSearchContainer_Bca1><div class="navbar__search searchBarContainer_NW3z" dir=ltr><input placeholder=Search aria-label=Search class=navbar__search-input value=""><div class="loadingRing_RJI3 searchBarLoadingRing_YnHq"><div></div><div></div><div></div><div></div></div></div></div></div></div><div role=presentation class=navbar-sidebar__backdrop></div></nav><div id=__docusaurus_skipToContent_fallback class="main-wrapper mainWrapper_z2l0"><div class=docsWrapper_hBAB><button aria-label="Scroll back to top" class="clean-btn theme-back-to-top-button backToTopButton_sjWU" type=button></button><div class=docRoot_UBD9><aside class="theme-doc-sidebar-container docSidebarContainer_YfHR"><div class=sidebarViewport_aRkj><div class="sidebar_njMd sidebarWithHideableNavbar_wUlq"><a tabindex=-1 class=sidebarLogo_isFc href=/fortran/><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--light_NVdE"><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--dark_xIcU"><b>Fortran</b></a><nav aria-label="Docs sidebar" class="menu thin-scrollbar menu_SIkG"><ul class="theme-doc-sidebar-menu menu__list"><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/>Setup</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/basics>Basics</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/array>Array and Matrix</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/control>Logical control</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/loop>Loop</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/modules>Modules</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/procedures>Procedures</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/complex>Complex number</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/recursion>Recursion</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/types>Custom types</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class="menu__link menu__link--active" aria-current=page href=/fortran/pointer>Pointer</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/file>File I/O</a><li class="theme-doc-sidebar-item-category theme-doc-sidebar-item-category-level-1 menu__list-item menu__list-item--collapsed"><div class=menu__list-item-collapsible><a class="menu__link menu__link--sublist" href=/fortran/category/coding-practice>Coding practice</a><button aria-label="Expand sidebar category 'Coding practice'" aria-expanded=false type=button class="clean-btn menu__caret"></button></div><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/resources>Resources</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/license>License</a></ul></nav><button type=button title="Collapse sidebar" aria-label="Collapse sidebar" class="button button--secondary button--outline collapseSidebarButton_PEFL"><svg width=20 height=20 aria-hidden=true class=collapseSidebarButtonIcon_kv0_><g fill=#7a7a7a><path d="M9.992 10.023c0 .2-.062.399-.172.547l-4.996 7.492a.982.982 0 01-.828.454H1c-.55 0-1-.453-1-1 0-.2.059-.403.168-.551l4.629-6.942L.168 3.078A.939.939 0 010 2.528c0-.548.45-.997 1-.997h2.996c.352 0 .649.18.828.45L9.82 9.472c.11.148.172.347.172.55zm0 0"/><path d="M19.98 10.023c0 .2-.058.399-.168.547l-4.996 7.492a.987.987 0 01-.828.454h-3c-.547 0-.996-.453-.996-1 0-.2.059-.403.168-.551l4.625-6.942-4.625-6.945a.939.939 0 01-.168-.55 1 1 0 01.996-.997h3c.348 0 .649.18.828.45l4.996 7.492c.11.148.168.347.168.55zm0 0"/></g></svg></button></div></div></aside><main class=docMainContainer_TBSr><div class="container padding-top--md padding-bottom--lg"><div class=row><div class="col docItemCol_VOVn"><div class=docItemContainer_Djhp><article><nav class="theme-doc-breadcrumbs breadcrumbsContainer_Z_bl" aria-label=Breadcrumbs><ul class=breadcrumbs itemscope itemtype=https://schema.org/BreadcrumbList><li class=breadcrumbs__item><a aria-label="Home page" class=breadcrumbs__link href=/fortran/><svg viewBox="0 0 24 24" class=breadcrumbHomeIcon_YNFT><path d="M10 19v-5h4v5c0 .55.45 1 1 1h3c.55 0 1-.45 1-1v-7h1.7c.46 0 .68-.57.33-.87L12.67 3.6c-.38-.34-.96-.34-1.34 0l-8.36 7.53c-.34.3-.13.87.33.87H5v7c0 .55.45 1 1 1h3c.55 0 1-.45 1-1z" fill=currentColor /></svg></a><li itemscope itemprop=itemListElement itemtype=https://schema.org/ListItem class="breadcrumbs__item breadcrumbs__item--active"><span class=breadcrumbs__link itemprop=name>Pointer</span><meta itemprop=position content=1></ul></nav><div class="theme-doc-markdown markdown"><header><h1>Pointer</h1></header><p>Pointer in FORTRAN is an alias to a variable or procedure.</p>
 <!-- -->
 <div class="language-fortran codeBlockContainer_Ckt0 theme-code-block" style=--prism-color:#393A34;--prism-background-color:#f6f8fa><div class=codeBlockTitle_Ktv7>src/28_pointer.f90</div><div class=codeBlockContent_biex><pre tabindex=0 class="prism-code language-fortran codeBlock_bY9V thin-scrollbar" style=color:#393A34;background-color:#f6f8fa><code class="codeBlockLines_e6Vv codeBlockLinesWithNumbering_o6Pm"><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token keyword" style=color:#00009f>PROGRAM</span><span class="token plain"> MAIN</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>IMPLICIT NONE</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>REAL</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> </span><span class="token keyword" style=color:#00009f>POINTER</span><span class="token plain"> </span><span class="token operator" style=color:#393A34>::</span><span class="token plain"> p1</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> p2</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>REAL</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> </span><span class="token keyword" style=color:#00009f>TARGET</span><span class="token plain"> </span><span class="token operator" style=color:#393A34>::</span><span class="token plain"> r1</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>INTEGER</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> </span><span class="token keyword" style=color:#00009f>DIMENSION</span><span class="token punctuation" style=color:#393A34>(</span><span class="token punctuation" style=color:#393A34>:</span><span class="token punctuation" style=color:#393A34>)</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> </span><span class="token keyword" style=color:#00009f>POINTER</span><span class="token plain"> </span><span class="token operator" style=color:#393A34>::</span><span class="token plain"> ptr_arr</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>INTEGER</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> </span><span class="token keyword" style=color:#00009f>DIMENSION</span><span class="token punctuation" style=color:#393A34>(</span><span class="token number" style=color:#36acaa>2</span><span class="token punctuation" style=color:#393A34>)</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> </span><span class="token keyword" style=color:#00009f>TARGET</span><span class="token plain"> </span><span class="token operator" style=color:#393A34>::</span><span class="token plain"> arr</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    r1 </span><span class="token operator" style=color:#393A34>=</span><span class="token plain"> </span><span class="token number" style=color:#36acaa>1.0</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token comment" style=color:#999988;font-style:italic>! set p1 to point to r1</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    p1 </span><span class="token operator" style=color:#393A34>=></span><span class="token plain"> r1</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>ALLOCATE</span><span class="token punctuation" style=color:#393A34>(</span><span class="token plain">p2</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"> </span><span class="token comment" style=color:#999988;font-style:italic>! creates a storage space without a variable name</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token comment" style=color:#999988;font-style:italic>! allocate (p1, stat=allocation_status)</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    p2 </span><span class="token operator" style=color:#393A34>=</span><span class="token plain"> </span><span class="token number" style=color:#36acaa>2.2</span><span class="token plain"> </span><span class="token comment" style=color:#999988;font-style:italic>! this value has no name</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    arr</span><span class="token punctuation" style=color:#393A34>(</span><span class="token number" style=color:#36acaa>1</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"> </span><span class="token operator" style=color:#393A34>=</span><span class="token plain"> </span><span class="token number" style=color:#36acaa>5</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    arr</span><span class="token punctuation" style=color:#393A34>(</span><span class="token number" style=color:#36acaa>2</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"> </span><span class="token operator" style=color:#393A34>=</span><span class="token plain"> </span><span class="token number" style=color:#36acaa>8</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    ptr_arr </span><span class="token operator" style=color:#393A34>=></span><span class="token plain"> arr</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token comment" style=color:#999988;font-style:italic>! below two are the same</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>PRINT</span><span class="token plain"> </span><span class="token operator" style=color:#393A34>*</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> </span><span class="token string" style=color:#e3116c>"r1 = "</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> r1</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>PRINT</span><span class="token plain"> </span><span class="token operator" style=color:#393A34>*</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> </span><span class="token string" style=color:#e3116c>"p1 = "</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> p1</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>PRINT</span><span class="token plain"> </span><span class="token operator" style=color:#393A34>*</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> </span><span class="token string" style=color:#e3116c>"p2 = "</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> p2</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token comment" style=color:#999988;font-style:italic>! check association</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>PRINT</span><span class="token plain"> </span><span class="token operator" style=color:#393A34>*</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> </span><span class="token string" style=color:#e3116c>"Is p1 and r1 associated? "</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> ASSOCIATED</span><span class="token punctuation" style=color:#393A34>(</span><span class="token plain">p1</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> r1</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>PRINT</span><span class="token plain"> </span><span class="token operator" style=color:#393A34>*</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> </span><span class="token string" style=color:#e3116c>"Is p1 and p2 point to same object? "</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> ASSOCIATED</span><span class="token punctuation" style=color:#393A34>(</span><span class="token plain">p1</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> p2</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token comment" style=color:#999988;font-style:italic>! associated returns false if both pointers point to null</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>PRINT</span><span class="token plain"> </span><span class="token string" style=color:#e3116c>"(2i4)"</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> arr</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>DEALLOCATE</span><span class="token punctuation" style=color:#393A34>(</span><span class="token plain">p2</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"> </span><span class="token comment" style=color:#999988;font-style:italic>! now p2 is a dangling pointer</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token comment" style=color:#999988;font-style:italic>! it can be set to point to null</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    p2 </span><span class="token operator" style=color:#393A34>=></span><span class="token plain"> </span><span class="token keyword" style=color:#00009f>NULL</span><span class="token punctuation" style=color:#393A34>(</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain"></span><span class="token keyword" style=color:#00009f>END</span></span><br></span></code></pre><div class=buttonGroup__atx><button type=button aria-label="Copy code to clipboard" title=Copy class=clean-btn><span class=copyButtonIcons_eSgA aria-hidden=true><svg viewBox="0 0 24 24" class=copyButtonIcon_y97N><path fill=currentColor d="M19,21H8V7H19M19,5H8A2,2 0 0,0 6,7V21A2,2 0 0,0 8,23H19A2,2 0 0,0 21,21V7A2,2 0 0,0 19,5M16,1H4A2,2 0 0,0 2,3V17H4V3H16V1Z"/></svg><svg viewBox="0 0 24 24" class=copyButtonSuccessIcon_LjdS><path fill=currentColor d=M21,7L9,19L3.5,13.5L4.91,12.09L9,16.17L19.59,5.59L21,7Z /></svg></span></button></div></div></div></div><footer class="theme-doc-footer docusaurus-mt-lg"><div class="row margin-top--sm theme-doc-footer-edit-meta-row"><div class=col><a href=https://github.com/pranabdas/fortran/blob/main/docs/pointer.mdx target=_blank rel="noopener noreferrer" class=theme-edit-this-page><svg fill=currentColor height=20 width=20 viewBox="0 0 40 40" class=iconEdit_Z9Sw aria-hidden=true><g><path d="m34.5 11.7l-3 3.1-6.3-6.3 3.1-3q0.5-0.5 1.2-0.5t1.1 0.5l3.9 3.9q0.5 0.4 0.5 1.1t-0.5 1.2z m-29.5 17.1l18.4-18.5 6.3 6.3-18.4 18.4h-6.3v-6.2z"/></g></svg>Edit this page</a></div><div class="col lastUpdated_JAkA"></div></div></footer></article><nav class="pagination-nav docusaurus-mt-lg" aria-label="Docs pages"><a class="pagination-nav__link pagination-nav__link--prev" href=/fortran/types><div class=pagination-nav__sublabel>Previous</div><div class=pagination-nav__label>Custom types</div></a><a class="pagination-nav__link pagination-nav__link--next" href=/fortran/file><div class=pagination-nav__sublabel>Next</div><div class=pagination-nav__label>File I/O</div></a></nav></div></div></div></div></main></div></div></div><footer class="footer footer--dark"><div class="container container-fluid"><div class="footer__bottom text--center"><div class=footer__copyright>Copyright © 2024 Pranab Das. All rights
       reserved.</div></div></div></footer></div>
\ No newline at end of file
diff --git a/procedures/index.html b/procedures/index.html
index 55b37f7..a79d838 100644
--- a/procedures/index.html
+++ b/procedures/index.html
@@ -1,4 +1,4 @@
-<!doctype html><html lang=en dir=ltr class="docs-wrapper plugin-docs plugin-id-default docs-version-current docs-doc-page docs-doc-id-procedures" data-has-hydrated=false><meta charset=UTF-8><meta name=generator content="Docusaurus v3.6.1"><title data-rh=true>Procedures • Fortran Tutorial</title><meta data-rh=true name=viewport content="width=device-width,initial-scale=1.0"><meta data-rh=true name=twitter:card content=summary_large_image><meta data-rh=true property=og:url content=https://pranabdas.github.io/fortran/procedures><meta data-rh=true property=og:locale content=en><meta data-rh=true name=docusaurus_locale content=en><meta data-rh=true name=docsearch:language content=en><meta data-rh=true name=theme-color content=#06445c><meta data-rh=true name=docusaurus_version content=current><meta data-rh=true name=docusaurus_tag content=docs-default-current><meta data-rh=true name=docsearch:version content=current><meta data-rh=true name=docsearch:docusaurus_tag content=docs-default-current><meta data-rh=true property=og:title content="Procedures • Fortran Tutorial"><meta data-rh=true name=description content="There are two types of procedures in Fortran: subroutines and functions. All"><meta data-rh=true property=og:description content="There are two types of procedures in Fortran: subroutines and functions. All"><link data-rh=true rel=icon href=/fortran/img/favicon.png><link data-rh=true rel=canonical href=https://pranabdas.github.io/fortran/procedures><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/procedures hreflang=en><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/procedures hreflang=x-default><link rel=stylesheet href=https://pranabdas.github.io/drive/webfonts/katex/katex.min.css><link rel=stylesheet href=/fortran/assets/css/styles.4de1c8a8.css><script src=/fortran/assets/js/runtime~main.866c090c.js defer></script><script src=/fortran/assets/js/main.ec888ba8.js defer></script><body class=navigation-with-keyboard><script>!function(){var t,e=function(){try{return new URLSearchParams(window.location.search).get("docusaurus-theme")}catch(t){}}()||function(){try{return window.localStorage.getItem("theme")}catch(t){}}();t=null!==e?e:window.matchMedia("(prefers-color-scheme: dark)").matches?"dark":(window.matchMedia("(prefers-color-scheme: light)").matches,"light"),document.documentElement.setAttribute("data-theme",t)}(),function(){try{for(var[t,e]of new URLSearchParams(window.location.search).entries())if(t.startsWith("docusaurus-data-")){var a=t.replace("docusaurus-data-","data-");document.documentElement.setAttribute(a,e)}}catch(t){}}()</script><div id=__docusaurus><div role=region aria-label="Skip to main content"><a class=skipToContent_fXgn href=#__docusaurus_skipToContent_fallback>Skip to main content</a></div><nav aria-label=Main class="navbar navbar--fixed-top navbarHideable_m1mJ"><div class=navbar__inner><div class=navbar__items><button aria-label="Toggle navigation bar" aria-expanded=false class="navbar__toggle clean-btn" type=button><svg width=30 height=30 viewBox="0 0 30 30" aria-hidden=true><path stroke=currentColor stroke-linecap=round stroke-miterlimit=10 stroke-width=2 d="M4 7h22M4 15h22M4 23h22"/></svg></button><a class=navbar__brand href=/fortran/><div class=navbar__logo><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--light_NVdE"><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--dark_xIcU"></div><b class="navbar__title text--truncate">Fortran</b></a><div class="navbar__item dropdown dropdown--hoverable"><a aria-current=page class="navbar__link active" aria-haspopup=true aria-expanded=false role=button href=/fortran/>Docs</a><ul class=dropdown__menu><li><a aria-current=page class="dropdown__link dropdown__link--active" href=/fortran/>Fortran Programming</a><li><a href=https://pranabdas.github.io/docs/ rel="noopener noreferrer" class=dropdown__link>~ ~ ~ Other Docs ~ ~ ~</a><li><a href=https://pranabdas.github.io/arpespythontools/ rel="noopener noreferrer" class=dropdown__link>ARPES Python Tools</a><li><a href=https://pranabdas.github.io/c-cpp/ rel="noopener noreferrer" class=dropdown__link>C and C++ Programming</a><li><a href=https://pranabdas.github.io/condmat-notes/ rel="noopener noreferrer" class=dropdown__link>Condensed Matter Notes</a><li><a href=https://pranabdas.github.io/javascript/ rel="noopener noreferrer" class=dropdown__link>Javascript Tutorial</a><li><a href=https://pranabdas.github.io/linux/ rel="noopener noreferrer" class=dropdown__link>Linux Tutorial</a><li><a href=https://pranabdas.github.io/machine-learning/ rel="noopener noreferrer" class=dropdown__link>Machine Learning Notes</a><li><a href=https://pranabdas.github.io/openmx/ rel="noopener noreferrer" class=dropdown__link>OpenMX tutorial</a><li><a href=https://pranabdas.github.io/python-tutorial/ rel="noopener noreferrer" class=dropdown__link>Python Tutorial</a><li><a href=https://pranabdas.github.io/espresso/ rel="noopener noreferrer" class=dropdown__link>Quantum Espresso Tutorial</a><li><a href=https://pranabdas.github.io/rust/ rel="noopener noreferrer" class=dropdown__link>Rust Programming</a><li><a href=https://pranabdas.github.io/arpes-manual/ rel="noopener noreferrer" class=dropdown__link>SUV ARPES Manual</a><li><a href=https://pranabdas.github.io/suvtools/ rel="noopener noreferrer" class=dropdown__link>SUV Python Tools</a></ul></div></div><div class="navbar__items navbar__items--right"><a href=https://github.com/pranabdas/fortran rel="noopener noreferrer" class="navbar__item navbar__link header-github-link" aria-label="GitHub repository" title="Visit project repository in GitHub"></a><a href=https://pranabdas.github.io rel="noopener noreferrer" class="navbar__item navbar__link header-homepage-link" aria-label="About me" title="Go to Pranab's Homepage"></a><div class="toggle_vylO colorModeToggle_DEke"><button class="clean-btn toggleButton_gllP toggleButtonDisabled_aARS" type=button disabled title="Switch between dark and light mode (currently light mode)" aria-label="Switch between dark and light mode (currently light mode)" aria-live=polite aria-pressed=false><svg viewBox="0 0 24 24" width=24 height=24 class=lightToggleIcon_pyhR><path fill=currentColor d="M12,9c1.65,0,3,1.35,3,3s-1.35,3-3,3s-3-1.35-3-3S10.35,9,12,9 M12,7c-2.76,0-5,2.24-5,5s2.24,5,5,5s5-2.24,5-5 S14.76,7,12,7L12,7z M2,13l2,0c0.55,0,1-0.45,1-1s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S1.45,13,2,13z M20,13l2,0c0.55,0,1-0.45,1-1 s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S19.45,13,20,13z M11,2v2c0,0.55,0.45,1,1,1s1-0.45,1-1V2c0-0.55-0.45-1-1-1S11,1.45,11,2z M11,20v2c0,0.55,0.45,1,1,1s1-0.45,1-1v-2c0-0.55-0.45-1-1-1C11.45,19,11,19.45,11,20z M5.99,4.58c-0.39-0.39-1.03-0.39-1.41,0 c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0s0.39-1.03,0-1.41L5.99,4.58z M18.36,16.95 c-0.39-0.39-1.03-0.39-1.41,0c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0c0.39-0.39,0.39-1.03,0-1.41 L18.36,16.95z M19.42,5.99c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06c-0.39,0.39-0.39,1.03,0,1.41 s1.03,0.39,1.41,0L19.42,5.99z M7.05,18.36c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06 c-0.39,0.39-0.39,1.03,0,1.41s1.03,0.39,1.41,0L7.05,18.36z"/></svg><svg viewBox="0 0 24 24" width=24 height=24 class=darkToggleIcon_wfgR><path fill=currentColor d="M9.37,5.51C9.19,6.15,9.1,6.82,9.1,7.5c0,4.08,3.32,7.4,7.4,7.4c0.68,0,1.35-0.09,1.99-0.27C17.45,17.19,14.93,19,12,19 c-3.86,0-7-3.14-7-7C5,9.07,6.81,6.55,9.37,5.51z M12,3c-4.97,0-9,4.03-9,9s4.03,9,9,9s9-4.03,9-9c0-0.46-0.04-0.92-0.1-1.36 c-0.98,1.37-2.58,2.26-4.4,2.26c-2.98,0-5.4-2.42-5.4-5.4c0-1.81,0.89-3.42,2.26-4.4C12.92,3.04,12.46,3,12,3L12,3z"/></svg></button></div><div class=navbarSearchContainer_Bca1><div class="navbar__search searchBarContainer_NW3z" dir=ltr><input placeholder=Search aria-label=Search class=navbar__search-input value=""><div class="loadingRing_RJI3 searchBarLoadingRing_YnHq"><div></div><div></div><div></div><div></div></div></div></div></div></div><div role=presentation class=navbar-sidebar__backdrop></div></nav><div id=__docusaurus_skipToContent_fallback class="main-wrapper mainWrapper_z2l0"><div class=docsWrapper_hBAB><button aria-label="Scroll back to top" class="clean-btn theme-back-to-top-button backToTopButton_sjWU" type=button></button><div class=docRoot_UBD9><aside class="theme-doc-sidebar-container docSidebarContainer_YfHR"><div class=sidebarViewport_aRkj><div class="sidebar_njMd sidebarWithHideableNavbar_wUlq"><a tabindex=-1 class=sidebarLogo_isFc href=/fortran/><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--light_NVdE"><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--dark_xIcU"><b>Fortran</b></a><nav aria-label="Docs sidebar" class="menu thin-scrollbar menu_SIkG"><ul class="theme-doc-sidebar-menu menu__list"><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/>Setup</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/basics>Basics</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/array>Array and Matrix</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/control>Logical control</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/loop>Loop</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/modules>Modules</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class="menu__link menu__link--active" aria-current=page href=/fortran/procedures>Procedures</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/complex>Complex number</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/recursion>Recursion</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/types>Custom types</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/pointer>Pointer</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/file>File I/O</a><li class="theme-doc-sidebar-item-category theme-doc-sidebar-item-category-level-1 menu__list-item menu__list-item--collapsed"><div class=menu__list-item-collapsible><a class="menu__link menu__link--sublist" href=/fortran/category/coding-practice>Coding practice</a><button aria-label="Expand sidebar category 'Coding practice'" aria-expanded=false type=button class="clean-btn menu__caret"></button></div><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/resources>Resources</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/license>License</a></ul></nav><button type=button title="Collapse sidebar" aria-label="Collapse sidebar" class="button button--secondary button--outline collapseSidebarButton_PEFL"><svg width=20 height=20 aria-hidden=true class=collapseSidebarButtonIcon_kv0_><g fill=#7a7a7a><path d="M9.992 10.023c0 .2-.062.399-.172.547l-4.996 7.492a.982.982 0 01-.828.454H1c-.55 0-1-.453-1-1 0-.2.059-.403.168-.551l4.629-6.942L.168 3.078A.939.939 0 010 2.528c0-.548.45-.997 1-.997h2.996c.352 0 .649.18.828.45L9.82 9.472c.11.148.172.347.172.55zm0 0"/><path d="M19.98 10.023c0 .2-.058.399-.168.547l-4.996 7.492a.987.987 0 01-.828.454h-3c-.547 0-.996-.453-.996-1 0-.2.059-.403.168-.551l4.625-6.942-4.625-6.945a.939.939 0 01-.168-.55 1 1 0 01.996-.997h3c.348 0 .649.18.828.45l4.996 7.492c.11.148.168.347.168.55zm0 0"/></g></svg></button></div></div></aside><main class=docMainContainer_TBSr><div class="container padding-top--md padding-bottom--lg"><div class=row><div class="col docItemCol_VOVn"><div class=docItemContainer_Djhp><article><nav class="theme-doc-breadcrumbs breadcrumbsContainer_Z_bl" aria-label=Breadcrumbs><ul class=breadcrumbs itemscope itemtype=https://schema.org/BreadcrumbList><li class=breadcrumbs__item><a aria-label="Home page" class=breadcrumbs__link href=/fortran/><svg viewBox="0 0 24 24" class=breadcrumbHomeIcon_YNFT><path d="M10 19v-5h4v5c0 .55.45 1 1 1h3c.55 0 1-.45 1-1v-7h1.7c.46 0 .68-.57.33-.87L12.67 3.6c-.38-.34-.96-.34-1.34 0l-8.36 7.53c-.34.3-.13.87.33.87H5v7c0 .55.45 1 1 1h3c.55 0 1-.45 1-1z" fill=currentColor /></svg></a><li itemscope itemprop=itemListElement itemtype=https://schema.org/ListItem class="breadcrumbs__item breadcrumbs__item--active"><span class=breadcrumbs__link itemprop=name>Procedures</span><meta itemprop=position content=1></ul></nav><div class="tocCollapsible_ETCw theme-doc-toc-mobile tocMobile_ITEo"><button type=button class="clean-btn tocCollapsibleButton_TO0P">On this page</button></div><div class="theme-doc-markdown markdown"><header><h1>Procedures</h1></header><p>There are two types of procedures in Fortran: subroutines and functions. All
+<!doctype html><html lang=en dir=ltr class="docs-wrapper plugin-docs plugin-id-default docs-version-current docs-doc-page docs-doc-id-procedures" data-has-hydrated=false><meta charset=UTF-8><meta name=generator content="Docusaurus v3.6.1"><title data-rh=true>Procedures • Fortran Tutorial</title><meta data-rh=true name=viewport content="width=device-width,initial-scale=1.0"><meta data-rh=true name=twitter:card content=summary_large_image><meta data-rh=true property=og:url content=https://pranabdas.github.io/fortran/procedures><meta data-rh=true property=og:locale content=en><meta data-rh=true name=docusaurus_locale content=en><meta data-rh=true name=docsearch:language content=en><meta data-rh=true name=theme-color content=#06445c><meta data-rh=true name=docusaurus_version content=current><meta data-rh=true name=docusaurus_tag content=docs-default-current><meta data-rh=true name=docsearch:version content=current><meta data-rh=true name=docsearch:docusaurus_tag content=docs-default-current><meta data-rh=true property=og:title content="Procedures • Fortran Tutorial"><meta data-rh=true name=description content="There are two types of procedures in Fortran: subroutines and functions. All"><meta data-rh=true property=og:description content="There are two types of procedures in Fortran: subroutines and functions. All"><link data-rh=true rel=icon href=/fortran/img/favicon.png><link data-rh=true rel=canonical href=https://pranabdas.github.io/fortran/procedures><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/procedures hreflang=en><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/procedures hreflang=x-default><link rel=stylesheet href=https://pranab.pages.dev/assets/fonts/katex/katex.min.css><link rel=stylesheet href=/fortran/assets/css/styles.4de1c8a8.css><script src=/fortran/assets/js/runtime~main.667e3c0f.js defer></script><script src=/fortran/assets/js/main.10795e8f.js defer></script><body class=navigation-with-keyboard><script>!function(){var t,e=function(){try{return new URLSearchParams(window.location.search).get("docusaurus-theme")}catch(t){}}()||function(){try{return window.localStorage.getItem("theme")}catch(t){}}();t=null!==e?e:window.matchMedia("(prefers-color-scheme: dark)").matches?"dark":(window.matchMedia("(prefers-color-scheme: light)").matches,"light"),document.documentElement.setAttribute("data-theme",t)}(),function(){try{for(var[t,e]of new URLSearchParams(window.location.search).entries())if(t.startsWith("docusaurus-data-")){var a=t.replace("docusaurus-data-","data-");document.documentElement.setAttribute(a,e)}}catch(t){}}()</script><div id=__docusaurus><div role=region aria-label="Skip to main content"><a class=skipToContent_fXgn href=#__docusaurus_skipToContent_fallback>Skip to main content</a></div><nav aria-label=Main class="navbar navbar--fixed-top navbarHideable_m1mJ"><div class=navbar__inner><div class=navbar__items><button aria-label="Toggle navigation bar" aria-expanded=false class="navbar__toggle clean-btn" type=button><svg width=30 height=30 viewBox="0 0 30 30" aria-hidden=true><path stroke=currentColor stroke-linecap=round stroke-miterlimit=10 stroke-width=2 d="M4 7h22M4 15h22M4 23h22"/></svg></button><a class=navbar__brand href=/fortran/><div class=navbar__logo><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--light_NVdE"><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--dark_xIcU"></div><b class="navbar__title text--truncate">Fortran</b></a><div class="navbar__item dropdown dropdown--hoverable"><a aria-current=page class="navbar__link active" aria-haspopup=true aria-expanded=false role=button href=/fortran/>Docs</a><ul class=dropdown__menu><li><a aria-current=page class="dropdown__link dropdown__link--active" href=/fortran/>Fortran Programming</a><li><a href=https://pranabdas.github.io/docs/ rel="noopener noreferrer" class=dropdown__link>~ ~ ~ Other Docs ~ ~ ~</a><li><a href=https://pranabdas.github.io/arpespythontools/ rel="noopener noreferrer" class=dropdown__link>ARPES Python Tools</a><li><a href=https://pranabdas.github.io/c-cpp/ rel="noopener noreferrer" class=dropdown__link>C and C++ Programming</a><li><a href=https://pranabdas.github.io/condmat-notes/ rel="noopener noreferrer" class=dropdown__link>Condensed Matter Notes</a><li><a href=https://pranabdas.github.io/javascript/ rel="noopener noreferrer" class=dropdown__link>Javascript Tutorial</a><li><a href=https://pranabdas.github.io/linux/ rel="noopener noreferrer" class=dropdown__link>Linux Tutorial</a><li><a href=https://pranabdas.github.io/machine-learning/ rel="noopener noreferrer" class=dropdown__link>Machine Learning Notes</a><li><a href=https://pranabdas.github.io/openmx/ rel="noopener noreferrer" class=dropdown__link>OpenMX tutorial</a><li><a href=https://pranabdas.github.io/python-tutorial/ rel="noopener noreferrer" class=dropdown__link>Python Tutorial</a><li><a href=https://pranabdas.github.io/espresso/ rel="noopener noreferrer" class=dropdown__link>Quantum Espresso Tutorial</a><li><a href=https://pranabdas.github.io/rust/ rel="noopener noreferrer" class=dropdown__link>Rust Programming</a><li><a href=https://pranabdas.github.io/arpes-manual/ rel="noopener noreferrer" class=dropdown__link>SUV ARPES Manual</a><li><a href=https://pranabdas.github.io/suvtools/ rel="noopener noreferrer" class=dropdown__link>SUV Python Tools</a></ul></div></div><div class="navbar__items navbar__items--right"><a href=https://github.com/pranabdas/fortran rel="noopener noreferrer" class="navbar__item navbar__link header-github-link" aria-label="GitHub repository" title="Visit project repository in GitHub"></a><a href=https://pranabdas.github.io rel="noopener noreferrer" class="navbar__item navbar__link header-homepage-link" aria-label="About me" title="Go to Pranab's Homepage"></a><div class="toggle_vylO colorModeToggle_DEke"><button class="clean-btn toggleButton_gllP toggleButtonDisabled_aARS" type=button disabled title="Switch between dark and light mode (currently light mode)" aria-label="Switch between dark and light mode (currently light mode)" aria-live=polite aria-pressed=false><svg viewBox="0 0 24 24" width=24 height=24 class=lightToggleIcon_pyhR><path fill=currentColor d="M12,9c1.65,0,3,1.35,3,3s-1.35,3-3,3s-3-1.35-3-3S10.35,9,12,9 M12,7c-2.76,0-5,2.24-5,5s2.24,5,5,5s5-2.24,5-5 S14.76,7,12,7L12,7z M2,13l2,0c0.55,0,1-0.45,1-1s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S1.45,13,2,13z M20,13l2,0c0.55,0,1-0.45,1-1 s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S19.45,13,20,13z M11,2v2c0,0.55,0.45,1,1,1s1-0.45,1-1V2c0-0.55-0.45-1-1-1S11,1.45,11,2z M11,20v2c0,0.55,0.45,1,1,1s1-0.45,1-1v-2c0-0.55-0.45-1-1-1C11.45,19,11,19.45,11,20z M5.99,4.58c-0.39-0.39-1.03-0.39-1.41,0 c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0s0.39-1.03,0-1.41L5.99,4.58z M18.36,16.95 c-0.39-0.39-1.03-0.39-1.41,0c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0c0.39-0.39,0.39-1.03,0-1.41 L18.36,16.95z M19.42,5.99c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06c-0.39,0.39-0.39,1.03,0,1.41 s1.03,0.39,1.41,0L19.42,5.99z M7.05,18.36c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06 c-0.39,0.39-0.39,1.03,0,1.41s1.03,0.39,1.41,0L7.05,18.36z"/></svg><svg viewBox="0 0 24 24" width=24 height=24 class=darkToggleIcon_wfgR><path fill=currentColor d="M9.37,5.51C9.19,6.15,9.1,6.82,9.1,7.5c0,4.08,3.32,7.4,7.4,7.4c0.68,0,1.35-0.09,1.99-0.27C17.45,17.19,14.93,19,12,19 c-3.86,0-7-3.14-7-7C5,9.07,6.81,6.55,9.37,5.51z M12,3c-4.97,0-9,4.03-9,9s4.03,9,9,9s9-4.03,9-9c0-0.46-0.04-0.92-0.1-1.36 c-0.98,1.37-2.58,2.26-4.4,2.26c-2.98,0-5.4-2.42-5.4-5.4c0-1.81,0.89-3.42,2.26-4.4C12.92,3.04,12.46,3,12,3L12,3z"/></svg></button></div><div class=navbarSearchContainer_Bca1><div class="navbar__search searchBarContainer_NW3z" dir=ltr><input placeholder=Search aria-label=Search class=navbar__search-input value=""><div class="loadingRing_RJI3 searchBarLoadingRing_YnHq"><div></div><div></div><div></div><div></div></div></div></div></div></div><div role=presentation class=navbar-sidebar__backdrop></div></nav><div id=__docusaurus_skipToContent_fallback class="main-wrapper mainWrapper_z2l0"><div class=docsWrapper_hBAB><button aria-label="Scroll back to top" class="clean-btn theme-back-to-top-button backToTopButton_sjWU" type=button></button><div class=docRoot_UBD9><aside class="theme-doc-sidebar-container docSidebarContainer_YfHR"><div class=sidebarViewport_aRkj><div class="sidebar_njMd sidebarWithHideableNavbar_wUlq"><a tabindex=-1 class=sidebarLogo_isFc href=/fortran/><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--light_NVdE"><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--dark_xIcU"><b>Fortran</b></a><nav aria-label="Docs sidebar" class="menu thin-scrollbar menu_SIkG"><ul class="theme-doc-sidebar-menu menu__list"><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/>Setup</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/basics>Basics</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/array>Array and Matrix</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/control>Logical control</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/loop>Loop</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/modules>Modules</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class="menu__link menu__link--active" aria-current=page href=/fortran/procedures>Procedures</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/complex>Complex number</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/recursion>Recursion</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/types>Custom types</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/pointer>Pointer</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/file>File I/O</a><li class="theme-doc-sidebar-item-category theme-doc-sidebar-item-category-level-1 menu__list-item menu__list-item--collapsed"><div class=menu__list-item-collapsible><a class="menu__link menu__link--sublist" href=/fortran/category/coding-practice>Coding practice</a><button aria-label="Expand sidebar category 'Coding practice'" aria-expanded=false type=button class="clean-btn menu__caret"></button></div><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/resources>Resources</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/license>License</a></ul></nav><button type=button title="Collapse sidebar" aria-label="Collapse sidebar" class="button button--secondary button--outline collapseSidebarButton_PEFL"><svg width=20 height=20 aria-hidden=true class=collapseSidebarButtonIcon_kv0_><g fill=#7a7a7a><path d="M9.992 10.023c0 .2-.062.399-.172.547l-4.996 7.492a.982.982 0 01-.828.454H1c-.55 0-1-.453-1-1 0-.2.059-.403.168-.551l4.629-6.942L.168 3.078A.939.939 0 010 2.528c0-.548.45-.997 1-.997h2.996c.352 0 .649.18.828.45L9.82 9.472c.11.148.172.347.172.55zm0 0"/><path d="M19.98 10.023c0 .2-.058.399-.168.547l-4.996 7.492a.987.987 0 01-.828.454h-3c-.547 0-.996-.453-.996-1 0-.2.059-.403.168-.551l4.625-6.942-4.625-6.945a.939.939 0 01-.168-.55 1 1 0 01.996-.997h3c.348 0 .649.18.828.45l4.996 7.492c.11.148.168.347.168.55zm0 0"/></g></svg></button></div></div></aside><main class=docMainContainer_TBSr><div class="container padding-top--md padding-bottom--lg"><div class=row><div class="col docItemCol_VOVn"><div class=docItemContainer_Djhp><article><nav class="theme-doc-breadcrumbs breadcrumbsContainer_Z_bl" aria-label=Breadcrumbs><ul class=breadcrumbs itemscope itemtype=https://schema.org/BreadcrumbList><li class=breadcrumbs__item><a aria-label="Home page" class=breadcrumbs__link href=/fortran/><svg viewBox="0 0 24 24" class=breadcrumbHomeIcon_YNFT><path d="M10 19v-5h4v5c0 .55.45 1 1 1h3c.55 0 1-.45 1-1v-7h1.7c.46 0 .68-.57.33-.87L12.67 3.6c-.38-.34-.96-.34-1.34 0l-8.36 7.53c-.34.3-.13.87.33.87H5v7c0 .55.45 1 1 1h3c.55 0 1-.45 1-1z" fill=currentColor /></svg></a><li itemscope itemprop=itemListElement itemtype=https://schema.org/ListItem class="breadcrumbs__item breadcrumbs__item--active"><span class=breadcrumbs__link itemprop=name>Procedures</span><meta itemprop=position content=1></ul></nav><div class="tocCollapsible_ETCw theme-doc-toc-mobile tocMobile_ITEo"><button type=button class="clean-btn tocCollapsibleButton_TO0P">On this page</button></div><div class="theme-doc-markdown markdown"><header><h1>Procedures</h1></header><p>There are two types of procedures in Fortran: subroutines and functions. All
 procedures should be placed in a module or after the <code>contains</code> keyword in a
 main program.</p>
 <h2 class="anchor anchorWithHideOnScrollNavbar_WYt5" id=subroutine>Subroutine<a href=#subroutine class=hash-link aria-label="Direct link to Subroutine" title="Direct link to Subroutine">​</a></h2>
diff --git a/recursion/index.html b/recursion/index.html
index f974c9b..18aca2a 100644
--- a/recursion/index.html
+++ b/recursion/index.html
@@ -1,4 +1,4 @@
-<!doctype html><html lang=en dir=ltr class="docs-wrapper plugin-docs plugin-id-default docs-version-current docs-doc-page docs-doc-id-recursion" data-has-hydrated=false><meta charset=UTF-8><meta name=generator content="Docusaurus v3.6.1"><title data-rh=true>Recursion • Fortran Tutorial</title><meta data-rh=true name=viewport content="width=device-width,initial-scale=1.0"><meta data-rh=true name=twitter:card content=summary_large_image><meta data-rh=true property=og:url content=https://pranabdas.github.io/fortran/recursion><meta data-rh=true property=og:locale content=en><meta data-rh=true name=docusaurus_locale content=en><meta data-rh=true name=docsearch:language content=en><meta data-rh=true name=theme-color content=#06445c><meta data-rh=true name=docusaurus_version content=current><meta data-rh=true name=docusaurus_tag content=docs-default-current><meta data-rh=true name=docsearch:version content=current><meta data-rh=true name=docsearch:docusaurus_tag content=docs-default-current><meta data-rh=true property=og:title content="Recursion • Fortran Tutorial"><meta data-rh=true name=description content="Ordinary FORTRAN procedures (subroutine and function) are not recursive, i.e.,"><meta data-rh=true property=og:description content="Ordinary FORTRAN procedures (subroutine and function) are not recursive, i.e.,"><link data-rh=true rel=icon href=/fortran/img/favicon.png><link data-rh=true rel=canonical href=https://pranabdas.github.io/fortran/recursion><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/recursion hreflang=en><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/recursion hreflang=x-default><link rel=stylesheet href=https://pranabdas.github.io/drive/webfonts/katex/katex.min.css><link rel=stylesheet href=/fortran/assets/css/styles.4de1c8a8.css><script src=/fortran/assets/js/runtime~main.866c090c.js defer></script><script src=/fortran/assets/js/main.ec888ba8.js defer></script><body class=navigation-with-keyboard><script>!function(){var t,e=function(){try{return new URLSearchParams(window.location.search).get("docusaurus-theme")}catch(t){}}()||function(){try{return window.localStorage.getItem("theme")}catch(t){}}();t=null!==e?e:window.matchMedia("(prefers-color-scheme: dark)").matches?"dark":(window.matchMedia("(prefers-color-scheme: light)").matches,"light"),document.documentElement.setAttribute("data-theme",t)}(),function(){try{for(var[t,e]of new URLSearchParams(window.location.search).entries())if(t.startsWith("docusaurus-data-")){var a=t.replace("docusaurus-data-","data-");document.documentElement.setAttribute(a,e)}}catch(t){}}()</script><div id=__docusaurus><div role=region aria-label="Skip to main content"><a class=skipToContent_fXgn href=#__docusaurus_skipToContent_fallback>Skip to main content</a></div><nav aria-label=Main class="navbar navbar--fixed-top navbarHideable_m1mJ"><div class=navbar__inner><div class=navbar__items><button aria-label="Toggle navigation bar" aria-expanded=false class="navbar__toggle clean-btn" type=button><svg width=30 height=30 viewBox="0 0 30 30" aria-hidden=true><path stroke=currentColor stroke-linecap=round stroke-miterlimit=10 stroke-width=2 d="M4 7h22M4 15h22M4 23h22"/></svg></button><a class=navbar__brand href=/fortran/><div class=navbar__logo><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--light_NVdE"><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--dark_xIcU"></div><b class="navbar__title text--truncate">Fortran</b></a><div class="navbar__item dropdown dropdown--hoverable"><a aria-current=page class="navbar__link active" aria-haspopup=true aria-expanded=false role=button href=/fortran/>Docs</a><ul class=dropdown__menu><li><a aria-current=page class="dropdown__link dropdown__link--active" href=/fortran/>Fortran Programming</a><li><a href=https://pranabdas.github.io/docs/ rel="noopener noreferrer" class=dropdown__link>~ ~ ~ Other Docs ~ ~ ~</a><li><a href=https://pranabdas.github.io/arpespythontools/ rel="noopener noreferrer" class=dropdown__link>ARPES Python Tools</a><li><a href=https://pranabdas.github.io/c-cpp/ rel="noopener noreferrer" class=dropdown__link>C and C++ Programming</a><li><a href=https://pranabdas.github.io/condmat-notes/ rel="noopener noreferrer" class=dropdown__link>Condensed Matter Notes</a><li><a href=https://pranabdas.github.io/javascript/ rel="noopener noreferrer" class=dropdown__link>Javascript Tutorial</a><li><a href=https://pranabdas.github.io/linux/ rel="noopener noreferrer" class=dropdown__link>Linux Tutorial</a><li><a href=https://pranabdas.github.io/machine-learning/ rel="noopener noreferrer" class=dropdown__link>Machine Learning Notes</a><li><a href=https://pranabdas.github.io/openmx/ rel="noopener noreferrer" class=dropdown__link>OpenMX tutorial</a><li><a href=https://pranabdas.github.io/python-tutorial/ rel="noopener noreferrer" class=dropdown__link>Python Tutorial</a><li><a href=https://pranabdas.github.io/espresso/ rel="noopener noreferrer" class=dropdown__link>Quantum Espresso Tutorial</a><li><a href=https://pranabdas.github.io/rust/ rel="noopener noreferrer" class=dropdown__link>Rust Programming</a><li><a href=https://pranabdas.github.io/arpes-manual/ rel="noopener noreferrer" class=dropdown__link>SUV ARPES Manual</a><li><a href=https://pranabdas.github.io/suvtools/ rel="noopener noreferrer" class=dropdown__link>SUV Python Tools</a></ul></div></div><div class="navbar__items navbar__items--right"><a href=https://github.com/pranabdas/fortran rel="noopener noreferrer" class="navbar__item navbar__link header-github-link" aria-label="GitHub repository" title="Visit project repository in GitHub"></a><a href=https://pranabdas.github.io rel="noopener noreferrer" class="navbar__item navbar__link header-homepage-link" aria-label="About me" title="Go to Pranab's Homepage"></a><div class="toggle_vylO colorModeToggle_DEke"><button class="clean-btn toggleButton_gllP toggleButtonDisabled_aARS" type=button disabled title="Switch between dark and light mode (currently light mode)" aria-label="Switch between dark and light mode (currently light mode)" aria-live=polite aria-pressed=false><svg viewBox="0 0 24 24" width=24 height=24 class=lightToggleIcon_pyhR><path fill=currentColor d="M12,9c1.65,0,3,1.35,3,3s-1.35,3-3,3s-3-1.35-3-3S10.35,9,12,9 M12,7c-2.76,0-5,2.24-5,5s2.24,5,5,5s5-2.24,5-5 S14.76,7,12,7L12,7z M2,13l2,0c0.55,0,1-0.45,1-1s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S1.45,13,2,13z M20,13l2,0c0.55,0,1-0.45,1-1 s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S19.45,13,20,13z M11,2v2c0,0.55,0.45,1,1,1s1-0.45,1-1V2c0-0.55-0.45-1-1-1S11,1.45,11,2z M11,20v2c0,0.55,0.45,1,1,1s1-0.45,1-1v-2c0-0.55-0.45-1-1-1C11.45,19,11,19.45,11,20z M5.99,4.58c-0.39-0.39-1.03-0.39-1.41,0 c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0s0.39-1.03,0-1.41L5.99,4.58z M18.36,16.95 c-0.39-0.39-1.03-0.39-1.41,0c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0c0.39-0.39,0.39-1.03,0-1.41 L18.36,16.95z M19.42,5.99c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06c-0.39,0.39-0.39,1.03,0,1.41 s1.03,0.39,1.41,0L19.42,5.99z M7.05,18.36c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06 c-0.39,0.39-0.39,1.03,0,1.41s1.03,0.39,1.41,0L7.05,18.36z"/></svg><svg viewBox="0 0 24 24" width=24 height=24 class=darkToggleIcon_wfgR><path fill=currentColor d="M9.37,5.51C9.19,6.15,9.1,6.82,9.1,7.5c0,4.08,3.32,7.4,7.4,7.4c0.68,0,1.35-0.09,1.99-0.27C17.45,17.19,14.93,19,12,19 c-3.86,0-7-3.14-7-7C5,9.07,6.81,6.55,9.37,5.51z M12,3c-4.97,0-9,4.03-9,9s4.03,9,9,9s9-4.03,9-9c0-0.46-0.04-0.92-0.1-1.36 c-0.98,1.37-2.58,2.26-4.4,2.26c-2.98,0-5.4-2.42-5.4-5.4c0-1.81,0.89-3.42,2.26-4.4C12.92,3.04,12.46,3,12,3L12,3z"/></svg></button></div><div class=navbarSearchContainer_Bca1><div class="navbar__search searchBarContainer_NW3z" dir=ltr><input placeholder=Search aria-label=Search class=navbar__search-input value=""><div class="loadingRing_RJI3 searchBarLoadingRing_YnHq"><div></div><div></div><div></div><div></div></div></div></div></div></div><div role=presentation class=navbar-sidebar__backdrop></div></nav><div id=__docusaurus_skipToContent_fallback class="main-wrapper mainWrapper_z2l0"><div class=docsWrapper_hBAB><button aria-label="Scroll back to top" class="clean-btn theme-back-to-top-button backToTopButton_sjWU" type=button></button><div class=docRoot_UBD9><aside class="theme-doc-sidebar-container docSidebarContainer_YfHR"><div class=sidebarViewport_aRkj><div class="sidebar_njMd sidebarWithHideableNavbar_wUlq"><a tabindex=-1 class=sidebarLogo_isFc href=/fortran/><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--light_NVdE"><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--dark_xIcU"><b>Fortran</b></a><nav aria-label="Docs sidebar" class="menu thin-scrollbar menu_SIkG"><ul class="theme-doc-sidebar-menu menu__list"><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/>Setup</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/basics>Basics</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/array>Array and Matrix</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/control>Logical control</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/loop>Loop</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/modules>Modules</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/procedures>Procedures</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/complex>Complex number</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class="menu__link menu__link--active" aria-current=page href=/fortran/recursion>Recursion</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/types>Custom types</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/pointer>Pointer</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/file>File I/O</a><li class="theme-doc-sidebar-item-category theme-doc-sidebar-item-category-level-1 menu__list-item menu__list-item--collapsed"><div class=menu__list-item-collapsible><a class="menu__link menu__link--sublist" href=/fortran/category/coding-practice>Coding practice</a><button aria-label="Expand sidebar category 'Coding practice'" aria-expanded=false type=button class="clean-btn menu__caret"></button></div><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/resources>Resources</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/license>License</a></ul></nav><button type=button title="Collapse sidebar" aria-label="Collapse sidebar" class="button button--secondary button--outline collapseSidebarButton_PEFL"><svg width=20 height=20 aria-hidden=true class=collapseSidebarButtonIcon_kv0_><g fill=#7a7a7a><path d="M9.992 10.023c0 .2-.062.399-.172.547l-4.996 7.492a.982.982 0 01-.828.454H1c-.55 0-1-.453-1-1 0-.2.059-.403.168-.551l4.629-6.942L.168 3.078A.939.939 0 010 2.528c0-.548.45-.997 1-.997h2.996c.352 0 .649.18.828.45L9.82 9.472c.11.148.172.347.172.55zm0 0"/><path d="M19.98 10.023c0 .2-.058.399-.168.547l-4.996 7.492a.987.987 0 01-.828.454h-3c-.547 0-.996-.453-.996-1 0-.2.059-.403.168-.551l4.625-6.942-4.625-6.945a.939.939 0 01-.168-.55 1 1 0 01.996-.997h3c.348 0 .649.18.828.45l4.996 7.492c.11.148.168.347.168.55zm0 0"/></g></svg></button></div></div></aside><main class=docMainContainer_TBSr><div class="container padding-top--md padding-bottom--lg"><div class=row><div class="col docItemCol_VOVn"><div class=docItemContainer_Djhp><article><nav class="theme-doc-breadcrumbs breadcrumbsContainer_Z_bl" aria-label=Breadcrumbs><ul class=breadcrumbs itemscope itemtype=https://schema.org/BreadcrumbList><li class=breadcrumbs__item><a aria-label="Home page" class=breadcrumbs__link href=/fortran/><svg viewBox="0 0 24 24" class=breadcrumbHomeIcon_YNFT><path d="M10 19v-5h4v5c0 .55.45 1 1 1h3c.55 0 1-.45 1-1v-7h1.7c.46 0 .68-.57.33-.87L12.67 3.6c-.38-.34-.96-.34-1.34 0l-8.36 7.53c-.34.3-.13.87.33.87H5v7c0 .55.45 1 1 1h3c.55 0 1-.45 1-1z" fill=currentColor /></svg></a><li itemscope itemprop=itemListElement itemtype=https://schema.org/ListItem class="breadcrumbs__item breadcrumbs__item--active"><span class=breadcrumbs__link itemprop=name>Recursion</span><meta itemprop=position content=1></ul></nav><div class="tocCollapsible_ETCw theme-doc-toc-mobile tocMobile_ITEo"><button type=button class="clean-btn tocCollapsibleButton_TO0P">On this page</button></div><div class="theme-doc-markdown markdown"><header><h1>Recursion</h1></header><p>Ordinary FORTRAN procedures (subroutine and function) are not recursive, i.e.,
+<!doctype html><html lang=en dir=ltr class="docs-wrapper plugin-docs plugin-id-default docs-version-current docs-doc-page docs-doc-id-recursion" data-has-hydrated=false><meta charset=UTF-8><meta name=generator content="Docusaurus v3.6.1"><title data-rh=true>Recursion • Fortran Tutorial</title><meta data-rh=true name=viewport content="width=device-width,initial-scale=1.0"><meta data-rh=true name=twitter:card content=summary_large_image><meta data-rh=true property=og:url content=https://pranabdas.github.io/fortran/recursion><meta data-rh=true property=og:locale content=en><meta data-rh=true name=docusaurus_locale content=en><meta data-rh=true name=docsearch:language content=en><meta data-rh=true name=theme-color content=#06445c><meta data-rh=true name=docusaurus_version content=current><meta data-rh=true name=docusaurus_tag content=docs-default-current><meta data-rh=true name=docsearch:version content=current><meta data-rh=true name=docsearch:docusaurus_tag content=docs-default-current><meta data-rh=true property=og:title content="Recursion • Fortran Tutorial"><meta data-rh=true name=description content="Ordinary FORTRAN procedures (subroutine and function) are not recursive, i.e.,"><meta data-rh=true property=og:description content="Ordinary FORTRAN procedures (subroutine and function) are not recursive, i.e.,"><link data-rh=true rel=icon href=/fortran/img/favicon.png><link data-rh=true rel=canonical href=https://pranabdas.github.io/fortran/recursion><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/recursion hreflang=en><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/recursion hreflang=x-default><link rel=stylesheet href=https://pranab.pages.dev/assets/fonts/katex/katex.min.css><link rel=stylesheet href=/fortran/assets/css/styles.4de1c8a8.css><script src=/fortran/assets/js/runtime~main.667e3c0f.js defer></script><script src=/fortran/assets/js/main.10795e8f.js defer></script><body class=navigation-with-keyboard><script>!function(){var t,e=function(){try{return new URLSearchParams(window.location.search).get("docusaurus-theme")}catch(t){}}()||function(){try{return window.localStorage.getItem("theme")}catch(t){}}();t=null!==e?e:window.matchMedia("(prefers-color-scheme: dark)").matches?"dark":(window.matchMedia("(prefers-color-scheme: light)").matches,"light"),document.documentElement.setAttribute("data-theme",t)}(),function(){try{for(var[t,e]of new URLSearchParams(window.location.search).entries())if(t.startsWith("docusaurus-data-")){var a=t.replace("docusaurus-data-","data-");document.documentElement.setAttribute(a,e)}}catch(t){}}()</script><div id=__docusaurus><div role=region aria-label="Skip to main content"><a class=skipToContent_fXgn href=#__docusaurus_skipToContent_fallback>Skip to main content</a></div><nav aria-label=Main class="navbar navbar--fixed-top navbarHideable_m1mJ"><div class=navbar__inner><div class=navbar__items><button aria-label="Toggle navigation bar" aria-expanded=false class="navbar__toggle clean-btn" type=button><svg width=30 height=30 viewBox="0 0 30 30" aria-hidden=true><path stroke=currentColor stroke-linecap=round stroke-miterlimit=10 stroke-width=2 d="M4 7h22M4 15h22M4 23h22"/></svg></button><a class=navbar__brand href=/fortran/><div class=navbar__logo><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--light_NVdE"><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--dark_xIcU"></div><b class="navbar__title text--truncate">Fortran</b></a><div class="navbar__item dropdown dropdown--hoverable"><a aria-current=page class="navbar__link active" aria-haspopup=true aria-expanded=false role=button href=/fortran/>Docs</a><ul class=dropdown__menu><li><a aria-current=page class="dropdown__link dropdown__link--active" href=/fortran/>Fortran Programming</a><li><a href=https://pranabdas.github.io/docs/ rel="noopener noreferrer" class=dropdown__link>~ ~ ~ Other Docs ~ ~ ~</a><li><a href=https://pranabdas.github.io/arpespythontools/ rel="noopener noreferrer" class=dropdown__link>ARPES Python Tools</a><li><a href=https://pranabdas.github.io/c-cpp/ rel="noopener noreferrer" class=dropdown__link>C and C++ Programming</a><li><a href=https://pranabdas.github.io/condmat-notes/ rel="noopener noreferrer" class=dropdown__link>Condensed Matter Notes</a><li><a href=https://pranabdas.github.io/javascript/ rel="noopener noreferrer" class=dropdown__link>Javascript Tutorial</a><li><a href=https://pranabdas.github.io/linux/ rel="noopener noreferrer" class=dropdown__link>Linux Tutorial</a><li><a href=https://pranabdas.github.io/machine-learning/ rel="noopener noreferrer" class=dropdown__link>Machine Learning Notes</a><li><a href=https://pranabdas.github.io/openmx/ rel="noopener noreferrer" class=dropdown__link>OpenMX tutorial</a><li><a href=https://pranabdas.github.io/python-tutorial/ rel="noopener noreferrer" class=dropdown__link>Python Tutorial</a><li><a href=https://pranabdas.github.io/espresso/ rel="noopener noreferrer" class=dropdown__link>Quantum Espresso Tutorial</a><li><a href=https://pranabdas.github.io/rust/ rel="noopener noreferrer" class=dropdown__link>Rust Programming</a><li><a href=https://pranabdas.github.io/arpes-manual/ rel="noopener noreferrer" class=dropdown__link>SUV ARPES Manual</a><li><a href=https://pranabdas.github.io/suvtools/ rel="noopener noreferrer" class=dropdown__link>SUV Python Tools</a></ul></div></div><div class="navbar__items navbar__items--right"><a href=https://github.com/pranabdas/fortran rel="noopener noreferrer" class="navbar__item navbar__link header-github-link" aria-label="GitHub repository" title="Visit project repository in GitHub"></a><a href=https://pranabdas.github.io rel="noopener noreferrer" class="navbar__item navbar__link header-homepage-link" aria-label="About me" title="Go to Pranab's Homepage"></a><div class="toggle_vylO colorModeToggle_DEke"><button class="clean-btn toggleButton_gllP toggleButtonDisabled_aARS" type=button disabled title="Switch between dark and light mode (currently light mode)" aria-label="Switch between dark and light mode (currently light mode)" aria-live=polite aria-pressed=false><svg viewBox="0 0 24 24" width=24 height=24 class=lightToggleIcon_pyhR><path fill=currentColor d="M12,9c1.65,0,3,1.35,3,3s-1.35,3-3,3s-3-1.35-3-3S10.35,9,12,9 M12,7c-2.76,0-5,2.24-5,5s2.24,5,5,5s5-2.24,5-5 S14.76,7,12,7L12,7z M2,13l2,0c0.55,0,1-0.45,1-1s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S1.45,13,2,13z M20,13l2,0c0.55,0,1-0.45,1-1 s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S19.45,13,20,13z M11,2v2c0,0.55,0.45,1,1,1s1-0.45,1-1V2c0-0.55-0.45-1-1-1S11,1.45,11,2z M11,20v2c0,0.55,0.45,1,1,1s1-0.45,1-1v-2c0-0.55-0.45-1-1-1C11.45,19,11,19.45,11,20z M5.99,4.58c-0.39-0.39-1.03-0.39-1.41,0 c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0s0.39-1.03,0-1.41L5.99,4.58z M18.36,16.95 c-0.39-0.39-1.03-0.39-1.41,0c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0c0.39-0.39,0.39-1.03,0-1.41 L18.36,16.95z M19.42,5.99c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06c-0.39,0.39-0.39,1.03,0,1.41 s1.03,0.39,1.41,0L19.42,5.99z M7.05,18.36c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06 c-0.39,0.39-0.39,1.03,0,1.41s1.03,0.39,1.41,0L7.05,18.36z"/></svg><svg viewBox="0 0 24 24" width=24 height=24 class=darkToggleIcon_wfgR><path fill=currentColor d="M9.37,5.51C9.19,6.15,9.1,6.82,9.1,7.5c0,4.08,3.32,7.4,7.4,7.4c0.68,0,1.35-0.09,1.99-0.27C17.45,17.19,14.93,19,12,19 c-3.86,0-7-3.14-7-7C5,9.07,6.81,6.55,9.37,5.51z M12,3c-4.97,0-9,4.03-9,9s4.03,9,9,9s9-4.03,9-9c0-0.46-0.04-0.92-0.1-1.36 c-0.98,1.37-2.58,2.26-4.4,2.26c-2.98,0-5.4-2.42-5.4-5.4c0-1.81,0.89-3.42,2.26-4.4C12.92,3.04,12.46,3,12,3L12,3z"/></svg></button></div><div class=navbarSearchContainer_Bca1><div class="navbar__search searchBarContainer_NW3z" dir=ltr><input placeholder=Search aria-label=Search class=navbar__search-input value=""><div class="loadingRing_RJI3 searchBarLoadingRing_YnHq"><div></div><div></div><div></div><div></div></div></div></div></div></div><div role=presentation class=navbar-sidebar__backdrop></div></nav><div id=__docusaurus_skipToContent_fallback class="main-wrapper mainWrapper_z2l0"><div class=docsWrapper_hBAB><button aria-label="Scroll back to top" class="clean-btn theme-back-to-top-button backToTopButton_sjWU" type=button></button><div class=docRoot_UBD9><aside class="theme-doc-sidebar-container docSidebarContainer_YfHR"><div class=sidebarViewport_aRkj><div class="sidebar_njMd sidebarWithHideableNavbar_wUlq"><a tabindex=-1 class=sidebarLogo_isFc href=/fortran/><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--light_NVdE"><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--dark_xIcU"><b>Fortran</b></a><nav aria-label="Docs sidebar" class="menu thin-scrollbar menu_SIkG"><ul class="theme-doc-sidebar-menu menu__list"><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/>Setup</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/basics>Basics</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/array>Array and Matrix</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/control>Logical control</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/loop>Loop</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/modules>Modules</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/procedures>Procedures</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/complex>Complex number</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class="menu__link menu__link--active" aria-current=page href=/fortran/recursion>Recursion</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/types>Custom types</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/pointer>Pointer</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/file>File I/O</a><li class="theme-doc-sidebar-item-category theme-doc-sidebar-item-category-level-1 menu__list-item menu__list-item--collapsed"><div class=menu__list-item-collapsible><a class="menu__link menu__link--sublist" href=/fortran/category/coding-practice>Coding practice</a><button aria-label="Expand sidebar category 'Coding practice'" aria-expanded=false type=button class="clean-btn menu__caret"></button></div><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/resources>Resources</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/license>License</a></ul></nav><button type=button title="Collapse sidebar" aria-label="Collapse sidebar" class="button button--secondary button--outline collapseSidebarButton_PEFL"><svg width=20 height=20 aria-hidden=true class=collapseSidebarButtonIcon_kv0_><g fill=#7a7a7a><path d="M9.992 10.023c0 .2-.062.399-.172.547l-4.996 7.492a.982.982 0 01-.828.454H1c-.55 0-1-.453-1-1 0-.2.059-.403.168-.551l4.629-6.942L.168 3.078A.939.939 0 010 2.528c0-.548.45-.997 1-.997h2.996c.352 0 .649.18.828.45L9.82 9.472c.11.148.172.347.172.55zm0 0"/><path d="M19.98 10.023c0 .2-.058.399-.168.547l-4.996 7.492a.987.987 0 01-.828.454h-3c-.547 0-.996-.453-.996-1 0-.2.059-.403.168-.551l4.625-6.942-4.625-6.945a.939.939 0 01-.168-.55 1 1 0 01.996-.997h3c.348 0 .649.18.828.45l4.996 7.492c.11.148.168.347.168.55zm0 0"/></g></svg></button></div></div></aside><main class=docMainContainer_TBSr><div class="container padding-top--md padding-bottom--lg"><div class=row><div class="col docItemCol_VOVn"><div class=docItemContainer_Djhp><article><nav class="theme-doc-breadcrumbs breadcrumbsContainer_Z_bl" aria-label=Breadcrumbs><ul class=breadcrumbs itemscope itemtype=https://schema.org/BreadcrumbList><li class=breadcrumbs__item><a aria-label="Home page" class=breadcrumbs__link href=/fortran/><svg viewBox="0 0 24 24" class=breadcrumbHomeIcon_YNFT><path d="M10 19v-5h4v5c0 .55.45 1 1 1h3c.55 0 1-.45 1-1v-7h1.7c.46 0 .68-.57.33-.87L12.67 3.6c-.38-.34-.96-.34-1.34 0l-8.36 7.53c-.34.3-.13.87.33.87H5v7c0 .55.45 1 1 1h3c.55 0 1-.45 1-1z" fill=currentColor /></svg></a><li itemscope itemprop=itemListElement itemtype=https://schema.org/ListItem class="breadcrumbs__item breadcrumbs__item--active"><span class=breadcrumbs__link itemprop=name>Recursion</span><meta itemprop=position content=1></ul></nav><div class="tocCollapsible_ETCw theme-doc-toc-mobile tocMobile_ITEo"><button type=button class="clean-btn tocCollapsibleButton_TO0P">On this page</button></div><div class="theme-doc-markdown markdown"><header><h1>Recursion</h1></header><p>Ordinary FORTRAN procedures (subroutine and function) are not recursive, i.e.,
 they cannot invoke themselves in their body. We can use the <code>RECURSIVE</code> keyword
 to implement recursive procedures.</p>
 <h2 class="anchor anchorWithHideOnScrollNavbar_WYt5" id=recursive-subroutine>Recursive subroutine<a href=#recursive-subroutine class=hash-link aria-label="Direct link to Recursive subroutine" title="Direct link to Recursive subroutine">​</a></h2>
diff --git a/resources/index.html b/resources/index.html
index 00c510e..cb611aa 100644
--- a/resources/index.html
+++ b/resources/index.html
@@ -1,4 +1,4 @@
-<!doctype html><html lang=en dir=ltr class="docs-wrapper plugin-docs plugin-id-default docs-version-current docs-doc-page docs-doc-id-resources" data-has-hydrated=false><meta charset=UTF-8><meta name=generator content="Docusaurus v3.6.1"><title data-rh=true>Resources • Fortran Tutorial</title><meta data-rh=true name=viewport content="width=device-width,initial-scale=1.0"><meta data-rh=true name=twitter:card content=summary_large_image><meta data-rh=true property=og:url content=https://pranabdas.github.io/fortran/resources><meta data-rh=true property=og:locale content=en><meta data-rh=true name=docusaurus_locale content=en><meta data-rh=true name=docsearch:language content=en><meta data-rh=true name=theme-color content=#06445c><meta data-rh=true name=docusaurus_version content=current><meta data-rh=true name=docusaurus_tag content=docs-default-current><meta data-rh=true name=docsearch:version content=current><meta data-rh=true name=docsearch:docusaurus_tag content=docs-default-current><meta data-rh=true property=og:title content="Resources • Fortran Tutorial"><meta data-rh=true name=description content="-  Fortran Programming Manual by Tanja van Mourik"><meta data-rh=true property=og:description content="-  Fortran Programming Manual by Tanja van Mourik"><link data-rh=true rel=icon href=/fortran/img/favicon.png><link data-rh=true rel=canonical href=https://pranabdas.github.io/fortran/resources><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/resources hreflang=en><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/resources hreflang=x-default><link rel=stylesheet href=https://pranabdas.github.io/drive/webfonts/katex/katex.min.css><link rel=stylesheet href=/fortran/assets/css/styles.4de1c8a8.css><script src=/fortran/assets/js/runtime~main.866c090c.js defer></script><script src=/fortran/assets/js/main.ec888ba8.js defer></script><body class=navigation-with-keyboard><script>!function(){var t,e=function(){try{return new URLSearchParams(window.location.search).get("docusaurus-theme")}catch(t){}}()||function(){try{return window.localStorage.getItem("theme")}catch(t){}}();t=null!==e?e:window.matchMedia("(prefers-color-scheme: dark)").matches?"dark":(window.matchMedia("(prefers-color-scheme: light)").matches,"light"),document.documentElement.setAttribute("data-theme",t)}(),function(){try{for(var[t,e]of new URLSearchParams(window.location.search).entries())if(t.startsWith("docusaurus-data-")){var a=t.replace("docusaurus-data-","data-");document.documentElement.setAttribute(a,e)}}catch(t){}}()</script><div id=__docusaurus><div role=region aria-label="Skip to main content"><a class=skipToContent_fXgn href=#__docusaurus_skipToContent_fallback>Skip to main content</a></div><nav aria-label=Main class="navbar navbar--fixed-top navbarHideable_m1mJ"><div class=navbar__inner><div class=navbar__items><button aria-label="Toggle navigation bar" aria-expanded=false class="navbar__toggle clean-btn" type=button><svg width=30 height=30 viewBox="0 0 30 30" aria-hidden=true><path stroke=currentColor stroke-linecap=round stroke-miterlimit=10 stroke-width=2 d="M4 7h22M4 15h22M4 23h22"/></svg></button><a class=navbar__brand href=/fortran/><div class=navbar__logo><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--light_NVdE"><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--dark_xIcU"></div><b class="navbar__title text--truncate">Fortran</b></a><div class="navbar__item dropdown dropdown--hoverable"><a aria-current=page class="navbar__link active" aria-haspopup=true aria-expanded=false role=button href=/fortran/>Docs</a><ul class=dropdown__menu><li><a aria-current=page class="dropdown__link dropdown__link--active" href=/fortran/>Fortran Programming</a><li><a href=https://pranabdas.github.io/docs/ rel="noopener noreferrer" class=dropdown__link>~ ~ ~ Other Docs ~ ~ ~</a><li><a href=https://pranabdas.github.io/arpespythontools/ rel="noopener noreferrer" class=dropdown__link>ARPES Python Tools</a><li><a href=https://pranabdas.github.io/c-cpp/ rel="noopener noreferrer" class=dropdown__link>C and C++ Programming</a><li><a href=https://pranabdas.github.io/condmat-notes/ rel="noopener noreferrer" class=dropdown__link>Condensed Matter Notes</a><li><a href=https://pranabdas.github.io/javascript/ rel="noopener noreferrer" class=dropdown__link>Javascript Tutorial</a><li><a href=https://pranabdas.github.io/linux/ rel="noopener noreferrer" class=dropdown__link>Linux Tutorial</a><li><a href=https://pranabdas.github.io/machine-learning/ rel="noopener noreferrer" class=dropdown__link>Machine Learning Notes</a><li><a href=https://pranabdas.github.io/openmx/ rel="noopener noreferrer" class=dropdown__link>OpenMX tutorial</a><li><a href=https://pranabdas.github.io/python-tutorial/ rel="noopener noreferrer" class=dropdown__link>Python Tutorial</a><li><a href=https://pranabdas.github.io/espresso/ rel="noopener noreferrer" class=dropdown__link>Quantum Espresso Tutorial</a><li><a href=https://pranabdas.github.io/rust/ rel="noopener noreferrer" class=dropdown__link>Rust Programming</a><li><a href=https://pranabdas.github.io/arpes-manual/ rel="noopener noreferrer" class=dropdown__link>SUV ARPES Manual</a><li><a href=https://pranabdas.github.io/suvtools/ rel="noopener noreferrer" class=dropdown__link>SUV Python Tools</a></ul></div></div><div class="navbar__items navbar__items--right"><a href=https://github.com/pranabdas/fortran rel="noopener noreferrer" class="navbar__item navbar__link header-github-link" aria-label="GitHub repository" title="Visit project repository in GitHub"></a><a href=https://pranabdas.github.io rel="noopener noreferrer" class="navbar__item navbar__link header-homepage-link" aria-label="About me" title="Go to Pranab's Homepage"></a><div class="toggle_vylO colorModeToggle_DEke"><button class="clean-btn toggleButton_gllP toggleButtonDisabled_aARS" type=button disabled title="Switch between dark and light mode (currently light mode)" aria-label="Switch between dark and light mode (currently light mode)" aria-live=polite aria-pressed=false><svg viewBox="0 0 24 24" width=24 height=24 class=lightToggleIcon_pyhR><path fill=currentColor d="M12,9c1.65,0,3,1.35,3,3s-1.35,3-3,3s-3-1.35-3-3S10.35,9,12,9 M12,7c-2.76,0-5,2.24-5,5s2.24,5,5,5s5-2.24,5-5 S14.76,7,12,7L12,7z M2,13l2,0c0.55,0,1-0.45,1-1s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S1.45,13,2,13z M20,13l2,0c0.55,0,1-0.45,1-1 s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S19.45,13,20,13z M11,2v2c0,0.55,0.45,1,1,1s1-0.45,1-1V2c0-0.55-0.45-1-1-1S11,1.45,11,2z M11,20v2c0,0.55,0.45,1,1,1s1-0.45,1-1v-2c0-0.55-0.45-1-1-1C11.45,19,11,19.45,11,20z M5.99,4.58c-0.39-0.39-1.03-0.39-1.41,0 c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0s0.39-1.03,0-1.41L5.99,4.58z M18.36,16.95 c-0.39-0.39-1.03-0.39-1.41,0c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0c0.39-0.39,0.39-1.03,0-1.41 L18.36,16.95z M19.42,5.99c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06c-0.39,0.39-0.39,1.03,0,1.41 s1.03,0.39,1.41,0L19.42,5.99z M7.05,18.36c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06 c-0.39,0.39-0.39,1.03,0,1.41s1.03,0.39,1.41,0L7.05,18.36z"/></svg><svg viewBox="0 0 24 24" width=24 height=24 class=darkToggleIcon_wfgR><path fill=currentColor d="M9.37,5.51C9.19,6.15,9.1,6.82,9.1,7.5c0,4.08,3.32,7.4,7.4,7.4c0.68,0,1.35-0.09,1.99-0.27C17.45,17.19,14.93,19,12,19 c-3.86,0-7-3.14-7-7C5,9.07,6.81,6.55,9.37,5.51z M12,3c-4.97,0-9,4.03-9,9s4.03,9,9,9s9-4.03,9-9c0-0.46-0.04-0.92-0.1-1.36 c-0.98,1.37-2.58,2.26-4.4,2.26c-2.98,0-5.4-2.42-5.4-5.4c0-1.81,0.89-3.42,2.26-4.4C12.92,3.04,12.46,3,12,3L12,3z"/></svg></button></div><div class=navbarSearchContainer_Bca1><div class="navbar__search searchBarContainer_NW3z" dir=ltr><input placeholder=Search aria-label=Search class=navbar__search-input value=""><div class="loadingRing_RJI3 searchBarLoadingRing_YnHq"><div></div><div></div><div></div><div></div></div></div></div></div></div><div role=presentation class=navbar-sidebar__backdrop></div></nav><div id=__docusaurus_skipToContent_fallback class="main-wrapper mainWrapper_z2l0"><div class=docsWrapper_hBAB><button aria-label="Scroll back to top" class="clean-btn theme-back-to-top-button backToTopButton_sjWU" type=button></button><div class=docRoot_UBD9><aside class="theme-doc-sidebar-container docSidebarContainer_YfHR"><div class=sidebarViewport_aRkj><div class="sidebar_njMd sidebarWithHideableNavbar_wUlq"><a tabindex=-1 class=sidebarLogo_isFc href=/fortran/><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--light_NVdE"><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--dark_xIcU"><b>Fortran</b></a><nav aria-label="Docs sidebar" class="menu thin-scrollbar menu_SIkG"><ul class="theme-doc-sidebar-menu menu__list"><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/>Setup</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/basics>Basics</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/array>Array and Matrix</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/control>Logical control</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/loop>Loop</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/modules>Modules</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/procedures>Procedures</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/complex>Complex number</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/recursion>Recursion</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/types>Custom types</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/pointer>Pointer</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/file>File I/O</a><li class="theme-doc-sidebar-item-category theme-doc-sidebar-item-category-level-1 menu__list-item menu__list-item--collapsed"><div class=menu__list-item-collapsible><a class="menu__link menu__link--sublist" href=/fortran/category/coding-practice>Coding practice</a><button aria-label="Expand sidebar category 'Coding practice'" aria-expanded=false type=button class="clean-btn menu__caret"></button></div><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class="menu__link menu__link--active" aria-current=page href=/fortran/resources>Resources</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/license>License</a></ul></nav><button type=button title="Collapse sidebar" aria-label="Collapse sidebar" class="button button--secondary button--outline collapseSidebarButton_PEFL"><svg width=20 height=20 aria-hidden=true class=collapseSidebarButtonIcon_kv0_><g fill=#7a7a7a><path d="M9.992 10.023c0 .2-.062.399-.172.547l-4.996 7.492a.982.982 0 01-.828.454H1c-.55 0-1-.453-1-1 0-.2.059-.403.168-.551l4.629-6.942L.168 3.078A.939.939 0 010 2.528c0-.548.45-.997 1-.997h2.996c.352 0 .649.18.828.45L9.82 9.472c.11.148.172.347.172.55zm0 0"/><path d="M19.98 10.023c0 .2-.058.399-.168.547l-4.996 7.492a.987.987 0 01-.828.454h-3c-.547 0-.996-.453-.996-1 0-.2.059-.403.168-.551l4.625-6.942-4.625-6.945a.939.939 0 01-.168-.55 1 1 0 01.996-.997h3c.348 0 .649.18.828.45l4.996 7.492c.11.148.168.347.168.55zm0 0"/></g></svg></button></div></div></aside><main class=docMainContainer_TBSr><div class="container padding-top--md padding-bottom--lg"><div class=row><div class="col docItemCol_VOVn"><div class=docItemContainer_Djhp><article><nav class="theme-doc-breadcrumbs breadcrumbsContainer_Z_bl" aria-label=Breadcrumbs><ul class=breadcrumbs itemscope itemtype=https://schema.org/BreadcrumbList><li class=breadcrumbs__item><a aria-label="Home page" class=breadcrumbs__link href=/fortran/><svg viewBox="0 0 24 24" class=breadcrumbHomeIcon_YNFT><path d="M10 19v-5h4v5c0 .55.45 1 1 1h3c.55 0 1-.45 1-1v-7h1.7c.46 0 .68-.57.33-.87L12.67 3.6c-.38-.34-.96-.34-1.34 0l-8.36 7.53c-.34.3-.13.87.33.87H5v7c0 .55.45 1 1 1h3c.55 0 1-.45 1-1z" fill=currentColor /></svg></a><li itemscope itemprop=itemListElement itemtype=https://schema.org/ListItem class="breadcrumbs__item breadcrumbs__item--active"><span class=breadcrumbs__link itemprop=name>Resources</span><meta itemprop=position content=1></ul></nav><div class="theme-doc-markdown markdown"><header><h1>Resources</h1></header><ul>
+<!doctype html><html lang=en dir=ltr class="docs-wrapper plugin-docs plugin-id-default docs-version-current docs-doc-page docs-doc-id-resources" data-has-hydrated=false><meta charset=UTF-8><meta name=generator content="Docusaurus v3.6.1"><title data-rh=true>Resources • Fortran Tutorial</title><meta data-rh=true name=viewport content="width=device-width,initial-scale=1.0"><meta data-rh=true name=twitter:card content=summary_large_image><meta data-rh=true property=og:url content=https://pranabdas.github.io/fortran/resources><meta data-rh=true property=og:locale content=en><meta data-rh=true name=docusaurus_locale content=en><meta data-rh=true name=docsearch:language content=en><meta data-rh=true name=theme-color content=#06445c><meta data-rh=true name=docusaurus_version content=current><meta data-rh=true name=docusaurus_tag content=docs-default-current><meta data-rh=true name=docsearch:version content=current><meta data-rh=true name=docsearch:docusaurus_tag content=docs-default-current><meta data-rh=true property=og:title content="Resources • Fortran Tutorial"><meta data-rh=true name=description content="-  Fortran Programming Manual by Tanja van Mourik"><meta data-rh=true property=og:description content="-  Fortran Programming Manual by Tanja van Mourik"><link data-rh=true rel=icon href=/fortran/img/favicon.png><link data-rh=true rel=canonical href=https://pranabdas.github.io/fortran/resources><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/resources hreflang=en><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/resources hreflang=x-default><link rel=stylesheet href=https://pranab.pages.dev/assets/fonts/katex/katex.min.css><link rel=stylesheet href=/fortran/assets/css/styles.4de1c8a8.css><script src=/fortran/assets/js/runtime~main.667e3c0f.js defer></script><script src=/fortran/assets/js/main.10795e8f.js defer></script><body class=navigation-with-keyboard><script>!function(){var t,e=function(){try{return new URLSearchParams(window.location.search).get("docusaurus-theme")}catch(t){}}()||function(){try{return window.localStorage.getItem("theme")}catch(t){}}();t=null!==e?e:window.matchMedia("(prefers-color-scheme: dark)").matches?"dark":(window.matchMedia("(prefers-color-scheme: light)").matches,"light"),document.documentElement.setAttribute("data-theme",t)}(),function(){try{for(var[t,e]of new URLSearchParams(window.location.search).entries())if(t.startsWith("docusaurus-data-")){var a=t.replace("docusaurus-data-","data-");document.documentElement.setAttribute(a,e)}}catch(t){}}()</script><div id=__docusaurus><div role=region aria-label="Skip to main content"><a class=skipToContent_fXgn href=#__docusaurus_skipToContent_fallback>Skip to main content</a></div><nav aria-label=Main class="navbar navbar--fixed-top navbarHideable_m1mJ"><div class=navbar__inner><div class=navbar__items><button aria-label="Toggle navigation bar" aria-expanded=false class="navbar__toggle clean-btn" type=button><svg width=30 height=30 viewBox="0 0 30 30" aria-hidden=true><path stroke=currentColor stroke-linecap=round stroke-miterlimit=10 stroke-width=2 d="M4 7h22M4 15h22M4 23h22"/></svg></button><a class=navbar__brand href=/fortran/><div class=navbar__logo><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--light_NVdE"><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--dark_xIcU"></div><b class="navbar__title text--truncate">Fortran</b></a><div class="navbar__item dropdown dropdown--hoverable"><a aria-current=page class="navbar__link active" aria-haspopup=true aria-expanded=false role=button href=/fortran/>Docs</a><ul class=dropdown__menu><li><a aria-current=page class="dropdown__link dropdown__link--active" href=/fortran/>Fortran Programming</a><li><a href=https://pranabdas.github.io/docs/ rel="noopener noreferrer" class=dropdown__link>~ ~ ~ Other Docs ~ ~ ~</a><li><a href=https://pranabdas.github.io/arpespythontools/ rel="noopener noreferrer" class=dropdown__link>ARPES Python Tools</a><li><a href=https://pranabdas.github.io/c-cpp/ rel="noopener noreferrer" class=dropdown__link>C and C++ Programming</a><li><a href=https://pranabdas.github.io/condmat-notes/ rel="noopener noreferrer" class=dropdown__link>Condensed Matter Notes</a><li><a href=https://pranabdas.github.io/javascript/ rel="noopener noreferrer" class=dropdown__link>Javascript Tutorial</a><li><a href=https://pranabdas.github.io/linux/ rel="noopener noreferrer" class=dropdown__link>Linux Tutorial</a><li><a href=https://pranabdas.github.io/machine-learning/ rel="noopener noreferrer" class=dropdown__link>Machine Learning Notes</a><li><a href=https://pranabdas.github.io/openmx/ rel="noopener noreferrer" class=dropdown__link>OpenMX tutorial</a><li><a href=https://pranabdas.github.io/python-tutorial/ rel="noopener noreferrer" class=dropdown__link>Python Tutorial</a><li><a href=https://pranabdas.github.io/espresso/ rel="noopener noreferrer" class=dropdown__link>Quantum Espresso Tutorial</a><li><a href=https://pranabdas.github.io/rust/ rel="noopener noreferrer" class=dropdown__link>Rust Programming</a><li><a href=https://pranabdas.github.io/arpes-manual/ rel="noopener noreferrer" class=dropdown__link>SUV ARPES Manual</a><li><a href=https://pranabdas.github.io/suvtools/ rel="noopener noreferrer" class=dropdown__link>SUV Python Tools</a></ul></div></div><div class="navbar__items navbar__items--right"><a href=https://github.com/pranabdas/fortran rel="noopener noreferrer" class="navbar__item navbar__link header-github-link" aria-label="GitHub repository" title="Visit project repository in GitHub"></a><a href=https://pranabdas.github.io rel="noopener noreferrer" class="navbar__item navbar__link header-homepage-link" aria-label="About me" title="Go to Pranab's Homepage"></a><div class="toggle_vylO colorModeToggle_DEke"><button class="clean-btn toggleButton_gllP toggleButtonDisabled_aARS" type=button disabled title="Switch between dark and light mode (currently light mode)" aria-label="Switch between dark and light mode (currently light mode)" aria-live=polite aria-pressed=false><svg viewBox="0 0 24 24" width=24 height=24 class=lightToggleIcon_pyhR><path fill=currentColor d="M12,9c1.65,0,3,1.35,3,3s-1.35,3-3,3s-3-1.35-3-3S10.35,9,12,9 M12,7c-2.76,0-5,2.24-5,5s2.24,5,5,5s5-2.24,5-5 S14.76,7,12,7L12,7z M2,13l2,0c0.55,0,1-0.45,1-1s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S1.45,13,2,13z M20,13l2,0c0.55,0,1-0.45,1-1 s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S19.45,13,20,13z M11,2v2c0,0.55,0.45,1,1,1s1-0.45,1-1V2c0-0.55-0.45-1-1-1S11,1.45,11,2z M11,20v2c0,0.55,0.45,1,1,1s1-0.45,1-1v-2c0-0.55-0.45-1-1-1C11.45,19,11,19.45,11,20z M5.99,4.58c-0.39-0.39-1.03-0.39-1.41,0 c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0s0.39-1.03,0-1.41L5.99,4.58z M18.36,16.95 c-0.39-0.39-1.03-0.39-1.41,0c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0c0.39-0.39,0.39-1.03,0-1.41 L18.36,16.95z M19.42,5.99c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06c-0.39,0.39-0.39,1.03,0,1.41 s1.03,0.39,1.41,0L19.42,5.99z M7.05,18.36c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06 c-0.39,0.39-0.39,1.03,0,1.41s1.03,0.39,1.41,0L7.05,18.36z"/></svg><svg viewBox="0 0 24 24" width=24 height=24 class=darkToggleIcon_wfgR><path fill=currentColor d="M9.37,5.51C9.19,6.15,9.1,6.82,9.1,7.5c0,4.08,3.32,7.4,7.4,7.4c0.68,0,1.35-0.09,1.99-0.27C17.45,17.19,14.93,19,12,19 c-3.86,0-7-3.14-7-7C5,9.07,6.81,6.55,9.37,5.51z M12,3c-4.97,0-9,4.03-9,9s4.03,9,9,9s9-4.03,9-9c0-0.46-0.04-0.92-0.1-1.36 c-0.98,1.37-2.58,2.26-4.4,2.26c-2.98,0-5.4-2.42-5.4-5.4c0-1.81,0.89-3.42,2.26-4.4C12.92,3.04,12.46,3,12,3L12,3z"/></svg></button></div><div class=navbarSearchContainer_Bca1><div class="navbar__search searchBarContainer_NW3z" dir=ltr><input placeholder=Search aria-label=Search class=navbar__search-input value=""><div class="loadingRing_RJI3 searchBarLoadingRing_YnHq"><div></div><div></div><div></div><div></div></div></div></div></div></div><div role=presentation class=navbar-sidebar__backdrop></div></nav><div id=__docusaurus_skipToContent_fallback class="main-wrapper mainWrapper_z2l0"><div class=docsWrapper_hBAB><button aria-label="Scroll back to top" class="clean-btn theme-back-to-top-button backToTopButton_sjWU" type=button></button><div class=docRoot_UBD9><aside class="theme-doc-sidebar-container docSidebarContainer_YfHR"><div class=sidebarViewport_aRkj><div class="sidebar_njMd sidebarWithHideableNavbar_wUlq"><a tabindex=-1 class=sidebarLogo_isFc href=/fortran/><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--light_NVdE"><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--dark_xIcU"><b>Fortran</b></a><nav aria-label="Docs sidebar" class="menu thin-scrollbar menu_SIkG"><ul class="theme-doc-sidebar-menu menu__list"><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/>Setup</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/basics>Basics</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/array>Array and Matrix</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/control>Logical control</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/loop>Loop</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/modules>Modules</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/procedures>Procedures</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/complex>Complex number</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/recursion>Recursion</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/types>Custom types</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/pointer>Pointer</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/file>File I/O</a><li class="theme-doc-sidebar-item-category theme-doc-sidebar-item-category-level-1 menu__list-item menu__list-item--collapsed"><div class=menu__list-item-collapsible><a class="menu__link menu__link--sublist" href=/fortran/category/coding-practice>Coding practice</a><button aria-label="Expand sidebar category 'Coding practice'" aria-expanded=false type=button class="clean-btn menu__caret"></button></div><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class="menu__link menu__link--active" aria-current=page href=/fortran/resources>Resources</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/license>License</a></ul></nav><button type=button title="Collapse sidebar" aria-label="Collapse sidebar" class="button button--secondary button--outline collapseSidebarButton_PEFL"><svg width=20 height=20 aria-hidden=true class=collapseSidebarButtonIcon_kv0_><g fill=#7a7a7a><path d="M9.992 10.023c0 .2-.062.399-.172.547l-4.996 7.492a.982.982 0 01-.828.454H1c-.55 0-1-.453-1-1 0-.2.059-.403.168-.551l4.629-6.942L.168 3.078A.939.939 0 010 2.528c0-.548.45-.997 1-.997h2.996c.352 0 .649.18.828.45L9.82 9.472c.11.148.172.347.172.55zm0 0"/><path d="M19.98 10.023c0 .2-.058.399-.168.547l-4.996 7.492a.987.987 0 01-.828.454h-3c-.547 0-.996-.453-.996-1 0-.2.059-.403.168-.551l4.625-6.942-4.625-6.945a.939.939 0 01-.168-.55 1 1 0 01.996-.997h3c.348 0 .649.18.828.45l4.996 7.492c.11.148.168.347.168.55zm0 0"/></g></svg></button></div></div></aside><main class=docMainContainer_TBSr><div class="container padding-top--md padding-bottom--lg"><div class=row><div class="col docItemCol_VOVn"><div class=docItemContainer_Djhp><article><nav class="theme-doc-breadcrumbs breadcrumbsContainer_Z_bl" aria-label=Breadcrumbs><ul class=breadcrumbs itemscope itemtype=https://schema.org/BreadcrumbList><li class=breadcrumbs__item><a aria-label="Home page" class=breadcrumbs__link href=/fortran/><svg viewBox="0 0 24 24" class=breadcrumbHomeIcon_YNFT><path d="M10 19v-5h4v5c0 .55.45 1 1 1h3c.55 0 1-.45 1-1v-7h1.7c.46 0 .68-.57.33-.87L12.67 3.6c-.38-.34-.96-.34-1.34 0l-8.36 7.53c-.34.3-.13.87.33.87H5v7c0 .55.45 1 1 1h3c.55 0 1-.45 1-1z" fill=currentColor /></svg></a><li itemscope itemprop=itemListElement itemtype=https://schema.org/ListItem class="breadcrumbs__item breadcrumbs__item--active"><span class=breadcrumbs__link itemprop=name>Resources</span><meta itemprop=position content=1></ul></nav><div class="theme-doc-markdown markdown"><header><h1>Resources</h1></header><ul>
 <li>
 <a target=_blank href=/fortran/assets/files/fortran95-manual-3e19e8cc8901f781f067b745db62fba5.pdf> Fortran Programming Manual by Tanja van Mourik</a>
 </li>
diff --git a/search-index.json b/search-index.json
index cd8c8cd..0bd7d06 100644
--- a/search-index.json
+++ b/search-index.json
@@ -1 +1 @@
-[{"documents":[{"i":1,"t":"Function: Get absolute path","u":"/fortran/abs-path","b":["Coding practice"]},{"i":3,"t":"Array and Matrix","u":"/fortran/array","b":[]},{"i":5,"t":"Basics","u":"/fortran/basics","b":[]},{"i":27,"t":"Parsing command-line arguments","u":"/fortran/arg-parsing","b":["Coding practice"]},{"i":29,"t":"Complex number","u":"/fortran/complex","b":[]},{"i":31,"t":"Basic Linear Algebra Subprograms","u":"/fortran/blas","b":["Coding practice"]},{"i":39,"t":"Logical expression and control","u":"/fortran/control","b":[]},{"i":47,"t":"Coarray","u":"/fortran/coarray","b":[]},{"i":50,"t":"Execute system/external command","u":"/fortran/exec-command","b":["Coding practice"]},{"i":52,"t":"File Input / Output","u":"/fortran/file","b":[]},{"i":54,"t":"Haversine formula","u":"/fortran/haversine","b":["Coding practice"]},{"i":56,"t":"Inner product: dynamic array allocation","u":"/fortran/inner-product","b":["Coding practice"]},{"i":58,"t":"Numerical integration: Trapezoidal method","u":"/fortran/integration","b":["Coding practice"]},{"i":62,"t":"Calculate hypotenuse: example of subroutine","u":"/fortran/hypotenuse","b":["Coding practice"]},{"i":64,"t":"Loop","u":"/fortran/loop","b":[]},{"i":69,"t":"License","u":"/fortran/license","b":[]},{"i":71,"t":"Modules","u":"/fortran/modules","b":[]},{"i":75,"t":"Message Passing Interface (MPI) Basics","u":"/fortran/mpi","b":["Coding practice"]},{"i":80,"t":"Area under the curve by Monte Carlo method","u":"/fortran/monte-carlo-integration","b":["Coding practice"]},{"i":82,"t":"Determine value of pi by Monte Carlo method","u":"/fortran/monte-carlo-pi","b":["Coding practice"]},{"i":84,"t":"Pointer","u":"/fortran/pointer","b":[]},{"i":86,"t":"Recursion","u":"/fortran/recursion","b":[]},{"i":92,"t":"Procedures","u":"/fortran/procedures","b":[]},{"i":102,"t":"Resources","u":"/fortran/resources","b":[]},{"i":104,"t":"Swap two numbers","u":"/fortran/swap","b":["Coding practice"]},{"i":106,"t":"Time","u":"/fortran/time","b":["Coding practice"]},{"i":108,"t":"Setting up Fortran","u":"/fortran/","b":[]},{"i":110,"t":"Custom types","u":"/fortran/types","b":[]}],"index":{"version":"2.3.9","fields":["t"],"fieldVectors":[["t/1",[0,2.823,1,2.823,2,2.823]],["t/3",[3,2.734,4,3.304]],["t/5",[5,2.844]],["t/27",[6,2.464,7,2.039,8,2.464,9,2.464]],["t/29",[10,3.304,11,2.734]],["t/31",[5,1.759,12,2.464,13,2.464,14,2.464]],["t/39",[15,2.823,16,2.823,17,2.823]],["t/47",[18,3.983]],["t/50",[7,2.336,19,2.823,20,2.823]],["t/52",[21,2.464,22,2.464,23,2.464,24,2.464]],["t/54",[25,3.304,26,3.304]],["t/56",[3,1.809,27,2.187,28,2.187,29,2.187,30,2.187]],["t/58",[31,2.464,32,2.464,33,2.464,34,1.759]],["t/62",[35,2.464,36,2.464,37,2.464,38,2.464]],["t/64",[39,3.983]],["t/69",[40,3.983]],["t/71",[41,3.983]],["t/75",[5,1.561,42,2.187,43,2.187,44,2.187,45,2.187]],["t/80",[34,1.403,46,1.965,47,1.965,48,1.965,49,1.626,50,1.626]],["t/82",[34,1.403,49,1.626,50,1.626,51,1.965,52,1.965,53,1.965]],["t/84",[54,3.983]],["t/86",[55,3.983]],["t/92",[56,3.983]],["t/102",[57,3.983]],["t/104",[11,2.336,58,2.823,59,2.823]],["t/106",[60,3.983]],["t/108",[61,2.823,62,2.823,63,2.823]],["t/110",[64,3.304,65,3.304]]],"invertedIndex":[["",{"_index":23,"t":{"52":{"position":[[11,1]]}}}],["absolut",{"_index":1,"t":{"1":{"position":[[14,8]]}}}],["algebra",{"_index":13,"t":{"31":{"position":[[13,7]]}}}],["alloc",{"_index":30,"t":{"56":{"position":[[29,10]]}}}],["area",{"_index":46,"t":{"80":{"position":[[0,4]]}}}],["argument",{"_index":9,"t":{"27":{"position":[[21,9]]}}}],["array",{"_index":3,"t":{"3":{"position":[[0,5]]},"56":{"position":[[23,5]]}}}],["basic",{"_index":5,"t":{"5":{"position":[[0,6]]},"31":{"position":[[0,5]]},"75":{"position":[[32,6]]}}}],["calcul",{"_index":35,"t":{"62":{"position":[[0,9]]}}}],["carlo",{"_index":50,"t":{"80":{"position":[[30,5]]},"82":{"position":[[31,5]]}}}],["coarray",{"_index":18,"t":{"47":{"position":[[0,7]]}}}],["command",{"_index":7,"t":{"27":{"position":[[8,7]]},"50":{"position":[[24,7]]}}}],["complex",{"_index":10,"t":{"29":{"position":[[0,7]]}}}],["control",{"_index":17,"t":{"39":{"position":[[23,7]]}}}],["curv",{"_index":48,"t":{"80":{"position":[[15,5]]}}}],["custom",{"_index":64,"t":{"110":{"position":[[0,6]]}}}],["determin",{"_index":51,"t":{"82":{"position":[[0,9]]}}}],["dynam",{"_index":29,"t":{"56":{"position":[[15,7]]}}}],["exampl",{"_index":37,"t":{"62":{"position":[[22,7]]}}}],["execut",{"_index":19,"t":{"50":{"position":[[0,7]]}}}],["express",{"_index":16,"t":{"39":{"position":[[8,10]]}}}],["file",{"_index":21,"t":{"52":{"position":[[0,4]]}}}],["formula",{"_index":26,"t":{"54":{"position":[[10,7]]}}}],["fortran",{"_index":63,"t":{"108":{"position":[[11,7]]}}}],["function",{"_index":0,"t":{"1":{"position":[[0,9]]}}}],["haversin",{"_index":25,"t":{"54":{"position":[[0,9]]}}}],["hypotenus",{"_index":36,"t":{"62":{"position":[[10,11]]}}}],["inner",{"_index":27,"t":{"56":{"position":[[0,5]]}}}],["input",{"_index":22,"t":{"52":{"position":[[5,5]]}}}],["integr",{"_index":32,"t":{"58":{"position":[[10,12]]}}}],["interfac",{"_index":44,"t":{"75":{"position":[[16,9]]}}}],["licens",{"_index":40,"t":{"69":{"position":[[0,7]]}}}],["line",{"_index":8,"t":{"27":{"position":[[16,4]]}}}],["linear",{"_index":12,"t":{"31":{"position":[[6,6]]}}}],["logic",{"_index":15,"t":{"39":{"position":[[0,7]]}}}],["loop",{"_index":39,"t":{"64":{"position":[[0,4]]}}}],["matrix",{"_index":4,"t":{"3":{"position":[[10,6]]}}}],["messag",{"_index":42,"t":{"75":{"position":[[0,7]]}}}],["method",{"_index":34,"t":{"58":{"position":[[35,6]]},"80":{"position":[[36,6]]},"82":{"position":[[37,6]]}}}],["modul",{"_index":41,"t":{"71":{"position":[[0,7]]}}}],["mont",{"_index":49,"t":{"80":{"position":[[24,5]]},"82":{"position":[[25,5]]}}}],["mpi",{"_index":45,"t":{"75":{"position":[[26,5]]}}}],["number",{"_index":11,"t":{"29":{"position":[[8,6]]},"104":{"position":[[9,7]]}}}],["numer",{"_index":31,"t":{"58":{"position":[[0,9]]}}}],["output",{"_index":24,"t":{"52":{"position":[[13,6]]}}}],["pars",{"_index":6,"t":{"27":{"position":[[0,7]]}}}],["pass",{"_index":43,"t":{"75":{"position":[[8,7]]}}}],["path",{"_index":2,"t":{"1":{"position":[[23,4]]}}}],["pi",{"_index":53,"t":{"82":{"position":[[19,2]]}}}],["pointer",{"_index":54,"t":{"84":{"position":[[0,7]]}}}],["procedur",{"_index":56,"t":{"92":{"position":[[0,10]]}}}],["product",{"_index":28,"t":{"56":{"position":[[6,8]]}}}],["recurs",{"_index":55,"t":{"86":{"position":[[0,9]]}}}],["resourc",{"_index":57,"t":{"102":{"position":[[0,9]]}}}],["set",{"_index":61,"t":{"108":{"position":[[0,7]]}}}],["subprogram",{"_index":14,"t":{"31":{"position":[[21,11]]}}}],["subroutin",{"_index":38,"t":{"62":{"position":[[33,10]]}}}],["swap",{"_index":58,"t":{"104":{"position":[[0,4]]}}}],["system/extern",{"_index":20,"t":{"50":{"position":[[8,15]]}}}],["time",{"_index":60,"t":{"106":{"position":[[0,4]]}}}],["trapezoid",{"_index":33,"t":{"58":{"position":[[23,11]]}}}],["two",{"_index":59,"t":{"104":{"position":[[5,3]]}}}],["type",{"_index":65,"t":{"110":{"position":[[7,5]]}}}],["under",{"_index":47,"t":{"80":{"position":[[5,5]]}}}],["up",{"_index":62,"t":{"108":{"position":[[8,2]]}}}],["valu",{"_index":52,"t":{"82":{"position":[[10,5]]}}}]],"pipeline":["stemmer"]}},{"documents":[{"i":7,"t":"Names","u":"/fortran/basics","h":"#names","p":5},{"i":9,"t":"Types","u":"/fortran/basics","h":"#types","p":5},{"i":11,"t":"Variables","u":"/fortran/basics","h":"#variables","p":5},{"i":13,"t":"Constants","u":"/fortran/basics","h":"#constants","p":5},{"i":15,"t":"KIND type parameter","u":"/fortran/basics","h":"#kind-type-parameter","p":5},{"i":17,"t":"Implicit typing","u":"/fortran/basics","h":"#implicit-typing","p":5},{"i":19,"t":"Intrinsic functions","u":"/fortran/basics","h":"#intrinsic-functions","p":5},{"i":21,"t":"Mathematical functions","u":"/fortran/basics","h":"#mathematical-functions","p":5},{"i":23,"t":"Reading multiple inputs","u":"/fortran/basics","h":"#reading-multiple-inputs","p":5},{"i":25,"t":"Formatting output","u":"/fortran/basics","h":"#formatting-output","p":5},{"i":33,"t":"Scaler product (SDOT)","u":"/fortran/blas","h":"#scaler-product-sdot","p":31},{"i":35,"t":"Matrix multiplication (DGEMM)","u":"/fortran/blas","h":"#matrix-multiplication-dgemm","p":31},{"i":37,"t":"Resources","u":"/fortran/blas","h":"#resources","p":31},{"i":41,"t":"IF condition","u":"/fortran/control","h":"#if-condition","p":39},{"i":43,"t":"Multi-way IFs","u":"/fortran/control","h":"#multi-way-ifs","p":39},{"i":45,"t":"Select case","u":"/fortran/control","h":"#select-case","p":39},{"i":48,"t":"Resouces","u":"/fortran/coarray","h":"#resouces","p":47},{"i":60,"t":"Numerical integration II","u":"/fortran/integration","h":"#numerical-integration-ii","p":58},{"i":65,"t":"DO Loop","u":"/fortran/loop","h":"#do-loop","p":64},{"i":67,"t":"DO WHILE","u":"/fortran/loop","h":"#do-while","p":64},{"i":73,"t":"USE keyword","u":"/fortran/modules","h":"#use-keyword","p":71},{"i":76,"t":"MPI Hello World","u":"/fortran/mpi","h":"#mpi-hello-world","p":75},{"i":78,"t":"Resources","u":"/fortran/mpi","h":"#resources","p":75},{"i":88,"t":"Recursive subroutine","u":"/fortran/recursion","h":"#recursive-subroutine","p":86},{"i":90,"t":"Recursive function","u":"/fortran/recursion","h":"#recursive-function","p":86},{"i":94,"t":"Subroutine","u":"/fortran/procedures","h":"#subroutine","p":92},{"i":96,"t":"Function","u":"/fortran/procedures","h":"#function","p":92},{"i":98,"t":"Pure procedures and side effects","u":"/fortran/procedures","h":"#pure-procedures-and-side-effects","p":92},{"i":100,"t":"Interface blocks","u":"/fortran/procedures","h":"#interface-blocks","p":92},{"i":111,"t":"Custom data types","u":"/fortran/types","h":"#custom-data-types","p":110},{"i":113,"t":"Polymorphism","u":"/fortran/types","h":"#polymorphism","p":110}],"index":{"version":"2.3.9","fields":["t"],"fieldVectors":[["t/7",[0,3.78]],["t/9",[1,2.423]],["t/11",[2,3.78]],["t/13",[3,3.78]],["t/15",[1,1.573,4,2.454,5,2.454]],["t/17",[1,1.908,6,2.976]],["t/19",[7,2.976,8,1.908]],["t/21",[8,1.908,9,2.976]],["t/23",[10,2.454,11,2.045,12,2.454]],["t/25",[13,2.976,14,2.976]],["t/33",[15,2.454,16,2.454,17,2.454]],["t/35",[11,2.045,18,2.454,19,2.454]],["t/37",[20,3.149]],["t/41",[21,3.78]],["t/43",[22,2.454,23,2.454,24,2.454]],["t/45",[25,2.976,26,2.976]],["t/48",[27,3.78]],["t/60",[28,2.454,29,2.454,30,2.454]],["t/65",[31,3.78]],["t/67",[]],["t/73",[32,2.976,33,2.976]],["t/76",[34,2.454,35,2.454,36,2.454]],["t/78",[20,3.149]],["t/88",[37,2.479,38,2.479]],["t/90",[8,1.908,37,2.479]],["t/94",[38,3.149]],["t/96",[8,2.423]],["t/98",[39,2.088,40,2.088,41,2.088,42,2.088]],["t/100",[43,2.976,44,2.976]],["t/111",[1,1.573,45,2.454,46,2.454]],["t/113",[47,3.78]]],"invertedIndex":[["block",{"_index":44,"t":{"100":{"position":[[10,6]]}}}],["case",{"_index":26,"t":{"45":{"position":[[7,4]]}}}],["condit",{"_index":21,"t":{"41":{"position":[[3,9]]}}}],["constant",{"_index":3,"t":{"13":{"position":[[0,9]]}}}],["custom",{"_index":45,"t":{"111":{"position":[[0,6]]}}}],["data",{"_index":46,"t":{"111":{"position":[[7,4]]}}}],["dgemm",{"_index":19,"t":{"35":{"position":[[22,7]]}}}],["effect",{"_index":42,"t":{"98":{"position":[[25,7]]}}}],["format",{"_index":13,"t":{"25":{"position":[[0,10]]}}}],["function",{"_index":8,"t":{"19":{"position":[[10,9]]},"21":{"position":[[13,9]]},"90":{"position":[[10,8]]},"96":{"position":[[0,8]]}}}],["hello",{"_index":35,"t":{"76":{"position":[[4,5]]}}}],["if",{"_index":24,"t":{"43":{"position":[[10,3]]}}}],["ii",{"_index":30,"t":{"60":{"position":[[22,2]]}}}],["implicit",{"_index":6,"t":{"17":{"position":[[0,8]]}}}],["input",{"_index":12,"t":{"23":{"position":[[17,6]]}}}],["integr",{"_index":29,"t":{"60":{"position":[[10,11]]}}}],["interfac",{"_index":43,"t":{"100":{"position":[[0,9]]}}}],["intrins",{"_index":7,"t":{"19":{"position":[[0,9]]}}}],["keyword",{"_index":33,"t":{"73":{"position":[[4,7]]}}}],["kind",{"_index":4,"t":{"15":{"position":[[0,4]]}}}],["loop",{"_index":31,"t":{"65":{"position":[[3,4]]}}}],["mathemat",{"_index":9,"t":{"21":{"position":[[0,12]]}}}],["matrix",{"_index":18,"t":{"35":{"position":[[0,6]]}}}],["mpi",{"_index":34,"t":{"76":{"position":[[0,3]]}}}],["multi",{"_index":22,"t":{"43":{"position":[[0,5]]}}}],["multipl",{"_index":11,"t":{"23":{"position":[[8,8]]},"35":{"position":[[7,14]]}}}],["name",{"_index":0,"t":{"7":{"position":[[0,5]]}}}],["numer",{"_index":28,"t":{"60":{"position":[[0,9]]}}}],["output",{"_index":14,"t":{"25":{"position":[[11,6]]}}}],["paramet",{"_index":5,"t":{"15":{"position":[[10,9]]}}}],["polymorph",{"_index":47,"t":{"113":{"position":[[0,12]]}}}],["procedur",{"_index":40,"t":{"98":{"position":[[5,10]]}}}],["product",{"_index":16,"t":{"33":{"position":[[7,7]]}}}],["pure",{"_index":39,"t":{"98":{"position":[[0,4]]}}}],["read",{"_index":10,"t":{"23":{"position":[[0,7]]}}}],["recurs",{"_index":37,"t":{"88":{"position":[[0,9]]},"90":{"position":[[0,9]]}}}],["resouc",{"_index":27,"t":{"48":{"position":[[0,8]]}}}],["resourc",{"_index":20,"t":{"37":{"position":[[0,9]]},"78":{"position":[[0,9]]}}}],["scaler",{"_index":15,"t":{"33":{"position":[[0,6]]}}}],["sdot",{"_index":17,"t":{"33":{"position":[[15,6]]}}}],["select",{"_index":25,"t":{"45":{"position":[[0,6]]}}}],["side",{"_index":41,"t":{"98":{"position":[[20,4]]}}}],["subroutin",{"_index":38,"t":{"88":{"position":[[10,10]]},"94":{"position":[[0,10]]}}}],["type",{"_index":1,"t":{"9":{"position":[[0,5]]},"15":{"position":[[5,4]]},"17":{"position":[[9,6]]},"111":{"position":[[12,5]]}}}],["us",{"_index":32,"t":{"73":{"position":[[0,3]]}}}],["variabl",{"_index":2,"t":{"11":{"position":[[0,9]]}}}],["way",{"_index":23,"t":{"43":{"position":[[6,3]]}}}],["world",{"_index":36,"t":{"76":{"position":[[10,5]]}}}]],"pipeline":["stemmer"]}},{"documents":[{"i":1,"t":"Here is a function to convert filenames to their absolute path:","s":"Function: Get absolute path","u":"/fortran/abs-path","p":1},{"i":3,"t":"There is intrinsic SIZE function to determine the length of a vector, SIZE(vec).","s":"Array and Matrix","u":"/fortran/array","p":3},{"i":5,"t":"We will learn by doing. Let us start by writing a simple program that asks for","s":"Basics","u":"/fortran/basics","p":5},{"i":27,"t":"We will use commandargumentcount and getcommandargument to parse command","s":"Parsing command-line arguments","u":"/fortran/arg-parsing","p":27},{"i":29,"t":"Basic usage of complex number in FORTRAN program.","s":"Complex number","u":"/fortran/complex","p":29},{"i":31,"t":"Install BLAS and [LAPACK](","s":"Basic Linear Algebra Subprograms","u":"/fortran/blas","p":31},{"i":39,"t":"Operators | Meaning","s":"Logical expression and control","u":"/fortran/control","p":39},{"i":47,"t":"Resouces","s":"Coarray","u":"/fortran/coarray","p":47},{"i":50,"t":"We can call executecommandline to execute external commands in a FORTRAN","s":"Execute system/external command","u":"/fortran/exec-command","p":50},{"i":52,"t":"Here we will generate some data and write it to a file:","s":"File Input / Output","u":"/fortran/file","p":52},{"i":54,"t":"Determine the distance between two places on earth given latitude and longitude.","s":"Haversine formula","u":"/fortran/haversine","p":54},{"i":56,"t":"Example of dynamic array allocation:","s":"Inner product: dynamic array allocation","u":"/fortran/inner-product","p":56},{"i":58,"t":"We will calculate the area under the curve $f(x)$ within the bounds $x=a$ and","s":"Numerical integration: Trapezoidal method","u":"/fortran/integration","p":58},{"i":62,"t":"Hypotenuse can be calculated using following formula:","s":"Calculate hypotenuse: example of subroutine","u":"/fortran/hypotenuse","p":62},{"i":64,"t":"DO Loop","s":"Loop","u":"/fortran/loop","p":64},{"i":69,"t":"CC-BY","s":"License","u":"/fortran/license","p":69},{"i":71,"t":"Large programs can be organized in separate modules and procedures. Here is an","s":"Modules","u":"/fortran/modules","p":71},{"i":75,"t":"MPI Hello World","s":"Message Passing Interface (MPI) Basics","u":"/fortran/mpi","p":75},{"i":82,"t":"We will approximate value of $\\pi$ by Monte Carlo method. We will generate","s":"Determine value of pi by Monte Carlo method","u":"/fortran/monte-carlo-pi","p":82},{"i":84,"t":"Pointer in FORTRAN is an alias to a variable or procedure.","s":"Pointer","u":"/fortran/pointer","p":84},{"i":86,"t":"Ordinary FORTRAN procedures (subroutine and function) are not recursive, i.e.,","s":"Recursion","u":"/fortran/recursion","p":86},{"i":92,"t":"There are two types of procedures in Fortran: subroutines and functions. All","s":"Procedures","u":"/fortran/procedures","p":92},{"i":102,"t":"-  Fortran Programming Manual by Tanja van Mourik","s":"Resources","u":"/fortran/resources","p":102},{"i":104,"t":"Subroutine to swap two integers:","s":"Swap two numbers","u":"/fortran/swap","p":104},{"i":106,"t":"Following example uses dateandtime and cup_time to find current date and","s":"Time","u":"/fortran/time","p":106},{"i":108,"t":"FORTRAN is optimized for high performance scientific computing. I will be","s":"Setting up Fortran","u":"/fortran/","p":108},{"i":110,"t":"Custom data types","s":"Custom types","u":"/fortran/types","p":110}],"index":{"version":"2.3.9","fields":["t"],"fieldVectors":[["t/1",[0,1.948,1,1.712,2,2.741,3,2.741,4,2.741,5,2.741]],["t/3",[1,1.594,6,2.551,7,2.551,8,2.106,9,2.551,10,2.551,11,2.551]],["t/5",[12,2.551,13,2.551,14,2.551,15,2.106,16,2.551,17,1.594,18,2.551]],["t/27",[19,2.104,20,2.962,21,2.962,22,2.962,23,2.445]],["t/29",[17,1.712,24,2.741,25,2.741,26,2.741,27,2.741,28,1.234]],["t/31",[29,3.529,30,3.529,31,3.529]],["t/39",[32,3.529,33,3.529,34,3.529]],["t/47",[35,4.366]],["t/50",[23,2.263,28,1.234,36,2.741,37,2.741,38,2.741,39,2.741]],["t/52",[0,2.104,15,2.445,40,2.445,41,2.445,42,2.962]],["t/54",[8,1.85,43,2.241,44,2.241,45,1.592,46,2.241,47,2.241,48,2.241,49,2.241,50,2.241]],["t/56",[51,2.658,52,3.221,53,3.221,54,3.221]],["t/58",[55,1.97,56,2.386,57,2.386,58,2.386,59,2.386,60,2.386,61,2.386,62,2.386]],["t/62",[19,2.104,55,2.445,63,2.962,64,2.445,65,2.962]],["t/64",[66,4.366]],["t/69",[67,4.366]],["t/71",[0,1.813,17,1.594,68,2.551,69,2.551,70,2.551,71,2.551,72,1.594]],["t/75",[73,3.529,74,3.529,75,3.529]],["t/82",[40,2.106,76,2.551,77,2.551,78,2.551,79,2.551,80,2.551,81,2.551]],["t/84",[28,1.333,72,1.85,82,2.962,83,2.962,84,2.962]],["t/86",[1,1.594,28,1.148,72,1.594,85,2.551,86,1.813,87,2.551,88,2.551]],["t/92",[1,1.712,28,1.234,45,1.948,72,1.712,86,1.948,89,2.263]],["t/102",[17,1.712,28,1.234,90,2.741,91,2.741,92,2.741,93,2.741]],["t/104",[45,2.288,86,2.288,94,3.221,95,3.221]],["t/106",[19,1.695,51,1.97,64,1.97,96,2.386,97,2.386,98,2.386,99,2.386,100,2.386]],["t/108",[28,1.234,101,2.741,102,2.741,103,2.741,104,2.741,105,2.741]],["t/110",[41,2.913,89,2.913,106,3.529]]],"invertedIndex":[["",{"_index":33,"t":{"39":{"position":[[10,1]]}}}],["absolut",{"_index":4,"t":{"1":{"position":[[49,8]]}}}],["alia",{"_index":83,"t":{"84":{"position":[[25,5]]}}}],["alloc",{"_index":54,"t":{"56":{"position":[[25,11]]}}}],["approxim",{"_index":76,"t":{"82":{"position":[[8,11]]}}}],["area",{"_index":56,"t":{"58":{"position":[[22,4]]}}}],["array",{"_index":53,"t":{"56":{"position":[[19,5]]}}}],["ask",{"_index":18,"t":{"5":{"position":[[70,4]]}}}],["basic",{"_index":24,"t":{"29":{"position":[[0,5]]}}}],["between",{"_index":44,"t":{"54":{"position":[[23,7]]}}}],["bla",{"_index":30,"t":{"31":{"position":[[8,4]]}}}],["bound",{"_index":61,"t":{"58":{"position":[[61,6]]}}}],["calcul",{"_index":55,"t":{"58":{"position":[[8,9]]},"62":{"position":[[18,10]]}}}],["call",{"_index":36,"t":{"50":{"position":[[7,4]]}}}],["carlo",{"_index":80,"t":{"82":{"position":[[44,5]]}}}],["cc",{"_index":67,"t":{"69":{"position":[[0,2]]}}}],["command",{"_index":23,"t":{"27":{"position":[[65,7]]},"50":{"position":[[51,8]]}}}],["commandargumentcount",{"_index":20,"t":{"27":{"position":[[12,20]]}}}],["complex",{"_index":26,"t":{"29":{"position":[[15,7]]}}}],["comput",{"_index":105,"t":{"108":{"position":[[53,10]]}}}],["convert",{"_index":2,"t":{"1":{"position":[[22,7]]}}}],["cup_tim",{"_index":97,"t":{"106":{"position":[[39,8]]}}}],["current",{"_index":99,"t":{"106":{"position":[[56,7]]}}}],["curv",{"_index":58,"t":{"58":{"position":[[37,5]]}}}],["custom",{"_index":106,"t":{"110":{"position":[[0,6]]}}}],["data",{"_index":41,"t":{"52":{"position":[[27,4]]},"110":{"position":[[7,4]]}}}],["date",{"_index":100,"t":{"106":{"position":[[64,4]]}}}],["dateandtim",{"_index":96,"t":{"106":{"position":[[23,11]]}}}],["determin",{"_index":8,"t":{"3":{"position":[[36,9]]},"54":{"position":[[0,9]]}}}],["distanc",{"_index":43,"t":{"54":{"position":[[14,8]]}}}],["do",{"_index":13,"t":{"5":{"position":[[17,6]]}}}],["dynam",{"_index":52,"t":{"56":{"position":[[11,7]]}}}],["earth",{"_index":47,"t":{"54":{"position":[[45,5]]}}}],["exampl",{"_index":51,"t":{"56":{"position":[[0,7]]},"106":{"position":[[10,7]]}}}],["execut",{"_index":38,"t":{"50":{"position":[[34,7]]}}}],["executecommandlin",{"_index":37,"t":{"50":{"position":[[12,18]]}}}],["extern",{"_index":39,"t":{"50":{"position":[[42,8]]}}}],["f(x",{"_index":59,"t":{"58":{"position":[[43,6]]}}}],["file",{"_index":42,"t":{"52":{"position":[[50,5]]}}}],["filenam",{"_index":3,"t":{"1":{"position":[[30,9]]}}}],["find",{"_index":98,"t":{"106":{"position":[[51,4]]}}}],["follow",{"_index":64,"t":{"62":{"position":[[35,9]]},"106":{"position":[[0,9]]}}}],["formula",{"_index":65,"t":{"62":{"position":[[45,8]]}}}],["fortran",{"_index":28,"t":{"29":{"position":[[33,7]]},"50":{"position":[[65,7]]},"84":{"position":[[11,7]]},"86":{"position":[[9,7]]},"92":{"position":[[37,8]]},"102":{"position":[[3,7]]},"108":{"position":[[0,7]]}}}],["function",{"_index":1,"t":{"1":{"position":[[10,8]]},"3":{"position":[[24,8]]},"86":{"position":[[44,9]]},"92":{"position":[[62,10]]}}}],["gener",{"_index":40,"t":{"52":{"position":[[13,8]]},"82":{"position":[[66,8]]}}}],["getcommandargu",{"_index":21,"t":{"27":{"position":[[37,18]]}}}],["given",{"_index":48,"t":{"54":{"position":[[51,5]]}}}],["hello",{"_index":74,"t":{"75":{"position":[[4,5]]}}}],["here",{"_index":0,"t":{"1":{"position":[[0,4]]},"52":{"position":[[0,4]]},"71":{"position":[[68,4]]}}}],["high",{"_index":102,"t":{"108":{"position":[[25,4]]}}}],["hypotenus",{"_index":63,"t":{"62":{"position":[[0,10]]}}}],["i.",{"_index":88,"t":{"86":{"position":[[73,5]]}}}],["instal",{"_index":29,"t":{"31":{"position":[[0,7]]}}}],["integ",{"_index":95,"t":{"104":{"position":[[23,9]]}}}],["intrins",{"_index":6,"t":{"3":{"position":[[9,9]]}}}],["lapack",{"_index":31,"t":{"31":{"position":[[17,9]]}}}],["larg",{"_index":68,"t":{"71":{"position":[[0,5]]}}}],["latitud",{"_index":49,"t":{"54":{"position":[[57,8]]}}}],["learn",{"_index":12,"t":{"5":{"position":[[8,5]]}}}],["length",{"_index":9,"t":{"3":{"position":[[50,6]]}}}],["longitud",{"_index":50,"t":{"54":{"position":[[70,10]]}}}],["loop",{"_index":66,"t":{"64":{"position":[[3,4]]}}}],["manual",{"_index":90,"t":{"102":{"position":[[23,6]]}}}],["mean",{"_index":34,"t":{"39":{"position":[[12,7]]}}}],["method",{"_index":81,"t":{"82":{"position":[[50,7]]}}}],["modul",{"_index":71,"t":{"71":{"position":[[44,7]]}}}],["mont",{"_index":79,"t":{"82":{"position":[[38,5]]}}}],["mourik",{"_index":93,"t":{"102":{"position":[[43,6]]}}}],["mpi",{"_index":73,"t":{"75":{"position":[[0,3]]}}}],["number",{"_index":27,"t":{"29":{"position":[[23,6]]}}}],["oper",{"_index":32,"t":{"39":{"position":[[0,9]]}}}],["optim",{"_index":101,"t":{"108":{"position":[[11,9]]}}}],["ordinari",{"_index":85,"t":{"86":{"position":[[0,8]]}}}],["organ",{"_index":69,"t":{"71":{"position":[[22,9]]}}}],["pars",{"_index":22,"t":{"27":{"position":[[59,5]]}}}],["path",{"_index":5,"t":{"1":{"position":[[58,5]]}}}],["perform",{"_index":103,"t":{"108":{"position":[[30,11]]}}}],["pi",{"_index":78,"t":{"82":{"position":[[29,5]]}}}],["place",{"_index":46,"t":{"54":{"position":[[35,6]]}}}],["pointer",{"_index":82,"t":{"84":{"position":[[0,7]]}}}],["procedur",{"_index":72,"t":{"71":{"position":[[56,11]]},"84":{"position":[[48,10]]},"86":{"position":[[17,10]]},"92":{"position":[[23,10]]}}}],["program",{"_index":17,"t":{"5":{"position":[[57,7]]},"29":{"position":[[41,8]]},"71":{"position":[[6,8]]},"102":{"position":[[11,11]]}}}],["recurs",{"_index":87,"t":{"86":{"position":[[62,10]]}}}],["resouc",{"_index":35,"t":{"47":{"position":[[0,8]]}}}],["scientif",{"_index":104,"t":{"108":{"position":[[42,10]]}}}],["separ",{"_index":70,"t":{"71":{"position":[[35,8]]}}}],["simpl",{"_index":16,"t":{"5":{"position":[[50,6]]}}}],["size",{"_index":7,"t":{"3":{"position":[[19,4]]}}}],["size(vec",{"_index":11,"t":{"3":{"position":[[70,10]]}}}],["start",{"_index":14,"t":{"5":{"position":[[31,5]]}}}],["subroutin",{"_index":86,"t":{"86":{"position":[[28,11]]},"92":{"position":[[46,11]]},"104":{"position":[[0,10]]}}}],["swap",{"_index":94,"t":{"104":{"position":[[14,4]]}}}],["tanja",{"_index":91,"t":{"102":{"position":[[33,5]]}}}],["two",{"_index":45,"t":{"54":{"position":[[31,3]]},"92":{"position":[[10,3]]},"104":{"position":[[19,3]]}}}],["type",{"_index":89,"t":{"92":{"position":[[14,5]]},"110":{"position":[[12,5]]}}}],["under",{"_index":57,"t":{"58":{"position":[[27,5]]}}}],["us",{"_index":19,"t":{"27":{"position":[[8,3]]},"62":{"position":[[29,5]]},"106":{"position":[[18,4]]}}}],["usag",{"_index":25,"t":{"29":{"position":[[6,5]]}}}],["valu",{"_index":77,"t":{"82":{"position":[[20,5]]}}}],["van",{"_index":92,"t":{"102":{"position":[[39,3]]}}}],["variabl",{"_index":84,"t":{"84":{"position":[[36,8]]}}}],["vector",{"_index":10,"t":{"3":{"position":[[62,7]]}}}],["within",{"_index":60,"t":{"58":{"position":[[50,6]]}}}],["world",{"_index":75,"t":{"75":{"position":[[10,5]]}}}],["write",{"_index":15,"t":{"5":{"position":[[40,7]]},"52":{"position":[[36,5]]}}}],["x=a",{"_index":62,"t":{"58":{"position":[[68,5]]}}}]],"pipeline":["stemmer"]}},{"documents":[{"i":108,"t":"fortran programming,scientific programming,numerical programming,numerical integration","s":"Setting up Fortran","u":"/fortran/","p":108}],"index":{"version":"2.3.9","fields":["t"],"fieldVectors":[["t/108",[0,0.288,1,0.288,2,0.396,3,0.288]]],"invertedIndex":[["fortran",{"_index":0,"t":{"108":{"position":[[0,7]]}}}],["integr",{"_index":3,"t":{"108":{"position":[[75,11]]}}}],["programming,numer",{"_index":2,"t":{"108":{"position":[[31,21],[53,21]]}}}],["programming,scientif",{"_index":1,"t":{"108":{"position":[[8,22]]}}}]],"pipeline":["stemmer"]}},{"documents":[{"i":2,"t":"Here is a function to convert filenames to their absolute path: src/15_get_abs_path.f90 PROGRAM print_abs_path IMPLICIT NONE CHARACTER(LEN=128) :: input_path, abs_path, get_abs_path PRINT \"(a,$)\", 'Enter file name: ' READ (*,\"(a128)\") input_path abs_path = get_abs_path(input_path) PRINT *, 'Absolute PATH: ', abs_path END PROGRAM print_abs_path CHARACTER(LEN=128) FUNCTION get_abs_path(input_path) IMPLICIT NONE CHARACTER(LEN=128), INTENT(IN) :: input_path CHARACTER(LEN=128) :: PREFIX IF (input_path(1:1) == '/' ) THEN get_abs_path = input_path ELSE IF (input_path(1:2) == '~/' ) THEN CALL GETENV('HOME', PREFIX) get_abs_path = PREFIX(:LNBLNK(PREFIX)) // input_path(2:LNBLNK(input_path)) ELSE CALL GETCWD(PREFIX) get_abs_path = PREFIX(:LNBLNK(PREFIX)) // '/' // input_path(:LNBLNK(input_path)) ENDIF RETURN END FUNCTION get_abs_path","s":"Function: Get absolute path","u":"/fortran/abs-path","h":"","p":1},{"i":4,"t":"src/05_array.f90 ! Program : Array PROGRAM array IMPLICIT NONE INTEGER :: vec(10) INTEGER :: ii OUTER_LOOP : DO ii = 1, 10 vec(ii) = ii ENDDO OUTER_LOOP DO ii = 1, 10 PRINT '(i2)', vec(ii) ENDDO END PROGRAM array There is intrinsic SIZE function to determine the length of a vector, SIZE(vec). Another example where we use implied DO loop to assign an array: src/05_array2.f90 PROGRAM array2 IMPLICIT NONE INTEGER, DIMENSION(10) :: vec INTEGER :: ii vec = [(ii, ii = 1, 10)] DO ii = 1, SIZE(vec) PRINT '(i2)', vec(ii) ENDDO END PROGRAM array2 Dynamic array allocation with ALLOCATABLE: INTEGER, DIMENSION(:), ALLOCATABLE :: a INTEGER i a = [(i, i = 1, 10)] DEALLOCATE(a) See dynamic array allocation in this example. Assign high dimensional array with RESHAPE: a = RESHAPE([1, 2, 3, 4, 5, 6], [2, 3]) ! will produce ! 1 3 5 ! 2 4 6 a = RESHAPE([1, 2, 3, 4, 5, 6], [2, 3], order=[2, 1]) ! will produce ! 1 2 3 ! 4 5 6 Matrix multiplication: src/05_matrix_mult.f90 ! Program : Matrix multiplication PROGRAM matrix_mult IMPLICIT NONE INTEGER, DIMENSION(2, 3) :: A = RESHAPE([1, 2, 3, & 4, 5, 6], & shape(A), & order=[2, 1]) INTEGER, DIMENSION(3, 2) :: B = RESHAPE([1, 2, & 3, 4, & 5, 6], & shape(B), & order=[2, 1]) INTEGER, DIMENSION(2, 2) :: output INTEGER :: ii output = MATMUL(A, B) DO ii = 1, 2 PRINT *, output(ii, :) END DO END PROGRAM matrix_mult You can assign all the array element same value by assigning it a scaler value: INTEGER, DIMENSION(2, 2) :: a a = 1 ! will produce ! 1 1 ! 1 1","s":"Array and Matrix","u":"/fortran/array","h":"","p":3},{"i":6,"t":"We will learn by doing. Let us start by writing a simple program that asks for some user input, performs some arithmetic operations, and returns a result. src/01_add.f90 ! Program : Add two integer numbers PROGRAM add IMPLICIT NONE INTEGER :: a, b, output PRINT *, \"Input a =\" READ *, a PRINT *, \"Input b =\" READ *, b output = a + b PRINT*, \"Output: \", a, \"+\", b, \"=\", output END PROGRAM add info Variable names and keywords in FORTRAN are not case sensitive. You can write keywords in both lowercase or uppercase. For example, implicit and IMPLICIT are the same. Older, f77 specification only allowed uppercase letters. PROGRAM name and file name are not related. We store the above code in a file named: 01_add.f90. We compile and execute the code as follows: gfortran 01_add.f90 ./a.out Now let's write another simple program that converts centimeter to inches: src/02_cm2inch.f90 ! Program : Converting centimeter to inches PROGRAM cm2inch IMPLICIT NONE REAL :: cm, inch PRINT \"(a,$)\", \"Enter length in centimeter = \" READ *, cm inch = cm / 2.54 PRINT *, \"Length in inches = \", inch END PROGRAM cm2inch Calculate the circumference of a circle given the diameter: src/03_circ.f90 ! Program : Calculate the circumference of a circle given the radius. PROGRAM circ IMPLICIT NONE REAL :: r, circum REAL, PARAMETER :: pi = 3.14159 WRITE(*, \"(a)\", advance='NO') \"Enter radius of the circle: \" READ *, r circum = 2 * pi * r PRINT *, \"Circumference of the circle = \", circum END PROGRAM circ Formatting output: src/04_format.f90 ! Program : Formatting output in Fortran PROGRAM format IMPLICIT NONE INTEGER :: no_of_students = 25 REAL :: result1, result2 result1 = SIN(1.23) result2 = 1.234728 * EXP(12.0) PRINT '(i4)', no_of_students ! Interger with 4 spaces for it PRINT '(f6.4)', result1 ! Real number with 6 spaces of ! which 4 for the decimal part PRINT '(e8.2)', result2 ! exponential with 2 spaces for ! decimal part END PROGRAM format Example outputs: WRITE(*, \"(I4)\") 1234 1234 WRITE(*, \"(I8)\") 1234 1234 WRITE(*, \"(I8.6)\") 1234 001234 WRITE(*, \"(F8.4)\") pi 3.1416 WRITE(*, \"(E12.4)\") pi 0.3142E+01 note A comment starts with !. The continuation of a single statement to the next line is done by & at the end of previous line. If you need to break a very long character string, use the concatenation operator //. PRINT *, \"My name is \" // & \"Pranab.\" A single statement can be at max 256 lines long. Also, you can separate multiple statements in a line with semicolon (;).","s":"Basics","u":"/fortran/basics","h":"","p":5},{"i":8,"t":"The names must not be longer than 63 characters, must be composed of alphanumeric characters and underscores, first character must be a letter. Names are case insensitive.","s":"Names","u":"/fortran/basics","h":"#names","p":5},{"i":10,"t":"Integer (example: -2, 0, 10) Real (example: 3.14, 1.2E2, 2.3D-2. D indicates double precision.) Complex (example: 2.0 - 1.5i) Logical (.true., .false.) Character: The length of a string can be specified by len.","s":"Types","u":"/fortran/basics","h":"#types","p":5},{"i":12,"t":"integer :: no_of_students real :: radius, circumference complex :: cx logical :: done character(len=20) :: name","s":"Variables","u":"/fortran/basics","h":"#variables","p":5},{"i":14,"t":"real, parameter :: pi = 3.14159","s":"Constants","u":"/fortran/basics","h":"#constants","p":5},{"i":16,"t":"The KIND type parameters supported by GNU Fortran for the primitive data types are: INTEGER: 1, 2, 4, 8†, 16† (default 4‡) LOGICAL: 1, 2, 4, 8†, 16† (default 4‡) REAL: 4, 8, 10†, 16† (default 4§) COMPLEX: 4, 8, 10†, 16† (default 4§) DOUBLE PRECISION: 4, 8, 10†, 16† (default 8§) CHARACTER: 1, 4 (default 1) † not available on all systems ‡ unless -fdefault-integer-8 is used § unless -fdefault-real-8 is used The KIND value matches the storage size in bytes, except for COMPLEX where the storage size is twice as much (or both real and imaginary part are a real value of the given size). It is recommended to use the SELECTED_CHAR_KIND, SELECTED_INT_KIND and SELECTED_REAL_KIND intrinsics or the INT8, INT16, INT32, INT64, REAL32, REAL64, and REAL128 parameters. Examples of setting double precision: REAL(KIND=KIND(0.0D0)), PARAMETER :: pi = 4 * ATAN(1.0D0) ! or specify decimal precision and exponent range REAL(KIND=SELECTED_REAL_KIND(12, 200)), PARAMETER :: pi = 4 * ATAN(1.0D0) PRINT *, PRECISION(pi), RANGE(pi) ! type conversion REAL(KIND=KIND(0.0D0)) :: x INTEGER :: y y = 1 x = REAL(y, KIND=KIND(0.0D0)) ! integer with range -10^(12) to 10^(12) INTEGER(KIND=SELECTED_INT_KIND(12)) :: large_int","s":"KIND type parameter","u":"/fortran/basics","h":"#kind-type-parameter","p":5},{"i":18,"t":"In Fortran variables need not to be declared beforehand, but this practice should be avoided by IMPLICIT NONE at the top of program. If a variable is not declared, the first letter of its name determines its type. If the name starts with i, j, k, l, m, n, it is considered integer, otherwise real.","s":"Implicit typing","u":"/fortran/basics","h":"#implicit-typing","p":5},{"i":20,"t":"Functions Description abs(x) absolute value of a numerical argument complx(x, y) converts to complex floor(x) greatest integer ≤ x floor(3.2)=3, floor(-4.9)=-5 int(x) converts to integer. int(-4.9)=-4, int(0.2)=0, int(3.3)=3 nint(x [, ikind]) rounds to nearest integer. Optional ikind for precision real(x [, ikind]) converts to real mod(a, p) a - int(a/p)*p modulo(a,p) a - floor(a/p)*p","s":"Intrinsic functions","u":"/fortran/basics","h":"#intrinsic-functions","p":5},{"i":22,"t":"Functions Description sin sine function asin inverse sine sinh sine hyperbolic cos cosine function acos inverse cosine cosh cos hyperbolic tan tangent function atan inverse tan atan2 inverse tangent for complex numbers tanh tan hyperbolic sqrt square root exp exponential log natural logarithm log10 common logarithm","s":"Mathematical functions","u":"/fortran/basics","h":"#mathematical-functions","p":5},{"i":24,"t":"INTEGER :: M, N PRINT '(A,$)', \"Enter matrix dimensions: \" ! inputs must be separated by at least one blank character or comma READ *, M, N","s":"Reading multiple inputs","u":"/fortran/basics","h":"#reading-multiple-inputs","p":5},{"i":26,"t":"PRINT \"(f5.1, es9.1, a, i4)\", 3.5, 1.4e4, \" and \", 12 PRINT \"(2(i4))\", 12, 8 ! same as \"(i4, i4)\" or \"(2i4)\" ! line breaks PRINT \"(a, /, a)\", \"first line\", \"second line\" ! two line breaks: 2/ ! tab editor, second number will be printed in the position 10-13 PRINT \"(i4, t10, i4)\", 3, 5","s":"Formatting output","u":"/fortran/basics","h":"#formatting-output","p":5},{"i":28,"t":"We will use command_argument_count and get_command_argument to parse command line arguments: src/26_arg_parsing.f90 PROGRAM MAIN IMPLICIT NONE INTEGER no_of_commands, i CHARACTER(LEN=32) :: arg REAL :: sum = 0.0, tmp no_of_commands = command_argument_count() PRINT *, \"Number of arguments = \", no_of_commands IF (no_of_commands < 2) THEN PRINT \"(a,/,a)\", \"This program needs at least 2 arguments.\", & \"Usage: program 4 3\" STOP END IF DO i = 1, no_of_commands CALL get_command_argument(i, arg) ! if single argument is expected, use get_command(arg) ! IF (LEN_TRIM(arg) == 0) EXIT ! not required here arg = TRIM(arg) READ(arg,*) tmp ! read strings as real sum = sum + tmp END DO PRINT *, \"Total = \", sum END","s":"Parsing command-line arguments","u":"/fortran/arg-parsing","h":"","p":27},{"i":30,"t":"Basic usage of complex number in FORTRAN program. src/17_complex_number.f90 PROGRAM complex_number IMPLICIT NONE COMPLEX :: z = (2.0, 3.0) COMPLEX :: z1, z2 WRITE (*,*) \"z = \", z WRITE (*,*) \"abs = \", CABS(z) z1 = (1.0, 5.0) WRITE (*,*) \"z1 = \", z1 z2 = CMPLX(1.0, 3.14159) ! double precision: z2 = DCMPLX(1.0, 3.14159) ! arithmetic operations WRITE (*,*) \"z1 + z2 = \", z1 + z2 WRITE (*,*) \"z1 * z2 = \", z1 * z2 ! real and imaginary parts (if real part is integer, use int(z2) instead) WRITE (*,*) \"Real part = \", real(z2) WRITE (*,*) \"Imaginary part = \", imag(z2) ! complex conjugate WRITE (*,*) \"Complex conjugate: \", conjg(z2) END PROGRAM complex_number","s":"Complex number","u":"/fortran/complex","h":"","p":29},{"i":32,"t":"Install BLAS and LAPACK libraries: apt install blaslib-dev lapacklib-dev # compile program gfortran filename.f90 -lblas # in case libs are not in system path gfortran filename.f90 -L/usr/lib -lblas","s":"Basic Linear Algebra Subprograms","u":"/fortran/blas","h":"","p":31},{"i":34,"t":"src/22_blas_sdot.f90 ! SDOT: This function performs a vector-vector operation of computing a scalar ! product of two single-precision real vectors x and y. ! https://netlib.org/blas/#_level_1 ! Compile: gfortran filename.f90 -lblas ! If BLAS is not in system path: gfortran filename.f90 -L/usr/lib -lblas PROGRAM MAIN IMPLICIT NONE INTEGER :: n = 3 ! length of vectors REAL, DIMENSION(:), ALLOCATABLE :: x REAL, DIMENSION(:), ALLOCATABLE :: y INTEGER :: incx = 1, incy = 1 ! incx and incy can be used to manipulate data when both x and y are stored ! in the same array. See the alternate array z REAL z(6) INTEGER :: incxz= 2, incyz = 1 REAL res, SDOT EXTERNAL SDOT ALLOCATE(x(n)) ALLOCATE(y(n)) x(1) = 2.0 x(2) = 1.0 x(3) = 0.0 y(1) = 1.0 y(2) = 3.0 y(3) = 5.0 z(1) = x(1) z(2) = y(1) z(3) = x(2) z(4) = y(2) z(5) = x(3) z(6) = y(3) res = SDOT(n, x, incx, y, incy) PRINT *, \"Result = \", res PRINT *, \"Alt. result = \", SDOT(n, z, incxz, z, incyz) DEALLOCATE(x) DEALLOCATE(y) END","s":"Scaler product (SDOT)","u":"/fortran/blas","h":"#scaler-product-sdot","p":31},{"i":36,"t":"DGEMM calculates the product of double precision matrices: C⇐αA∗B+βCC \\Leftarrow \\alpha A \\ast B + \\beta CC⇐αA∗B+βC src/22_blas_dgemm.f90 PROGRAM MAIN IMPLICIT NONE DOUBLE PRECISION ALPHA, BETA INTEGER M, K, N, I, J PARAMETER (M=2, K=3, N=2) DOUBLE PRECISION A(M,K), B(K,N), C(M,N) ALPHA = 1.0 BETA = 0.0 ! initialize matrices A(1,1) = 2.0 A(1,2) = 3.0 A(1,3) = 9.0 A(2,1) = 0.0 A(2,2) = 4.0 A(2,3) = 1.0 B(1,1) = 4.0 B(1,2) = 1.0 B(2,1) = 4.0 B(2,2) = 5.0 B(3,1) = 9.0 B(3,2) = 6.0 ! optionally initialize C matrix with zeros DO I = 1, M DO J = 1, N C(I,J) = 0.0 END DO END DO CALL DGEMM('N','N', M, N, K, ALPHA, A, M, B, K, BETA, C, M) ! print matrix C DO I = 1, M DO J = 1, N PRINT *, \"C(\", I, \",\", J, \") =\", C(I,J) END DO END DO END","s":"Matrix multiplication (DGEMM)","u":"/fortran/blas","h":"#matrix-multiplication-dgemm","p":31},{"i":38,"t":"Multiplying matrices: Intel MKL example","s":"Resources","u":"/fortran/blas","h":"#resources","p":31},{"i":40,"t":"Operators Meaning .lt. less than .gt. greater than .le. less than or equal to .ge. greater than or equal to .eq. equals .ne. not equal to .and. and .or. or .not. not .xor. \"exclusive\" or .eqv. equivalent .neqv. not equivalent F90 introduced following simplified notation for the relational operators: Operators Meaning < less than > greater than <= less than or equal to >= greater than or equal to == equal to /= not equal to","s":"Logical expression and control","u":"/fortran/control","h":"","p":39},{"i":42,"t":"Calculate square root of real positive numbers: src/06_sq_root.f90 ! Program : Calculate square root PROGRAM sq_root IMPLICIT NONE REAL :: input, output PRINT *, \"Input = \" READ *, input IF (input > 0) THEN output = SQRT(input) PRINT *, \"Square root of \", input, \"= \", output ELSE PRINT *, \"Input must be positive real.\" ENDIF END PROGRAM sq_root","s":"IF condition","u":"/fortran/control","h":"#if-condition","p":39},{"i":44,"t":"src/06_multi_way_if.f90 PROGRAM age_group IMPLICIT NONE INTEGER :: age PRINT \"(a,$)\", \"Enter your age: \" READ *, age IF (age <= 0) THEN PRINT *, \"Error: please enter a positive integer age.\" STOP ELSE IF (age < 18) THEN PRINT *, \"You are not adult.\" ELSE IF (age >= 18 .AND. age < 65) THEN PRINT *, \"You are adult.\" ELSE PRINT *, \"You are senior.\" END IF END PROGRAM age_group Notice also the STOP keyword in above example.","s":"Multi-way IFs","u":"/fortran/control","h":"#multi-way-ifs","p":39},{"i":46,"t":"src/06_select_case.f90 PROGRAM age_select IMPLICIT NONE INTEGER :: age PRINT \"(a,$)\", \"Enter your age: \" READ *, age SELECT CASE (age) CASE DEFAULT PRINT *, \"You are not adult.\" CASE(18:64) PRINT *, \"You are adult.\" CASE(65:) PRINT *, \"You are senior.\" END SELECT END PROGRAM age_select","s":"Select case","u":"/fortran/control","h":"#select-case","p":39},{"i":49,"t":"https://annefou.github.io/Fortran/coarrays/coarrays.html","s":"Resouces","u":"/fortran/coarray","h":"#resouces","p":47},{"i":51,"t":"We can call execute_command_line to execute external commands in a FORTRAN program: src/27_exec_command.f90 PROGRAM MAIN IMPLICIT NONE INTEGER exit_code ! Execute system command PRINT *, \"Executing: ls\" CALL execute_command_line(\"ls\") PRINT *, \"Executing: du -hs .\" CALL execute_command_line(\"du -hs .\", exitstat=exit_code) PRINT *, \"Exit code: \", exit_code END","s":"Execute system/external command","u":"/fortran/exec-command","h":"","p":50},{"i":53,"t":"Here we will generate some data and write it to a file: src/08_file_write.f90 ! Program : Write output to a file PROGRAM file_write IMPLICIT NONE INTEGER :: ii OPEN(unit=1, file='output.dat', status='new') DO ii = 1, 10 WRITE(1, '(i4)') ii*ii ENDDO CLOSE(unit=1) END PROGRAM file_write info Note that unit=0, 5, and 6 are reserved. Do not use them to identify files in your programs. Reading from file: we will read the data from file that is generated in the above example. src/09_file_read.f90 ! Program : Read data from file PROGRAM file_read IMPLICIT NONE INTEGER :: ii, data(10) OPEN(unit=1, file='output.dat', status='old') DO ii = 1, 10 READ(1, '(i4)') data(ii) END DO CLOSE(unit=1) DO ii = 1, 10 PRINT '(i3)', data(ii) END DO END PROGRAM file_read","s":"File Input / Output","u":"/fortran/file","h":"","p":52},{"i":55,"t":"Determine the distance between two places on earth given latitude and longitude. Read more about haversine formula in wikipedia page. src/18_haversine_formula.f90 ! calculate the distance between two points on earch/sphere given latitude ! and longitude ! haversine is defined as: hav(theta) = sin^2(theta/2) = (1 - cos(theta))/2 ! test: BNA(36.12,-86.67), LAX(33.94,-118.40), Distance 2889.6612 km PROGRAM haversine_formula IMPLICIT NONE INTEGER, PARAMETER :: DP = KIND(1.0D0) REAL(DP), PARAMETER :: RADIUS_OF_EARTH = 6.3781D6 REAL(DP) :: lat1 = 0.0_DP REAL(DP) :: lon1 = 0.0_DP REAL(DP) :: lat2 = 0.0_DP REAL(DP) :: lon2 = 0.0_DP REAL(DP) :: a, dist PRINT \"(a,$)\", \"Latitude of point A = \" READ *, lat1 PRINT \"(a,$)\", \"Longitude of point A = \" READ *, lon1 PRINT \"(a,$)\", \"Latitude of point B = \" READ *, lat2 PRINT \"(a,$)\", \"Longitude of point B = \" READ *, lon2 lat1 = deg2rad(lat1) lon1 = deg2rad(lon1) lat2 = deg2rad(lat2) lon2 = deg2rad(lon2) a = (SIN((lat1 - lat2)/2))**2 + COS(lat1) * COS(lat2) * & (SIN((lon1 - lon2)/2))**2 dist = 2 * RADIUS_OF_EARTH * ASIN(SQRT(a)) PRINT '(A,F12.4,A)', 'Distance: ', dist / 1000,' km' CONTAINS FUNCTION deg2rad(degree) RESULT(rad) ! degrees to radians REAL(KIND=KIND(0.0D0)), INTENT(IN) :: degree REAL(KIND=KIND(0.0D0)), PARAMETER :: deg_to_rad = ATAN(1.0) / 45 REAL(KIND=KIND(0.0D0)) :: rad rad = degree * deg_to_rad END FUNCTION deg2rad END PROGRAM haversine_formula","s":"Haversine formula","u":"/fortran/haversine","h":"","p":54},{"i":57,"t":"Example of dynamic array allocation: src/19_inner_product.f90 PROGRAM inner_product IMPLICIT NONE INTEGER length REAL, DIMENSION(:), ALLOCATABLE :: a REAL, DIMENSION(:), ALLOCATABLE :: b INTEGER i REAL :: sum = 0.0 PRINT \"(a,$)\", \"Enter length of vectors: \" READ *, length IF ( length < 1 ) then PRINT *, \"Stopping: length must be positive definite.\" STOP END IF ALLOCATE(a(length)) ALLOCATE(b(length)) PRINT *, \"Enter first array components:\" DO i = 1, length PRINT '(A,I4,A,$)', 'a[', i,'] = ' READ *, a(i) END DO PRINT *, \"Enter second array components:\" DO i = 1, length PRINT '(A,I4,A,$)', 'a[', i,'] = ' READ *, b(i) END DO DO i = 1, length sum = sum + a(i) * b(i) END DO PRINT '(A,F8.4)', 'Inner product = ', sum ! we can use in-built dot_product as well PRINT '(A,F8.4)', \"Result using in-built dot_product = \", dot_product(a, b) DEALLOCATE(a) DEALLOCATE(b) END PROGRAM inner_product","s":"Inner product: dynamic array allocation","u":"/fortran/inner-product","h":"","p":56},{"i":59,"t":"We will calculate the area under the curve f(x)f(x)f(x) within the bounds x=ax=ax=a and x=bx=bx=b. We will divide the curve into nnn trapezoids with width h=(b−a)/nh=(b-a)/nh=(b−a)/n. Area under the curve: An=h[f(a)2+f(a+h)+f(a+2h)+⋯+f(b)2]A_n = h \\left[\\frac{f(a)}{2} + f(a+h) + f(a+2h) + \\cdots + \\frac{f(b)}{2}\\right]An​=h[2f(a)​+f(a+h)+f(a+2h)+⋯+2f(b)​] src/10_trapezoid.f90 ! Caculate the area of sine curve using trapezoidal method PROGRAM trapezoid IMPLICIT none INTRINSIC :: sin REAL :: a, b, h, area INTEGER :: i, n n = 100 a = 0 b = 3.14 h = (b - a) / n area = 0.5 * (sin(a) + sin(b)) DO i = 1, n-1 area = area + sin(a + i*h) END DO area = h * area PRINT *, \"Area = \", area END PROGRAM trapezoid","s":"Numerical integration: Trapezoidal method","u":"/fortran/integration","h":"","p":58},{"i":61,"t":"We will try to improve above numerical integration code. Previously we had the integration function hard coded, now we will pass it as argument from the calling program and use separate module for the calculation. First we write our executable code in a module: src/14_integration_module.f90 MODULE integration_module IMPLICIT NONE PRIVATE PUBLIC :: integral CONTAINS FUNCTION integral(f, a, b, n) RESULT(integral_result) INTERFACE FUNCTION f(x) RESULT(f_result) REAL, INTENT(IN) :: x REAL :: f_result END FUNCTION f END INTERFACE REAL, INTENT(IN) :: a, b INTEGER, INTENT(IN) :: n REAL :: integral_result REAL :: h, area INTEGER :: i h = (b - a) / n area = 0.5 * (f(a) + f(b)) DO i = 1, n-1 area = area + f(a + i*h) END DO integral_result = h * area END FUNCTION integral END MODULE integration_module src/14_integration.f90 PROGRAM integration USE integration_module IMPLICIT NONE INTRINSIC :: sin PRINT *, integral(sin, a=0.0, b=3.14159, n=1000) END PROGRAM integration","s":"Numerical integration II","u":"/fortran/integration","h":"#numerical-integration-ii","p":58},{"i":63,"t":"Hypotenuse can be calculated using following formula: c=a2+b2c = \\sqrt{a^2 + b^2}c=a2+b2​ src/16_hypotenuse_subroutine.f90 ! Compile the subroutine: gfortran -c 16_hypotenuse_subroutine.f90 SUBROUTINE calculate_hypotenuse(side_a, side_b, hypotenuse) IMPLICIT NONE ! declare the intent of dummy variables REAL, INTENT(IN) :: side_a REAL, INTENT(IN) :: side_b REAL, INTENT(OUT) :: hypotenuse REAL :: temp temp = side_a * side_a + side_b * side_b hypotenuse = SQRT(temp) END SUBROUTINE calculate_hypotenuse Compile the subroutine: gfortran -c 16_hypotenuse_subroutine.f90 src/16_hypotenuse_program.f90 ! subroutine without module ! gfortran -c 16_hypotenuse_subroutine.f90 ! gfortran 16_hypotenuse_program.f90 16_hypotenuse_subroutine.o PROGRAM hypotenuse IMPLICIT NONE REAL :: s1, s2, output WRITE (*, *) 'Program to calculate hypotenuse of a right triangle' WRITE (*, *) 'Enter length of side 1:' READ (*, *) s1 WRITE (*, *) 'Enter length of side 2:' READ (*, *) s2 ! notice subroutine call can update values in the calling environment CALL calculate_hypotenuse(s1, s2, output) WRITE (*, 99) output 99 FORMAT('Hypotenuse = ', F10.4) END PROGRAM hypotenuse Compile main program: gfortran 16_hypotenuse_program.f90 16_hypotenuse_subroutine.o","s":"Calculate hypotenuse: example of subroutine","u":"/fortran/hypotenuse","h":"","p":62},{"i":66,"t":"Calculate factorial: src/07_factorial.f90 ! Program : Find factorial PROGRAM factorial IMPLICIT NONE INTEGER :: input, ii, output = 1 PRINT *, \"Input = \" READ *, input DO ii = 1, input output = output * ii ENDDO PRINT *, input, \"! = \", output END PROGRAM factorial We can have a step size in a DO loop with a third parameter: DO i = 1, 100, 10 ! do something END DO Exit a loop based on condition: DO i = 1, 10 CALL random_number(x) IF (x > 0.5) EXIT END DO Skip rest of current iteration with cycle: DO i = 1, 10 IF (iseven(i)) CYCLE ! do something with the odd numbers END DO Implied DO loops: PRINT *, (i, i = 1, 10) You can iterate multiple expressions: PRINT *, (i, i**2, i = 0, 10) With nested loops: PRINT *, ((i*j, i = 1, 10), j = 1, 10) DO concurrent: if the iterations of a DO loop are independent, we can use the CONCURRENT keyword to indicate, the loop can be iterated in parallel: DO CONCURRENT (i = 1, 10) ! do something END DO","s":"DO Loop","u":"/fortran/loop","h":"#do-loop","p":64},{"i":68,"t":"src/07_print_even_numbers.f90 PROGRAM even_numbers IMPLICIT NONE INTEGER :: num num = 1 DO WHILE (num <= 10) IF (MODULO(num, 2) == 0) THEN PRINT *, num END IF num = num + 1 END DO END PROGRAM even_numbers","s":"DO WHILE","u":"/fortran/loop","h":"#do-while","p":64},{"i":70,"t":"This work is licensed under a Creative Commons Attribution 4.0 International License. Any third party materials in this work are not included in the article’s Creative Commons license, and users will need to obtain permission from the respective license holder to reproduce such materials. You are free to: Share — copy and redistribute the material in any medium or format. Adapt — remix, transform, and build upon the material for any purpose, even commercially. Under the following terms: Attribution — You must give appropriate credit, provide a link to the license, and indicate if changes were made. You may do so in any reasonable manner, but not in any way that suggests the licensor endorses you or your use. Notices: No warranties are given. The license may not give you all of the permissions necessary for your intended use. For example, other rights such as publicity, privacy, or moral rights may limit how you use the material. To view full copy of this license, visit http://creativecommons.org/licenses/by/4.0/","s":"License","u":"/fortran/license","h":"","p":69},{"i":72,"t":"Large programs can be organized in separate modules and procedures. Here is an example. We store various mathematical and physical constants in a module named constants_module. src/11_const_module.f90 MODULE const_module IMPLICIT none PRIVATE REAL, PUBLIC, PARAMETER :: pi = 3.14159265 REAL, PUBLIC, PARAMETER :: e = 2.71828182 END MODULE const_module Now we write a program that uses the above module: src/11_circ_area.f90 PROGRAM circ_area USE const_module IMPLICIT none REAL :: rad = 5.0, area area = pi*rad**2 PRINT *, \"Area = \", area END PROGRAM circ_area The PRIVATE keyword makes sure everything is private otherwise declared as PUBLIC. Private variables are accessible only to the module, while public variables are accessible to the programs that uses it. There is also PROTECTED keyword, which allows the variable to be accessible but the value cannot be modified. Compile and run our module and program: gfortran -c 11_const_module.f90 gfortran 11_circ_area.f90 11_const_module.o ./a.out note Modules need to be compiled before the program that uses it. If both are placed in the same source file, the module should come before the program. Once the module is compiled, it will create .o and .mod files. When we compile the program, we only need to provide the .o file for linking, the compiler will find the .mod files. If the files are on a different directory, specify via -I<dir> option. gfortran -I./ 11_circ_area.f90","s":"Modules","u":"/fortran/modules","h":"","p":71},{"i":74,"t":"Rename a variable: use const_module, math_pi => pi Use only certain variables: use const_module, only : pi use const_module, only : pi, e Last command is same as: use const_module, only : pi use const_module, only : e Use pi and rename e: use const_module, only : pi, log_base => e","s":"USE keyword","u":"/fortran/modules","h":"#use-keyword","p":71},{"i":77,"t":"src/29_MPI_hello_world.f90 PROGRAM hello_world_mpi INCLUDE 'mpif.h' INTEGER process_rank, size_of_cluster, ierror CHARACTER* (MPI_MAX_PROCESSOR_NAME) processor_name CALL MPI_INIT(ierror) CALL MPI_COMM_SIZE(MPI_COMM_WORLD, size_of_cluster, ierror) CALL MPI_COMM_RANK(MPI_COMM_WORLD, process_rank, ierror) CALL MPI_GET_PROCESSOR_NAME(processor_name, namelen, ierr) WRITE(*, 10) process_rank, size_of_cluster, processor_name 10 FORMAT('Hello from process: ', I2, ' of', I2, ' on ', 20A) CALL MPI_FINALIZE(ierror) END PROGRAM Compile the code: mpif90 29_MPI_hello_world.f90 -o 29_MPI_hello_world.out # if you are using intel compiler mpiifort 29_MPI_hello_world.f90 -o 29_MPI_hello_world.out Let's run on 4 processors: mpirun -np 4 ./29_MPI_hello_world.out","s":"MPI Hello World","u":"/fortran/mpi","h":"#mpi-hello-world","p":75},{"i":79,"t":"https://curc.readthedocs.io/en/latest/programming/MPI-Fortran.html","s":"Resources","u":"/fortran/mpi","h":"#resources","p":75},{"i":81,"t":"src/20_monte_carlo_integration.f90 ! Monte carlo method of integration ! calculate area under the curve y = x^2 within x limits [1, 3] PROGRAM area_under_curve IMPLICIT NONE INTEGER, PARAMETER :: iteration = 1000000 REAL :: x_lo = 1.0 REAL :: x_hi = 3.0 REAL :: x, y, y_lo = 0.0, y_hi, area, area_rect INTEGER :: i, monte_area = 0 y_hi = x_hi ** 2 area_rect = y_hi * (x_hi - x_lo) DO i = 1, iteration CALL random_number(x) CALL random_number(y) x = x_lo + x * (x_hi - x_lo); y = y * (y_hi - y_lo); IF (y < x ** 2) THEN monte_area = monte_area + 1; END IF END DO area = area_rect * monte_area / iteration PRINT *, \"Area = \", area PRINT *, \"Analytical result = \", (27.0 - 1) / 3 END PROGRAM area_under_curve","s":"Area under the curve by Monte Carlo method","u":"/fortran/monte-carlo-integration","h":"","p":80},{"i":83,"t":"We will approximate value of π\\piπ by Monte Carlo method. We will generate random number in a square of radius 2 unit; x = (-1, 1) and y = (-1, 1). We will count how many points are inside the circle of radius 1 unit. Area of the square = 4 square unit, while the are of circle is π\\piπ (unit radius circle). Use this ratio to approximate the value of π\\piπ. src/20_monte_carlo_pi.f90 PROGRAM pi IMPLICIT NONE INTEGER, PARAMETER :: iteration = 1000000 REAL :: x, y REAL :: x_lo = -1.0 REAL :: x_hi = 1.0 REAL :: y_lo = -1.0 REAL :: y_hi = 1.0 INTEGER :: i, monte_area = 0 DO i = 1, iteration CALL random_number(x) CALL random_number(y) x = x_lo + x * (x_hi - x_lo); y = y_lo + y * (y_hi - y_lo); IF (x * x + y * y < 1) THEN monte_area = monte_area + 1; END IF END DO PRINT *, \"pi = \", 4.0 * monte_area / iteration PRINT *, \"relative error = \", abs(1.0 * monte_area / iteration & - ATAN(1.0D0)) / ATAN(1.0D0) END PROGRAM pi","s":"Determine value of pi by Monte Carlo method","u":"/fortran/monte-carlo-pi","h":"","p":82},{"i":85,"t":"Pointer in FORTRAN is an alias to a variable or procedure. src/28_pointer.f90 PROGRAM MAIN IMPLICIT NONE REAL, POINTER :: p1, p2 REAL, TARGET :: r1 INTEGER, DIMENSION(:), POINTER :: ptr_arr INTEGER, DIMENSION(2), TARGET :: arr r1 = 1.0 ! set p1 to point to r1 p1 => r1 ALLOCATE(p2) ! creates a storage space without a variable name ! allocate (p1, stat=allocation_status) p2 = 2.2 ! this value has no name arr(1) = 5 arr(2) = 8 ptr_arr => arr ! below two are the same PRINT *, \"r1 = \", r1 PRINT *, \"p1 = \", p1 PRINT *, \"p2 = \", p2 ! check association PRINT *, \"Is p1 and r1 associated? \", ASSOCIATED(p1, r1) PRINT *, \"Is p1 and p2 point to same object? \", ASSOCIATED(p1, p2) ! associated returns false if both pointers point to null PRINT \"(2i4)\", arr DEALLOCATE(p2) ! now p2 is a dangling pointer ! it can be set to point to null p2 => NULL() END","s":"Pointer","u":"/fortran/pointer","h":"","p":84},{"i":87,"t":"Ordinary FORTRAN procedures (subroutine and function) are not recursive, i.e., they cannot invoke themselves in their body. We can use the RECURSIVE keyword to implement recursive procedures.","s":"Recursion","u":"/fortran/recursion","h":"","p":86},{"i":89,"t":"Calculate factorial using recursive subroutine: src/21_recursive_subroutine.f90 ! Calculate factorial ! | n(n -1) n >= 1 ! n! = | ! | 1 n = 0 PROGRAM recursive_subroutine IMPLICIT NONE INTEGER :: input, output PRINT *, \"This program calculates factorial:\" PRINT '(a,$)', \"Input = \" READ *, input CALL factorial(input, output) PRINT *, input, \"! = \", output CONTAINS RECURSIVE SUBROUTINE factorial(n, result) INTEGER, INTENT(IN) :: n INTEGER, INTENT(OUT) :: result INTEGER :: tmp IF (n >= 1) THEN CALL factorial(n-1, tmp) result = n * tmp ELSE result = 1 END IF END SUBROUTINE factorial END PROGRAM recursive_subroutine","s":"Recursive subroutine","u":"/fortran/recursion","h":"#recursive-subroutine","p":86},{"i":91,"t":"Calculate fibonacci series using recursive function: src/21_recursive_function.f90 ! Fibonacci series ! F(0) = 0 ! F(1) = 1 ! F(n) = F(n-1) + F(n-2) for n > 1 PROGRAM recursive_function IMPLICIT NONE INTEGER :: lim, i PRINT *, \"This program calculates fibonacci series:\" PRINT '(a,$)', \"Limit = \" READ *, lim DO i = 0, lim PRINT *, \"Fib(\", i, \") = \", fibonacci(i) END DO CONTAINS RECURSIVE FUNCTION fibonacci(n) RESULT(output) INTEGER, INTENT(IN) :: n INTEGER :: output IF (n > 1) THEN output = fibonacci(n - 1) + fibonacci(n - 2) ELSE IF (n == 1) THEN output = 1 ELSE output = 0 END IF END FUNCTION fibonacci END PROGRAM recursive_function","s":"Recursive function","u":"/fortran/recursion","h":"#recursive-function","p":86},{"i":93,"t":"There are two types of procedures in Fortran: subroutines and functions. All procedures should be placed in a module or after the contains keyword in a main program.","s":"Procedures","u":"/fortran/procedures","h":"","p":92},{"i":95,"t":"First we write the subroutines in a module: src/12_add_module.f90 MODULE add_module IMPLICIT none PRIVATE REAL :: input1, input2, total PUBLIC :: read_inputs, add_numbers, print_result CONTAINS SUBROUTINE read_inputs() PRINT \"(a,$)\", \"Input1 = \" READ *, input1 PRINT \"(a,$)\", \"Input2 = \" READ *, input2 END SUBROUTINE read_inputs SUBROUTINE add_numbers() total = input1 + input2 END SUBROUTINE add_numbers SUBROUTINE print_result PRINT *, input1, \" + \", input2, \" = \", total END SUBROUTINE print_result END MODULE add_module Now write our program: src/12_add.f90 PROGRAM add USE add_module IMPLICIT none CALL read_inputs() CALL add_numbers() CALL print_result() END PROGRAM add Compile and execute: gfortran -c 12_add_module.f90 gfortran 12_add.f90 12_add_module.o ./a.out","s":"Subroutine","u":"/fortran/procedures","h":"#subroutine","p":92},{"i":97,"t":"We want to print a table of xxx vs f(x)f(x)f(x) where: f(x)=(1+1x)xf(x) = \\left(1 + \\frac{1}{x}\\right)^xf(x)=(1+x1​)x src/13_function_module.f90 MODULE function_module IMPLICIT NONE PRIVATE INTEGER, PARAMETER, PUBLIC :: power = 5 PUBLIC :: f CONTAINS FUNCTION f(x) RESULT(f_result) REAL, INTENT(IN) :: x REAL :: f_result ! SELECTED_REAL_KIND(precision [, range]) INTEGER, PARAMETER :: kind_needed = selected_real_kind(power + 1) f_result = (1 + 1 / REAL(x, kind_needed)) ** x END FUNCTION f END MODULE function_module src/13_function_table.f90 PROGRAM function_table USE function_module IMPLICIT NONE REAL :: x INTEGER :: i DO i = 0, power x = 10**i PRINT \"(f8.1, f8.4)\", x, f(x) END DO END PROGRAM function_table Sample output: 1.0 2.0000 10.0 2.5937 100.0 2.7048 1000.0 2.7171 10000.0 2.7186 100000.0 2.7220 In contrast to subroutines, functions must provide a return value.","s":"Function","u":"/fortran/procedures","h":"#function","p":92},{"i":99,"t":"Side effects are the change in status of a program when a procedure is executed other than computing a value to return, such as changing a variable declared in the program or module above the contains statement. One can indicate whether a function or subroutine is pure or has side effects by using the keywords pure and impure, respectively.","s":"Pure procedures and side effects","u":"/fortran/procedures","h":"#pure-procedures-and-side-effects","p":92},{"i":101,"t":"Interface block is used to provide necessary information to the calling program whether the call is correct. It basically consists of the procedure without the executable code, and declaration of local variables.","s":"Interface blocks","u":"/fortran/procedures","h":"#interface-blocks","p":92},{"i":103,"t":"Fortran Programming Manual by Tanja van Mourik Guide to Fortran 2008 Programming by Walter S Brainerd Introduction to modern FORTRAN Fortran Programming Guide from Oracle https://people.math.sc.edu/Burkardt/f_src/f_src.html https://github.com/SourangshuGhosh/AwesomeFortranLibraries","s":"Resources","u":"/fortran/resources","h":"","p":102},{"i":105,"t":"Subroutine to swap two integers: src/24_swap.f90 PROGRAM MAIN IMPLICIT NONE INTEGER a, b PRINT \"(a,$)\", \"Enter two integers (separated by space or comma): \" READ *, a, b CALL swap(a, b) PRINT *, \"After swap: \", a, b CONTAINS SUBROUTINE swap(a, b) INTEGER, INTENT(IN OUT) :: a, b INTEGER tmp tmp = a a = b b = tmp END SUBROUTINE swap END","s":"Swap two numbers","u":"/fortran/swap","h":"","p":104},{"i":107,"t":"Following example uses date_and_time and cup_time to find current date and time, and determine program execution time. src/25_time.f90 PROGRAM MAIN IMPLICIT NONE INTEGER, PARAMETER :: n = 10000000 CHARACTER(LEN=8) :: date REAL start_time, end_time REAL(KIND=KIND(1.0D0)) :: test = 0.0D0 INTEGER i CALL date_and_time(date=date) PRINT *, \"Timing report dated: \", date(1:4), \"-\", date(5:6), \"-\", date(7:8) CALL cpu_time(start_time) ! savage benchmark DO i = 1, n test = tan(atan(exp(log(sqrt(test * test))))) + 1.0D0; END DO CALL cpu_time(end_time) PRINT *, \"Time taken = \", end_time - start_time, \"sec.\" PRINT *, \"Test = \", test PRINT *, \"Relative accuracy = \", (test - (n + 1)) / (n + 1) END ! Sample output: ! Timing report dated: 2022-10-09 ! Time taken = 0.939146996 sec. ! Test = 9999816.5167837571 ! Relative accuracy = -1.8448319779454493E-005","s":"Time","u":"/fortran/time","h":"","p":106},{"i":109,"t":"FORTRAN is optimized for high performance scientific computing. I will be working on UNIX/ Linux machine for running codes. If you are on Windows, you may consider using WSL. We will be using gfortran compiler. To install gcc and gfortran in Ubuntu/ Debian: sudo apt install gcc gfortran On macOS you can install via Homebrew: brew install gcc gfortran is part of gcc. You can use any text editor of your choice to write source codes. We will be using .f90 file extension for our source code files. The program can be compiled using: gfortran source.f90 It will create a binary file named a.out in the same directory as the source code, which can be executed by: ./a.out If you would like to specify a name for the executable instead of default a.out: gfortran source.f90 -o XYapp If you have dependent modules in separate source files, you need to compile the modules first followed by main program with linking module .o file. More on this on the modules section. gfortran -c module.f90 gfortran main.f90 module.o","s":"Setting up Fortran","u":"/fortran/","h":"","p":108},{"i":112,"t":"src/23_custom_type.f90 PROGRAM MAIN IMPLICIT NONE TYPE user ! if defined in external MODULE, use PUBLIC: TYPE, PUBLIC :: user INTEGER id ! parameters can be initialized CHARACTER(LEN=64) name REAL age END TYPE ! extending type TYPE, EXTENDS(user) :: user_extended real :: salary END TYPE user_extended TYPE(user) new_user ! declare an array of user TYPE(user) user_catalog(10) TYPE(user_extended) user_with_salary new_user%id = 1; new_user%name = \"Albert Einstein\" new_user%age = 76.0 ! alternatively, new_user = user(1, \"Albert Einstein\", 76.0) user_catalog(1) = new_user PRINT *, \"User ID: \", user_catalog(1)%id PRINT *, \"User name: \", user_catalog(1)%name PRINT *, \"Age: \", user_catalog(1)%age user_with_salary = user_extended(1, \"Albert Einstein\", 76.0, 50000.0) PRINT *, \"Salary: \", user_with_salary%salary END","s":"Custom data types","u":"/fortran/types","h":"#custom-data-types","p":110},{"i":114,"t":"Example of polymorphic object: src/23_polymorphism.f90 PROGRAM MAIN IMPLICIT NONE ! define a base line type TYPE :: line_type REAL :: x_start, x_end, y_start, y_end END TYPE line_type ! extend the base line type TYPE, EXTENDS(line_type) :: colored_line_type INTEGER :: r, g, b ! each ranges 0-255 END TYPE colored_line_type TYPE, EXTENDS(colored_line_type) :: vector_line_type LOGICAL :: direction ! T if direction is start to end, F if reverse END TYPE vector_line_type ! CLASS keyword instead of TYPE ! polymorphic objects are dynamic, must be declared with ALLOCATABLE or POINTER CLASS(line_type), ALLOCATABLE :: colored_line, vector_line ! notice that line has CLASS line_type, but still can be assigned colored_line_type colored_line = colored_line_type(0.0, 1.0, 0.0, 1.0, 0, 0, 255) ! alternative way to assign ! ALLOCATE(vector_line_type::vector_line) ALLOCATE(vector_line, source=vector_line_type(0.0, 1.0, 0.0, 1.0, 0, 0, 255, .TRUE.)) ! accessing elements is bit tricky SELECT TYPE(colored_line) TYPE IS(line_type) PRINT *, \"X_start: \", colored_line%x_start TYPE IS(colored_line_type) PRINT *, \"Color: \", colored_line%r, colored_line%g, colored_line%b TYPE IS(vector_line_type) PRINT *, \"Is forward directed? \", colored_line%direction CLASS DEFAULT PRINT *, \"Error: not sure what type it is.\" END SELECT ! re-allocate the same variable ! DEALLOCATE(colored_line) ! ALLOCATE(colored_line, source=vector_line_type(0.0, 1.0, 0.0, 1.0, 0, 0, 255, .TRUE.)) END","s":"Polymorphism","u":"/fortran/types","h":"#polymorphism","p":110}],"index":{"version":"2.3.9","fields":["t"],"fieldVectors":[["t/2",[0,2.548,1,2.37,2,2.802,3,3.659,4,4.306,5,3.84,6,3.659,7,0.483,8,5.014,9,0.754,10,0.754,11,6.154,12,0.573,13,6.154,14,5.72,15,6.447,16,0.754,17,1.906,18,2.346,19,1.793,20,1.235,21,3.659,22,5.014,23,0.754,24,1.906,25,5.014,26,3.659,27,3.659,28,1.779,29,3.659,30,5.014,31,3.659,32,3.659,33,3.659,34,3.143,35,2.346]],["t/4",[1,0.849,7,0.564,9,0.61,10,0.61,12,0.572,16,0.61,23,0.695,36,2.049,37,4.076,38,0.895,39,2.049,40,4.733,41,3.26,42,1.873,43,2.267,44,4.059,45,3.109,46,2.8,47,1.427,48,1.569,49,1.427,50,1.219,51,1.569,52,3.26,53,1.76,54,1.35,55,0.403,56,1.76,57,1.76,58,3.973,59,2.049,60,3.26,61,2.049,62,3.26,63,2.497,64,2.27,65,2.27,66,1.314,67,1.76,68,1.76,69,1.76,70,2.049,71,2.049,72,4.626,73,2.523,74,3.866,75,2.986,76,3.199,77,4.118,78,4.059,79,4.059,80,2.497,81,2.497,82,2.049,83,3.26,84,3.486,85,2.049,86,2.049,87,1.597,88,2.049,89,1.507,90,2.049,91,2.049,92,1.76,93,1.004,94,1.597,95,2.049]],["t/6",[2,2.089,7,0.611,9,0.73,10,0.611,12,0.57,16,0.865,17,1.421,18,1.749,19,2.208,20,1.372,23,0.677,35,1.055,38,0.496,50,1.623,53,1.414,54,1.13,55,0.323,73,1.072,75,1.515,77,1.261,81,1.261,87,2.208,89,2.378,93,0.807,96,1.646,97,1.646,98,2.089,99,2.736,100,2.728,101,1.646,102,1.261,103,2.24,104,1.261,105,1.414,106,1.9,107,1.055,108,1.646,109,3,110,0.914,111,1.421,112,1.414,113,0.807,114,1.421,115,1.261,116,1.146,117,1.646,118,1.055,119,1.646,120,2.728,121,1.646,122,1.646,123,1.646,124,1.414,125,1.261,126,1.414,127,1.261,128,0.979,129,1.623,130,2.728,131,0.857,132,0.857,133,0.979,134,0.914,135,1.146,136,1.055,137,1.414,138,3.493,139,4.857,140,1.646,141,2.728,142,1.029,143,3.493,144,1.646,145,1.193,146,3,147,3.49,148,1.9,149,1.646,150,1.646,151,2.089,152,2.728,153,3,154,3.493,155,0.682,156,2.418,157,1.261,158,1.646,159,3.49,160,1.646,161,2.343,162,1.646,163,3.493,164,3.493,165,1.646,166,1.646,167,1.646,168,2.089,169,1.646,170,2.676,171,1.646,172,2.343,173,1.9,174,1.646,175,1.414,176,4.505,177,1.646,178,1.646,179,1.646,180,1.414,181,1.646,182,1.646,183,1.646,184,1.261,185,1.646,186,1.646,187,2.089,188,3,189,1.646,190,2.83,191,1.414,192,1.646,193,0.979,194,1.414,195,1.646,196,2.728,197,0.979,198,1.261,199,1.646,200,1.646,201,1.646,202,1.646,203,0.979,204,1.646]],["t/8",[19,3.184,116,3.821,125,4.202,197,4.118,205,5.487,206,5.487,207,5.487,208,5.487,209,5.487,210,3.047,211,5.487]],["t/10",[38,0.71,43,2.451,50,2.976,54,2.755,73,2.415,142,1.142,197,2.976,198,3.831,212,1.966,213,4.296,214,5.002,215,5.002,216,5.002,217,3.484,218,3.484,219,2.976,220,2.976,221,3.484,222,5.002,223,3.484,224,4.296,225,4.296,226,3.484,227,5.002]],["t/12",[12,0.554,19,2.649,38,0.767,142,1.235,146,4.643,151,4.141,161,4.643,191,4.643,220,3.216,223,3.765,228,5.406,229,5.406]],["t/14",[12,0.513,142,1.332,155,2.417,156,3.471,157,4.469]],["t/16",[12,0.546,16,0.401,38,0.755,42,1.582,43,2.347,47,1.856,48,3.668,54,1.104,55,0.941,73,1.57,75,3.794,94,1.957,115,1.232,118,1.708,142,1.215,148,1.856,155,2.204,156,2.376,172,2.289,173,1.856,197,1.585,218,2.782,219,2.849,220,2.376,223,1.856,226,1.856,230,3.994,231,3.07,232,2.665,233,2.665,234,2.665,235,2.041,236,4.886,237,5.698,238,4.166,239,2.665,240,1.856,241,3.994,242,3.994,243,2.665,244,3.43,245,2.665,246,2.665,247,2.665,248,2.665,249,2.289,250,2.665,251,2.665,252,2.665,253,2.665,254,2.665,255,2.665,256,2.665,257,2.665,258,2.665,259,2.665,260,2.665,261,2.289,262,3.43,263,3.43,264,2.665,265,3.059,266,2.665,267,2.665,268,2.665,269,2.665,270,2.665,271,2.08,272,2.56,273,2.665,274,2.665,275,3.994,276,2.665,277,2.665]],["t/18",[7,0.476,9,0.742,10,0.742,19,2.986,38,0.7,49,3.437,98,3.78,113,2.986,115,2.282,125,3.78,142,1.127,193,2.936,210,2.741,231,3.163,278,3.384,279,4.935,280,4.935,281,4.935,282,4.935,283,3.78,284,4.238,285,4.935,286,3.78,287,2.418,288,4.238,289,4.238]],["t/20",[1,1.824,2,4.805,4,3.782,12,0.478,38,0.89,75,2.445,76,2.62,94,2.158,142,1.006,219,2.62,220,2.62,271,2.293,272,2.823,290,3.782,291,4.403,292,3.782,293,3.373,294,4.403,295,4.403,296,4.403,297,4.403,298,4.403,299,5.671,300,4.403,301,4.403,302,4.403,303,4.403,304,4.403,305,6.273,306,4.403,307,4.403,308,3.373,309,3.782,310,4.403,311,4.403,312,4.403,313,4.403,314,4.403]],["t/22",[1,2.757,111,2.321,175,3.828,220,2.651,290,3.828,315,3.413,316,5.418,317,4.457,318,6.654,319,4.457,320,6.309,321,5.715,322,5.715,323,4.457,324,4.457,325,6.309,326,5.715,327,4.457,328,4.457,329,4.457,330,4.457,331,3.413,332,3.828,333,4.457,334,4.457,335,4.457,336,5.715,337,4.457,338,3.828]],["t/24",[12,0.537,16,0.789,17,2.735,20,1.773,38,0.745,66,3.367,80,4.022,103,3.367,197,3.124,203,3.124,286,4.848,287,3.102,339,4.511,340,5.252,341,4.511]],["t/26",[12,0.544,16,1.03,43,2.158,73,1.731,74,2.823,76,2.62,93,2.158,110,2.445,111,2.293,168,5.251,190,4.614,194,4.871,210,2.445,236,3.373,342,4.403,343,4.403,344,4.403,345,4.403,346,5.671,347,4.403,348,3.782,349,4.871,350,4.403,351,3.782,352,3.067,353,4.403,354,4.403]],["t/28",[0,2.428,7,0.538,9,0.524,10,0.524,12,0.572,16,0.838,20,1.177,23,0.838,28,1.237,38,0.495,42,0.968,55,0.953,73,1.906,74,2.234,75,1.936,111,1.815,142,1.107,187,2.67,190,2.428,193,2.074,198,2.67,212,1.37,293,4.617,355,4.849,356,3.486,357,3.486,358,2.67,359,3.486,360,1.444,361,6.336,362,3.486,363,5.576,364,5.177,365,2.074,366,4.271,367,3.486,368,2.994,369,2.67,370,3.486,371,3.486,372,3.486,373,3.486,374,2.67,375,3.486,376,3.486,377,3.486,378,2.994]],["t/30",[7,0.509,9,0.474,10,0.474,12,0.583,23,0.474,38,0.448,55,0.62,99,3.279,105,2.711,106,2.199,111,1.644,115,1.46,142,1.206,157,3.463,173,4.017,218,2.199,219,1.878,220,3.632,221,2.199,249,3.883,368,2.711,379,2.711,380,3.157,381,4.521,382,4.537,383,2.199,384,6.69,385,6.541,386,3.157,387,3.157,388,1.644,389,2.199,390,3.157,391,3.157,392,3.157,393,2.418,394,3.157,395,3.157,396,4.521,397,3.157]],["t/32",[5,3.884,7,0.489,12,0.472,116,3.532,131,2.641,134,3.441,240,3.532,398,5.322,399,4.355,400,5.071,401,5.071,402,4.355,403,5.071,404,6.196,405,5.071,406,5.322,407,5.322,408,5.071,409,4.355]],["t/34",[1,1.088,5,2.012,7,0.253,9,0.395,10,0.395,12,0.574,16,0.594,23,0.395,37,2.752,38,0.674,42,1.318,50,1.563,51,4.045,55,0.516,65,2.752,66,2.533,68,2.256,73,1.032,74,1.684,93,1.287,104,2.012,106,1.83,107,2.533,110,1.459,118,1.684,127,2.012,131,1.368,134,2.194,142,1.293,187,2.012,219,1.563,221,1.83,235,2.012,240,1.83,271,2.751,272,3.386,287,1.287,360,1.088,365,1.563,382,4.078,383,1.83,388,2.058,389,1.83,399,2.256,406,3.393,407,3.393,409,2.256,410,2.627,411,4.748,412,2.012,413,2.627,414,2.012,415,2.627,416,4.748,417,4.748,418,2.627,419,2.012,420,3.951,421,3.951,422,3.951,423,4.078,424,2.012,425,2.627,426,2.627,427,3.951,428,3.951,429,3.951,430,3.951,431,3.951,432,3.951,433,2.627,434,2.627,435,2.627,436,2.627,437,2.627,438,3.951,439,2.627,440,2.627,441,2.627]],["t/36",[7,0.279,9,0.435,10,0.435,12,0.57,16,0.638,23,0.887,28,1.028,38,0.411,42,1.538,80,3.253,87,2.081,145,1.266,155,1.2,218,3.503,219,2.992,221,2.017,283,4.243,284,4.32,286,4.722,287,2.715,308,2.218,360,1.2,365,2.992,383,2.017,388,2.619,389,2.017,414,2.218,442,2.896,443,3.648,444,2.896,445,2.896,446,5.54,447,2.896,448,5.54,449,2.896,450,2.896,451,2.896,452,2.896,453,2.896,454,2.896,455,2.896,456,2.896,457,3.648,458,2.896,459,2.896,460,2.896,461,4.247,462,2.896,463,2.896,464,3.852,465,2.896,466,2.896,467,2.896,468,2.896,469,2.896,470,2.896,471,2.896,472,2.896,473,3.551,474,2.896,475,4.247,476,2.896]],["t/38",[54,2.436,443,5.051,477,5.881,478,5.051,479,5.881]],["t/40",[12,0.536,106,4.394,126,3.828,133,2.651,480,5.715,481,4.457,482,6.654,483,4.457,484,6.654,485,4.457,486,7.25,487,4.457,488,4.457,489,4.457,490,4.457,491,4.457,492,4.457,493,5.715,494,4.457,495,3.828,496,4.457,497,4.457,498,4.457]],["t/42",[7,0.595,9,0.639,10,0.639,12,0.571,16,0.927,20,1.435,23,0.639,34,3.651,89,2.852,103,4.456,111,2.214,142,1.409,145,2.424,212,1.671,331,4.724,332,5.297,352,3.861,499,4.251,500,5.543,501,4.251]],["t/44",[7,0.532,9,0.635,10,0.635,12,0.562,16,1.017,17,2.876,20,1.427,23,0.83,38,0.784,54,1.751,114,2.201,128,2.514,212,1.661,352,2.944,369,4.229,502,4.226,503,5.522,504,5.493,505,3.237,506,4.226,507,5.522,508,4.743,509,4.226,510,3.63,511,2.944]],["t/46",[7,0.571,9,0.708,10,0.708,12,0.544,16,1.021,17,2.455,20,1.591,23,0.89,38,0.669,116,4.125,238,3.283,504,5.203,508,5.086,510,4.048,512,4.713,513,5.922,514,5.086,515,4.713,516,4.713]],["t/49",[517,6.075]],["t/51",[7,0.558,9,0.682,10,0.682,12,0.548,16,0.956,23,0.682,28,2.258,38,0.644,115,2.099,129,2.7,132,3.489,240,3.161,358,4.429,360,1.88,374,3.477,424,3.477,518,4.539,519,4.539,520,5.782,521,4.539,522,4.539,523,4.539,524,5.782,525,4.539,526,4.539]],["t/53",[0,2.439,7,0.65,9,0.731,10,0.731,12,0.532,16,0.526,18,4.211,20,1.887,23,0.908,38,0.691,40,4.861,42,1.552,43,2.74,45,2.682,54,1.451,55,0.688,76,2.083,77,2.682,89,1.62,99,2.384,112,3.008,128,2.083,168,3.726,184,2.682,235,4.282,527,4.178,528,3.502,529,4.865,530,4.865,531,4.865,532,3.502,533,3.502,534,3.502,535,4.865,536,3.502,537,3.502,538,3.502,539,3.502,540,4.865,541,3.502,542,3.502,543,3.502,544,4.865,545,3.502]],["t/55",[1,1.518,7,0.353,9,0.358,10,0.358,12,0.581,16,0.815,20,1.83,23,0.551,24,1.24,38,0.338,42,0.661,49,1.658,73,0.936,87,1.796,110,2.036,145,1.041,148,2.553,155,1.852,262,3.839,546,5.02,547,3.665,548,1.823,549,2.381,550,5.02,551,5.02,552,2.045,553,3.665,554,2.045,555,2.381,556,2.381,557,2.381,558,4.152,559,2.381,560,1.823,561,2.381,562,2.381,563,2.381,564,2.045,565,2.381,566,2.381,567,2.381,568,2.381,569,2.381,570,3.665,571,3.665,572,2.381,573,2.381,574,5.726,575,3.665,576,2.381,577,4.47,578,5.02,579,4.47,580,4.47,581,4.47,582,4.47,583,2.381,584,2.381,585,2.381,586,2.381,587,2.381,588,2.381,589,2.381,590,2.381,591,2.381,592,2.381,593,2.381,594,2.381,595,2.381,596,1.167,597,2.381,598,2.381,599,4.47,600,2.381,601,3.665,602,2.381,603,2.381,604,3.148,605,2.381]],["t/57",[7,0.425,9,0.459,10,0.459,12,0.575,16,0.997,17,2.699,20,1.75,23,0.906,37,3.61,38,0.626,42,1.577,50,3.944,51,2.338,54,1.264,55,0.867,63,2.338,64,2.126,65,3.073,66,2.829,67,2.621,87,2.163,107,1.956,142,1.184,210,1.695,349,2.621,352,2.126,364,4.877,365,1.816,369,3.38,414,2.338,606,3.052,607,4.413,608,3.052,609,3.052,610,3.052,611,4.413,612,4.413,613,4.413,614,4.413,615,4.413,616,3.052,617,4.413,618,4.413,619,3.052,620,3.052,621,3.052]],["t/59",[7,0.453,9,0.5,10,0.5,12,0.576,16,0.5,23,0.706,38,0.472,42,1.303,47,2.318,55,0.654,87,2.665,142,0.76,145,1.455,212,1.308,213,2.858,287,2.895,315,2.549,316,2.858,622,4.531,623,3.595,624,5.073,625,2.858,626,2.858,627,3.328,628,3.328,629,3.328,630,3.328,631,3.328,632,5.907,633,3.328,634,3.328,635,3.328,636,3.328,637,5.073,638,3.328,639,3.328,640,3.328,641,3.328,642,3.328,643,3.328,644,3.328,645,2.549,646,2.858,647,2.549,648,4.694,649,3.328,650,2.858]],["t/61",[1,2.472,7,0.493,9,0.652,10,0.652,12,0.562,16,0.448,23,0.936,24,2.662,28,1.057,38,0.615,42,1.203,47,2.074,55,0.852,87,2.505,99,1.459,128,1.772,129,3.041,132,1.551,136,1.909,142,1.362,145,1.302,203,1.772,210,1.654,271,1.551,287,2.751,292,2.558,293,2.281,315,2.281,596,1.459,622,3.825,637,4.39,647,2.281,650,2.558,651,2.978,652,2.978,653,5.348,654,2.978,655,2.978,656,2.978,657,2.751,658,2.978,659,5.111,660,2.074,661,1.772,662,2.978,663,2.978,664,3.723,665,2.558,666,2.558,667,2.558,668,2.281,669,4.335,670,4.335,671,2.978,672,2.978,673,2.978,674,2.978,675,2.978,676,2.978]],["t/63",[7,0.523,9,0.619,10,0.619,12,0.572,17,2.144,20,1.39,23,0.619,24,2.144,28,1.741,42,0.771,50,2.449,55,0.545,73,1.091,89,2.269,94,1.36,99,2.66,113,1.36,131,2.555,133,1.651,134,3.219,142,1.324,145,1.8,278,1.542,360,1.15,473,3.145,511,1.933,554,2.384,657,1.36,677,6.285,678,2.776,679,2.776,680,2.776,681,2.776,682,3.162,683,4.907,684,2.776,685,5.427,686,2.776,687,2.776,688,4.907,689,2.384,690,4.116,691,2.776,692,2.776,693,2.776,694,2.126,695,4.116,696,4.116,697,4.116,698,4.907,699,2.384,700,2.776,701,3.536,702,2.776,703,2.776,704,2.776,705,4.116,706,2.776,707,2.776]],["t/66",[7,0.485,9,0.435,10,0.435,12,0.573,16,0.887,20,0.978,23,0.887,28,1.028,38,0.411,40,3.852,42,1.851,43,3.202,45,2.218,48,2.218,55,0.569,56,2.487,57,5.295,81,2.218,89,2.562,103,3.782,111,1.508,114,1.508,145,1.266,155,1.2,212,1.138,217,2.017,271,1.508,283,2.218,374,3.253,646,2.487,647,2.218,708,4.758,709,2.896,710,2.218,711,2.896,712,2.487,713,5.03,714,2.487,715,2.896,716,2.218,717,2.896,718,2.896,719,2.487,720,4.243,721,4.247,722,2.896,723,2.896,724,2.896,725,2.896,726,2.896,727,2.896,728,5.03,729,2.896,730,2.896]],["t/68",[7,0.583,9,0.732,10,0.732,12,0.556,16,0.732,23,0.988,38,0.691,42,1.678,43,2.386,73,1.914,212,1.914,731,4.869,732,6.043,733,7.201,734,4.869]],["t/70",[12,0.424,54,1.437,55,1.093,102,2.657,133,2.064,148,2.416,159,2.98,193,2.064,217,2.416,338,4.151,464,2.657,511,2.416,623,3.702,661,2.064,699,4.151,712,2.98,735,4.151,736,6.72,737,4.833,738,4.833,739,3.469,740,3.469,741,6.325,742,2.98,743,3.469,744,3.469,745,4.833,746,2.98,747,3.469,748,3.469,749,4.151,750,3.469,751,3.469,752,4.833,753,3.469,754,3.469,755,3.469,756,3.469,757,3.469,758,3.469,759,3.469,760,3.469,761,3.469,762,3.469,763,3.469,764,4.833,765,3.469,766,3.469,767,2.416,768,2.657,769,2.98,770,3.469,771,3.469,772,3.469,773,2.98,774,3.469,775,3.469,776,3.469,777,3.469,778,2.98,779,3.469,780,3.469,781,3.469,782,2.657,783,3.469,784,3.469,785,3.469,786,3.469]],["t/72",[0,1.904,7,0.633,9,0.612,10,0.612,12,0.509,16,0.411,18,3.693,19,1.34,23,0.612,54,1.133,55,1.058,93,1.34,94,1.34,99,1.34,113,2.383,114,2.12,118,1.753,124,2.348,127,2.094,128,1.627,131,3,134,2.701,135,1.904,136,1.753,142,1.111,155,1.686,156,1.627,184,2.094,193,2.422,203,1.627,226,1.904,278,1.519,289,2.348,308,2.094,389,1.904,473,1.753,548,2.094,604,2.348,622,3.454,657,3.276,660,3.753,661,3.205,710,2.094,767,1.904,768,2.094,787,2.734,788,2.734,789,1.627,790,2.734,791,2.734,792,2.734,793,2.734,794,2.734,795,2.734,796,4.177,797,2.734,798,2.348,799,2.734,800,2.734,801,4.071,802,2.734,803,2.734,804,2.348,805,2.734,806,4.177,807,2.734,808,2.734,809,2.094,810,2.734,811,4.071,812,2.734,813,4.071,814,2.348,815,2.734,816,2.734,817,2.094,818,3.118,819,4.071,820,2.734,821,2.348,822,2.348,823,2.734]],["t/74",[12,0.549,55,1.431,93,2.238,113,2.845,156,4.215,358,3.498,796,6.086,798,5.768,824,5.805,825,4.567,826,4.567,827,4.567,828,4.567]],["t/77",[7,0.508,12,0.504,23,0.591,28,2.345,38,0.558,43,2.58,46,4.522,55,0.773,75,2.924,99,1.927,129,2.34,131,2.742,137,3.378,197,2.34,478,3.378,742,3.378,809,3.012,818,4.033,829,3.933,830,3.933,831,3.933,832,5.936,833,5.936,834,5.936,835,3.933,836,5.265,837,3.933,838,3.933,839,3.933,840,3.933,841,3.933,842,3.933,843,3.933,844,3.933,845,3.933,846,3.933,847,3.933,848,5.265,849,5.936,850,3.933,851,3.933,852,3.933,853,3.933]],["t/79",[854,6.026,855,6.026]],["t/81",[7,0.422,9,0.453,10,0.453,12,0.581,16,0.657,23,0.774,28,1.552,38,0.621,42,1.567,73,1.719,74,2.804,107,1.932,142,1.175,145,1.318,155,1.249,212,1.185,271,3.122,272,3.843,365,1.793,383,2.1,388,1.57,622,3.843,623,2.309,624,2.589,626,2.589,645,2.309,653,2.589,716,2.309,720,3.942,782,2.309,856,3.014,857,2.589,858,2.589,859,3.014,860,4.373,861,2.589,862,4.849,863,4.849,864,3.756,865,4.849,866,5.147,867,4.849,868,2.589,869,3.014,870,3.014]],["t/83",[7,0.387,9,0.404,10,0.404,12,0.58,16,0.604,23,0.723,28,1.425,38,0.57,42,1.775,55,0.527,73,1.055,75,1.491,94,1.968,111,1.398,142,1.305,147,4.132,151,3.684,155,1.112,156,3.568,212,1.055,263,3.449,271,3.124,272,3.845,331,3.684,388,2.781,464,2.056,505,2.056,527,2.306,558,2.056,622,1.721,645,2.056,716,2.056,720,4.089,857,2.306,858,2.306,861,2.306,862,4.132,863,3.449,864,4.132,865,3.449,867,4.909,868,2.306,871,4.015,872,2.684,873,5.339,874,2.684,875,2.684,876,2.684,877,2.684,878,2.684,879,2.306,880,2.684]],["t/85",[7,0.278,9,0.434,10,0.434,12,0.576,16,0.925,19,2.075,23,0.434,35,1.849,38,0.601,64,2.009,66,1.849,76,1.716,84,2.477,93,2.075,94,1.414,110,1.602,113,2.075,115,1.334,118,1.849,136,1.849,142,0.967,170,2.209,225,2.477,236,2.209,244,2.477,261,3.637,348,2.477,360,1.195,388,1.502,558,4.235,694,2.209,789,1.716,817,2.209,881,5.058,882,2.884,883,2.884,884,6.527,885,6.527,886,4.235,887,6.527,888,4.235,889,5.018,890,2.884,891,2.884,892,2.884,893,2.884,894,2.884,895,2.884,896,2.884,897,5.018,898,4.235,899,2.477,900,5.018,901,2.884,902,2.884]],["t/87",[1,2.24,55,1.062,114,2.815,115,2.5,682,2.815,789,3.831,903,5.406,904,5.269,905,5.406,906,5.406,907,5.406,908,5.406,909,5.406]],["t/89",[7,0.534,9,0.517,10,0.517,12,0.578,16,0.832,20,1.16,23,0.832,24,1.79,28,1.704,38,0.85,42,1.813,55,0.675,89,2.559,103,3.841,107,3.841,145,2.42,212,1.351,287,3.2,366,4.239,596,1.684,682,2.882,689,2.952,708,5.145,904,3.678,910,3.437,911,3.437,912,4.801,913,3.437,914,4.801]],["t/91",[1,2.27,7,0.528,9,0.507,10,0.507,12,0.578,16,0.824,20,1.139,23,0.893,24,1.757,38,0.778,42,1.851,55,0.663,73,1.863,89,2.748,145,2.073,212,2.153,287,2.912,596,1.653,782,2.584,904,3.63,915,5.942,916,5.479,917,3.374,918,3.374,919,3.374,920,5.479,921,4.74,922,5.479,923,3.374,924,3.374,925,5.479,926,3.374]],["t/93",[1,2.29,7,0.533,110,3.07,114,2.879,115,2.556,231,3.544,360,2.29,548,4.234,596,2.709,657,2.709,682,2.879,789,3.882]],["t/95",[7,0.53,9,0.715,10,0.715,12,0.562,16,0.826,20,1.605,23,0.943,28,1.949,55,0.666,99,2.33,109,4.084,131,1.765,132,1.765,134,2.641,135,2.361,136,2.173,142,0.774,210,1.882,378,4.717,473,2.173,596,1.661,657,2.692,660,2.361,661,2.016,682,3.477,927,3.389,928,5.493,929,6.271,930,6.271,931,5.954,932,5.954,933,5.954,934,3.389,935,3.389,936,3.389,937,3.389]],["t/97",[1,2.188,7,0.436,9,0.68,10,0.68,12,0.564,16,0.68,23,0.867,24,1.644,35,2.024,38,0.75,42,1.466,55,0.62,76,1.878,89,1.46,94,1.547,142,1.206,155,1.873,180,2.711,212,1.241,265,2.418,271,3.179,309,2.711,388,1.644,596,1.547,625,2.711,657,2.216,660,2.199,661,2.69,665,3.883,666,2.711,667,3.883,668,3.463,682,1.644,767,2.199,938,3.157,939,3.157,940,3.157,941,3.157,942,3.157,943,3.157,944,3.157,945,3.157,946,5.282,947,4.521,948,3.157,949,4.521,950,3.157,951,3.157,952,4.521,953,3.157,954,3.157,955,2.711,956,3.157,957,3.157,958,3.157,959,3.157,960,3.157,961,3.157,962,3.157,963,3.157,964,3.157,965,3.157,966,3.157,967,3.157]],["t/99",[1,2.004,7,0.58,35,3.101,55,0.95,94,2.371,113,2.371,114,2.519,128,2.878,132,2.519,188,4.155,217,3.369,278,2.687,339,4.155,412,3.705,596,2.371,657,2.371,682,2.519,701,5.169,746,4.155,749,4.155,769,5.169,789,2.878,968,6.019,969,4.837,970,4.155,971,6.019,972,4.837]],["t/101",[7,0.506,28,2.246,55,1.032,113,2.574,129,3.124,132,2.735,278,2.917,379,4.511,664,4.511,694,4.022,767,3.658,778,4.511,789,3.124,970,4.511,973,5.252,974,5.252,975,5.252,976,5.252,977,5.252]],["t/103",[7,0.651,115,3.246,978,5.178,979,5.178,980,5.178,981,5.178,982,6.275,983,5.178,984,5.178,985,5.178,986,5.178,987,5.178,988,5.178,989,5.178,990,5.178,991,5.178]],["t/105",[7,0.412,9,0.643,10,0.643,12,0.548,16,0.836,17,2.227,20,1.443,23,0.836,24,2.227,28,1.517,38,0.964,87,3.523,110,3.09,170,3.275,203,2.543,341,3.672,360,1.771,366,4.737,596,2.095,682,3.221,992,6.185,993,4.275,994,5.564,995,4.275]],["t/107",[7,0.42,9,0.451,10,0.451,12,0.58,16,0.847,23,0.655,28,1.822,38,0.619,42,1.426,43,1.471,49,2.091,54,1.244,55,0.59,89,1.388,132,1.564,133,1.786,142,0.686,155,1.244,287,2.762,360,1.244,564,5.533,710,2.299,719,2.578,879,3.745,955,2.578,996,3.002,997,3.002,998,5.635,999,6.244,1000,3.002,1001,3.002,1002,3.002,1003,4.36,1004,4.36,1005,3.002,1006,3.002,1007,3.002,1008,4.36,1009,3.002,1010,3.002,1011,3.002,1012,3.002,1013,3.002,1014,3.002,1015,3.002,1016,3.002,1017,3.002,1018,4.36,1019,4.36,1020,4.36,1021,3.002,1022,3.002,1023,3.002,1024,3.002,1025,3.002,1026,3.002]],["t/109",[7,0.448,18,3.973,19,2.279,55,1.217,69,2.82,93,1.609,99,1.609,104,2.515,115,1.518,129,3.493,131,2.812,132,2.422,133,1.953,134,3.754,135,3.76,173,2.287,193,1.953,203,1.953,210,1.824,226,2.287,238,2.287,288,2.82,351,2.82,360,1.36,393,2.515,398,5.043,402,2.82,412,2.515,473,2.105,495,2.82,552,2.82,657,2.877,735,2.82,768,2.515,809,2.515,814,5.043,817,2.515,818,3.561,821,2.82,822,2.82,1027,3.283,1028,3.283,1029,3.283,1030,3.283,1031,3.283,1032,3.283,1033,3.283,1034,5.871,1035,3.283,1036,3.283,1037,3.283,1038,3.283,1039,3.283,1040,3.283,1041,3.283,1042,3.283,1043,3.283,1044,4.65,1045,3.283,1046,3.283,1047,3.283,1048,3.283,1049,3.283,1050,3.283,1051,3.283]],["t/112",[7,0.319,9,0.498,10,0.498,12,0.57,16,0.886,19,2.293,23,0.815,37,2.307,38,0.47,42,0.92,55,0.651,102,4.763,142,1.069,155,1.372,231,4.137,278,1.84,360,1.372,419,2.537,424,2.537,457,2.845,504,3.584,560,2.537,657,1.624,661,2.784,1052,3.313,1053,4.679,1054,3.313,1055,2.845,1056,3.313,1057,4.679,1058,4.679,1059,4.679,1060,5.425,1061,3.313,1062,3.313,1063,4.679,1064,3.313,1065,3.313,1066,5.425,1067,5.425,1068,3.313,1069,5.425,1070,3.313,1071,3.313,1072,3.313,1073,3.313,1074,3.313,1075,3.313,1076,3.313,1077,3.313]],["t/114",[7,0.244,9,0.38,10,0.38,12,0.564,16,0.778,23,0.881,38,0.359,54,1.047,58,3.296,63,1.936,64,1.761,65,2.673,87,1.239,92,2.171,93,1.239,98,1.936,113,1.239,114,1.316,142,0.577,153,2.171,190,3.231,212,2.394,223,1.761,224,3.296,231,4.381,238,1.761,265,1.936,278,1.404,360,1.047,365,2.76,388,3.053,393,1.936,419,1.936,423,2.171,505,1.936,511,1.761,514,3.296,560,1.936,668,1.936,714,3.296,773,2.171,804,2.171,806,2.171,881,2.171,899,3.296,1055,2.171,1078,3.837,1079,2.528,1080,4.639,1081,3.837,1082,2.528,1083,2.528,1084,2.528,1085,2.528,1086,4.639,1087,2.528,1088,2.528,1089,5.179,1090,2.528,1091,3.837,1092,4.639,1093,2.528,1094,2.528,1095,4.639,1096,2.528,1097,3.837,1098,2.528,1099,2.528,1100,2.528,1101,2.528,1102,2.528,1103,3.837,1104,2.528,1105,2.528,1106,2.528,1107,2.528,1108,2.528,1109,2.528,1110,2.528,1111,2.528,1112,2.528,1113,2.528,1114,2.528,1115,2.528,1116,2.528,1117,2.528,1118,2.528]]],"invertedIndex":[["",{"_index":12,"t":{"2":{"position":[[144,2],[215,1],[255,1],[288,2],[307,2],[444,2],[477,2],[507,2],[510,3],[514,1],[534,1],[572,2],[575,4],[580,1],[628,1],[654,2],[728,1],[754,2],[757,3],[761,2]]},"4":{"position":[[17,1],[27,1],[71,2],[90,2],[107,1],[115,1],[131,1],[159,1],[429,2],[444,2],[454,1],[465,1],[481,1],[621,2],[638,1],[647,1],[763,1],[801,1],[816,1],[824,1],[834,1],[886,1],[901,1],[909,1],[963,1],[973,1],[1056,2],[1061,1],[1081,1],[1093,1],[1105,1],[1146,2],[1151,1],[1168,1],[1176,1],[1185,1],[1197,1],[1238,2],[1256,2],[1269,1],[1290,1],[1303,2],[1317,2],[1456,2],[1463,1],[1467,1],[1482,1],[1488,1]]},"6":{"position":[[170,1],[180,1],[240,2],[262,2],[274,2],[282,2],[293,2],[305,2],[313,2],[325,1],[329,1],[350,2],[356,4],[364,4],[884,1],[894,1],[963,2],[1018,1],[1020,1],[1027,2],[1038,1],[1043,1],[1056,2],[1077,1],[1079,2],[1183,1],[1193,1],[1285,2],[1314,2],[1320,1],[1389,1],[1396,2],[1408,1],[1412,1],[1417,1],[1427,2],[1459,1],[1461,2],[1525,1],[1535,1],[1603,2],[1621,1],[1631,2],[1659,1],[1679,1],[1690,1],[1731,1],[1787,1],[1818,1],[1873,1],[1905,1],[2131,2],[2201,1],[2314,3],[2324,2],[2339,1],[2341,2],[2344,1],[2473,4]]},"12":{"position":[[8,2],[31,2],[64,2],[78,2],[104,2]]},"14":{"position":[[16,2],[22,1]]},"16":{"position":[[307,1],[338,1],[375,1],[835,2],[841,1],[845,1],[859,1],[959,2],[965,1],[969,1],[989,2],[1017,1],[1058,2],[1071,2],[1078,1],[1084,1],[1112,1],[1189,2]]},"20":{"position":[[127,1],[232,2],[306,2]]},"24":{"position":[[8,2],[57,1],[59,1],[132,2]]},"26":{"position":[[42,1],[48,2],[77,1],[109,1],[134,2],[170,1],[192,1]]},"28":{"position":[[187,2],[199,2],[206,1],[232,1],[265,2],[289,1],[291,2],[328,1],[399,1],[439,1],[493,1],[548,1],[568,2],[579,1],[603,1],[631,1],[658,1],[664,1],[683,2],[693,1],[695,2]]},"30":{"position":[[121,2],[126,1],[147,2],[163,5],[172,1],[174,2],[185,5],[196,1],[198,2],[212,1],[231,5],[241,1],[243,2],[252,1],[274,1],[297,1],[320,1],[350,5],[360,1],[365,1],[367,2],[373,1],[384,5],[394,1],[399,1],[401,2],[407,1],[412,1],[492,5],[509,1],[511,2],[529,5],[551,1],[553,2],[565,1],[591,5],[617,2]]},"32":{"position":[[73,1],[120,1]]},"34":{"position":[[21,1],[100,1],[156,1],[192,1],[232,1],[340,2],[345,1],[349,1],[401,2],[438,2],[451,2],[459,1],[469,1],[473,1],[549,1],[614,2],[633,1],[701,1],[712,1],[723,1],[734,1],[745,1],[756,1],[767,1],[779,1],[791,1],[803,1],[815,1],[827,1],[838,1],[872,2],[883,1],[885,2],[898,2],[914,1],[916,2]]},"36":{"position":[[97,1],[288,1],[299,1],[305,1],[334,1],[347,1],[360,1],[373,1],[386,1],[399,1],[412,1],[425,1],[438,1],[451,1],[464,1],[477,1],[483,1],[532,1],[544,1],[558,1],[638,1],[660,1],[672,1],[685,2],[697,4],[705,2],[708,3]]},"40":{"position":[[319,1],[331,1],[346,2],[371,2],[399,2],[411,2]]},"42":{"position":[[67,1],[77,1],[136,2],[159,2],[169,1],[171,1],[178,2],[197,1],[214,1],[234,2],[253,2],[263,2],[266,2],[287,2]]},"44":{"position":[[64,2],[103,1],[110,2],[125,2],[142,2],[209,1],[226,2],[263,2],[279,1],[296,2],[327,2]]},"46":{"position":[[64,2],[103,1],[110,2],[154,2],[196,2],[232,2]]},"51":{"position":[[153,1],[184,2],[241,2],[263,2],[300,3],[330,2],[345,2]]},"53":{"position":[[78,1],[88,1],[154,2],[212,1],[496,1],[506,1],[568,2],[636,1],[696,1]]},"55":{"position":[[163,1],[238,1],[254,1],[292,1],[309,1],[330,1],[458,2],[464,1],[498,2],[517,1],[537,2],[545,1],[563,2],[571,1],[589,2],[597,1],[615,2],[623,1],[641,2],[688,1],[690,1],[697,2],[742,1],[744,1],[751,2],[795,1],[797,1],[804,2],[849,1],[851,1],[858,2],[871,1],[892,1],[913,1],[934,1],[952,1],[980,1],[992,1],[1004,1],[1006,1],[1039,1],[1043,1],[1061,1],[1109,2],[1117,1],[1176,1],[1232,2],[1276,2],[1290,1],[1302,1],[1330,2],[1341,1],[1350,1]]},"57":{"position":[[145,2],[182,2],[202,2],[209,1],[256,1],[263,2],[276,1],[285,1],[289,1],[302,2],[409,2],[449,1],[492,1],[494,1],[501,2],[522,2],[563,1],[606,1],[608,1],[615,2],[635,1],[651,1],[657,1],[664,1],[711,1],[713,2],[720,1],[815,1],[817,2]]},"59":{"position":[[244,1],[269,1],[278,1],[288,1],[297,1],[379,1],[480,2],[492,2],[517,2],[527,1],[535,1],[541,1],[550,1],[560,1],[569,1],[575,1],[585,1],[600,1],[614,1],[621,1],[629,1],[648,1],[652,1],[665,2],[674,1],[676,2]]},"61":{"position":[[347,2],[480,2],[490,2],[548,2],[576,2],[586,2],[610,2],[629,2],[636,1],[646,1],[655,1],[661,1],[669,1],[682,1],[696,1],[703,1],[709,1],[739,1],[743,1],[892,2],[905,2]]},"63":{"position":[[63,1],[75,1],[123,1],[264,1],[321,2],[348,2],[376,2],[395,2],[408,1],[417,1],[426,1],[435,1],[455,1],[599,1],[627,1],[670,1],[772,2],[796,3],[800,2],[863,3],[867,2],[901,3],[905,2],[917,3],[921,2],[955,3],[959,2],[965,1],[1083,3],[1120,1],[1122,2]]},"66":{"position":[[42,1],[52,1],[109,2],[130,1],[140,2],[150,1],[152,1],[159,2],[174,1],[192,1],[201,1],[218,2],[228,2],[231,1],[233,2],[331,1],[344,1],[403,1],[439,1],[506,1],[535,1],[602,2],[611,1],[664,2],[679,1],[713,2],[725,1],[737,1],[911,1],[920,1]]},"68":{"position":[[73,2],[84,1],[102,2],[128,2],[145,2],[163,1],[169,1]]},"70":{"position":[[313,1],[381,1],[504,1]]},"72":{"position":[[267,2],[273,1],[310,2],[315,1],[478,2],[485,1],[502,1],[520,2],[529,1],[531,2]]},"74":{"position":[[45,2],[102,1],[130,1],[186,1],[214,1],[262,1],[277,2]]},"77":{"position":[[453,2],[460,1],[471,1],[476,2],[596,1]]},"81":{"position":[[35,1],[71,1],[106,1],[193,2],[206,1],[221,2],[229,1],[240,2],[248,1],[259,2],[273,1],[310,2],[327,1],[336,1],[343,2],[358,1],[365,1],[386,1],[447,1],[454,1],[458,1],[477,1],[481,1],[504,1],[508,2],[530,1],[543,1],[567,1],[579,1],[592,1],[610,2],[619,1],[621,2],[635,2],[657,1],[659,2],[673,1]]},"83":{"position":[[121,1],[123,1],[137,1],[139,1],[237,1],[429,2],[442,1],[457,2],[470,2],[478,1],[490,2],[498,1],[509,2],[517,1],[529,2],[537,1],[551,2],[568,1],[577,1],[638,1],[645,1],[649,1],[668,1],[675,1],[679,1],[702,1],[706,1],[710,1],[714,1],[735,1],[748,1],[773,2],[780,1],[782,2],[789,1],[802,1],[820,2],[839,1],[841,2],[852,1],[865,1],[877,1],[894,1]]},"85":{"position":[[119,2],[142,2],[179,2],[220,2],[230,1],[236,1],[263,2],[282,1],[332,1],[375,1],[381,1],[413,1],[424,1],[436,2],[443,1],[474,2],[481,1],[483,2],[495,2],[502,1],[504,2],[516,2],[523,1],[525,2],[531,1],[557,2],[586,2],[614,2],[653,2],[675,1],[767,1],[798,1],[834,2]]},"89":{"position":[[80,1],[102,1],[104,1],[116,2],[121,1],[126,1],[128,1],[130,1],[132,1],[138,1],[193,2],[216,2],[278,1],[280,1],[287,2],[332,2],[342,2],[345,1],[347,2],[428,2],[454,2],[472,2],[485,2],[528,1],[532,1],[550,1]]},"91":{"position":[[83,1],[102,1],[109,1],[113,1],[120,1],[124,1],[131,1],[140,1],[155,1],[208,2],[224,2],[293,1],[295,1],[302,2],[314,1],[329,2],[343,2],[346,1],[348,2],[447,2],[460,2],[476,1],[493,1],[512,1],[542,2],[560,1],[576,1]]},"95":{"position":[[111,2],[143,2],[242,1],[244,1],[251,2],[284,1],[286,1],[293,2],[361,1],[370,1],[436,2],[447,1],[449,1],[451,2],[462,1],[464,1],[466,2]]},"97":{"position":[[72,1],[82,1],[217,2],[226,1],[237,2],[299,2],[309,2],[321,1],[352,2],[382,2],[397,1],[424,1],[438,1],[443,1],[447,1],[471,2],[606,2],[619,2],[629,1],[642,1]]},"105":{"position":[[155,1],[162,2],[192,2],[208,2],[271,2],[295,1],[301,1],[307,1]]},"107":{"position":[[181,2],[186,1],[214,2],[271,2],[279,1],[333,2],[358,2],[372,1],[374,2],[388,1],[390,2],[429,1],[453,1],[465,1],[494,1],[506,1],[552,2],[567,1],[569,2],[608,2],[617,1],[619,2],[633,2],[655,1],[657,2],[671,1],[677,1],[682,1],[691,1],[708,1],[742,1],[755,1],[774,1],[781,1],[802,1],[822,1]]},"112":{"position":[[60,1],[118,2],[137,1],[210,1],[247,2],[269,2],[322,1],[426,1],[445,1],[478,1],[485,1],[511,1],[562,1],[579,2],[592,2],[620,2],[635,2],[665,2],[674,2],[714,1],[773,2],[785,2]]},"114":{"position":[[82,1],[113,2],[131,2],[184,1],[237,2],[266,2],[277,1],[357,2],[385,2],[398,1],[471,1],[503,1],[613,2],[642,1],[739,1],[790,1],[818,1],[946,1],[1032,2],[1045,2],[1102,2],[1113,2],[1195,2],[1220,2],[1266,2],[1315,1],[1347,1],[1374,1]]}}}],["0",{"_index":212,"t":{"10":{"position":[[22,2]]},"28":{"position":[[571,2]]},"42":{"position":[[199,2]]},"44":{"position":[[128,2]]},"59":{"position":[[537,1]]},"66":{"position":[[681,2]]},"68":{"position":[[131,2]]},"81":{"position":[[329,1]]},"83":{"position":[[570,1]]},"89":{"position":[[140,1]]},"91":{"position":[[111,1],[316,2],[578,1]]},"97":{"position":[[631,2]]},"114":{"position":[[291,1],[779,2],[782,2],[926,2],[929,2],[1443,2],[1446,2]]}}}],["0.0",{"_index":365,"t":{"28":{"position":[[208,4]]},"34":{"position":[[725,3]]},"36":{"position":[[301,3],[375,3],[560,3]]},"57":{"position":[[211,3]]},"81":{"position":[[275,4]]},"114":{"position":[[769,4],[916,4],[1433,4]]}}}],["0.0_dp",{"_index":578,"t":{"55":{"position":[[547,6],[573,6],[599,6],[625,6]]}}}],["0.0d0",{"_index":1006,"t":{"107":{"position":[[281,5]]}}}],["0.3142e+01",{"_index":183,"t":{"6":{"position":[[2093,10]]}}}],["0.5",{"_index":647,"t":{"59":{"position":[[571,3]]},"61":{"position":[[657,3]]},"66":{"position":[[441,4]]}}}],["0.939146996",{"_index":1023,"t":{"107":{"position":[[757,11]]}}}],["001234",{"_index":179,"t":{"6":{"position":[[2034,6]]}}}],["005",{"_index":1026,"t":{"107":{"position":[[845,3]]}}}],["01_add.f90",{"_index":130,"t":{"6":{"position":[[706,11],[771,10]]}}}],["09",{"_index":1022,"t":{"107":{"position":[[739,2]]}}}],["1",{"_index":42,"t":{"4":{"position":[[117,2],[161,2],[467,2],[483,2],[649,2],[818,1],[882,3],[903,1],[1117,3],[1209,3],[1292,2],[1465,1],[1484,1],[1486,1],[1490,1],[1492,1]]},"16":{"position":[[93,2],[132,2],[290,2],[304,2],[1080,1]]},"28":{"position":[[441,2]]},"34":{"position":[[461,2],[471,1],[635,1]]},"36":{"position":[[534,2],[546,2],[662,2],[674,2]]},"53":{"position":[[214,2],[638,2],[698,2]]},"55":{"position":[[311,2]]},"57":{"position":[[287,1],[451,2],[565,2],[637,2]]},"59":{"position":[[602,2],[607,1]]},"61":{"position":[[684,2],[689,1]]},"63":{"position":[[892,3]]},"66":{"position":[[132,1],[176,2],[333,2],[405,2],[508,2],[613,2],[727,2],[739,2],[913,2]]},"68":{"position":[[86,1],[171,1]]},"81":{"position":[[128,3],[388,2],[545,2],[670,2]]},"83":{"position":[[125,2],[128,2],[141,2],[144,3],[210,1],[579,2],[716,2],[750,2]]},"89":{"position":[[111,2],[119,1],[134,1],[488,2],[513,2],[552,1]]},"91":{"position":[[122,1],[137,2],[157,1],[478,2],[509,2],[545,2],[562,1]]},"97":{"position":[[426,2],[440,2],[445,1]]},"107":{"position":[[455,2],[673,3],[684,2]]},"112":{"position":[[428,2]]}}}],["1.0",{"_index":388,"t":{"30":{"position":[[214,5]]},"34":{"position":[[714,3],[736,3]]},"36":{"position":[[290,3],[401,3],[427,3]]},"81":{"position":[[231,3]]},"83":{"position":[[481,3],[500,3],[520,3],[539,3]]},"85":{"position":[[232,3]]},"97":{"position":[[729,3]]},"114":{"position":[[764,4],[774,4],[911,4],[921,4],[1428,4],[1438,4]]}}}],["1.0d0",{"_index":1016,"t":{"107":{"position":[[508,6]]}}}],["1.234728",{"_index":166,"t":{"6":{"position":[[1681,8]]}}}],["1.2e2",{"_index":214,"t":{"10":{"position":[[50,6]]}}}],["1.4e4",{"_index":345,"t":{"26":{"position":[[35,6]]}}}],["1.5i",{"_index":222,"t":{"10":{"position":[[120,5]]}}}],["1.8448319779454493e",{"_index":1025,"t":{"107":{"position":[[825,19]]}}}],["10",{"_index":43,"t":{"4":{"position":[[120,2],[164,2],[470,4],[652,4]]},"10":{"position":[[25,3]]},"16":{"position":[[174,4],[211,4],[257,4]]},"26":{"position":[[252,2]]},"53":{"position":[[217,2],[641,2],[701,2]]},"66":{"position":[[341,2],[408,2],[511,2],[616,3],[684,3],[730,4],[742,3],[916,3]]},"68":{"position":[[105,3]]},"77":{"position":[[372,3],[422,2]]},"107":{"position":[[736,2]]}}}],["10**i",{"_index":953,"t":{"97":{"position":[[644,5]]}}}],["10.0",{"_index":957,"t":{"97":{"position":[[740,4]]}}}],["100",{"_index":646,"t":{"59":{"position":[[529,3]]},"66":{"position":[[336,4]]}}}],["100.0",{"_index":959,"t":{"97":{"position":[[752,5]]}}}],["1000",{"_index":595,"t":{"55":{"position":[[1119,6]]}}}],["1000.0",{"_index":961,"t":{"97":{"position":[[765,6]]}}}],["10000.0",{"_index":963,"t":{"97":{"position":[[779,7]]}}}],["100000.0",{"_index":965,"t":{"97":{"position":[[794,8]]}}}],["1000000",{"_index":861,"t":{"81":{"position":[[208,7]]},"83":{"position":[[444,7]]}}}],["10000000",{"_index":1001,"t":{"107":{"position":[[188,8]]}}}],["10^(12",{"_index":275,"t":{"16":{"position":[[1134,7],[1145,7]]}}}],["118.40",{"_index":568,"t":{"55":{"position":[[368,8]]}}}],["11_circ_area.f90",{"_index":811,"t":{"72":{"position":[[956,16],[1417,16]]}}}],["11_const_module.f90",{"_index":810,"t":{"72":{"position":[[927,19]]}}}],["11_const_module.o",{"_index":812,"t":{"72":{"position":[[973,17]]}}}],["12",{"_index":346,"t":{"26":{"position":[[51,2],[71,3]]}}}],["1234",{"_index":176,"t":{"6":{"position":[[1973,4],[1978,4],[2000,4],[2005,4],[2029,4]]}}}],["12_add.f90",{"_index":936,"t":{"95":{"position":[[738,10]]}}}],["12_add_module.f90",{"_index":935,"t":{"95":{"position":[[711,17]]}}}],["12_add_module.o",{"_index":937,"t":{"95":{"position":[[749,15]]}}}],["13",{"_index":353,"t":{"26":{"position":[[255,2]]}}}],["16",{"_index":237,"t":{"16":{"position":[[106,3],[145,3],[179,3],[216,3],[262,3]]}}}],["16_hypotenuse_program.f90",{"_index":695,"t":{"63":{"position":[[681,25],[1186,25]]}}}],["16_hypotenuse_subroutine.f90",{"_index":683,"t":{"63":{"position":[[161,28],[540,28],[641,28]]}}}],["16_hypotenuse_subroutine.o",{"_index":696,"t":{"63":{"position":[[707,26],[1212,26]]}}}],["18",{"_index":507,"t":{"44":{"position":[[211,3],[266,2]]}}}],["2",{"_index":73,"t":{"4":{"position":[[777,2],[793,3],[826,1],[848,2],[864,3],[905,1],[1075,2],[1143,2],[1165,2],[1235,2],[1295,1],[1453,2]]},"6":{"position":[[1410,1],[1892,1]]},"10":{"position":[[19,2],[62,2]]},"16":{"position":[[96,2],[135,2]]},"26":{"position":[[189,2]]},"28":{"position":[[330,2],[384,1]]},"34":{"position":[[624,2]]},"55":{"position":[[1041,1]]},"63":{"position":[[946,3]]},"68":{"position":[[125,2]]},"81":{"position":[[346,1],[511,2]]},"83":{"position":[[111,1]]},"91":{"position":[[146,2],[528,2]]}}}],["2(i4",{"_index":347,"t":{"26":{"position":[[60,10]]}}}],["2.0",{"_index":221,"t":{"10":{"position":[[114,3]]},"30":{"position":[[128,5]]},"34":{"position":[[703,3]]},"36":{"position":[[336,3]]}}}],["2.0000",{"_index":956,"t":{"97":{"position":[[733,6]]}}}],["2.2",{"_index":892,"t":{"85":{"position":[[377,3]]}}}],["2.3d",{"_index":215,"t":{"10":{"position":[[57,4]]}}}],["2.54",{"_index":144,"t":{"6":{"position":[[1045,4]]}}}],["2.5937",{"_index":958,"t":{"97":{"position":[[745,6]]}}}],["2.7048",{"_index":960,"t":{"97":{"position":[[758,6]]}}}],["2.7171",{"_index":962,"t":{"97":{"position":[[772,6]]}}}],["2.71828182",{"_index":799,"t":{"72":{"position":[[317,10]]}}}],["2.7186",{"_index":964,"t":{"97":{"position":[[787,6]]}}}],["2.7220",{"_index":966,"t":{"97":{"position":[[803,6]]}}}],["200",{"_index":267,"t":{"16":{"position":[[942,6]]}}}],["2008",{"_index":983,"t":{"103":{"position":[[64,4]]}}}],["2022",{"_index":1021,"t":{"107":{"position":[[731,4]]}}}],["20a",{"_index":845,"t":{"77":{"position":[[479,4]]}}}],["25",{"_index":162,"t":{"6":{"position":[[1623,2]]}}}],["255",{"_index":1089,"t":{"114":{"position":[[293,3],[785,4],[932,4],[1449,4]]}}}],["256",{"_index":202,"t":{"6":{"position":[[2389,3]]}}}],["27.0",{"_index":870,"t":{"81":{"position":[[662,5]]}}}],["2889.6612",{"_index":569,"t":{"55":{"position":[[386,9]]}}}],["29_mpi_hello_world.f90",{"_index":848,"t":{"77":{"position":[[547,22],[639,22]]}}}],["29_mpi_hello_world.out",{"_index":849,"t":{"77":{"position":[[573,22],[665,22],[728,24]]}}}],["2i4",{"_index":348,"t":{"26":{"position":[[101,7]]},"85":{"position":[[739,8]]}}}],["3",{"_index":74,"t":{"4":{"position":[[780,2],[797,3],[820,1],[851,2],[868,3],[907,1],[1053,2],[1078,2],[1170,2]]},"26":{"position":[[281,2]]},"28":{"position":[[419,2]]},"34":{"position":[[347,1]]},"81":{"position":[[132,2],[675,1]]}}}],["3.0",{"_index":383,"t":{"30":{"position":[[134,4]]},"34":{"position":[[747,3]]},"36":{"position":[[349,3]]},"81":{"position":[[250,3]]}}}],["3.14",{"_index":213,"t":{"10":{"position":[[44,5]]},"59":{"position":[[543,4]]}}}],["3.14159",{"_index":157,"t":{"6":{"position":[[1322,7]]},"14":{"position":[[24,7]]},"30":{"position":[[265,8],[311,8]]}}}],["3.14159265",{"_index":797,"t":{"72":{"position":[[275,10]]}}}],["3.1416",{"_index":181,"t":{"6":{"position":[[2063,6]]}}}],["3.5",{"_index":344,"t":{"26":{"position":[[30,4]]}}}],["4",{"_index":75,"t":{"4":{"position":[[783,2],[828,1],[854,2],[911,1],[1083,2],[1173,2]]},"6":{"position":[[1747,1],[1826,1]]},"16":{"position":[[99,2],[119,3],[138,2],[158,3],[168,2],[192,3],[205,2],[229,3],[251,2],[293,1],[843,1],[967,1]]},"20":{"position":[[199,2]]},"28":{"position":[[417,1]]},"77":{"position":[[701,1],[726,1]]},"83":{"position":[[239,1]]}}}],["4.0",{"_index":464,"t":{"36":{"position":[[388,3],[414,3],[440,3]]},"70":{"position":[[59,3]]},"83":{"position":[[785,3]]}}}],["4.9",{"_index":299,"t":{"20":{"position":[[152,5],[193,5]]}}}],["45",{"_index":603,"t":{"55":{"position":[[1304,2]]}}}],["5",{"_index":76,"t":{"4":{"position":[[786,2],[822,1],[857,2],[913,1],[1086,2],[1178,2]]},"20":{"position":[[158,1]]},"26":{"position":[[284,1]]},"53":{"position":[[309,2]]},"85":{"position":[[415,1]]},"97":{"position":[[228,1]]}}}],["5.0",{"_index":389,"t":{"30":{"position":[[220,4]]},"34":{"position":[[758,3]]},"36":{"position":[[453,3]]},"72":{"position":[[487,4]]}}}],["50000.0",{"_index":1076,"t":{"112":{"position":[[758,8]]}}}],["6",{"_index":77,"t":{"4":{"position":[[789,3],[830,1],[860,3],[915,1],[1089,3],[1181,3]]},"6":{"position":[[1806,1]]},"53":{"position":[[316,1]]}}}],["6.0",{"_index":472,"t":{"36":{"position":[[479,3]]}}}],["6.3781d6",{"_index":576,"t":{"55":{"position":[[519,8]]}}}],["63",{"_index":206,"t":{"8":{"position":[[34,2]]}}}],["65",{"_index":509,"t":{"44":{"position":[[281,3]]}}}],["76.0",{"_index":1069,"t":{"112":{"position":[[480,4],[540,5],[752,5]]}}}],["8",{"_index":236,"t":{"16":{"position":[[102,3],[141,3],[171,2],[208,2],[254,2],[275,3],[365,1],[399,1]]},"26":{"position":[[75,1]]},"85":{"position":[[426,1]]}}}],["86.67",{"_index":566,"t":{"55":{"position":[[349,7]]}}}],["9.0",{"_index":461,"t":{"36":{"position":[[362,3],[466,3]]}}}],["99",{"_index":705,"t":{"63":{"position":[[1087,3],[1098,2]]}}}],["9999816.5167837571",{"_index":1024,"t":{"107":{"position":[[783,18]]}}}],["a(1,1",{"_index":458,"t":{"36":{"position":[[327,6]]}}}],["a(1,2",{"_index":459,"t":{"36":{"position":[[340,6]]}}}],["a(1,3",{"_index":460,"t":{"36":{"position":[[353,6]]}}}],["a(2,1",{"_index":462,"t":{"36":{"position":[[366,6]]}}}],["a(2,2",{"_index":463,"t":{"36":{"position":[[379,6]]}}}],["a(2,3",{"_index":465,"t":{"36":{"position":[[392,6]]}}}],["a(i",{"_index":613,"t":{"57":{"position":[[504,4],[659,4]]}}}],["a(m,k",{"_index":454,"t":{"36":{"position":[[259,7]]}}}],["a)/nh=(b−a)/n",{"_index":635,"t":{"59":{"position":[[169,14]]}}}],["a,/,a",{"_index":367,"t":{"28":{"position":[[344,10]]}}}],["a,f12.4,a",{"_index":594,"t":{"55":{"position":[[1083,14]]}}}],["a,f8.4",{"_index":615,"t":{"57":{"position":[[684,11],[768,11]]}}}],["a,i4,a",{"_index":612,"t":{"57":{"position":[[467,13],[581,13]]}}}],["a.out",{"_index":135,"t":{"6":{"position":[[782,7]]},"72":{"position":[[991,7]]},"95":{"position":[[765,7]]},"109":{"position":[[589,5],[663,7],[745,6]]}}}],["a128",{"_index":21,"t":{"2":{"position":[[222,12]]}}}],["a=0.0",{"_index":674,"t":{"61":{"position":[[922,6]]}}}],["ab",{"_index":386,"t":{"30":{"position":[[191,4]]}}}],["abov",{"_index":128,"t":{"6":{"position":[[678,5]]},"44":{"position":[[409,5]]},"53":{"position":[[460,5]]},"61":{"position":[[23,5]]},"72":{"position":[[389,5]]},"99":{"position":[[182,5]]}}}],["abs(1.0",{"_index":880,"t":{"83":{"position":[[844,7]]}}}],["abs(x",{"_index":291,"t":{"20":{"position":[[22,6]]}}}],["abs_path",{"_index":14,"t":{"2":{"position":[[159,9],[246,8],[310,8]]}}}],["absolut",{"_index":4,"t":{"2":{"position":[[49,8],[291,9]]},"20":{"position":[[29,8]]}}}],["access",{"_index":806,"t":{"72":{"position":[[666,10],[724,10],[830,10]]},"114":{"position":[[948,9]]}}}],["accuraci",{"_index":1020,"t":{"107":{"position":[[646,8],[813,8]]}}}],["aco",{"_index":323,"t":{"22":{"position":[[99,4]]}}}],["adapt",{"_index":755,"t":{"70":{"position":[[375,5]]}}}],["add",{"_index":109,"t":{"6":{"position":[[182,3],[214,3],[388,3]]},"95":{"position":[[571,3],[674,3]]}}}],["add_modul",{"_index":928,"t":{"95":{"position":[[73,10],[514,10],[579,10]]}}}],["add_numb",{"_index":932,"t":{"95":{"position":[[159,12],[341,13],[394,11],[628,13]]}}}],["adult",{"_index":508,"t":{"44":{"position":[[242,7],[308,7]]},"46":{"position":[[170,7],[208,7]]}}}],["advance='no",{"_index":158,"t":{"6":{"position":[[1346,13]]}}}],["ag",{"_index":504,"t":{"44":{"position":[[67,3],[98,4],[113,3],[120,4],[185,5],[204,4],[258,4],[275,3]]},"46":{"position":[[67,3],[98,4],[113,3],[129,5]]},"112":{"position":[[197,3],[668,5]]}}}],["age_group",{"_index":503,"t":{"44":{"position":[[32,9],[367,9]]}}}],["age_select",{"_index":513,"t":{"46":{"position":[[31,10],[276,10]]}}}],["albert",{"_index":1066,"t":{"112":{"position":[[447,7],[521,7],[733,7]]}}}],["alia",{"_index":882,"t":{"85":{"position":[[25,5]]}}}],["alloc",{"_index":64,"t":{"4":{"position":[[557,10],[689,10]]},"57":{"position":[[25,11]]},"85":{"position":[[334,8]]},"114":{"position":[[1320,8]]}}}],["allocat",{"_index":65,"t":{"4":{"position":[[573,12],[609,11]]},"34":{"position":[[389,11],[426,11]]},"57":{"position":[[133,11],[170,11]]},"114":{"position":[[560,11],[601,11]]}}}],["allocate(a(length",{"_index":609,"t":{"57":{"position":[[363,19]]}}}],["allocate(b(length",{"_index":610,"t":{"57":{"position":[[383,19]]}}}],["allocate(colored_lin",{"_index":1118,"t":{"114":{"position":[[1376,22]]}}}],["allocate(p2",{"_index":890,"t":{"85":{"position":[[269,12]]}}}],["allocate(vector_lin",{"_index":1102,"t":{"114":{"position":[[860,21]]}}}],["allocate(vector_line_type::vector_lin",{"_index":1101,"t":{"114":{"position":[[820,39]]}}}],["allocate(x(n",{"_index":425,"t":{"34":{"position":[[666,14]]}}}],["allocate(y(n",{"_index":426,"t":{"34":{"position":[[681,14]]}}}],["allow",{"_index":124,"t":{"6":{"position":[[594,7]]},"72":{"position":[[804,6]]}}}],["alpha",{"_index":446,"t":{"36":{"position":[[81,6],[182,6],[282,5],[607,6]]}}}],["alphanumer",{"_index":208,"t":{"8":{"position":[[69,12]]}}}],["alt",{"_index":439,"t":{"34":{"position":[[901,5]]}}}],["altern",{"_index":419,"t":{"34":{"position":[[578,9]]},"112":{"position":[[487,14]]},"114":{"position":[[792,11]]}}}],["an=h[f(a)2+f(a+h)+f(a+2h)+⋯+f(b)2]a_n",{"_index":636,"t":{"59":{"position":[[206,37]]}}}],["analyt",{"_index":869,"t":{"81":{"position":[[638,11]]}}}],["anoth",{"_index":53,"t":{"4":{"position":[[294,7]]},"6":{"position":[[806,7]]}}}],["appropri",{"_index":765,"t":{"70":{"position":[[520,11]]}}}],["approxim",{"_index":871,"t":{"83":{"position":[[8,11],[327,11]]}}}],["apt",{"_index":402,"t":{"32":{"position":[[35,3]]},"109":{"position":[[263,3]]}}}],["area",{"_index":622,"t":{"59":{"position":[[22,4],[184,4],[394,4],[504,4],[564,4],[609,4],[616,4],[643,4],[654,4],[668,5],[679,4]]},"61":{"position":[[616,4],[650,4],[691,4],[698,4],[745,4]]},"72":{"position":[[492,4],[497,4],[523,5],[534,4]]},"81":{"position":[[83,4],[286,5],[562,4],[613,5],[624,4]]},"83":{"position":[[218,4]]}}}],["area_rect",{"_index":866,"t":{"81":{"position":[[292,9],[348,9],[569,9]]}}}],["area_under_curv",{"_index":860,"t":{"81":{"position":[[143,16],[689,16]]}}}],["arg",{"_index":363,"t":{"28":{"position":[[190,3],[488,4],[599,3]]}}}],["argument",{"_index":293,"t":{"20":{"position":[[59,8]]},"28":{"position":[[82,10],[279,9],[386,12],[505,8]]},"61":{"position":[[135,8]]}}}],["arithmet",{"_index":105,"t":{"6":{"position":[[110,10]]},"30":{"position":[[322,10]]}}}],["arr",{"_index":889,"t":{"85":{"position":[[223,3],[439,3],[748,3]]}}}],["arr(1",{"_index":893,"t":{"85":{"position":[[406,6]]}}}],["arr(2",{"_index":894,"t":{"85":{"position":[[417,6]]}}}],["array",{"_index":37,"t":{"4":{"position":[[29,5],[43,5],[207,5],[352,6],[551,5],[683,5],[741,5],[1374,5]]},"34":{"position":[[563,6],[588,5]]},"57":{"position":[[19,5],[425,5],[539,5]]},"112":{"position":[[335,5]]}}}],["array2",{"_index":60,"t":{"4":{"position":[[385,6],[536,6]]}}}],["article’",{"_index":743,"t":{"70":{"position":[[149,9]]}}}],["asin",{"_index":317,"t":{"22":{"position":[[40,4]]}}}],["asin(sqrt(a",{"_index":593,"t":{"55":{"position":[[1063,13]]}}}],["ask",{"_index":101,"t":{"6":{"position":[[70,4]]}}}],["assign",{"_index":58,"t":{"4":{"position":[[342,6],[717,6],[1359,6],[1402,9]]},"114":{"position":[[699,8],[811,6]]}}}],["associ",{"_index":897,"t":{"85":{"position":[[539,11],[574,11],[677,10]]}}}],["associated(p1",{"_index":898,"t":{"85":{"position":[[589,14],[656,14]]}}}],["ast",{"_index":447,"t":{"36":{"position":[[90,4]]}}}],["atan",{"_index":327,"t":{"22":{"position":[[160,4]]}}}],["atan(1.0",{"_index":602,"t":{"55":{"position":[[1292,9]]}}}],["atan(1.0d0",{"_index":263,"t":{"16":{"position":[[847,11],[971,11]]},"83":{"position":[[881,12],[896,11]]}}}],["atan2",{"_index":328,"t":{"22":{"position":[[177,5]]}}}],["attribut",{"_index":738,"t":{"70":{"position":[[47,11],[492,11]]}}}],["avail",{"_index":239,"t":{"16":{"position":[[313,9]]}}}],["avoid",{"_index":281,"t":{"18":{"position":[[85,7]]}}}],["b",{"_index":87,"t":{"4":{"position":[[1149,1],[1281,2]]},"6":{"position":[[246,2],[303,1],[316,1],[331,1],[361,2]]},"36":{"position":[[95,1],[620,2]]},"55":{"position":[[793,1],[847,1]]},"57":{"position":[[185,1],[835,2]]},"59":{"position":[[498,2],[539,1],[552,2]]},"61":{"position":[[392,2],[554,1],[638,2]]},"105":{"position":[[87,1],[168,1],[183,2],[214,1],[244,2],[277,1],[303,1],[305,1]]},"114":{"position":[[275,1]]}}}],["b(1,1",{"_index":466,"t":{"36":{"position":[[405,6]]}}}],["b(1,2",{"_index":467,"t":{"36":{"position":[[418,6]]}}}],["b(2,1",{"_index":468,"t":{"36":{"position":[[431,6]]}}}],["b(2,2",{"_index":469,"t":{"36":{"position":[[444,6]]}}}],["b(3,1",{"_index":470,"t":{"36":{"position":[[457,6]]}}}],["b(3,2",{"_index":471,"t":{"36":{"position":[[470,6]]}}}],["b(i",{"_index":614,"t":{"57":{"position":[[618,4],[666,4]]}}}],["b(k,n",{"_index":455,"t":{"36":{"position":[[267,7]]}}}],["b=3.14159",{"_index":675,"t":{"61":{"position":[[929,10]]}}}],["b^2}c=a2+b2",{"_index":680,"t":{"63":{"position":[[77,12]]}}}],["base",{"_index":714,"t":{"66":{"position":[[378,5]]},"114":{"position":[[93,4],[197,4]]}}}],["basic",{"_index":379,"t":{"30":{"position":[[0,5]]},"101":{"position":[[112,9]]}}}],["befor",{"_index":813,"t":{"72":{"position":[[1032,6],[1132,6]]}}}],["beforehand",{"_index":279,"t":{"18":{"position":[[45,11]]}}}],["below",{"_index":895,"t":{"85":{"position":[[445,5]]}}}],["benchmark",{"_index":1014,"t":{"107":{"position":[[438,9]]}}}],["beta",{"_index":448,"t":{"36":{"position":[[99,5],[189,4],[294,4],[626,5]]}}}],["between",{"_index":547,"t":{"55":{"position":[[23,7],[188,7]]}}}],["binari",{"_index":1045,"t":{"109":{"position":[[571,6]]}}}],["bit",{"_index":1104,"t":{"114":{"position":[[970,3]]}}}],["bla",{"_index":399,"t":{"32":{"position":[[8,4]]},"34":{"position":[[237,4]]}}}],["blank",{"_index":340,"t":{"24":{"position":[[102,5]]}}}],["blaslib",{"_index":403,"t":{"32":{"position":[[47,7]]}}}],["block",{"_index":973,"t":{"101":{"position":[[10,5]]}}}],["bna(36.12",{"_index":565,"t":{"55":{"position":[[338,10]]}}}],["bodi",{"_index":908,"t":{"87":{"position":[[118,5]]}}}],["both",{"_index":118,"t":{"6":{"position":[[486,4]]},"16":{"position":[[522,4]]},"34":{"position":[[525,4]]},"72":{"position":[[1068,4]]},"85":{"position":[[705,4]]}}}],["bound",{"_index":627,"t":{"59":{"position":[[67,6]]}}}],["brainerd",{"_index":986,"t":{"103":{"position":[[93,8]]}}}],["break",{"_index":194,"t":{"6":{"position":[[2247,5]]},"26":{"position":[[116,6],[181,7]]}}}],["brew",{"_index":1040,"t":{"109":{"position":[[327,4]]}}}],["build",{"_index":758,"t":{"70":{"position":[[405,5]]}}}],["built",{"_index":617,"t":{"57":{"position":[[736,5],[797,5]]}}}],["byte",{"_index":245,"t":{"16":{"position":[[452,6]]}}}],["c",{"_index":473,"t":{"36":{"position":[[507,1],[632,2],[653,1],[688,5]]},"63":{"position":[[159,1],[538,1],[639,1]]},"72":{"position":[[925,1]]},"95":{"position":[[709,1]]},"109":{"position":[[976,1]]}}}],["c(i,j",{"_index":475,"t":{"36":{"position":[[551,6],[712,6]]}}}],["c(m,n",{"_index":456,"t":{"36":{"position":[[275,6]]}}}],["c=a2+b2c",{"_index":678,"t":{"63":{"position":[[54,8]]}}}],["cabs(z",{"_index":387,"t":{"30":{"position":[[201,7]]}}}],["cacul",{"_index":644,"t":{"59":{"position":[[381,8]]}}}],["calcul",{"_index":145,"t":{"6":{"position":[[1107,9],[1195,9]]},"36":{"position":[[6,10]]},"42":{"position":[[0,9],[79,9]]},"55":{"position":[[165,9]]},"59":{"position":[[8,9]]},"61":{"position":[[201,12]]},"63":{"position":[[18,10],[815,9]]},"66":{"position":[[0,9]]},"81":{"position":[[73,9]]},"89":{"position":[[0,9],[82,9],[233,10]]},"91":{"position":[[0,9],[241,10]]}}}],["calculate_hypotenus",{"_index":692,"t":{"63":{"position":[[483,20]]}}}],["calculate_hypotenuse(s1",{"_index":704,"t":{"63":{"position":[[1040,24]]}}}],["calculate_hypotenuse(side_a",{"_index":684,"t":{"63":{"position":[[201,28]]}}}],["call",{"_index":28,"t":{"2":{"position":[[587,4],[695,4]]},"28":{"position":[[459,4]]},"36":{"position":[[578,4]]},"51":{"position":[[7,4],[203,4],[266,4]]},"61":{"position":[[153,7]]},"63":{"position":[[985,4],[1015,7],[1035,4]]},"66":{"position":[[411,4]]},"77":{"position":[[165,4],[187,4],[247,4],[304,4],[484,4]]},"81":{"position":[[401,4],[423,4]]},"83":{"position":[[592,4],[614,4]]},"89":{"position":[[296,4],[496,4]]},"95":{"position":[[604,4],[623,4],[642,4]]},"101":{"position":[[64,7],[92,4]]},"105":{"position":[[170,4]]},"107":{"position":[[297,4],[403,4],[522,4]]}}}],["carlo",{"_index":858,"t":{"81":{"position":[[43,5]]},"83":{"position":[[44,5]]}}}],["case",{"_index":116,"t":{"6":{"position":[[444,4]]},"8":{"position":[[154,4]]},"32":{"position":[[125,4]]},"46":{"position":[[124,4],[135,4]]}}}],["case(18:64",{"_index":515,"t":{"46":{"position":[[178,11]]}}}],["case(65",{"_index":516,"t":{"46":{"position":[[216,9]]}}}],["cc⇐αa∗b+βc",{"_index":449,"t":{"36":{"position":[[105,10]]}}}],["cdot",{"_index":641,"t":{"59":{"position":[[290,6]]}}}],["centimet",{"_index":138,"t":{"6":{"position":[[843,10],[907,10],[1007,10]]}}}],["certain",{"_index":826,"t":{"74":{"position":[[60,7]]}}}],["chang",{"_index":769,"t":{"70":{"position":[[587,7]]},"99":{"position":[[21,6],[128,8]]}}}],["charact",{"_index":197,"t":{"6":{"position":[[2265,9]]},"8":{"position":[[37,11],[82,10],[116,9]]},"10":{"position":[[152,10]]},"16":{"position":[[279,10]]},"24":{"position":[[108,9]]},"77":{"position":[[114,10]]}}}],["character(len=128",{"_index":11,"t":{"2":{"position":[[125,18],[346,18],[413,19],[458,18]]}}}],["character(len=20",{"_index":229,"t":{"12":{"position":[[86,17]]}}}],["character(len=32",{"_index":362,"t":{"28":{"position":[[169,17]]}}}],["character(len=64",{"_index":1054,"t":{"112":{"position":[[169,17]]}}}],["character(len=8",{"_index":1002,"t":{"107":{"position":[[197,16]]}}}],["check",{"_index":896,"t":{"85":{"position":[[533,5]]}}}],["choic",{"_index":1042,"t":{"109":{"position":[[405,6]]}}}],["circ",{"_index":152,"t":{"6":{"position":[[1261,4],[1483,4]]}}}],["circ_area",{"_index":801,"t":{"72":{"position":[[432,9],[551,9]]}}}],["circl",{"_index":147,"t":{"6":{"position":[[1140,6],[1228,6],[1381,7],[1452,6]]},"83":{"position":[[193,6],[271,6],[300,8]]}}}],["circum",{"_index":154,"t":{"6":{"position":[[1291,6],[1401,6],[1464,6]]}}}],["circumfer",{"_index":146,"t":{"6":{"position":[[1121,13],[1209,13],[1430,14]]},"12":{"position":[[42,13]]}}}],["class",{"_index":1095,"t":{"114":{"position":[[473,5],[665,5],[1246,5]]}}}],["class(line_typ",{"_index":1096,"t":{"114":{"position":[[583,17]]}}}],["close(unit=1",{"_index":535,"t":{"53":{"position":[[249,13],[676,13]]}}}],["cm",{"_index":143,"t":{"6":{"position":[[966,3],[1030,2],[1040,2]]}}}],["cm2inch",{"_index":141,"t":{"6":{"position":[[936,7],[1099,7]]}}}],["cmplx(1.0",{"_index":390,"t":{"30":{"position":[[254,10]]}}}],["co",{"_index":321,"t":{"22":{"position":[[79,3],[124,3]]}}}],["code",{"_index":129,"t":{"6":{"position":[[684,4],[745,4]]},"51":{"position":[[339,5]]},"61":{"position":[[51,5],[105,6],[244,4]]},"77":{"position":[[534,5]]},"101":{"position":[[171,5]]},"109":{"position":[[117,6],[428,6],[487,4],[631,5]]}}}],["color",{"_index":1110,"t":{"114":{"position":[[1105,7]]}}}],["colored_lin",{"_index":1097,"t":{"114":{"position":[[616,13],[726,12]]}}}],["colored_line%b",{"_index":1113,"t":{"114":{"position":[[1148,14]]}}}],["colored_line%direct",{"_index":1116,"t":{"114":{"position":[[1223,22]]}}}],["colored_line%g",{"_index":1112,"t":{"114":{"position":[[1132,15]]}}}],["colored_line%r",{"_index":1111,"t":{"114":{"position":[[1116,15]]}}}],["colored_line%x_start",{"_index":1108,"t":{"114":{"position":[[1048,20]]}}}],["colored_line_typ",{"_index":1086,"t":{"114":{"position":[[240,17],[306,17],[708,17]]}}}],["colored_line_type(0.0",{"_index":1100,"t":{"114":{"position":[[741,22]]}}}],["come",{"_index":815,"t":{"72":{"position":[[1127,4]]}}}],["comma",{"_index":341,"t":{"24":{"position":[[121,5]]},"105":{"position":[[147,7]]}}}],["command",{"_index":358,"t":{"28":{"position":[[69,7]]},"51":{"position":[[53,8],[170,7]]},"74":{"position":[[143,7]]}}}],["command_argument_count",{"_index":355,"t":{"28":{"position":[[12,22],[234,24]]}}}],["comment",{"_index":185,"t":{"6":{"position":[[2111,7]]}}}],["commerci",{"_index":762,"t":{"70":{"position":[[451,13]]}}}],["common",{"_index":338,"t":{"22":{"position":[[300,6]]},"70":{"position":[[39,7],[168,7]]}}}],["compil",{"_index":131,"t":{"6":{"position":[[721,7]]},"32":{"position":[[75,7]]},"34":{"position":[[194,8]]},"63":{"position":[[125,7],[504,7],[1155,7]]},"72":{"position":[[875,7],[1023,8],[1171,9],[1223,7],[1297,8]]},"77":{"position":[[522,7],[621,8]]},"95":{"position":[[678,7]]},"109":{"position":[[201,9],[518,8],[849,7]]}}}],["complex",{"_index":220,"t":{"10":{"position":[[96,7]]},"12":{"position":[[56,7]]},"16":{"position":[[196,8],[470,7]]},"20":{"position":[[93,7]]},"22":{"position":[[203,7]]},"30":{"position":[[15,7],[113,7],[139,7],[567,7],[597,8]]}}}],["complex_numb",{"_index":381,"t":{"30":{"position":[[84,14],[642,14]]}}}],["complx(x",{"_index":294,"t":{"20":{"position":[[68,9]]}}}],["compon",{"_index":611,"t":{"57":{"position":[[431,12],[545,12]]}}}],["compos",{"_index":207,"t":{"8":{"position":[[57,8]]}}}],["comput",{"_index":412,"t":{"34":{"position":[[81,9]]},"99":{"position":[[91,9]]},"109":{"position":[[53,10]]}}}],["concaten",{"_index":199,"t":{"6":{"position":[[2291,13]]}}}],["concurr",{"_index":728,"t":{"66":{"position":[[749,11],[824,10],[897,10]]}}}],["condit",{"_index":715,"t":{"66":{"position":[[387,10]]}}}],["conjg(z2",{"_index":397,"t":{"30":{"position":[[620,9]]}}}],["conjug",{"_index":396,"t":{"30":{"position":[[575,9],[606,10]]}}}],["consid",{"_index":288,"t":{"18":{"position":[[262,10]]},"109":{"position":[[155,8]]}}}],["consist",{"_index":976,"t":{"101":{"position":[[122,8]]}}}],["const_modul",{"_index":796,"t":{"72":{"position":[[208,12],[339,12],[446,12]]},"74":{"position":[[23,13],[83,13],[111,13],[167,13],[195,13],[243,13]]}}}],["constant",{"_index":793,"t":{"72":{"position":[[131,9]]}}}],["constants_modul",{"_index":794,"t":{"72":{"position":[[159,17]]}}}],["contain",{"_index":596,"t":{"55":{"position":[[1130,8]]},"61":{"position":[[359,8]]},"89":{"position":[[357,8]]},"91":{"position":[[371,8]]},"93":{"position":[[130,8]]},"95":{"position":[[185,8]]},"97":{"position":[[242,8]]},"99":{"position":[[192,8]]},"105":{"position":[[216,8]]}}}],["continu",{"_index":186,"t":{"6":{"position":[[2138,12]]}}}],["contrast",{"_index":967,"t":{"97":{"position":[[813,8]]}}}],["convers",{"_index":270,"t":{"16":{"position":[[1024,10]]}}}],["convert",{"_index":2,"t":{"2":{"position":[[22,7]]},"6":{"position":[[834,8],[896,10]]},"20":{"position":[[81,8],[167,8],[317,8]]}}}],["copi",{"_index":752,"t":{"70":{"position":[[315,4],[956,4]]}}}],["correct",{"_index":975,"t":{"101":{"position":[[100,8]]}}}],["cos(lat1",{"_index":589,"t":{"55":{"position":[[982,9]]}}}],["cos(lat2",{"_index":590,"t":{"55":{"position":[[994,9]]}}}],["cos(theta))/2",{"_index":563,"t":{"55":{"position":[[316,13]]}}}],["cosh",{"_index":324,"t":{"22":{"position":[[119,4]]}}}],["cosin",{"_index":322,"t":{"22":{"position":[[83,6],[112,6]]}}}],["count",{"_index":874,"t":{"83":{"position":[[156,5]]}}}],["cpu_time(end_tim",{"_index":1017,"t":{"107":{"position":[[527,18]]}}}],["cpu_time(start_tim",{"_index":1012,"t":{"107":{"position":[[408,20]]}}}],["creat",{"_index":817,"t":{"72":{"position":[[1189,6]]},"85":{"position":[[284,7]]},"109":{"position":[[562,6]]}}}],["creativ",{"_index":737,"t":{"70":{"position":[[30,8],[159,8]]}}}],["credit",{"_index":766,"t":{"70":{"position":[[532,7]]}}}],["cup_tim",{"_index":997,"t":{"107":{"position":[[41,8]]}}}],["current",{"_index":719,"t":{"66":{"position":[[471,7]]},"107":{"position":[[58,7]]}}}],["curv",{"_index":624,"t":{"59":{"position":[[37,5],[118,5],[199,6],[407,5]]},"81":{"position":[[98,5]]}}}],["cx",{"_index":228,"t":{"12":{"position":[[67,2]]}}}],["cycl",{"_index":721,"t":{"66":{"position":[[494,6],[529,5]]}}}],["c⇐αa∗b+βcc",{"_index":444,"t":{"36":{"position":[[59,10]]}}}],["d",{"_index":216,"t":{"10":{"position":[[65,1]]}}}],["dangl",{"_index":902,"t":{"85":{"position":[[781,8]]}}}],["data",{"_index":235,"t":{"16":{"position":[[68,4]]},"34":{"position":[[515,4]]},"53":{"position":[[27,4],[420,4],[513,4]]}}}],["data(10",{"_index":541,"t":{"53":{"position":[[575,8]]}}}],["data(ii",{"_index":544,"t":{"53":{"position":[[660,8],[718,8]]}}}],["date",{"_index":998,"t":{"107":{"position":[[66,4],[217,4],[351,6],[724,6]]}}}],["date(1:4",{"_index":1009,"t":{"107":{"position":[[361,10]]}}}],["date(5:6",{"_index":1010,"t":{"107":{"position":[[377,10]]}}}],["date(7:8",{"_index":1011,"t":{"107":{"position":[[393,9]]}}}],["date_and_tim",{"_index":996,"t":{"107":{"position":[[23,13]]}}}],["date_and_time(date=d",{"_index":1007,"t":{"107":{"position":[[302,24]]}}}],["dcmplx(1.0",{"_index":391,"t":{"30":{"position":[[299,11]]}}}],["deallocate(a",{"_index":67,"t":{"4":{"position":[[657,13]]},"57":{"position":[[838,13]]}}}],["deallocate(b",{"_index":621,"t":{"57":{"position":[[852,13]]}}}],["deallocate(colored_lin",{"_index":1117,"t":{"114":{"position":[[1349,24]]}}}],["deallocate(i",{"_index":441,"t":{"34":{"position":[[961,13]]}}}],["deallocate(p2",{"_index":901,"t":{"85":{"position":[[752,14]]}}}],["deallocate(x",{"_index":440,"t":{"34":{"position":[[947,13]]}}}],["debian",{"_index":1036,"t":{"109":{"position":[[250,7]]}}}],["decim",{"_index":172,"t":{"6":{"position":[[1836,7],[1907,7]]},"16":{"position":[[872,7]]}}}],["declar",{"_index":278,"t":{"18":{"position":[[36,8],[154,9]]},"63":{"position":[[266,7]]},"72":{"position":[[624,8]]},"99":{"position":[[148,8]]},"101":{"position":[[181,11]]},"112":{"position":[[324,7]]},"114":{"position":[[546,8]]}}}],["default",{"_index":238,"t":{"16":{"position":[[110,8],[149,8],[183,8],[220,8],[266,8],[295,8]]},"46":{"position":[[140,7]]},"109":{"position":[[737,7]]},"114":{"position":[[1252,7]]}}}],["defin",{"_index":560,"t":{"55":{"position":[[269,7]]},"112":{"position":[[65,7]]},"114":{"position":[[84,6]]}}}],["definit",{"_index":608,"t":{"57":{"position":[[340,10]]}}}],["deg2rad",{"_index":605,"t":{"55":{"position":[[1376,7]]}}}],["deg2rad(degre",{"_index":597,"t":{"55":{"position":[[1148,15]]}}}],["deg2rad(lat1",{"_index":583,"t":{"55":{"position":[[873,13]]}}}],["deg2rad(lat2",{"_index":585,"t":{"55":{"position":[[915,13]]}}}],["deg2rad(lon1",{"_index":584,"t":{"55":{"position":[[894,13]]}}}],["deg2rad(lon2",{"_index":586,"t":{"55":{"position":[[936,13]]}}}],["deg_to_rad",{"_index":601,"t":{"55":{"position":[[1279,10],[1352,10]]}}}],["degre",{"_index":599,"t":{"55":{"position":[[1178,7],[1235,6],[1343,6]]}}}],["depend",{"_index":1047,"t":{"109":{"position":[[793,9]]}}}],["descript",{"_index":290,"t":{"20":{"position":[[10,11]]},"22":{"position":[[10,11]]}}}],["determin",{"_index":49,"t":{"4":{"position":[[249,9]]},"18":{"position":[[193,10]]},"55":{"position":[[0,9]]},"107":{"position":[[85,9]]}}}],["dev",{"_index":404,"t":{"32":{"position":[[55,3],[69,3]]}}}],["dgemm",{"_index":442,"t":{"36":{"position":[[0,5]]}}}],["dgemm('n','n",{"_index":476,"t":{"36":{"position":[[583,14]]}}}],["diamet",{"_index":149,"t":{"6":{"position":[[1157,9]]}}}],["differ",{"_index":820,"t":{"72":{"position":[[1354,9]]}}}],["dimens",{"_index":66,"t":{"4":{"position":[[595,13]]},"24":{"position":[[45,11]]},"34":{"position":[[375,13],[412,13]]},"57":{"position":[[119,13],[156,13]]},"85":{"position":[[157,13]]}}}],["dimension",{"_index":70,"t":{"4":{"position":[[729,11]]}}}],["dimension(10",{"_index":61,"t":{"4":{"position":[[415,13]]}}}],["dimension(2",{"_index":84,"t":{"4":{"position":[[1040,12],[1222,12],[1440,12]]},"85":{"position":[[199,13]]}}}],["dimension(3",{"_index":86,"t":{"4":{"position":[[1130,12]]}}}],["direct",{"_index":1092,"t":{"114":{"position":[[388,9],[405,9],[1210,9]]}}}],["directori",{"_index":821,"t":{"72":{"position":[[1364,10]]},"109":{"position":[[607,9]]}}}],["dist",{"_index":582,"t":{"55":{"position":[[647,4],[1034,4],[1112,4]]}}}],["distanc",{"_index":546,"t":{"55":{"position":[[14,8],[179,8],[377,8],[1098,10]]}}}],["divid",{"_index":630,"t":{"59":{"position":[[107,6]]}}}],["do",{"_index":97,"t":{"6":{"position":[[17,6]]}}}],["done",{"_index":191,"t":{"6":{"position":[[2193,4]]},"12":{"position":[[81,4]]}}}],["dot_product",{"_index":618,"t":{"57":{"position":[[742,11],[803,11]]}}}],["dot_product(a",{"_index":620,"t":{"57":{"position":[[820,14]]}}}],["doubl",{"_index":218,"t":{"10":{"position":[[77,6]]},"16":{"position":[[233,6],[783,6]]},"30":{"position":[[276,6]]},"36":{"position":[[32,6],[165,6],[242,6]]}}}],["dp",{"_index":572,"t":{"55":{"position":[[461,2]]}}}],["du",{"_index":523,"t":{"51":{"position":[[256,2]]}}}],["dummi",{"_index":687,"t":{"63":{"position":[[288,5]]}}}],["dynam",{"_index":63,"t":{"4":{"position":[[543,7],[675,7]]},"57":{"position":[[11,7]]},"114":{"position":[[529,8]]}}}],["e",{"_index":798,"t":{"72":{"position":[[313,1]]},"74":{"position":[[136,1],[216,1],[236,2],[280,1]]}}}],["e12.4",{"_index":182,"t":{"6":{"position":[[2079,10]]}}}],["e8.2",{"_index":174,"t":{"6":{"position":[[1855,9]]}}}],["each",{"_index":1088,"t":{"114":{"position":[[279,4]]}}}],["earch/spher",{"_index":559,"t":{"55":{"position":[[210,12]]}}}],["earth",{"_index":549,"t":{"55":{"position":[[45,5]]}}}],["editor",{"_index":351,"t":{"26":{"position":[[198,7]]},"109":{"position":[[390,6]]}}}],["effect",{"_index":968,"t":{"99":{"position":[[5,7],[282,7]]}}}],["einstein",{"_index":1067,"t":{"112":{"position":[[455,9],[529,10],[741,10]]}}}],["element",{"_index":92,"t":{"4":{"position":[[1380,7]]},"114":{"position":[[958,8]]}}}],["end",{"_index":23,"t":{"2":{"position":[[319,3],[809,3]]},"4":{"position":[[195,3],[524,3],[1320,3],[1327,3]]},"6":{"position":[[376,3],[1087,3],[1471,3],[1920,3],[2210,3]]},"28":{"position":[[427,3],[670,3],[702,3]]},"30":{"position":[[630,3]]},"34":{"position":[[975,3]]},"36":{"position":[[564,3],[571,3],[719,3],[726,3],[733,3]]},"42":{"position":[[327,3]]},"44":{"position":[[348,3],[355,3]]},"46":{"position":[[253,3],[264,3]]},"51":{"position":[[358,3]]},"53":{"position":[[263,3],[669,3],[727,3],[734,3]]},"55":{"position":[[1363,3],[1384,3]]},"57":{"position":[[356,3],[509,3],[623,3],[671,3],[866,3]]},"59":{"position":[[636,3],[684,3]]},"61":{"position":[[502,3],[517,3],[716,3],[750,3],[772,3],[948,3]]},"63":{"position":[[468,3],[1132,3]]},"66":{"position":[[243,3],[359,3],[451,3],[571,3],[935,3]]},"68":{"position":[[152,3],[173,3],[180,3]]},"72":{"position":[[328,3],[539,3]]},"77":{"position":[[510,3]]},"81":{"position":[[548,3],[555,3],[677,3]]},"83":{"position":[[753,3],[760,3],[908,3]]},"85":{"position":[[844,3]]},"89":{"position":[[554,3],[561,3],[586,3]]},"91":{"position":[[364,3],[580,3],[587,3],[610,3]]},"95":{"position":[[303,3],[379,3],[475,3],[503,3],[662,3]]},"97":{"position":[[476,3],[491,3],[680,3],[687,3]]},"105":{"position":[[313,3],[333,3]]},"107":{"position":[[515,3],[687,3]]},"112":{"position":[[201,3],[279,3],[812,3]]},"114":{"position":[[165,3],[297,3],[427,4],[445,3],[1304,3],[1463,3]]}}}],["end_tim",{"_index":1004,"t":{"107":{"position":[[239,8],[572,8]]}}}],["enddo",{"_index":45,"t":{"4":{"position":[[136,5],[189,5],[518,5]]},"53":{"position":[[243,5]]},"66":{"position":[[206,5]]}}}],["endif",{"_index":34,"t":{"2":{"position":[[796,5]]},"42":{"position":[[321,5]]}}}],["endors",{"_index":776,"t":{"70":{"position":[[692,8]]}}}],["enter",{"_index":17,"t":{"2":{"position":[[197,6]]},"6":{"position":[[990,6],[1360,6]]},"24":{"position":[[31,6]]},"44":{"position":[[86,6],[160,5]]},"46":{"position":[[86,6]]},"57":{"position":[[230,6],[412,6],[525,6]]},"63":{"position":[[870,6],[924,6]]},"105":{"position":[[104,6]]}}}],["environ",{"_index":703,"t":{"63":{"position":[[1023,11]]}}}],["eq",{"_index":488,"t":{"40":{"position":[[108,4]]}}}],["equal",{"_index":486,"t":{"40":{"position":[[69,5],[99,5],[113,6],[129,5],[362,5],[390,5],[402,5],[418,5]]}}}],["equival",{"_index":493,"t":{"40":{"position":[[193,10],[215,10]]}}}],["eqv",{"_index":492,"t":{"40":{"position":[[187,5]]}}}],["error",{"_index":505,"t":{"44":{"position":[[145,7]]},"83":{"position":[[833,5]]},"114":{"position":[[1269,7]]}}}],["es9.1",{"_index":343,"t":{"26":{"position":[[14,6]]}}}],["even",{"_index":761,"t":{"70":{"position":[[446,4]]}}}],["even_numb",{"_index":732,"t":{"68":{"position":[[38,12],[192,12]]}}}],["everyth",{"_index":805,"t":{"72":{"position":[[592,10]]}}}],["exampl",{"_index":54,"t":{"4":{"position":[[302,7],[708,8]]},"6":{"position":[[519,8],[1939,7]]},"10":{"position":[[8,9],[34,9],[104,9]]},"16":{"position":[[763,8]]},"38":{"position":[[32,7]]},"44":{"position":[[415,8]]},"53":{"position":[[466,8]]},"57":{"position":[[0,7]]},"70":{"position":[[841,8]]},"72":{"position":[[79,8]]},"107":{"position":[[10,7]]},"114":{"position":[[0,7]]}}}],["except",{"_index":246,"t":{"16":{"position":[[459,6]]}}}],["exclus",{"_index":491,"t":{"40":{"position":[[172,11]]}}}],["execut",{"_index":132,"t":{"6":{"position":[[733,7]]},"51":{"position":[[36,7],[155,7],[187,11],[244,11]]},"61":{"position":[[233,10]]},"95":{"position":[[690,8]]},"99":{"position":[[71,8]]},"101":{"position":[[160,10]]},"107":{"position":[[103,9]]},"109":{"position":[[650,8],[715,10]]}}}],["execute_command_lin",{"_index":518,"t":{"51":{"position":[[12,20]]}}}],["execute_command_line(\"du",{"_index":525,"t":{"51":{"position":[[271,24]]}}}],["execute_command_line(\"l",{"_index":522,"t":{"51":{"position":[[208,26]]}}}],["exit",{"_index":374,"t":{"28":{"position":[[574,4]]},"51":{"position":[[333,5]]},"66":{"position":[[366,4],[446,4]]}}}],["exit_cod",{"_index":520,"t":{"51":{"position":[[143,9],[348,9]]}}}],["exitstat=exit_cod",{"_index":526,"t":{"51":{"position":[[304,19]]}}}],["exp",{"_index":333,"t":{"22":{"position":[[256,3]]}}}],["exp(12.0",{"_index":167,"t":{"6":{"position":[[1692,9]]}}}],["expect",{"_index":371,"t":{"28":{"position":[[517,9]]}}}],["expon",{"_index":264,"t":{"16":{"position":[[894,8]]}}}],["exponenti",{"_index":175,"t":{"6":{"position":[[1875,11]]},"22":{"position":[[260,11]]}}}],["express",{"_index":724,"t":{"66":{"position":[[645,12]]}}}],["extend",{"_index":1055,"t":{"112":{"position":[[212,9]]},"114":{"position":[[186,6]]}}}],["extends(colored_line_typ",{"_index":1090,"t":{"114":{"position":[[330,26]]}}}],["extends(line_typ",{"_index":1085,"t":{"114":{"position":[[218,18]]}}}],["extends(us",{"_index":1056,"t":{"112":{"position":[[233,13]]}}}],["extens",{"_index":1043,"t":{"109":{"position":[[462,9]]}}}],["extern",{"_index":424,"t":{"34":{"position":[[652,8]]},"51":{"position":[[44,8]]},"112":{"position":[[76,8]]}}}],["f",{"_index":668,"t":{"61":{"position":[[515,1]]},"97":{"position":[[240,1],[489,1]]},"114":{"position":[[432,1]]}}}],["f(0",{"_index":918,"t":{"91":{"position":[[104,4]]}}}],["f(1",{"_index":919,"t":{"91":{"position":[[115,4]]}}}],["f(a",{"_index":670,"t":{"61":{"position":[[663,5],[705,3]]}}}],["f(a+2h",{"_index":640,"t":{"59":{"position":[[280,7]]}}}],["f(a+h",{"_index":639,"t":{"59":{"position":[[271,6]]}}}],["f(b",{"_index":671,"t":{"61":{"position":[[671,5]]}}}],["f(n",{"_index":920,"t":{"91":{"position":[[126,4],[133,3],[142,3]]}}}],["f(x",{"_index":665,"t":{"61":{"position":[[441,4]]},"97":{"position":[[260,4],[675,4]]}}}],["f(x)=(1+1x)xf(x",{"_index":942,"t":{"97":{"position":[[55,16]]}}}],["f(x)f(x)f(x",{"_index":625,"t":{"59":{"position":[[43,12]]},"97":{"position":[[35,12]]}}}],["f10.4",{"_index":707,"t":{"63":{"position":[[1125,6]]}}}],["f5.1",{"_index":342,"t":{"26":{"position":[[6,7]]}}}],["f6.4",{"_index":171,"t":{"6":{"position":[[1769,9]]}}}],["f77",{"_index":122,"t":{"6":{"position":[[571,3]]}}}],["f8.1",{"_index":954,"t":{"97":{"position":[[656,7]]}}}],["f8.4",{"_index":180,"t":{"6":{"position":[[2050,9]]},"97":{"position":[[664,7]]}}}],["f90",{"_index":495,"t":{"40":{"position":[[226,3]]},"109":{"position":[[452,4]]}}}],["f_result",{"_index":667,"t":{"61":{"position":[[493,8]]},"97":{"position":[[312,8],[429,8]]}}}],["factori",{"_index":708,"t":{"66":{"position":[[10,10],[59,9],[77,9],[255,9]]},"89":{"position":[[10,9],[92,9],[244,11],[576,9]]}}}],["factorial(input",{"_index":913,"t":{"89":{"position":[[301,16]]}}}],["factorial(n",{"_index":914,"t":{"89":{"position":[[387,12],[501,11]]}}}],["fals",{"_index":225,"t":{"10":{"position":[[143,8]]},"85":{"position":[[696,5]]}}}],["fdefault",{"_index":242,"t":{"16":{"position":[[348,8],[385,8]]}}}],["fib",{"_index":923,"t":{"91":{"position":[[332,7]]}}}],["fibonacci",{"_index":915,"t":{"91":{"position":[[10,9],[85,9],[252,9],[600,9]]}}}],["fibonacci(i",{"_index":924,"t":{"91":{"position":[[351,12]]}}}],["fibonacci(n",{"_index":925,"t":{"91":{"position":[[399,12],[495,11],[514,11]]}}}],["file",{"_index":18,"t":{"2":{"position":[[204,4]]},"6":{"position":[[638,4],[694,4]]},"53":{"position":[[50,5],[108,4],[360,5],[397,5],[430,4],[523,4]]},"72":{"position":[[1103,5],[1208,6],[1275,4],[1325,6],[1339,5]]},"109":{"position":[[457,4],[492,6],[578,4],[830,6],[923,5]]}}}],["file='output.dat",{"_index":531,"t":{"53":{"position":[[173,18],[597,18]]}}}],["file_read",{"_index":540,"t":{"53":{"position":[[536,9],[746,9]]}}}],["file_writ",{"_index":529,"t":{"53":{"position":[[121,10],[275,10]]}}}],["filenam",{"_index":3,"t":{"2":{"position":[[30,9]]}}}],["filename.f90",{"_index":406,"t":{"32":{"position":[[100,12],[167,12]]},"34":{"position":[[212,12],[274,12]]}}}],["find",{"_index":710,"t":{"66":{"position":[[54,4]]},"72":{"position":[[1311,4]]},"107":{"position":[[53,4]]}}}],["first",{"_index":210,"t":{"8":{"position":[[110,5]]},"18":{"position":[[168,5]]},"26":{"position":[[142,6]]},"57":{"position":[[419,5]]},"61":{"position":[[214,5]]},"95":{"position":[[0,5]]},"109":{"position":[[869,5]]}}}],["floor",{"_index":298,"t":{"20":{"position":[[145,6]]}}}],["floor(3.2)=3",{"_index":297,"t":{"20":{"position":[[131,13]]}}}],["floor(a/p)*p",{"_index":314,"t":{"20":{"position":[[375,12]]}}}],["floor(x",{"_index":295,"t":{"20":{"position":[[101,8]]}}}],["follow",{"_index":133,"t":{"6":{"position":[[753,8]]},"40":{"position":[[241,9]]},"63":{"position":[[35,9]]},"70":{"position":[[475,9]]},"107":{"position":[[0,9]]},"109":{"position":[[875,8]]}}}],["format",{"_index":159,"t":{"6":{"position":[[1488,10],[1537,10],[1574,6],[1932,6]]},"70":{"position":[[367,7]]}}}],["format('hello",{"_index":843,"t":{"77":{"position":[[425,13]]}}}],["format('hypotenus",{"_index":706,"t":{"63":{"position":[[1101,18]]}}}],["formula",{"_index":554,"t":{"55":{"position":[[107,7]]},"63":{"position":[[45,8]]}}}],["fortran",{"_index":115,"t":{"6":{"position":[[428,7],[1558,7]]},"16":{"position":[[42,7]]},"18":{"position":[[3,7]]},"30":{"position":[[33,7]]},"51":{"position":[[67,7]]},"85":{"position":[[11,7]]},"87":{"position":[[9,7]]},"93":{"position":[[37,8]]},"103":{"position":[[0,7],[56,7],[125,7],[133,7]]},"109":{"position":[[0,7]]}}}],["fortran.html",{"_index":855,"t":{"79":{"position":[[54,12]]}}}],["forward",{"_index":1115,"t":{"114":{"position":[[1202,7]]}}}],["frac{1}{x}\\right)^xf(x)=(1+x1​)x",{"_index":944,"t":{"97":{"position":[[84,33]]}}}],["frac{f(b)}{2}\\right]an​=h[2f(a)​+f(a+h)+f(a+2h)+⋯+2f(b",{"_index":642,"t":{"59":{"position":[[299,58]]}}}],["free",{"_index":750,"t":{"70":{"position":[[298,4]]}}}],["full",{"_index":784,"t":{"70":{"position":[[951,4]]}}}],["function",{"_index":1,"t":{"2":{"position":[[10,8],[365,8],[813,8]]},"4":{"position":[[237,8]]},"20":{"position":[[0,9]]},"22":{"position":[[0,9],[31,8],[90,8],[151,8]]},"34":{"position":[[34,8]]},"55":{"position":[[1139,8],[1367,8]]},"61":{"position":[[91,8],[368,8],[432,8],[506,8],[754,8]]},"87":{"position":[[44,9]]},"91":{"position":[[43,9],[390,8],[591,8]]},"93":{"position":[[62,10]]},"97":{"position":[[251,8],[480,8],[838,9]]},"99":{"position":[[239,8]]}}}],["function_modul",{"_index":946,"t":{"97":{"position":[[152,15],[502,15],[571,15]]}}}],["function_t",{"_index":952,"t":{"97":{"position":[[552,14],[699,14]]}}}],["g",{"_index":1087,"t":{"114":{"position":[[272,2]]}}}],["gcc",{"_index":1034,"t":{"109":{"position":[[222,3],[275,3],[340,3],[364,4]]}}}],["ge",{"_index":487,"t":{"40":{"position":[[78,4]]}}}],["gener",{"_index":527,"t":{"53":{"position":[[13,8],[443,9]]},"83":{"position":[[66,8]]}}}],["get_abs_path",{"_index":15,"t":{"2":{"position":[[169,12],[521,12],[615,12],[715,12],[822,12]]}}}],["get_abs_path(input_path",{"_index":22,"t":{"2":{"position":[[257,24],[374,24]]}}}],["get_command(arg",{"_index":372,"t":{"28":{"position":[[531,16]]}}}],["get_command_argu",{"_index":356,"t":{"28":{"position":[[39,20]]}}}],["get_command_argument(i",{"_index":370,"t":{"28":{"position":[[464,23]]}}}],["getcwd(prefix",{"_index":32,"t":{"2":{"position":[[700,14]]}}}],["getenv('hom",{"_index":29,"t":{"2":{"position":[[592,14]]}}}],["gfortran",{"_index":134,"t":{"6":{"position":[[762,8]]},"32":{"position":[[91,8],[158,8]]},"34":{"position":[[203,8],[265,8]]},"63":{"position":[[149,8],[528,8],[629,8],[672,8],[1177,8]]},"72":{"position":[[915,8],[947,8],[1403,8]]},"95":{"position":[[699,8],[729,8]]},"109":{"position":[[192,8],[230,8],[279,8],[344,8],[534,8],[752,8],[966,8],[989,8]]}}}],["give",{"_index":764,"t":{"70":{"position":[[515,4],[772,4]]}}}],["given",{"_index":148,"t":{"6":{"position":[[1147,5],[1235,5]]},"16":{"position":[[575,5]]},"55":{"position":[[51,5],[223,5]]},"70":{"position":[[745,6]]}}}],["gnu",{"_index":233,"t":{"16":{"position":[[38,3]]}}}],["greater",{"_index":484,"t":{"40":{"position":[[38,7],[83,7],[333,7],[374,7]]}}}],["greatest",{"_index":296,"t":{"20":{"position":[[110,8]]}}}],["gt",{"_index":483,"t":{"40":{"position":[[33,4]]}}}],["guid",{"_index":982,"t":{"103":{"position":[[47,5],[153,5]]}}}],["h",{"_index":637,"t":{"59":{"position":[[246,1],[501,2],[548,1],[650,1]]},"61":{"position":[[613,2],[634,1],[741,1]]}}}],["h=(b−a)/nh=(b",{"_index":634,"t":{"59":{"position":[[155,13]]}}}],["hard",{"_index":655,"t":{"61":{"position":[[100,4]]}}}],["hav(theta",{"_index":561,"t":{"55":{"position":[[281,10]]}}}],["haversin",{"_index":553,"t":{"55":{"position":[[97,9],[256,9]]}}}],["haversine_formula",{"_index":571,"t":{"55":{"position":[[407,17],[1396,17]]}}}],["hello_world_mpi",{"_index":830,"t":{"77":{"position":[[35,15]]}}}],["here",{"_index":0,"t":{"2":{"position":[[0,4]]},"28":{"position":[[594,4]]},"53":{"position":[[0,4]]},"72":{"position":[[68,4]]}}}],["high",{"_index":69,"t":{"4":{"position":[[724,4]]},"109":{"position":[[25,4]]}}}],["holder",{"_index":747,"t":{"70":{"position":[[254,6]]}}}],["homebrew",{"_index":1039,"t":{"109":{"position":[[317,9]]}}}],["hs",{"_index":524,"t":{"51":{"position":[[260,2],[297,2]]}}}],["http://creativecommons.org/licenses/by/4.0",{"_index":786,"t":{"70":{"position":[[984,43]]}}}],["https://annefou.github.io/fortran/coarrays/coarrays.html",{"_index":517,"t":{"49":{"position":[[0,56]]}}}],["https://curc.readthedocs.io/en/latest/programming/mpi",{"_index":854,"t":{"79":{"position":[[0,53]]}}}],["https://github.com/sourangshughosh/awesomefortranlibrari",{"_index":991,"t":{"103":{"position":[[224,58]]}}}],["https://netlib.org/blas/#_level_1",{"_index":415,"t":{"34":{"position":[[158,33]]}}}],["https://people.math.sc.edu/burkardt/f_src/f_src.html",{"_index":990,"t":{"103":{"position":[[171,52]]}}}],["hyperbol",{"_index":320,"t":{"22":{"position":[[68,10],[128,10],[228,10]]}}}],["hypotenus",{"_index":677,"t":{"63":{"position":[[0,10],[238,11],[379,10],[444,10],[742,10],[825,10],[1144,10]]}}}],["i**2",{"_index":725,"t":{"66":{"position":[[671,5]]}}}],["i*h",{"_index":650,"t":{"59":{"position":[[631,4]]},"61":{"position":[[711,4]]}}}],["i*j",{"_index":727,"t":{"66":{"position":[[716,6]]}}}],["i.",{"_index":905,"t":{"87":{"position":[[73,5]]}}}],["i2",{"_index":46,"t":{"4":{"position":[[173,7],[502,7]]},"77":{"position":[[456,3],[467,3]]}}}],["i3",{"_index":545,"t":{"53":{"position":[[710,7]]}}}],["i4",{"_index":168,"t":{"6":{"position":[[1708,7],[1965,7]]},"26":{"position":[[24,5],[87,5],[93,4],[264,5],[275,5]]},"53":{"position":[[229,7],[652,7]]}}}],["i8",{"_index":177,"t":{"6":{"position":[[1992,7]]}}}],["i8.6",{"_index":178,"t":{"6":{"position":[[2019,9]]}}}],["i<dir",{"_index":823,"t":{"72":{"position":[[1388,6]]}}}],["id",{"_index":1053,"t":{"112":{"position":[[134,2],[588,3]]}}}],["identifi",{"_index":538,"t":{"53":{"position":[[351,8]]}}}],["ierr",{"_index":842,"t":{"77":{"position":[[357,5]]}}}],["ierror",{"_index":834,"t":{"77":{"position":[[107,6],[239,7],[296,7]]}}}],["ii",{"_index":40,"t":{"4":{"position":[[93,2],[112,2],[133,2],[156,2],[447,2],[456,5],[462,2],[478,2],[1259,2],[1287,2]]},"53":{"position":[[157,2],[209,2],[571,3],[633,2],[693,2]]},"66":{"position":[[119,3],[171,2],[203,2]]}}}],["ii*ii",{"_index":534,"t":{"53":{"position":[[237,5]]}}}],["ikind",{"_index":305,"t":{"20":{"position":[[235,7],[279,5],[309,7]]}}}],["imag(z2",{"_index":395,"t":{"30":{"position":[[556,8]]}}}],["imaginari",{"_index":249,"t":{"16":{"position":[[536,9]]},"30":{"position":[[423,9],[535,10]]}}}],["implement",{"_index":909,"t":{"87":{"position":[[160,9]]}}}],["impli",{"_index":56,"t":{"4":{"position":[[323,7]]},"66":{"position":[[578,7]]}}}],["implicit",{"_index":9,"t":{"2":{"position":[[111,8],[399,8]]},"4":{"position":[[49,8],[392,8],[1017,8]]},"6":{"position":[[218,8],[528,8],[541,8],[944,8],[1266,8],[1581,8]]},"18":{"position":[[96,8]]},"28":{"position":[[129,8]]},"30":{"position":[[99,8]]},"34":{"position":[[318,8]]},"36":{"position":[[151,8]]},"42":{"position":[[117,8]]},"44":{"position":[[42,8]]},"46":{"position":[[42,8]]},"51":{"position":[[121,8]]},"53":{"position":[[132,8],[546,8]]},"55":{"position":[[425,8]]},"57":{"position":[[84,8]]},"59":{"position":[[456,8]]},"61":{"position":[[318,8],[868,8]]},"63":{"position":[[250,8],[753,8]]},"66":{"position":[[87,8]]},"68":{"position":[[51,8]]},"72":{"position":[[221,8],[459,8]]},"81":{"position":[[160,8]]},"83":{"position":[[396,8]]},"85":{"position":[[91,8]]},"89":{"position":[[171,8]]},"91":{"position":[[186,8]]},"95":{"position":[[84,8],[590,8]]},"97":{"position":[[168,8],[587,8]]},"105":{"position":[[62,8]]},"107":{"position":[[148,8]]},"112":{"position":[[36,8]]},"114":{"position":[[68,8]]}}}],["improv",{"_index":652,"t":{"61":{"position":[[15,7]]}}}],["impur",{"_index":972,"t":{"99":{"position":[[321,7]]}}}],["inch",{"_index":139,"t":{"6":{"position":[[857,7],[921,6],[970,4],[1033,4],[1070,6],[1082,4]]}}}],["inci",{"_index":417,"t":{"34":{"position":[[464,4],[484,4],[860,5]]}}}],["includ",{"_index":742,"t":{"70":{"position":[[133,8]]},"77":{"position":[[51,7]]}}}],["incx",{"_index":416,"t":{"34":{"position":[[454,4],[475,4],[851,5]]}}}],["incxz",{"_index":421,"t":{"34":{"position":[[617,6],[930,6]]}}}],["incyz",{"_index":422,"t":{"34":{"position":[[627,5],[940,6]]}}}],["independ",{"_index":729,"t":{"66":{"position":[[796,12]]}}}],["indic",{"_index":217,"t":{"10":{"position":[[67,9]]},"66":{"position":[[846,9]]},"70":{"position":[[575,8]]},"99":{"position":[[220,8]]}}}],["info",{"_index":112,"t":{"6":{"position":[[392,4]]},"53":{"position":[[286,4]]}}}],["inform",{"_index":974,"t":{"101":{"position":[[45,11]]}}}],["initi",{"_index":457,"t":{"36":{"position":[[307,10],[496,10]]},"112":{"position":[[157,11]]}}}],["inner",{"_index":616,"t":{"57":{"position":[[696,6]]}}}],["inner_product",{"_index":607,"t":{"57":{"position":[[70,13],[878,13]]}}}],["input",{"_index":103,"t":{"6":{"position":[[89,6],[265,6],[296,6]]},"24":{"position":[[61,6]]},"42":{"position":[[139,6],[162,6],[181,5],[190,6],[256,6],[290,6]]},"66":{"position":[[112,6],[143,6],[162,5],[179,5],[221,6]]},"89":{"position":[[196,6],[271,6],[290,5],[335,6]]}}}],["input1",{"_index":929,"t":{"95":{"position":[[114,7],[234,7],[254,6],[363,6],[439,7]]}}}],["input2",{"_index":930,"t":{"95":{"position":[[122,7],[276,7],[296,6],[372,6],[454,7]]}}}],["input_path",{"_index":13,"t":{"2":{"position":[[147,11],[235,10],[447,10],[536,10]]}}}],["input_path(1:1",{"_index":26,"t":{"2":{"position":[[490,16]]}}}],["input_path(1:2",{"_index":27,"t":{"2":{"position":[[555,16]]}}}],["input_path(2:lnblnk(input_path",{"_index":31,"t":{"2":{"position":[[657,32]]}}}],["input_path(:lnblnk(input_path",{"_index":33,"t":{"2":{"position":[[764,31]]}}}],["insensit",{"_index":211,"t":{"8":{"position":[[159,12]]}}}],["insid",{"_index":876,"t":{"83":{"position":[[182,6]]}}}],["instal",{"_index":398,"t":{"32":{"position":[[0,7],[39,7]]},"109":{"position":[[214,7],[267,7],[305,7],[332,7]]}}}],["instead",{"_index":393,"t":{"30":{"position":[[477,8]]},"109":{"position":[[726,7]]},"114":{"position":[[487,7]]}}}],["int",{"_index":301,"t":{"20":{"position":[[188,4]]}}}],["int(0.2)=0",{"_index":302,"t":{"20":{"position":[[202,11]]}}}],["int(3.3)=3",{"_index":303,"t":{"20":{"position":[[214,10]]}}}],["int(a/p)*p",{"_index":312,"t":{"20":{"position":[[348,10]]}}}],["int(x",{"_index":300,"t":{"20":{"position":[[160,6]]}}}],["int(z2",{"_index":392,"t":{"30":{"position":[[469,7]]}}}],["int16",{"_index":255,"t":{"16":{"position":[[702,6]]}}}],["int32",{"_index":256,"t":{"16":{"position":[[709,6]]}}}],["int64",{"_index":257,"t":{"16":{"position":[[716,6]]}}}],["int8",{"_index":254,"t":{"16":{"position":[[696,5]]}}}],["integ",{"_index":38,"t":{"4":{"position":[[63,7],[82,7],[406,8],[436,7],[586,8],[626,7],[1031,8],[1121,8],[1213,8],[1248,7],[1431,8]]},"6":{"position":[[190,7],[232,7],[1595,7]]},"10":{"position":[[0,7]]},"12":{"position":[[0,7]]},"16":{"position":[[84,8],[357,7],[1063,7],[1114,7]]},"18":{"position":[[273,8]]},"20":{"position":[[119,7],[179,8],[261,8]]},"24":{"position":[[0,7]]},"28":{"position":[[143,7]]},"30":{"position":[[456,8]]},"34":{"position":[[332,7],[443,7],[606,7]]},"36":{"position":[[194,7]]},"44":{"position":[[56,7],[177,7]]},"46":{"position":[[56,7]]},"51":{"position":[[135,7]]},"53":{"position":[[146,7],[560,7]]},"55":{"position":[[439,8]]},"57":{"position":[[98,7],[187,7]]},"59":{"position":[[509,7]]},"61":{"position":[[556,8],[621,7]]},"66":{"position":[[101,7]]},"68":{"position":[[65,7]]},"77":{"position":[[68,7]]},"81":{"position":[[174,8],[302,7]]},"83":{"position":[[410,8],[543,7]]},"85":{"position":[[148,8],[190,8]]},"89":{"position":[[185,7],[408,8],[433,8],[464,7]]},"91":{"position":[[200,7],[427,8],[452,7]]},"97":{"position":[[190,8],[363,8],[611,7]]},"105":{"position":[[23,9],[76,7],[115,8],[247,8],[279,7]]},"107":{"position":[[162,8],[287,7]]},"112":{"position":[[126,7]]},"114":{"position":[[258,7]]}}}],["integer(kind=selected_int_kind(12",{"_index":276,"t":{"16":{"position":[[1153,35]]}}}],["integr",{"_index":653,"t":{"61":{"position":[[39,11],[79,11],[350,8],[763,8],[833,11],[960,11]]},"81":{"position":[[59,11]]}}}],["integral(f",{"_index":662,"t":{"61":{"position":[[377,11]]}}}],["integral(sin",{"_index":673,"t":{"61":{"position":[[908,13]]}}}],["integral_result",{"_index":669,"t":{"61":{"position":[[589,15],[723,15]]}}}],["integration_modul",{"_index":659,"t":{"61":{"position":[[299,18],[783,18],[849,18]]}}}],["intel",{"_index":478,"t":{"38":{"position":[[22,5]]},"77":{"position":[[615,5]]}}}],["intend",{"_index":779,"t":{"70":{"position":[[823,8]]}}}],["intent",{"_index":686,"t":{"63":{"position":[[278,6]]}}}],["intent(in",{"_index":24,"t":{"2":{"position":[[433,10]]},"55":{"position":[[1221,10]]},"61":{"position":[[469,10],[537,10],[565,10]]},"63":{"position":[[310,10],[337,10]]},"89":{"position":[[417,10]]},"91":{"position":[[436,10]]},"97":{"position":[[288,10]]},"105":{"position":[[256,9]]}}}],["intent(out",{"_index":689,"t":{"63":{"position":[[364,11]]},"89":{"position":[[442,11]]}}}],["interfac",{"_index":664,"t":{"61":{"position":[[422,9],[521,9]]},"101":{"position":[[0,9]]}}}],["interg",{"_index":169,"t":{"6":{"position":[[1733,8]]}}}],["intern",{"_index":739,"t":{"70":{"position":[[63,13]]}}}],["intrins",{"_index":47,"t":{"4":{"position":[[222,9]]},"16":{"position":[[678,10]]},"59":{"position":[[470,9]]},"61":{"position":[[882,9]]}}}],["introduc",{"_index":496,"t":{"40":{"position":[[230,10]]}}}],["introduct",{"_index":987,"t":{"103":{"position":[[102,12]]}}}],["invers",{"_index":318,"t":{"22":{"position":[[45,7],[104,7],[165,7],[183,7]]}}}],["invok",{"_index":906,"t":{"87":{"position":[[91,6]]}}}],["is(colored_line_typ",{"_index":1109,"t":{"114":{"position":[[1074,21]]}}}],["is(line_typ",{"_index":1107,"t":{"114":{"position":[[1012,13]]}}}],["is(vector_line_typ",{"_index":1114,"t":{"114":{"position":[[1168,20]]}}}],["iseven(i",{"_index":722,"t":{"66":{"position":[[517,11]]}}}],["iter",{"_index":720,"t":{"66":{"position":[[479,9],[628,7],[768,10],[872,8]]},"81":{"position":[[196,9],[391,9],[594,9]]},"83":{"position":[[432,9],[582,9],[804,9],[867,9]]}}}],["j",{"_index":283,"t":{"18":{"position":[[241,2]]},"36":{"position":[[214,1],[542,1],[670,1],[702,2]]},"66":{"position":[[735,1]]}}}],["k",{"_index":284,"t":{"18":{"position":[[244,2]]},"36":{"position":[[205,2],[604,2],[623,2]]}}}],["k=3",{"_index":452,"t":{"36":{"position":[[232,4]]}}}],["keyword",{"_index":114,"t":{"6":{"position":[[416,8],[474,8]]},"44":{"position":[[398,7]]},"66":{"position":[[835,7]]},"72":{"position":[[573,7],[789,8]]},"87":{"position":[[149,7]]},"93":{"position":[[139,7]]},"99":{"position":[[303,8]]},"114":{"position":[[479,7]]}}}],["kind",{"_index":230,"t":{"16":{"position":[[4,4],[413,4]]}}}],["kind(1.0d0",{"_index":573,"t":{"55":{"position":[[466,11]]}}}],["kind=kind(0.0d0",{"_index":274,"t":{"16":{"position":[[1094,17]]}}}],["kind_need",{"_index":949,"t":{"97":{"position":[[385,11],[457,13]]}}}],["km",{"_index":570,"t":{"55":{"position":[[396,2],[1126,3]]}}}],["l",{"_index":285,"t":{"18":{"position":[[247,2]]}}}],["l/usr/lib",{"_index":409,"t":{"32":{"position":[[181,9]]},"34":{"position":[[288,9]]}}}],["lapack",{"_index":400,"t":{"32":{"position":[[17,6]]}}}],["lapacklib",{"_index":405,"t":{"32":{"position":[[59,9]]}}}],["larg",{"_index":787,"t":{"72":{"position":[[0,5]]}}}],["large_int",{"_index":277,"t":{"16":{"position":[[1192,9]]}}}],["last",{"_index":827,"t":{"74":{"position":[[138,4]]}}}],["lat1",{"_index":577,"t":{"55":{"position":[[540,4],[700,4],[866,4]]}}}],["lat2",{"_index":580,"t":{"55":{"position":[[592,4],[807,4],[908,4]]}}}],["lat2)/2))**2",{"_index":588,"t":{"55":{"position":[[967,12]]}}}],["latitud",{"_index":550,"t":{"55":{"position":[[57,8],[229,8],[667,9],[774,9]]}}}],["lax(33.94",{"_index":567,"t":{"55":{"position":[[357,10]]}}}],["lbla",{"_index":407,"t":{"32":{"position":[[114,5],[192,5]]},"34":{"position":[[226,5],[299,5]]}}}],["le",{"_index":485,"t":{"40":{"position":[[51,4]]}}}],["learn",{"_index":96,"t":{"6":{"position":[[8,5]]}}}],["left(1",{"_index":943,"t":{"97":{"position":[[74,7]]}}}],["left[\\frac{f(a)}{2",{"_index":638,"t":{"59":{"position":[[248,20]]}}}],["leftarrow",{"_index":445,"t":{"36":{"position":[[70,10]]}}}],["len",{"_index":227,"t":{"10":{"position":[[206,4]]}}}],["len_trim(arg",{"_index":373,"t":{"28":{"position":[[553,14]]}}}],["length",{"_index":50,"t":{"4":{"position":[[263,6]]},"6":{"position":[[997,6],[1059,7]]},"10":{"position":[[167,6]]},"34":{"position":[[351,6]]},"57":{"position":[[106,6],[237,6],[266,6],[278,6],[316,6],[454,6],[568,6],[640,6]]},"63":{"position":[[877,6],[931,6]]}}}],["less",{"_index":482,"t":{"40":{"position":[[23,4],[56,4],[321,4],[349,4]]}}}],["let'",{"_index":137,"t":{"6":{"position":[[794,5]]},"77":{"position":[[688,5]]}}}],["letter",{"_index":125,"t":{"6":{"position":[[612,8]]},"8":{"position":[[136,7]]},"18":{"position":[[174,6]]}}}],["lib",{"_index":408,"t":{"32":{"position":[[130,4]]}}}],["librari",{"_index":401,"t":{"32":{"position":[[24,10]]}}}],["licens",{"_index":736,"t":{"70":{"position":[[13,8],[77,8],[176,8],[246,7],[562,8],[756,7],[969,8]]}}}],["licensor",{"_index":775,"t":{"70":{"position":[[683,8]]}}}],["lim",{"_index":922,"t":{"91":{"position":[[211,4],[305,3],[319,3]]}}}],["limit",{"_index":782,"t":{"70":{"position":[[911,5]]},"81":{"position":[[121,6]]},"91":{"position":[[286,6]]}}}],["line",{"_index":190,"t":{"6":{"position":[[2185,4],[2226,5],[2393,5],[2453,4]]},"26":{"position":[[111,4],[149,6],[164,5],[176,4]]},"28":{"position":[[77,4]]},"114":{"position":[[98,4],[202,4],[656,4]]}}}],["line_typ",{"_index":1080,"t":{"114":{"position":[[116,9],[174,9],[671,10]]}}}],["link",{"_index":768,"t":{"70":{"position":[[550,4]]},"72":{"position":[[1284,8]]},"109":{"position":[[905,7]]}}}],["linux",{"_index":1030,"t":{"109":{"position":[[91,5]]}}}],["local",{"_index":977,"t":{"101":{"position":[[196,5]]}}}],["log",{"_index":334,"t":{"22":{"position":[[272,3]]}}}],["log10",{"_index":337,"t":{"22":{"position":[[294,5]]}}}],["log_bas",{"_index":828,"t":{"74":{"position":[[268,8]]}}}],["logarithm",{"_index":336,"t":{"22":{"position":[[284,9],[307,9]]}}}],["logic",{"_index":223,"t":{"10":{"position":[[126,7]]},"12":{"position":[[70,7]]},"16":{"position":[[123,8]]},"114":{"position":[[377,7]]}}}],["lon1",{"_index":579,"t":{"55":{"position":[[566,4],[754,4],[887,4]]}}}],["lon2",{"_index":581,"t":{"55":{"position":[[618,4],[861,4],[929,4]]}}}],["lon2)/2))**2",{"_index":592,"t":{"55":{"position":[[1021,12]]}}}],["long",{"_index":196,"t":{"6":{"position":[[2260,4],[2399,5]]}}}],["longer",{"_index":205,"t":{"8":{"position":[[22,6]]}}}],["longitud",{"_index":551,"t":{"55":{"position":[[70,10],[244,9],[720,10],[827,10]]}}}],["loop",{"_index":57,"t":{"4":{"position":[[334,4]]},"66":{"position":[[297,4],[373,4],[589,6],[700,6],[787,4],[860,4]]}}}],["lowercas",{"_index":119,"t":{"6":{"position":[[491,9]]}}}],["ls",{"_index":521,"t":{"51":{"position":[[199,3]]}}}],["lt",{"_index":481,"t":{"40":{"position":[[18,4]]}}}],["m",{"_index":286,"t":{"18":{"position":[[250,2]]},"24":{"position":[[11,2],[135,2]]},"36":{"position":[[202,2],[537,1],[598,2],[617,2],[635,2],[665,1]]}}}],["m=2",{"_index":451,"t":{"36":{"position":[[226,5]]}}}],["machin",{"_index":1031,"t":{"109":{"position":[[97,7]]}}}],["maco",{"_index":1038,"t":{"109":{"position":[[291,5]]}}}],["made",{"_index":770,"t":{"70":{"position":[[600,5]]}}}],["main",{"_index":360,"t":{"28":{"position":[[124,4]]},"34":{"position":[[313,4]]},"36":{"position":[[146,4]]},"51":{"position":[[116,4]]},"63":{"position":[[1163,4]]},"85":{"position":[[86,4]]},"93":{"position":[[152,4]]},"105":{"position":[[57,4]]},"107":{"position":[[143,4]]},"109":{"position":[[887,4]]},"112":{"position":[[31,4]]},"114":{"position":[[63,4]]}}}],["main.f90",{"_index":1050,"t":{"109":{"position":[[998,8]]}}}],["make",{"_index":803,"t":{"72":{"position":[[581,5]]}}}],["mani",{"_index":875,"t":{"83":{"position":[[166,4]]}}}],["manipul",{"_index":418,"t":{"34":{"position":[[504,10]]}}}],["manner",{"_index":772,"t":{"70":{"position":[[638,7]]}}}],["manual",{"_index":978,"t":{"103":{"position":[[20,6]]}}}],["match",{"_index":243,"t":{"16":{"position":[[424,7]]}}}],["materi",{"_index":741,"t":{"70":{"position":[[102,9],[279,10],[341,8],[420,8],[933,9]]}}}],["math_pi",{"_index":825,"t":{"74":{"position":[[37,7]]}}}],["mathemat",{"_index":791,"t":{"72":{"position":[[105,12]]}}}],["matmul(a",{"_index":90,"t":{"4":{"position":[[1271,9]]}}}],["matric",{"_index":443,"t":{"36":{"position":[[49,9],[318,8]]},"38":{"position":[[12,9]]}}}],["matrix",{"_index":80,"t":{"4":{"position":[[917,6],[975,6]]},"24":{"position":[[38,6]]},"36":{"position":[[509,6],[646,6]]}}}],["matrix_mult",{"_index":83,"t":{"4":{"position":[[1005,11],[1339,11]]}}}],["max",{"_index":201,"t":{"6":{"position":[[2385,3]]}}}],["mean",{"_index":480,"t":{"40":{"position":[[10,7],[311,7]]}}}],["medium",{"_index":754,"t":{"70":{"position":[[357,6]]}}}],["method",{"_index":645,"t":{"59":{"position":[[431,6]]},"81":{"position":[[49,6]]},"83":{"position":[[50,7]]}}}],["mkl",{"_index":479,"t":{"38":{"position":[[28,3]]}}}],["mod",{"_index":819,"t":{"72":{"position":[[1203,4],[1320,4]]}}}],["mod(a",{"_index":310,"t":{"20":{"position":[[334,6]]}}}],["modern",{"_index":988,"t":{"103":{"position":[[118,6]]}}}],["modifi",{"_index":808,"t":{"72":{"position":[[865,9]]}}}],["modul",{"_index":657,"t":{"61":{"position":[[186,6],[254,7],[292,6],[776,6]]},"63":{"position":[[620,6]]},"72":{"position":[[44,7],[146,6],[201,6],[332,6],[395,7],[689,7],[895,6],[1004,7],[1113,6],[1161,6]]},"93":{"position":[[110,6]]},"95":{"position":[[36,7],[66,6],[507,6]]},"97":{"position":[[145,6],[495,6]]},"99":{"position":[[175,6]]},"109":{"position":[[803,7],[861,7],[913,6],[949,7]]},"112":{"position":[[85,7]]}}}],["module.f90",{"_index":1049,"t":{"109":{"position":[[978,10]]}}}],["module.o",{"_index":1051,"t":{"109":{"position":[[1007,8]]}}}],["modulo(a,p",{"_index":313,"t":{"20":{"position":[[359,11]]}}}],["modulo(num",{"_index":734,"t":{"68":{"position":[[112,12]]}}}],["mont",{"_index":857,"t":{"81":{"position":[[37,5]]},"83":{"position":[[38,5]]}}}],["monte_area",{"_index":867,"t":{"81":{"position":[[316,10],[519,10],[532,10],[581,10]]},"83":{"position":[[557,10],[724,10],[737,10],[791,10],[854,10]]}}}],["moral",{"_index":781,"t":{"70":{"position":[[894,5]]}}}],["more",{"_index":552,"t":{"55":{"position":[[86,4]]},"109":{"position":[[929,4]]}}}],["mourik",{"_index":981,"t":{"103":{"position":[[40,6]]}}}],["mpi_comm_rank(mpi_comm_world",{"_index":839,"t":{"77":{"position":[[252,29]]}}}],["mpi_comm_size(mpi_comm_world",{"_index":838,"t":{"77":{"position":[[192,29]]}}}],["mpi_finalize(ierror",{"_index":846,"t":{"77":{"position":[[489,20]]}}}],["mpi_get_processor_name(processor_nam",{"_index":840,"t":{"77":{"position":[[309,38]]}}}],["mpi_init(ierror",{"_index":837,"t":{"77":{"position":[[170,16]]}}}],["mpi_max_processor_nam",{"_index":835,"t":{"77":{"position":[[125,24]]}}}],["mpif.h",{"_index":831,"t":{"77":{"position":[[59,8]]}}}],["mpif90",{"_index":847,"t":{"77":{"position":[[540,6]]}}}],["mpiifort",{"_index":850,"t":{"77":{"position":[[630,8]]}}}],["mpirun",{"_index":852,"t":{"77":{"position":[[715,6]]}}}],["much",{"_index":248,"t":{"16":{"position":[[513,4]]}}}],["multipl",{"_index":81,"t":{"4":{"position":[[924,15],[982,14]]},"6":{"position":[[2428,8]]},"66":{"position":[[636,8]]}}}],["multipli",{"_index":477,"t":{"38":{"position":[[0,11]]}}}],["n",{"_index":287,"t":{"18":{"position":[[253,2]]},"24":{"position":[[14,1],[138,1]]},"34":{"position":[[343,1]]},"36":{"position":[[208,2],[549,1],[601,2],[677,1]]},"59":{"position":[[523,1],[525,1],[562,1],[605,1]]},"61":{"position":[[395,2],[579,1],[648,1],[687,1]]},"89":{"position":[[114,1],[123,2],[136,1],[431,1],[482,2],[530,1]]},"91":{"position":[[153,1],[450,1],[473,2],[539,2]]},"107":{"position":[[184,1],[458,1],[668,2],[679,2]]}}}],["n(n",{"_index":911,"t":{"89":{"position":[[106,3]]}}}],["n=1000",{"_index":676,"t":{"61":{"position":[[940,7]]}}}],["n=2",{"_index":453,"t":{"36":{"position":[[237,4]]}}}],["name",{"_index":19,"t":{"2":{"position":[[209,5]]},"6":{"position":[[406,5],[629,4],[643,4],[699,6],[2331,4]]},"8":{"position":[[4,5],[144,5]]},"12":{"position":[[107,4]]},"18":{"position":[[188,4],[221,4]]},"72":{"position":[[153,5]]},"85":{"position":[[327,4],[401,4]]},"109":{"position":[[583,5],[702,4]]},"112":{"position":[[187,4],[629,5]]}}}],["namelen",{"_index":841,"t":{"77":{"position":[[348,8]]}}}],["natur",{"_index":335,"t":{"22":{"position":[[276,7]]}}}],["ne",{"_index":489,"t":{"40":{"position":[[120,4]]}}}],["nearest",{"_index":307,"t":{"20":{"position":[[253,7]]}}}],["necessari",{"_index":778,"t":{"70":{"position":[[804,9]]},"101":{"position":[[35,9]]}}}],["need",{"_index":193,"t":{"6":{"position":[[2239,4]]},"18":{"position":[[21,4]]},"28":{"position":[[369,5]]},"70":{"position":[[200,4]]},"72":{"position":[[1012,4],[1252,4]]},"109":{"position":[[841,4]]}}}],["neqv",{"_index":494,"t":{"40":{"position":[[204,6]]}}}],["nest",{"_index":726,"t":{"66":{"position":[[693,6]]}}}],["new_us",{"_index":1060,"t":{"112":{"position":[[313,8],[502,8],[564,8]]}}}],["new_user%ag",{"_index":1068,"t":{"112":{"position":[[465,12]]}}}],["new_user%id",{"_index":1064,"t":{"112":{"position":[[414,11]]}}}],["new_user%nam",{"_index":1065,"t":{"112":{"position":[[431,13]]}}}],["next",{"_index":189,"t":{"6":{"position":[[2180,4]]}}}],["nint(x",{"_index":304,"t":{"20":{"position":[[225,6]]}}}],["nnn",{"_index":631,"t":{"59":{"position":[[129,3]]}}}],["no_of_command",{"_index":361,"t":{"28":{"position":[[151,15],[217,14],[294,14],[312,15],[444,14]]}}}],["no_of_stud",{"_index":161,"t":{"6":{"position":[[1606,14],[1716,14]]},"12":{"position":[[11,14]]}}}],["none",{"_index":10,"t":{"2":{"position":[[120,4],[408,4]]},"4":{"position":[[58,4],[401,4],[1026,4]]},"6":{"position":[[227,4],[953,4],[1275,4],[1590,4]]},"18":{"position":[[105,4]]},"28":{"position":[[138,4]]},"30":{"position":[[108,4]]},"34":{"position":[[327,4]]},"36":{"position":[[160,4]]},"42":{"position":[[126,4]]},"44":{"position":[[51,4]]},"46":{"position":[[51,4]]},"51":{"position":[[130,4]]},"53":{"position":[[141,4],[555,4]]},"55":{"position":[[434,4]]},"57":{"position":[[93,4]]},"59":{"position":[[465,4]]},"61":{"position":[[327,4],[877,4]]},"63":{"position":[[259,4],[762,4]]},"66":{"position":[[96,4]]},"68":{"position":[[60,4]]},"72":{"position":[[230,4],[468,4]]},"81":{"position":[[169,4]]},"83":{"position":[[405,4]]},"85":{"position":[[100,4]]},"89":{"position":[[180,4]]},"91":{"position":[[195,4]]},"95":{"position":[[93,4],[599,4]]},"97":{"position":[[177,4],[596,4]]},"105":{"position":[[71,4]]},"107":{"position":[[157,4]]},"112":{"position":[[45,4]]},"114":{"position":[[77,4]]}}}],["notat",{"_index":498,"t":{"40":{"position":[[262,8]]}}}],["note",{"_index":184,"t":{"6":{"position":[[2104,4]]},"53":{"position":[[291,4]]},"72":{"position":[[999,4]]}}}],["notic",{"_index":511,"t":{"44":{"position":[[377,6]]},"63":{"position":[[967,6]]},"70":{"position":[[718,8]]},"114":{"position":[[644,6]]}}}],["now",{"_index":136,"t":{"6":{"position":[[790,3]]},"61":{"position":[[112,3]]},"72":{"position":[[352,3]]},"85":{"position":[[769,3]]},"95":{"position":[[525,3]]}}}],["np",{"_index":853,"t":{"77":{"position":[[723,2]]}}}],["null",{"_index":900,"t":{"85":{"position":[[728,4],[826,4],[837,6]]}}}],["num",{"_index":733,"t":{"68":{"position":[[76,3],[80,3],[97,4],[148,3],[159,3],[165,3]]}}}],["number",{"_index":111,"t":{"6":{"position":[[198,7],[1794,6]]},"22":{"position":[[211,7]]},"26":{"position":[[213,6]]},"28":{"position":[[268,7]]},"30":{"position":[[23,6]]},"42":{"position":[[39,8]]},"66":{"position":[[563,7]]},"83":{"position":[[82,6]]}}}],["numer",{"_index":292,"t":{"20":{"position":[[49,9]]},"61":{"position":[[29,9]]}}}],["o",{"_index":818,"t":{"72":{"position":[[1196,2],[1272,2]]},"77":{"position":[[571,1],[663,1]]},"109":{"position":[[773,1],[920,2]]}}}],["object",{"_index":899,"t":{"85":{"position":[[645,7]]},"114":{"position":[[23,7],[517,7]]}}}],["obtain",{"_index":744,"t":{"70":{"position":[[208,6]]}}}],["odd",{"_index":723,"t":{"66":{"position":[[559,3]]}}}],["older",{"_index":121,"t":{"6":{"position":[[564,6]]}}}],["on",{"_index":339,"t":{"24":{"position":[[98,3]]},"99":{"position":[[212,3]]}}}],["onc",{"_index":816,"t":{"72":{"position":[[1152,4]]}}}],["open(unit=1",{"_index":530,"t":{"53":{"position":[[160,12],[584,12]]}}}],["oper",{"_index":106,"t":{"6":{"position":[[121,11],[2305,8]]},"30":{"position":[[333,10]]},"34":{"position":[[68,9]]},"40":{"position":[[0,9],[290,10],[301,9]]}}}],["optim",{"_index":1027,"t":{"109":{"position":[[11,9]]}}}],["option",{"_index":308,"t":{"20":{"position":[[270,8]]},"36":{"position":[[485,10]]},"72":{"position":[[1395,7]]}}}],["oracl",{"_index":989,"t":{"103":{"position":[[164,6]]}}}],["order=[2",{"_index":79,"t":{"4":{"position":[[872,9],[1107,9],[1199,9]]}}}],["ordinari",{"_index":903,"t":{"87":{"position":[[0,8]]}}}],["organ",{"_index":788,"t":{"72":{"position":[[22,9]]}}}],["otherwis",{"_index":289,"t":{"18":{"position":[[282,9]]},"72":{"position":[[614,9]]}}}],["out",{"_index":995,"t":{"105":{"position":[[266,4]]}}}],["outer_loop",{"_index":41,"t":{"4":{"position":[[96,10],[142,10]]}}}],["output",{"_index":89,"t":{"4":{"position":[[1241,6],[1262,6]]},"6":{"position":[[249,6],[318,6],[341,8],[369,6],[1499,7],[1548,6],[1947,8]]},"42":{"position":[[146,6],[207,6],[269,6]]},"53":{"position":[[96,6]]},"63":{"position":[[783,6],[1069,7],[1091,6]]},"66":{"position":[[123,6],[185,6],[194,6],[236,6]]},"89":{"position":[[203,6],[318,7],[350,6]]},"91":{"position":[[463,6],[486,6],[553,6],[569,6]]},"97":{"position":[[721,7]]},"107":{"position":[[700,7]]}}}],["output(ii",{"_index":91,"t":{"4":{"position":[[1306,10]]}}}],["p",{"_index":311,"t":{"20":{"position":[[341,2]]}}}],["p1",{"_index":884,"t":{"85":{"position":[[122,3],[242,2],[260,2],[343,4],[498,3],[507,2],[564,2],[621,2]]}}}],["p2",{"_index":885,"t":{"85":{"position":[[126,2],[372,2],[519,3],[528,2],[628,2],[671,3],[773,2],[831,2]]}}}],["page",{"_index":556,"t":{"55":{"position":[[128,5]]}}}],["parallel",{"_index":730,"t":{"66":{"position":[[884,9]]}}}],["paramet",{"_index":155,"t":{"6":{"position":[[1304,9]]},"14":{"position":[[6,9]]},"16":{"position":[[14,10],[751,11],[825,9],[949,9]]},"36":{"position":[[216,9]]},"55":{"position":[[448,9],[488,9],[1266,9]]},"66":{"position":[[315,10]]},"72":{"position":[[257,9],[300,9]]},"81":{"position":[[183,9]]},"83":{"position":[[419,9]]},"97":{"position":[[199,10],[372,9]]},"107":{"position":[[171,9]]},"112":{"position":[[139,10]]}}}],["pars",{"_index":357,"t":{"28":{"position":[[63,5]]}}}],["part",{"_index":173,"t":{"6":{"position":[[1844,4],[1915,4]]},"16":{"position":[[546,4]]},"30":{"position":[[433,5],[448,4],[504,4],[546,4]]},"109":{"position":[[356,4]]}}}],["parti",{"_index":740,"t":{"70":{"position":[[96,5]]}}}],["pass",{"_index":656,"t":{"61":{"position":[[124,4]]}}}],["path",{"_index":5,"t":{"2":{"position":[[58,5],[301,5]]},"32":{"position":[[153,4]]},"34":{"position":[[259,5]]}}}],["perform",{"_index":104,"t":{"6":{"position":[[96,8]]},"34":{"position":[[43,8]]},"109":{"position":[[30,11]]}}}],["permiss",{"_index":745,"t":{"70":{"position":[[215,10],[792,11]]}}}],["physic",{"_index":792,"t":{"72":{"position":[[122,8]]}}}],["pi",{"_index":156,"t":{"6":{"position":[[1317,2],[1414,2],[2060,2],[2090,2]]},"14":{"position":[[19,2]]},"16":{"position":[[838,2],[962,2]]},"72":{"position":[[270,2]]},"74":{"position":[[48,2],[104,2],[132,3],[188,2],[222,2],[264,3]]},"83":{"position":[[29,5],[281,5],[352,6],[393,2],[776,3],[920,2]]}}}],["pi*rad**2",{"_index":802,"t":{"72":{"position":[[504,9]]}}}],["place",{"_index":548,"t":{"55":{"position":[[35,6]]},"72":{"position":[[1077,6]]},"93":{"position":[[98,6]]}}}],["pleas",{"_index":506,"t":{"44":{"position":[[153,6]]}}}],["point",{"_index":558,"t":{"55":{"position":[[200,6],[680,5],[734,5],[787,5],[841,5]]},"83":{"position":[[171,6]]},"85":{"position":[[248,5],[631,5],[719,5],[817,5]]}}}],["pointer",{"_index":881,"t":{"85":{"position":[[0,7],[111,7],[171,7],[710,8],[790,7]]},"114":{"position":[[575,7]]}}}],["polymorph",{"_index":1078,"t":{"114":{"position":[[11,11],[505,11]]}}}],["posit",{"_index":352,"t":{"26":{"position":[[243,8]]},"42":{"position":[[30,8],[305,8]]},"44":{"position":[[168,8]]},"57":{"position":[[331,8]]}}}],["power",{"_index":947,"t":{"97":{"position":[[220,5],[634,5]]}}}],["practic",{"_index":280,"t":{"18":{"position":[[66,8]]}}}],["pranab",{"_index":200,"t":{"6":{"position":[[2346,9]]}}}],["precis",{"_index":219,"t":{"10":{"position":[[84,11]]},"16":{"position":[[240,10],[790,10],[880,9]]},"20":{"position":[[289,9]]},"30":{"position":[[283,10]]},"34":{"position":[[124,9]]},"36":{"position":[[39,9],[172,9],[249,9]]}}}],["precision(pi",{"_index":268,"t":{"16":{"position":[[992,14]]}}}],["prefix",{"_index":25,"t":{"2":{"position":[[480,6],[607,7]]}}}],["prefix(:lnblnk(prefix",{"_index":30,"t":{"2":{"position":[[630,23],[730,23]]}}}],["previou",{"_index":192,"t":{"6":{"position":[[2217,8]]}}}],["previous",{"_index":654,"t":{"61":{"position":[[57,10]]}}}],["primit",{"_index":234,"t":{"16":{"position":[[58,9]]}}}],["print",{"_index":16,"t":{"2":{"position":[[182,5],[282,5]]},"4":{"position":[[167,5],[496,5],[1297,5]]},"6":{"position":[[256,5],[287,5],[333,7],[975,5],[1050,5],[1421,5],[1702,5],[1763,5],[1849,5],[2318,5]]},"16":{"position":[[983,5]]},"24":{"position":[[16,5]]},"26":{"position":[[0,5],[54,5],[123,5],[228,7],[258,5]]},"28":{"position":[[259,5],[338,5],[677,5]]},"34":{"position":[[866,5],[892,5]]},"36":{"position":[[640,5],[679,5]]},"42":{"position":[[153,5],[228,5],[281,5]]},"44":{"position":[[71,5],[136,5],[220,5],[290,5],[321,5]]},"46":{"position":[[71,5],[148,5],[190,5],[226,5]]},"51":{"position":[[178,5],[235,5],[324,5]]},"53":{"position":[[704,5]]},"55":{"position":[[652,5],[705,5],[759,5],[812,5],[1077,5]]},"57":{"position":[[215,5],[296,5],[403,5],[461,5],[516,5],[575,5],[678,5],[762,5]]},"59":{"position":[[659,5]]},"61":{"position":[[899,5]]},"66":{"position":[[134,5],[212,5],[596,5],[658,5],[707,5]]},"68":{"position":[[139,5]]},"72":{"position":[[514,5]]},"81":{"position":[[604,5],[629,5]]},"83":{"position":[[767,5],[814,5]]},"85":{"position":[[468,5],[489,5],[510,5],[551,5],[608,5],[733,5]]},"89":{"position":[[210,5],[256,5],[326,5]]},"91":{"position":[[218,5],[271,5],[323,5]]},"95":{"position":[[219,5],[261,5],[430,5]]},"97":{"position":[[11,5],[650,5]]},"105":{"position":[[89,5],[186,5]]},"107":{"position":[[327,5],[546,5],[602,5],[627,5]]},"112":{"position":[[573,5],[614,5],[659,5],[767,5]]},"114":{"position":[[1026,5],[1096,5],[1189,5],[1260,5]]}}}],["print_abs_path",{"_index":8,"t":{"2":{"position":[[96,14],[331,14]]}}}],["print_result",{"_index":933,"t":{"95":{"position":[[172,12],[417,12],[490,12],[647,14]]}}}],["privaci",{"_index":780,"t":{"70":{"position":[[882,8]]}}}],["privat",{"_index":660,"t":{"61":{"position":[[332,7]]},"72":{"position":[[235,7],[565,7],[606,7],[644,7]]},"95":{"position":[[98,7]]},"97":{"position":[[182,7]]}}}],["procedur",{"_index":789,"t":{"72":{"position":[[56,11]]},"85":{"position":[[48,10]]},"87":{"position":[[17,10],[180,11]]},"93":{"position":[[23,10],[77,10]]},"99":{"position":[[58,9]]},"101":{"position":[[138,9]]}}}],["process",{"_index":844,"t":{"77":{"position":[[444,8]]}}}],["process_rank",{"_index":832,"t":{"77":{"position":[[76,13],[282,13],[376,13]]}}}],["processor",{"_index":851,"t":{"77":{"position":[[703,11]]}}}],["processor_nam",{"_index":836,"t":{"77":{"position":[[150,14],[407,14]]}}}],["produc",{"_index":78,"t":{"4":{"position":[[808,7],[893,7],[1474,7]]}}}],["product",{"_index":414,"t":{"34":{"position":[[102,7]]},"36":{"position":[[21,7]]},"57":{"position":[[703,7]]}}}],["program",{"_index":7,"t":{"2":{"position":[[88,7],[323,7]]},"4":{"position":[[19,7],[35,7],[199,7],[377,7],[528,7],[965,7],[997,7],[1331,7]]},"6":{"position":[[57,7],[172,7],[206,7],[380,7],[621,7],[821,7],[886,7],[928,7],[1091,7],[1185,7],[1253,7],[1475,7],[1527,7],[1566,7],[1924,7]]},"18":{"position":[[124,8]]},"28":{"position":[[116,7],[361,7],[409,7]]},"30":{"position":[[41,8],[76,7],[634,7]]},"32":{"position":[[83,7]]},"34":{"position":[[305,7]]},"36":{"position":[[138,7]]},"42":{"position":[[69,7],[101,7],[331,7]]},"44":{"position":[[24,7],[359,7]]},"46":{"position":[[23,7],[268,7]]},"51":{"position":[[75,8],[108,7]]},"53":{"position":[[80,7],[113,7],[267,7],[374,9],[498,7],[528,7],[738,7]]},"55":{"position":[[399,7],[1388,7]]},"57":{"position":[[62,7],[870,7]]},"59":{"position":[[438,7],[688,7]]},"61":{"position":[[161,7],[825,7],[952,7]]},"63":{"position":[[734,7],[803,8],[1136,7],[1168,8]]},"66":{"position":[[44,7],[69,7],[247,7]]},"68":{"position":[[30,7],[184,7]]},"72":{"position":[[6,8],[367,7],[424,7],[543,7],[742,8],[906,8],[1043,7],[1143,8],[1235,8]]},"77":{"position":[[27,7],[514,7]]},"81":{"position":[[135,7],[681,7]]},"83":{"position":[[385,7],[912,7]]},"85":{"position":[[78,7]]},"89":{"position":[[142,7],[225,7],[590,7]]},"91":{"position":[[159,7],[233,7],[614,7]]},"93":{"position":[[157,8]]},"95":{"position":[[539,8],[563,7],[666,7]]},"97":{"position":[[544,7],[691,7]]},"99":{"position":[[43,7],[164,7]]},"101":{"position":[[72,7]]},"103":{"position":[[8,11],[69,11],[141,11]]},"105":{"position":[[49,7]]},"107":{"position":[[95,7],[135,7]]},"109":{"position":[[503,7],[892,7]]},"112":{"position":[[23,7]]},"114":{"position":[[55,7]]}}}],["protect",{"_index":807,"t":{"72":{"position":[[779,9]]}}}],["provid",{"_index":767,"t":{"70":{"position":[[540,7]]},"72":{"position":[[1260,7]]},"97":{"position":[[853,7]]},"101":{"position":[[27,7]]}}}],["ptr_arr",{"_index":888,"t":{"85":{"position":[[182,7],[428,7]]}}}],["public",{"_index":661,"t":{"61":{"position":[[340,6]]},"70":{"position":[[871,10]]},"72":{"position":[[249,7],[292,7],[636,7],[703,6]]},"95":{"position":[[136,6]]},"97":{"position":[[210,6],[230,6]]},"112":{"position":[[97,7],[111,6]]}}}],["pure",{"_index":971,"t":{"99":{"position":[[265,4],[312,4]]}}}],["purpos",{"_index":760,"t":{"70":{"position":[[437,8]]}}}],["r",{"_index":153,"t":{"6":{"position":[[1288,2],[1399,1],[1419,1]]},"114":{"position":[[269,2]]}}}],["r1",{"_index":887,"t":{"85":{"position":[[145,2],[227,2],[257,2],[266,2],[477,3],[486,2],[571,2],[604,3]]}}}],["rad",{"_index":604,"t":{"55":{"position":[[1333,3],[1337,3]]},"72":{"position":[[481,3]]}}}],["radian",{"_index":600,"t":{"55":{"position":[[1189,7]]}}}],["radiu",{"_index":151,"t":{"6":{"position":[[1245,7],[1367,6]]},"12":{"position":[[34,7]]},"83":{"position":[[104,6],[203,6],[293,6]]}}}],["radius_of_earth",{"_index":575,"t":{"55":{"position":[[501,15],[1045,15]]}}}],["random",{"_index":872,"t":{"83":{"position":[[75,6]]}}}],["random_number(i",{"_index":868,"t":{"81":{"position":[[428,16]]},"83":{"position":[[619,16]]}}}],["random_number(x",{"_index":716,"t":{"66":{"position":[[416,16]]},"81":{"position":[[406,16]]},"83":{"position":[[597,16]]}}}],["rang",{"_index":265,"t":{"16":{"position":[[903,5],[1127,5]]},"97":{"position":[[355,7]]},"114":{"position":[[284,6]]}}}],["range(pi",{"_index":269,"t":{"16":{"position":[[1007,9]]}}}],["ratio",{"_index":877,"t":{"83":{"position":[[318,5]]}}}],["re",{"_index":423,"t":{"34":{"position":[[642,4],[834,3],[888,3]]},"114":{"position":[[1317,2]]}}}],["read",{"_index":20,"t":{"2":{"position":[[217,4]]},"6":{"position":[[277,4],[308,4],[1022,4],[1391,4]]},"24":{"position":[[127,4]]},"28":{"position":[[633,4]]},"42":{"position":[[173,4]]},"44":{"position":[[105,4]]},"46":{"position":[[105,4]]},"53":{"position":[[384,7],[411,4],[508,4]]},"55":{"position":[[81,4],[692,4],[746,4],[799,4],[853,4]]},"57":{"position":[[258,4],[496,4],[610,4]]},"63":{"position":[[896,4],[950,4]]},"66":{"position":[[154,4]]},"89":{"position":[[282,4]]},"91":{"position":[[297,4]]},"95":{"position":[[246,4],[288,4]]},"105":{"position":[[157,4]]}}}],["read(1",{"_index":543,"t":{"53":{"position":[[644,7]]}}}],["read(arg",{"_index":377,"t":{"28":{"position":[[615,11]]}}}],["read_input",{"_index":931,"t":{"95":{"position":[[146,12],[205,13],[318,11],[609,13]]}}}],["real",{"_index":142,"t":{"6":{"position":[[958,4],[1280,4],[1298,5],[1626,4],[1789,4]]},"10":{"position":[[29,4]]},"12":{"position":[[26,4]]},"14":{"position":[[0,5]]},"16":{"position":[[162,5],[394,4],[527,4],[557,4]]},"18":{"position":[[292,5]]},"20":{"position":[[329,4]]},"28":{"position":[[194,4],[649,4]]},"30":{"position":[[414,4],[443,4],[498,5]]},"34":{"position":[[134,4],[369,5],[406,5],[596,4],[637,4]]},"42":{"position":[[25,4],[131,4],[314,6]]},"57":{"position":[[113,5],[150,5],[197,4]]},"59":{"position":[[487,4]]},"61":{"position":[[463,5],[485,4],[531,5],[581,4],[605,4]]},"63":{"position":[[304,5],[331,5],[358,5],[390,4],[767,4]]},"72":{"position":[[243,5],[286,5],[473,4]]},"81":{"position":[[216,4],[235,4],[254,4]]},"83":{"position":[[452,4],[465,4],[485,4],[504,4],[524,4]]},"85":{"position":[[105,5],[129,5]]},"95":{"position":[[106,4]]},"97":{"position":[[282,5],[304,4],[601,4]]},"107":{"position":[[222,4]]},"112":{"position":[[192,4],[264,4]]},"114":{"position":[[126,4]]}}}],["real(dp",{"_index":574,"t":{"55":{"position":[[478,9],[528,8],[554,8],[580,8],[606,8],[632,8]]}}}],["real(i",{"_index":273,"t":{"16":{"position":[[1086,7]]}}}],["real(kind=kind(0.0d0",{"_index":262,"t":{"16":{"position":[[801,23],[1035,22]]},"55":{"position":[[1197,23],[1242,23],[1307,22]]}}}],["real(kind=kind(1.0d0",{"_index":1005,"t":{"107":{"position":[[248,22]]}}}],["real(kind=selected_real_kind(12",{"_index":266,"t":{"16":{"position":[[909,32]]}}}],["real(x",{"_index":309,"t":{"20":{"position":[[299,6]]},"97":{"position":[[449,7]]}}}],["real(z2",{"_index":394,"t":{"30":{"position":[[514,8]]}}}],["real128",{"_index":260,"t":{"16":{"position":[[743,7]]}}}],["real32",{"_index":258,"t":{"16":{"position":[[723,7]]}}}],["real64",{"_index":259,"t":{"16":{"position":[[731,7]]}}}],["reason",{"_index":771,"t":{"70":{"position":[[627,10]]}}}],["recommend",{"_index":250,"t":{"16":{"position":[[594,11]]}}}],["recurs",{"_index":904,"t":{"87":{"position":[[62,10],[139,9],[170,9]]},"89":{"position":[[26,9],[366,9]]},"91":{"position":[[33,9],[380,9]]}}}],["recursive_funct",{"_index":921,"t":{"91":{"position":[[167,18],[622,18]]}}}],["recursive_subroutin",{"_index":912,"t":{"89":{"position":[[150,20],[598,20]]}}}],["redistribut",{"_index":753,"t":{"70":{"position":[[324,12]]}}}],["rel",{"_index":879,"t":{"83":{"position":[[823,9]]},"107":{"position":[[636,9],[804,8]]}}}],["relat",{"_index":126,"t":{"6":{"position":[[656,8]]},"40":{"position":[[279,10]]}}}],["remix",{"_index":756,"t":{"70":{"position":[[383,6]]}}}],["renam",{"_index":824,"t":{"74":{"position":[[0,6],[229,6]]}}}],["report",{"_index":1008,"t":{"107":{"position":[[344,6],[717,6]]}}}],["reproduc",{"_index":748,"t":{"70":{"position":[[264,9]]}}}],["requir",{"_index":375,"t":{"28":{"position":[[585,8]]}}}],["reserv",{"_index":537,"t":{"53":{"position":[[322,9]]}}}],["reshap",{"_index":71,"t":{"4":{"position":[[752,8]]}}}],["reshape([1",{"_index":72,"t":{"4":{"position":[[765,11],[836,11],[1063,11],[1153,11]]}}}],["respect",{"_index":746,"t":{"70":{"position":[[235,10]]},"99":{"position":[[329,13]]}}}],["rest",{"_index":718,"t":{"66":{"position":[[463,4]]}}}],["result",{"_index":107,"t":{"6":{"position":[[147,7]]},"34":{"position":[[875,7],[907,6]]},"57":{"position":[[780,7]]},"81":{"position":[[650,6]]},"89":{"position":[[400,7],[457,6],[521,6],[543,6]]}}}],["result(f_result",{"_index":666,"t":{"61":{"position":[[446,16]]},"97":{"position":[[265,16]]}}}],["result(integral_result",{"_index":663,"t":{"61":{"position":[[398,23]]}}}],["result(output",{"_index":926,"t":{"91":{"position":[[412,14]]}}}],["result(rad",{"_index":598,"t":{"55":{"position":[[1164,11]]}}}],["result1",{"_index":163,"t":{"6":{"position":[[1634,8],[1651,7],[1779,7]]}}}],["result2",{"_index":164,"t":{"6":{"position":[[1643,7],[1671,7],[1865,7]]}}}],["return",{"_index":35,"t":{"2":{"position":[[802,6]]},"6":{"position":[[137,7]]},"85":{"position":[[688,7]]},"97":{"position":[[863,6]]},"99":{"position":[[112,7]]}}}],["revers",{"_index":1094,"t":{"114":{"position":[[437,7]]}}}],["right",{"_index":699,"t":{"63":{"position":[[841,5]]},"70":{"position":[[856,6],[900,6]]}}}],["root",{"_index":332,"t":{"22":{"position":[[251,4]]},"42":{"position":[[17,4],[96,4],[245,4]]}}}],["round",{"_index":306,"t":{"20":{"position":[[243,6]]}}}],["run",{"_index":809,"t":{"72":{"position":[[887,3]]},"77":{"position":[[694,3]]},"109":{"position":[[109,7]]}}}],["s",{"_index":985,"t":{"103":{"position":[[91,1]]}}}],["s1",{"_index":697,"t":{"63":{"position":[[775,3],[908,2]]}}}],["s2",{"_index":698,"t":{"63":{"position":[[779,3],[962,2],[1065,3]]}}}],["salari",{"_index":1058,"t":{"112":{"position":[[272,6],[776,8]]}}}],["same",{"_index":93,"t":{"4":{"position":[[1388,4]]},"6":{"position":[[558,5]]},"26":{"position":[[79,4]]},"34":{"position":[[558,4]]},"72":{"position":[[1091,4]]},"74":{"position":[[154,4]]},"85":{"position":[[463,4],[640,4]]},"109":{"position":[[602,4]]},"114":{"position":[[1333,4]]}}}],["sampl",{"_index":955,"t":{"97":{"position":[[714,6]]},"107":{"position":[[693,6]]}}}],["savag",{"_index":1013,"t":{"107":{"position":[[431,6]]}}}],["scalar",{"_index":413,"t":{"34":{"position":[[93,6]]}}}],["scaler",{"_index":95,"t":{"4":{"position":[[1417,6]]}}}],["scientif",{"_index":1028,"t":{"109":{"position":[[42,10]]}}}],["sdot",{"_index":411,"t":{"34":{"position":[[23,5],[647,4],[661,4]]}}}],["sdot(n",{"_index":438,"t":{"34":{"position":[[840,7],[919,7]]}}}],["sec",{"_index":1019,"t":{"107":{"position":[[595,6],[769,4]]}}}],["second",{"_index":349,"t":{"26":{"position":[[156,7],[206,6]]},"57":{"position":[[532,6]]}}}],["section",{"_index":1048,"t":{"109":{"position":[[957,8]]}}}],["see",{"_index":68,"t":{"4":{"position":[[671,3]]},"34":{"position":[[570,3]]}}}],["select",{"_index":514,"t":{"46":{"position":[[117,6],[257,6]]},"114":{"position":[[981,6],[1308,6]]}}}],["selected_char_kind",{"_index":251,"t":{"16":{"position":[[617,19]]}}}],["selected_int_kind",{"_index":252,"t":{"16":{"position":[[637,17]]}}}],["selected_real_kind",{"_index":253,"t":{"16":{"position":[[659,18]]}}}],["selected_real_kind(pow",{"_index":950,"t":{"97":{"position":[[399,24]]}}}],["selected_real_kind(precis",{"_index":948,"t":{"97":{"position":[[323,28]]}}}],["semicolon",{"_index":204,"t":{"6":{"position":[[2463,9]]}}}],["senior",{"_index":510,"t":{"44":{"position":[[339,8]]},"46":{"position":[[244,8]]}}}],["sensit",{"_index":117,"t":{"6":{"position":[[449,10]]}}}],["separ",{"_index":203,"t":{"6":{"position":[[2419,8]]},"24":{"position":[[76,9]]},"61":{"position":[[177,8]]},"72":{"position":[[35,8]]},"105":{"position":[[124,10]]},"109":{"position":[[814,8]]}}}],["seri",{"_index":916,"t":{"91":{"position":[[20,6],[95,6],[262,8]]}}}],["set",{"_index":261,"t":{"16":{"position":[[775,7]]},"85":{"position":[[238,3],[810,3]]}}}],["shape(a",{"_index":85,"t":{"4":{"position":[[1095,9]]}}}],["shape(b",{"_index":88,"t":{"4":{"position":[[1187,9]]}}}],["share",{"_index":751,"t":{"70":{"position":[[307,5]]}}}],["side",{"_index":701,"t":{"63":{"position":[[887,4],[941,4]]},"99":{"position":[[0,4],[277,4]]}}}],["side_a",{"_index":688,"t":{"63":{"position":[[324,6],[410,6],[419,6]]}}}],["side_b",{"_index":685,"t":{"63":{"position":[[230,7],[351,6],[428,6],[437,6]]}}}],["simpl",{"_index":100,"t":{"6":{"position":[[50,6],[814,6]]}}}],["simplifi",{"_index":497,"t":{"40":{"position":[[251,10]]}}}],["sin",{"_index":315,"t":{"22":{"position":[[22,3]]},"59":{"position":[[483,3]]},"61":{"position":[[895,3]]}}}],["sin((lat1",{"_index":587,"t":{"55":{"position":[[954,10]]}}}],["sin((lon1",{"_index":591,"t":{"55":{"position":[[1008,10]]}}}],["sin(1.23",{"_index":165,"t":{"6":{"position":[[1661,9]]}}}],["sin(a",{"_index":648,"t":{"59":{"position":[[577,7],[623,5]]}}}],["sin(b",{"_index":649,"t":{"59":{"position":[[587,7]]}}}],["sin^2(theta/2",{"_index":562,"t":{"55":{"position":[[294,14]]}}}],["sine",{"_index":316,"t":{"22":{"position":[[26,4],[53,4],[63,4]]},"59":{"position":[[402,4]]}}}],["singl",{"_index":187,"t":{"6":{"position":[[2156,6],[2358,6]]},"28":{"position":[[498,6]]},"34":{"position":[[117,6]]}}}],["sinh",{"_index":319,"t":{"22":{"position":[[58,4]]}}}],["size",{"_index":48,"t":{"4":{"position":[[232,4]]},"16":{"position":[[444,4],[496,4],[581,6]]},"66":{"position":[[284,4]]}}}],["size(vec",{"_index":52,"t":{"4":{"position":[[283,10],[486,9]]}}}],["size_of_clust",{"_index":833,"t":{"77":{"position":[[90,16],[222,16],[390,16]]}}}],["skip",{"_index":717,"t":{"66":{"position":[[458,4]]}}}],["someth",{"_index":713,"t":{"66":{"position":[[349,9],[540,9],[925,9]]}}}],["sourc",{"_index":814,"t":{"72":{"position":[[1096,6]]},"109":{"position":[[421,6],[480,6],[624,6],[823,6]]}}}],["source.f90",{"_index":1044,"t":{"109":{"position":[[543,10],[761,10]]}}}],["source=vector_line_type(0.0",{"_index":1103,"t":{"114":{"position":[[882,28],[1399,28]]}}}],["space",{"_index":170,"t":{"6":{"position":[[1749,6],[1808,6],[1894,6]]},"85":{"position":[[302,5]]},"105":{"position":[[138,5]]}}}],["specif",{"_index":123,"t":{"6":{"position":[[575,13]]}}}],["specifi",{"_index":226,"t":{"10":{"position":[[193,9]]},"16":{"position":[[864,7]]},"72":{"position":[[1375,7]]},"109":{"position":[[692,7]]}}}],["sq_root",{"_index":500,"t":{"42":{"position":[[109,7],[339,7]]}}}],["sqrt",{"_index":330,"t":{"22":{"position":[[239,4]]}}}],["sqrt(input",{"_index":501,"t":{"42":{"position":[[216,11]]}}}],["sqrt(temp",{"_index":691,"t":{"63":{"position":[[457,10]]}}}],["sqrt{a^2",{"_index":679,"t":{"63":{"position":[[65,9]]}}}],["squar",{"_index":331,"t":{"22":{"position":[[244,6]]},"42":{"position":[[10,6],[89,6],[237,7]]},"83":{"position":[[94,6],[230,6],[241,6]]}}}],["src/01_add.f90",{"_index":108,"t":{"6":{"position":[[155,14]]}}}],["src/02_cm2inch.f90",{"_index":140,"t":{"6":{"position":[[865,18]]}}}],["src/03_circ.f90",{"_index":150,"t":{"6":{"position":[[1167,15]]}}}],["src/04_format.f90",{"_index":160,"t":{"6":{"position":[[1507,17]]}}}],["src/05_array.f90",{"_index":36,"t":{"4":{"position":[[0,16]]}}}],["src/05_array2.f90",{"_index":59,"t":{"4":{"position":[[359,17]]}}}],["src/05_matrix_mult.f90",{"_index":82,"t":{"4":{"position":[[940,22]]}}}],["src/06_multi_way_if.f90",{"_index":502,"t":{"44":{"position":[[0,23]]}}}],["src/06_select_case.f90",{"_index":512,"t":{"46":{"position":[[0,22]]}}}],["src/06_sq_root.f90",{"_index":499,"t":{"42":{"position":[[48,18]]}}}],["src/07_factorial.f90",{"_index":709,"t":{"66":{"position":[[21,20]]}}}],["src/07_print_even_numbers.f90",{"_index":731,"t":{"68":{"position":[[0,29]]}}}],["src/08_file_write.f90",{"_index":528,"t":{"53":{"position":[[56,21]]}}}],["src/09_file_read.f90",{"_index":539,"t":{"53":{"position":[[475,20]]}}}],["src/10_trapezoid.f90",{"_index":643,"t":{"59":{"position":[[358,20]]}}}],["src/11_circ_area.f90",{"_index":800,"t":{"72":{"position":[[403,20]]}}}],["src/11_const_module.f90",{"_index":795,"t":{"72":{"position":[[177,23]]}}}],["src/12_add.f90",{"_index":934,"t":{"95":{"position":[[548,14]]}}}],["src/12_add_module.f90",{"_index":927,"t":{"95":{"position":[[44,21]]}}}],["src/13_function_module.f90",{"_index":945,"t":{"97":{"position":[[118,26]]}}}],["src/13_function_table.f90",{"_index":951,"t":{"97":{"position":[[518,25]]}}}],["src/14_integration.f90",{"_index":672,"t":{"61":{"position":[[802,22]]}}}],["src/14_integration_module.f90",{"_index":658,"t":{"61":{"position":[[262,29]]}}}],["src/15_get_abs_path.f90",{"_index":6,"t":{"2":{"position":[[64,23]]}}}],["src/16_hypotenuse_program.f90",{"_index":693,"t":{"63":{"position":[[569,29]]}}}],["src/16_hypotenuse_subroutine.f90",{"_index":681,"t":{"63":{"position":[[90,32]]}}}],["src/17_complex_number.f90",{"_index":380,"t":{"30":{"position":[[50,25]]}}}],["src/18_haversine_formula.f90",{"_index":557,"t":{"55":{"position":[[134,28]]}}}],["src/19_inner_product.f90",{"_index":606,"t":{"57":{"position":[[37,24]]}}}],["src/20_monte_carlo_integration.f90",{"_index":856,"t":{"81":{"position":[[0,34]]}}}],["src/20_monte_carlo_pi.f90",{"_index":878,"t":{"83":{"position":[[359,25]]}}}],["src/21_recursive_function.f90",{"_index":917,"t":{"91":{"position":[[53,29]]}}}],["src/21_recursive_subroutine.f90",{"_index":910,"t":{"89":{"position":[[48,31]]}}}],["src/22_blas_dgemm.f90",{"_index":450,"t":{"36":{"position":[[116,21]]}}}],["src/22_blas_sdot.f90",{"_index":410,"t":{"34":{"position":[[0,20]]}}}],["src/23_custom_type.f90",{"_index":1052,"t":{"112":{"position":[[0,22]]}}}],["src/23_polymorphism.f90",{"_index":1079,"t":{"114":{"position":[[31,23]]}}}],["src/24_swap.f90",{"_index":993,"t":{"105":{"position":[[33,15]]}}}],["src/25_time.f90",{"_index":1000,"t":{"107":{"position":[[119,15]]}}}],["src/26_arg_parsing.f90",{"_index":359,"t":{"28":{"position":[[93,22]]}}}],["src/27_exec_command.f90",{"_index":519,"t":{"51":{"position":[[84,23]]}}}],["src/28_pointer.f90",{"_index":883,"t":{"85":{"position":[[59,18]]}}}],["src/29_mpi_hello_world.f90",{"_index":829,"t":{"77":{"position":[[0,26]]}}}],["start",{"_index":98,"t":{"6":{"position":[[31,5],[2119,6]]},"18":{"position":[[226,6]]},"114":{"position":[[418,5]]}}}],["start_tim",{"_index":1003,"t":{"107":{"position":[[227,11],[583,11]]}}}],["stat=allocation_statu",{"_index":891,"t":{"85":{"position":[[348,23]]}}}],["statement",{"_index":188,"t":{"6":{"position":[[2163,9],[2365,9],[2437,10]]},"99":{"position":[[201,10]]}}}],["statu",{"_index":969,"t":{"99":{"position":[[31,6]]}}}],["status='new",{"_index":532,"t":{"53":{"position":[[192,13]]}}}],["status='old",{"_index":542,"t":{"53":{"position":[[616,13]]}}}],["step",{"_index":711,"t":{"66":{"position":[[279,4]]}}}],["still",{"_index":1099,"t":{"114":{"position":[[686,5]]}}}],["stop",{"_index":369,"t":{"28":{"position":[[422,4]]},"44":{"position":[[191,4],[393,4]]},"57":{"position":[[305,10],[351,4]]}}}],["storag",{"_index":244,"t":{"16":{"position":[[436,7],[488,7]]},"85":{"position":[[294,7]]}}}],["store",{"_index":127,"t":{"6":{"position":[[668,5]]},"34":{"position":[[542,6]]},"72":{"position":[[91,5]]}}}],["string",{"_index":198,"t":{"6":{"position":[[2275,7]]},"10":{"position":[[179,6]]},"28":{"position":[[638,7]]}}}],["subroutin",{"_index":682,"t":{"63":{"position":[[137,11],[190,10],[472,10],[516,11],[601,10],[974,10]]},"87":{"position":[[28,11]]},"89":{"position":[[36,11],[376,10],[565,10]]},"93":{"position":[[46,11]]},"95":{"position":[[19,11],[194,10],[307,10],[330,10],[383,10],[406,10],[479,10]]},"97":{"position":[[825,12]]},"99":{"position":[[251,10]]},"105":{"position":[[0,10],[225,10],[317,10]]}}}],["such",{"_index":749,"t":{"70":{"position":[[274,4],[863,4]]},"99":{"position":[[120,4]]}}}],["sudo",{"_index":1037,"t":{"109":{"position":[[258,4]]}}}],["suggest",{"_index":774,"t":{"70":{"position":[[670,8]]}}}],["sum",{"_index":364,"t":{"28":{"position":[[202,3],[654,3],[660,3],[698,3]]},"57":{"position":[[205,3],[647,3],[653,3],[716,3]]}}}],["support",{"_index":232,"t":{"16":{"position":[[25,9]]}}}],["sure",{"_index":804,"t":{"72":{"position":[[587,4]]},"114":{"position":[[1281,4]]}}}],["swap",{"_index":992,"t":{"105":{"position":[[14,4],[202,5],[328,4]]}}}],["swap(a",{"_index":994,"t":{"105":{"position":[[175,7],[236,7]]}}}],["system",{"_index":240,"t":{"16":{"position":[[330,7]]},"32":{"position":[[146,6]]},"34":{"position":[[252,6]]},"51":{"position":[[163,6]]}}}],["t",{"_index":1093,"t":{"114":{"position":[[400,1]]}}}],["t10",{"_index":354,"t":{"26":{"position":[[270,4]]}}}],["tab",{"_index":350,"t":{"26":{"position":[[194,3]]}}}],["tabl",{"_index":939,"t":{"97":{"position":[[19,5]]}}}],["taken",{"_index":1018,"t":{"107":{"position":[[561,5],[749,5]]}}}],["tan",{"_index":325,"t":{"22":{"position":[[139,3],[173,3],[224,3]]}}}],["tan(atan(exp(log(sqrt(test",{"_index":1015,"t":{"107":{"position":[[467,26]]}}}],["tangent",{"_index":326,"t":{"22":{"position":[[143,7],[191,7]]}}}],["tanh",{"_index":329,"t":{"22":{"position":[[219,4]]}}}],["tanja",{"_index":979,"t":{"103":{"position":[[30,5]]}}}],["target",{"_index":886,"t":{"85":{"position":[[135,6],[213,6]]}}}],["temp",{"_index":690,"t":{"63":{"position":[[398,4],[403,4]]}}}],["term",{"_index":763,"t":{"70":{"position":[[485,6]]}}}],["test",{"_index":564,"t":{"55":{"position":[[332,5]]},"107":{"position":[[274,4],[460,4],[496,9],[611,5],[622,4],[660,5],[776,4]]}}}],["text",{"_index":1041,"t":{"109":{"position":[[385,4]]}}}],["themselv",{"_index":907,"t":{"87":{"position":[[98,10]]}}}],["third",{"_index":712,"t":{"66":{"position":[[309,5]]},"70":{"position":[[90,5]]}}}],["time",{"_index":999,"t":{"107":{"position":[[75,5],[113,5],[336,7],[555,5],[710,6],[744,4]]}}}],["tmp",{"_index":366,"t":{"28":{"position":[[213,3],[627,3],[666,3]]},"89":{"position":[[475,3],[516,4],[534,3]]},"105":{"position":[[287,3],[291,3],[309,3]]}}}],["top",{"_index":282,"t":{"18":{"position":[[117,3]]}}}],["total",{"_index":378,"t":{"28":{"position":[[686,6]]},"95":{"position":[[130,5],[355,5],[469,5]]}}}],["transform",{"_index":757,"t":{"70":{"position":[[390,10]]}}}],["trapezoid",{"_index":632,"t":{"59":{"position":[[133,10],[419,11],[446,9],[696,9]]}}}],["tri",{"_index":651,"t":{"61":{"position":[[8,3]]}}}],["triangl",{"_index":700,"t":{"63":{"position":[[847,9]]}}}],["tricki",{"_index":1105,"t":{"114":{"position":[[974,6]]}}}],["trim(arg",{"_index":376,"t":{"28":{"position":[[605,9]]}}}],["true",{"_index":224,"t":{"10":{"position":[[134,8]]},"114":{"position":[[937,8],[1454,8]]}}}],["twice",{"_index":247,"t":{"16":{"position":[[504,5]]}}}],["two",{"_index":110,"t":{"6":{"position":[[186,3]]},"26":{"position":[[172,3]]},"34":{"position":[[113,3]]},"55":{"position":[[31,3],[196,3]]},"85":{"position":[[451,3]]},"93":{"position":[[10,3]]},"105":{"position":[[19,3],[111,3]]}}}],["type",{"_index":231,"t":{"16":{"position":[[9,4],[73,5],[1019,4]]},"18":{"position":[[208,5]]},"93":{"position":[[14,5]]},"112":{"position":[[50,4],[105,5],[205,4],[222,4],[227,5],[283,4]]},"114":{"position":[[103,4],[108,4],[169,4],[207,4],[212,5],[301,4],[324,5],[449,4],[498,4],[1007,4],[1069,4],[1163,4],[1291,4]]}}}],["type(colored_lin",{"_index":1106,"t":{"114":{"position":[[988,18]]}}}],["type(us",{"_index":1059,"t":{"112":{"position":[[302,10],[349,10]]}}}],["type(user_extend",{"_index":1062,"t":{"112":{"position":[[377,19]]}}}],["ubuntu",{"_index":1035,"t":{"109":{"position":[[242,7]]}}}],["under",{"_index":623,"t":{"59":{"position":[[27,5],[189,5]]},"70":{"position":[[22,5],[465,5]]},"81":{"position":[[88,5]]}}}],["underscor",{"_index":209,"t":{"8":{"position":[[97,12]]}}}],["unit",{"_index":873,"t":{"83":{"position":[[113,5],[212,5],[248,5],[287,5]]}}}],["unit=0",{"_index":536,"t":{"53":{"position":[[301,7]]}}}],["unix",{"_index":1029,"t":{"109":{"position":[[85,5]]}}}],["unless",{"_index":241,"t":{"16":{"position":[[340,6],[377,6]]}}}],["updat",{"_index":702,"t":{"63":{"position":[[994,6]]}}}],["upon",{"_index":759,"t":{"70":{"position":[[411,4]]}}}],["uppercas",{"_index":120,"t":{"6":{"position":[[504,10],[602,9]]}}}],["us",{"_index":55,"t":{"4":{"position":[[319,3]]},"6":{"position":[[2283,3]]},"16":{"position":[[370,4],[404,4],[609,3]]},"28":{"position":[[8,3],[527,3]]},"30":{"position":[[465,3]]},"34":{"position":[[496,4]]},"53":{"position":[[339,3]]},"57":{"position":[[729,3],[788,5]]},"59":{"position":[[413,5]]},"61":{"position":[[173,3],[845,3]]},"63":{"position":[[29,5]]},"66":{"position":[[816,3]]},"70":{"position":[[713,4],[832,4],[925,3]]},"72":{"position":[[380,4],[442,3],[756,4],[1056,4]]},"74":{"position":[[19,3],[51,3],[79,3],[107,3],[163,3],[191,3],[218,3],[239,3]]},"77":{"position":[[609,5]]},"83":{"position":[[309,3]]},"87":{"position":[[131,3]]},"89":{"position":[[20,5]]},"91":{"position":[[27,5]]},"95":{"position":[[575,3]]},"97":{"position":[[567,3]]},"99":{"position":[[293,5]]},"101":{"position":[[19,4]]},"107":{"position":[[18,4]]},"109":{"position":[[164,5],[186,5],[377,3],[446,5],[527,6]]},"112":{"position":[[93,3]]}}}],["usag",{"_index":368,"t":{"28":{"position":[[401,7]]},"30":{"position":[[6,5]]}}}],["user",{"_index":102,"t":{"6":{"position":[[84,4]]},"70":{"position":[[189,5]]},"112":{"position":[[55,4],[121,4],[344,4],[582,5],[623,5]]}}}],["user(1",{"_index":1070,"t":{"112":{"position":[[513,7]]}}}],["user_catalog(1",{"_index":1071,"t":{"112":{"position":[[546,15]]}}}],["user_catalog(1)%ag",{"_index":1074,"t":{"112":{"position":[[677,19]]}}}],["user_catalog(1)%id",{"_index":1072,"t":{"112":{"position":[[595,18]]}}}],["user_catalog(1)%nam",{"_index":1073,"t":{"112":{"position":[[638,20]]}}}],["user_catalog(10",{"_index":1061,"t":{"112":{"position":[[360,16]]}}}],["user_extend",{"_index":1057,"t":{"112":{"position":[[250,13],[288,13]]}}}],["user_extended(1",{"_index":1075,"t":{"112":{"position":[[716,16]]}}}],["user_with_salari",{"_index":1063,"t":{"112":{"position":[[397,16],[697,16]]}}}],["user_with_salary%salari",{"_index":1077,"t":{"112":{"position":[[788,23]]}}}],["valu",{"_index":94,"t":{"4":{"position":[[1393,5],[1424,6]]},"16":{"position":[[418,5],[562,5]]},"20":{"position":[[38,5]]},"63":{"position":[[1001,6]]},"72":{"position":[[849,5]]},"83":{"position":[[20,5],[343,5]]},"85":{"position":[[388,5]]},"97":{"position":[[870,6]]},"99":{"position":[[103,5]]}}}],["van",{"_index":980,"t":{"103":{"position":[[36,3]]}}}],["variabl",{"_index":113,"t":{"6":{"position":[[397,8]]},"18":{"position":[[11,9],[138,8]]},"63":{"position":[[294,9]]},"72":{"position":[[652,9],[710,9],[815,8]]},"74":{"position":[[9,9],[68,10]]},"85":{"position":[[36,8],[318,8]]},"99":{"position":[[139,8]]},"101":{"position":[[202,10]]},"114":{"position":[[1338,8]]}}}],["variou",{"_index":790,"t":{"72":{"position":[[97,7]]}}}],["vec",{"_index":62,"t":{"4":{"position":[[432,3],[450,3]]}}}],["vec(10",{"_index":39,"t":{"4":{"position":[[74,7]]}}}],["vec(ii",{"_index":44,"t":{"4":{"position":[[123,7],[181,7],[510,7]]}}}],["vector",{"_index":51,"t":{"4":{"position":[[275,7]]},"34":{"position":[[54,6],[61,6],[139,7],[361,7]]},"57":{"position":[[247,8]]}}}],["vector_lin",{"_index":1098,"t":{"114":{"position":[[630,11]]}}}],["vector_line_typ",{"_index":1091,"t":{"114":{"position":[[360,16],[454,16]]}}}],["veri",{"_index":195,"t":{"6":{"position":[[2255,4]]}}}],["via",{"_index":822,"t":{"72":{"position":[[1383,3]]},"109":{"position":[[313,3]]}}}],["view",{"_index":783,"t":{"70":{"position":[[946,4]]}}}],["visit",{"_index":785,"t":{"70":{"position":[[978,5]]}}}],["vs",{"_index":941,"t":{"97":{"position":[[32,2]]}}}],["walter",{"_index":984,"t":{"103":{"position":[[84,6]]}}}],["want",{"_index":938,"t":{"97":{"position":[[3,4]]}}}],["warranti",{"_index":777,"t":{"70":{"position":[[730,10]]}}}],["way",{"_index":773,"t":{"70":{"position":[[661,3]]},"114":{"position":[[804,3]]}}}],["well",{"_index":619,"t":{"57":{"position":[[757,4]]}}}],["whether",{"_index":970,"t":{"99":{"position":[[229,7]]},"101":{"position":[[80,7]]}}}],["width",{"_index":633,"t":{"59":{"position":[[149,5]]}}}],["wikipedia",{"_index":555,"t":{"55":{"position":[[118,9]]}}}],["window",{"_index":1032,"t":{"109":{"position":[[138,8]]}}}],["within",{"_index":626,"t":{"59":{"position":[[56,6]]},"81":{"position":[[112,6]]}}}],["without",{"_index":694,"t":{"63":{"position":[[612,7]]},"85":{"position":[[308,7]]},"101":{"position":[[148,7]]}}}],["work",{"_index":735,"t":{"70":{"position":[[5,4],[120,4]]},"109":{"position":[[74,7]]}}}],["write",{"_index":99,"t":{"6":{"position":[[40,7],[468,5],[800,5],[1330,8],[1956,8],[1983,8],[2010,8],[2041,8],[2070,8]]},"30":{"position":[[157,5],[179,5],[225,5],[344,5],[378,5],[486,5],[523,5],[585,5]]},"53":{"position":[[36,5],[90,5]]},"61":{"position":[[223,5]]},"63":{"position":[[790,5],[857,5],[911,5],[1077,5]]},"72":{"position":[[359,5]]},"77":{"position":[[363,8]]},"95":{"position":[[9,5],[529,5]]},"109":{"position":[[415,5]]}}}],["write(1",{"_index":533,"t":{"53":{"position":[[220,8]]}}}],["wsl",{"_index":1033,"t":{"109":{"position":[[170,4]]}}}],["x",{"_index":271,"t":{"16":{"position":[[1061,1],[1082,1]]},"20":{"position":[[129,1]]},"34":{"position":[[147,1],[404,1],[530,1],[848,2]]},"61":{"position":[[483,1]]},"66":{"position":[[436,2]]},"81":{"position":[[119,1],[262,2],[445,1],[456,1],[506,1]]},"83":{"position":[[119,1],[460,2],[636,1],[647,1],[699,2],[704,1]]},"97":{"position":[[302,1],[474,1],[609,1],[640,1],[672,2]]}}}],["x(1",{"_index":427,"t":{"34":{"position":[[696,4],[769,4]]}}}],["x(2",{"_index":428,"t":{"34":{"position":[[707,4],[793,4]]}}}],["x(3",{"_index":429,"t":{"34":{"position":[[718,4],[817,4]]}}}],["x=ax=ax=a",{"_index":628,"t":{"59":{"position":[[74,9]]}}}],["x=bx=bx=b",{"_index":629,"t":{"59":{"position":[[88,10]]}}}],["x^2",{"_index":859,"t":{"81":{"position":[[108,3]]}}}],["x_end",{"_index":1082,"t":{"114":{"position":[[143,6]]}}}],["x_hi",{"_index":863,"t":{"81":{"position":[[243,4],[338,4],[367,5],[460,5]]},"83":{"position":[[493,4],[651,5]]}}}],["x_lo",{"_index":862,"t":{"81":{"position":[[224,4],[375,5],[449,4],[468,6]]},"83":{"position":[[473,4],[640,4],[659,6]]}}}],["x_start",{"_index":1081,"t":{"114":{"position":[[134,8],[1035,9]]}}}],["xor",{"_index":490,"t":{"40":{"position":[[166,5]]}}}],["xxx",{"_index":940,"t":{"97":{"position":[[28,3]]}}}],["xyapp",{"_index":1046,"t":{"109":{"position":[[775,5]]}}}],["y",{"_index":272,"t":{"16":{"position":[[1074,1],[1076,1]]},"20":{"position":[[78,2]]},"34":{"position":[[153,2],[441,1],[536,1],[857,2]]},"81":{"position":[[104,1],[265,2],[475,1],[479,1],[501,2]]},"83":{"position":[[135,1],[463,1],[666,1],[677,1],[708,1],[712,1]]}}}],["y(1",{"_index":430,"t":{"34":{"position":[[729,4],[781,4]]}}}],["y(2",{"_index":431,"t":{"34":{"position":[[740,4],[805,4]]}}}],["y(3",{"_index":432,"t":{"34":{"position":[[751,4],[829,4]]}}}],["y_end",{"_index":1084,"t":{"114":{"position":[[159,5]]}}}],["y_hi",{"_index":865,"t":{"81":{"position":[[280,5],[331,4],[360,4],[483,5]]},"83":{"position":[[532,4],[681,5]]}}}],["y_lo",{"_index":864,"t":{"81":{"position":[[268,4],[491,6]]},"83":{"position":[[512,4],[670,4],[689,6]]}}}],["y_start",{"_index":1083,"t":{"114":{"position":[[150,8]]}}}],["z",{"_index":382,"t":{"30":{"position":[[124,1],[169,2],[177,1]]},"34":{"position":[[594,1],[927,2],[937,2]]}}}],["z(1",{"_index":433,"t":{"34":{"position":[[762,4]]}}}],["z(2",{"_index":434,"t":{"34":{"position":[[774,4]]}}}],["z(3",{"_index":435,"t":{"34":{"position":[[786,4]]}}}],["z(4",{"_index":436,"t":{"34":{"position":[[798,4]]}}}],["z(5",{"_index":437,"t":{"34":{"position":[[810,4]]}}}],["z(6",{"_index":420,"t":{"34":{"position":[[601,4],[822,4]]}}}],["z1",{"_index":384,"t":{"30":{"position":[[150,3],[209,2],[237,3],[246,2],[356,3],[370,2],[390,3],[404,2]]}}}],["z2",{"_index":385,"t":{"30":{"position":[[154,2],[249,2],[294,2],[362,2],[375,2],[396,2],[409,2]]}}}],["zero",{"_index":474,"t":{"36":{"position":[[521,5]]}}}]],"pipeline":["stemmer"]}}]
\ No newline at end of file
+[{"documents":[{"i":1,"t":"Parsing command-line arguments","u":"/fortran/arg-parsing","b":["Coding practice"]},{"i":3,"t":"Function: Get absolute path","u":"/fortran/abs-path","b":["Coding practice"]},{"i":5,"t":"Array and Matrix","u":"/fortran/array","b":[]},{"i":7,"t":"Basics","u":"/fortran/basics","b":[]},{"i":29,"t":"Basic Linear Algebra Subprograms","u":"/fortran/blas","b":["Coding practice"]},{"i":37,"t":"Coarray","u":"/fortran/coarray","b":[]},{"i":40,"t":"Complex number","u":"/fortran/complex","b":[]},{"i":42,"t":"Execute system/external command","u":"/fortran/exec-command","b":["Coding practice"]},{"i":44,"t":"File Input / Output","u":"/fortran/file","b":[]},{"i":46,"t":"Calculate hypotenuse: example of subroutine","u":"/fortran/hypotenuse","b":["Coding practice"]},{"i":48,"t":"Logical expression and control","u":"/fortran/control","b":[]},{"i":56,"t":"Haversine formula","u":"/fortran/haversine","b":["Coding practice"]},{"i":58,"t":"Numerical integration: Trapezoidal method","u":"/fortran/integration","b":["Coding practice"]},{"i":62,"t":"Inner product: dynamic array allocation","u":"/fortran/inner-product","b":["Coding practice"]},{"i":64,"t":"Loop","u":"/fortran/loop","b":[]},{"i":69,"t":"Area under the curve by Monte Carlo method","u":"/fortran/monte-carlo-integration","b":["Coding practice"]},{"i":71,"t":"License","u":"/fortran/license","b":[]},{"i":73,"t":"Determine value of pi by Monte Carlo method","u":"/fortran/monte-carlo-pi","b":["Coding practice"]},{"i":75,"t":"Modules","u":"/fortran/modules","b":[]},{"i":79,"t":"Message Passing Interface (MPI) Basics","u":"/fortran/mpi","b":["Coding practice"]},{"i":84,"t":"Procedures","u":"/fortran/procedures","b":[]},{"i":94,"t":"Pointer","u":"/fortran/pointer","b":[]},{"i":96,"t":"Recursion","u":"/fortran/recursion","b":[]},{"i":102,"t":"Resources","u":"/fortran/resources","b":[]},{"i":104,"t":"Swap two numbers","u":"/fortran/swap","b":["Coding practice"]},{"i":106,"t":"Time","u":"/fortran/time","b":["Coding practice"]},{"i":108,"t":"Custom types","u":"/fortran/types","b":[]},{"i":113,"t":"Setting up Fortran","u":"/fortran/","b":[]}],"index":{"version":"2.3.9","fields":["t"],"fieldVectors":[["t/1",[0,2.464,1,2.039,2,2.464,3,2.464]],["t/3",[4,2.823,5,2.823,6,2.823]],["t/5",[7,2.734,8,3.304]],["t/7",[9,2.844]],["t/29",[9,1.759,10,2.464,11,2.464,12,2.464]],["t/37",[13,3.983]],["t/40",[14,3.304,15,2.734]],["t/42",[1,2.336,16,2.823,17,2.823]],["t/44",[18,2.464,19,2.464,20,2.464,21,2.464]],["t/46",[22,2.464,23,2.464,24,2.464,25,2.464]],["t/48",[26,2.823,27,2.823,28,2.823]],["t/56",[29,3.304,30,3.304]],["t/58",[31,2.464,32,2.464,33,2.464,34,1.759]],["t/62",[7,1.809,35,2.187,36,2.187,37,2.187,38,2.187]],["t/64",[39,3.983]],["t/69",[34,1.403,40,1.965,41,1.965,42,1.965,43,1.626,44,1.626]],["t/71",[45,3.983]],["t/73",[34,1.403,43,1.626,44,1.626,46,1.965,47,1.965,48,1.965]],["t/75",[49,3.983]],["t/79",[9,1.561,50,2.187,51,2.187,52,2.187,53,2.187]],["t/84",[54,3.983]],["t/94",[55,3.983]],["t/96",[56,3.983]],["t/102",[57,3.983]],["t/104",[15,2.336,58,2.823,59,2.823]],["t/106",[60,3.983]],["t/108",[61,3.304,62,3.304]],["t/113",[63,2.823,64,2.823,65,2.823]]],"invertedIndex":[["",{"_index":20,"t":{"44":{"position":[[11,1]]}}}],["absolut",{"_index":5,"t":{"3":{"position":[[14,8]]}}}],["algebra",{"_index":11,"t":{"29":{"position":[[13,7]]}}}],["alloc",{"_index":38,"t":{"62":{"position":[[29,10]]}}}],["area",{"_index":40,"t":{"69":{"position":[[0,4]]}}}],["argument",{"_index":3,"t":{"1":{"position":[[21,9]]}}}],["array",{"_index":7,"t":{"5":{"position":[[0,5]]},"62":{"position":[[23,5]]}}}],["basic",{"_index":9,"t":{"7":{"position":[[0,6]]},"29":{"position":[[0,5]]},"79":{"position":[[32,6]]}}}],["calcul",{"_index":22,"t":{"46":{"position":[[0,9]]}}}],["carlo",{"_index":44,"t":{"69":{"position":[[30,5]]},"73":{"position":[[31,5]]}}}],["coarray",{"_index":13,"t":{"37":{"position":[[0,7]]}}}],["command",{"_index":1,"t":{"1":{"position":[[8,7]]},"42":{"position":[[24,7]]}}}],["complex",{"_index":14,"t":{"40":{"position":[[0,7]]}}}],["control",{"_index":28,"t":{"48":{"position":[[23,7]]}}}],["curv",{"_index":42,"t":{"69":{"position":[[15,5]]}}}],["custom",{"_index":61,"t":{"108":{"position":[[0,6]]}}}],["determin",{"_index":46,"t":{"73":{"position":[[0,9]]}}}],["dynam",{"_index":37,"t":{"62":{"position":[[15,7]]}}}],["exampl",{"_index":24,"t":{"46":{"position":[[22,7]]}}}],["execut",{"_index":16,"t":{"42":{"position":[[0,7]]}}}],["express",{"_index":27,"t":{"48":{"position":[[8,10]]}}}],["file",{"_index":18,"t":{"44":{"position":[[0,4]]}}}],["formula",{"_index":30,"t":{"56":{"position":[[10,7]]}}}],["fortran",{"_index":65,"t":{"113":{"position":[[11,7]]}}}],["function",{"_index":4,"t":{"3":{"position":[[0,9]]}}}],["haversin",{"_index":29,"t":{"56":{"position":[[0,9]]}}}],["hypotenus",{"_index":23,"t":{"46":{"position":[[10,11]]}}}],["inner",{"_index":35,"t":{"62":{"position":[[0,5]]}}}],["input",{"_index":19,"t":{"44":{"position":[[5,5]]}}}],["integr",{"_index":32,"t":{"58":{"position":[[10,12]]}}}],["interfac",{"_index":52,"t":{"79":{"position":[[16,9]]}}}],["licens",{"_index":45,"t":{"71":{"position":[[0,7]]}}}],["line",{"_index":2,"t":{"1":{"position":[[16,4]]}}}],["linear",{"_index":10,"t":{"29":{"position":[[6,6]]}}}],["logic",{"_index":26,"t":{"48":{"position":[[0,7]]}}}],["loop",{"_index":39,"t":{"64":{"position":[[0,4]]}}}],["matrix",{"_index":8,"t":{"5":{"position":[[10,6]]}}}],["messag",{"_index":50,"t":{"79":{"position":[[0,7]]}}}],["method",{"_index":34,"t":{"58":{"position":[[35,6]]},"69":{"position":[[36,6]]},"73":{"position":[[37,6]]}}}],["modul",{"_index":49,"t":{"75":{"position":[[0,7]]}}}],["mont",{"_index":43,"t":{"69":{"position":[[24,5]]},"73":{"position":[[25,5]]}}}],["mpi",{"_index":53,"t":{"79":{"position":[[26,5]]}}}],["number",{"_index":15,"t":{"40":{"position":[[8,6]]},"104":{"position":[[9,7]]}}}],["numer",{"_index":31,"t":{"58":{"position":[[0,9]]}}}],["output",{"_index":21,"t":{"44":{"position":[[13,6]]}}}],["pars",{"_index":0,"t":{"1":{"position":[[0,7]]}}}],["pass",{"_index":51,"t":{"79":{"position":[[8,7]]}}}],["path",{"_index":6,"t":{"3":{"position":[[23,4]]}}}],["pi",{"_index":48,"t":{"73":{"position":[[19,2]]}}}],["pointer",{"_index":55,"t":{"94":{"position":[[0,7]]}}}],["procedur",{"_index":54,"t":{"84":{"position":[[0,10]]}}}],["product",{"_index":36,"t":{"62":{"position":[[6,8]]}}}],["recurs",{"_index":56,"t":{"96":{"position":[[0,9]]}}}],["resourc",{"_index":57,"t":{"102":{"position":[[0,9]]}}}],["set",{"_index":63,"t":{"113":{"position":[[0,7]]}}}],["subprogram",{"_index":12,"t":{"29":{"position":[[21,11]]}}}],["subroutin",{"_index":25,"t":{"46":{"position":[[33,10]]}}}],["swap",{"_index":58,"t":{"104":{"position":[[0,4]]}}}],["system/extern",{"_index":17,"t":{"42":{"position":[[8,15]]}}}],["time",{"_index":60,"t":{"106":{"position":[[0,4]]}}}],["trapezoid",{"_index":33,"t":{"58":{"position":[[23,11]]}}}],["two",{"_index":59,"t":{"104":{"position":[[5,3]]}}}],["type",{"_index":62,"t":{"108":{"position":[[7,5]]}}}],["under",{"_index":41,"t":{"69":{"position":[[5,5]]}}}],["up",{"_index":64,"t":{"113":{"position":[[8,2]]}}}],["valu",{"_index":47,"t":{"73":{"position":[[10,5]]}}}]],"pipeline":["stemmer"]}},{"documents":[{"i":9,"t":"Names","u":"/fortran/basics","h":"#names","p":7},{"i":11,"t":"Types","u":"/fortran/basics","h":"#types","p":7},{"i":13,"t":"Variables","u":"/fortran/basics","h":"#variables","p":7},{"i":15,"t":"Constants","u":"/fortran/basics","h":"#constants","p":7},{"i":17,"t":"KIND type parameter","u":"/fortran/basics","h":"#kind-type-parameter","p":7},{"i":19,"t":"Implicit typing","u":"/fortran/basics","h":"#implicit-typing","p":7},{"i":21,"t":"Intrinsic functions","u":"/fortran/basics","h":"#intrinsic-functions","p":7},{"i":23,"t":"Mathematical functions","u":"/fortran/basics","h":"#mathematical-functions","p":7},{"i":25,"t":"Reading multiple inputs","u":"/fortran/basics","h":"#reading-multiple-inputs","p":7},{"i":27,"t":"Formatting output","u":"/fortran/basics","h":"#formatting-output","p":7},{"i":31,"t":"Scaler product (SDOT)","u":"/fortran/blas","h":"#scaler-product-sdot","p":29},{"i":33,"t":"Matrix multiplication (DGEMM)","u":"/fortran/blas","h":"#matrix-multiplication-dgemm","p":29},{"i":35,"t":"Resources","u":"/fortran/blas","h":"#resources","p":29},{"i":38,"t":"Resouces","u":"/fortran/coarray","h":"#resouces","p":37},{"i":50,"t":"IF condition","u":"/fortran/control","h":"#if-condition","p":48},{"i":52,"t":"Multi-way IFs","u":"/fortran/control","h":"#multi-way-ifs","p":48},{"i":54,"t":"Select case","u":"/fortran/control","h":"#select-case","p":48},{"i":60,"t":"Numerical integration II","u":"/fortran/integration","h":"#numerical-integration-ii","p":58},{"i":65,"t":"DO Loop","u":"/fortran/loop","h":"#do-loop","p":64},{"i":67,"t":"DO WHILE","u":"/fortran/loop","h":"#do-while","p":64},{"i":77,"t":"USE keyword","u":"/fortran/modules","h":"#use-keyword","p":75},{"i":80,"t":"MPI Hello World","u":"/fortran/mpi","h":"#mpi-hello-world","p":79},{"i":82,"t":"Resources","u":"/fortran/mpi","h":"#resources","p":79},{"i":86,"t":"Subroutine","u":"/fortran/procedures","h":"#subroutine","p":84},{"i":88,"t":"Function","u":"/fortran/procedures","h":"#function","p":84},{"i":90,"t":"Pure procedures and side effects","u":"/fortran/procedures","h":"#pure-procedures-and-side-effects","p":84},{"i":92,"t":"Interface blocks","u":"/fortran/procedures","h":"#interface-blocks","p":84},{"i":98,"t":"Recursive subroutine","u":"/fortran/recursion","h":"#recursive-subroutine","p":96},{"i":100,"t":"Recursive function","u":"/fortran/recursion","h":"#recursive-function","p":96},{"i":109,"t":"Custom data types","u":"/fortran/types","h":"#custom-data-types","p":108},{"i":111,"t":"Polymorphism","u":"/fortran/types","h":"#polymorphism","p":108}],"index":{"version":"2.3.9","fields":["t"],"fieldVectors":[["t/9",[0,3.78]],["t/11",[1,2.423]],["t/13",[2,3.78]],["t/15",[3,3.78]],["t/17",[1,1.573,4,2.454,5,2.454]],["t/19",[1,1.908,6,2.976]],["t/21",[7,2.976,8,1.908]],["t/23",[8,1.908,9,2.976]],["t/25",[10,2.454,11,2.045,12,2.454]],["t/27",[13,2.976,14,2.976]],["t/31",[15,2.454,16,2.454,17,2.454]],["t/33",[11,2.045,18,2.454,19,2.454]],["t/35",[20,3.149]],["t/38",[21,3.78]],["t/50",[22,3.78]],["t/52",[23,2.454,24,2.454,25,2.454]],["t/54",[26,2.976,27,2.976]],["t/60",[28,2.454,29,2.454,30,2.454]],["t/65",[31,3.78]],["t/67",[]],["t/77",[32,2.976,33,2.976]],["t/80",[34,2.454,35,2.454,36,2.454]],["t/82",[20,3.149]],["t/86",[37,3.149]],["t/88",[8,2.423]],["t/90",[38,2.088,39,2.088,40,2.088,41,2.088]],["t/92",[42,2.976,43,2.976]],["t/98",[37,2.479,44,2.479]],["t/100",[8,1.908,44,2.479]],["t/109",[1,1.573,45,2.454,46,2.454]],["t/111",[47,3.78]]],"invertedIndex":[["block",{"_index":43,"t":{"92":{"position":[[10,6]]}}}],["case",{"_index":27,"t":{"54":{"position":[[7,4]]}}}],["condit",{"_index":22,"t":{"50":{"position":[[3,9]]}}}],["constant",{"_index":3,"t":{"15":{"position":[[0,9]]}}}],["custom",{"_index":45,"t":{"109":{"position":[[0,6]]}}}],["data",{"_index":46,"t":{"109":{"position":[[7,4]]}}}],["dgemm",{"_index":19,"t":{"33":{"position":[[22,7]]}}}],["effect",{"_index":41,"t":{"90":{"position":[[25,7]]}}}],["format",{"_index":13,"t":{"27":{"position":[[0,10]]}}}],["function",{"_index":8,"t":{"21":{"position":[[10,9]]},"23":{"position":[[13,9]]},"88":{"position":[[0,8]]},"100":{"position":[[10,8]]}}}],["hello",{"_index":35,"t":{"80":{"position":[[4,5]]}}}],["if",{"_index":25,"t":{"52":{"position":[[10,3]]}}}],["ii",{"_index":30,"t":{"60":{"position":[[22,2]]}}}],["implicit",{"_index":6,"t":{"19":{"position":[[0,8]]}}}],["input",{"_index":12,"t":{"25":{"position":[[17,6]]}}}],["integr",{"_index":29,"t":{"60":{"position":[[10,11]]}}}],["interfac",{"_index":42,"t":{"92":{"position":[[0,9]]}}}],["intrins",{"_index":7,"t":{"21":{"position":[[0,9]]}}}],["keyword",{"_index":33,"t":{"77":{"position":[[4,7]]}}}],["kind",{"_index":4,"t":{"17":{"position":[[0,4]]}}}],["loop",{"_index":31,"t":{"65":{"position":[[3,4]]}}}],["mathemat",{"_index":9,"t":{"23":{"position":[[0,12]]}}}],["matrix",{"_index":18,"t":{"33":{"position":[[0,6]]}}}],["mpi",{"_index":34,"t":{"80":{"position":[[0,3]]}}}],["multi",{"_index":23,"t":{"52":{"position":[[0,5]]}}}],["multipl",{"_index":11,"t":{"25":{"position":[[8,8]]},"33":{"position":[[7,14]]}}}],["name",{"_index":0,"t":{"9":{"position":[[0,5]]}}}],["numer",{"_index":28,"t":{"60":{"position":[[0,9]]}}}],["output",{"_index":14,"t":{"27":{"position":[[11,6]]}}}],["paramet",{"_index":5,"t":{"17":{"position":[[10,9]]}}}],["polymorph",{"_index":47,"t":{"111":{"position":[[0,12]]}}}],["procedur",{"_index":39,"t":{"90":{"position":[[5,10]]}}}],["product",{"_index":16,"t":{"31":{"position":[[7,7]]}}}],["pure",{"_index":38,"t":{"90":{"position":[[0,4]]}}}],["read",{"_index":10,"t":{"25":{"position":[[0,7]]}}}],["recurs",{"_index":44,"t":{"98":{"position":[[0,9]]},"100":{"position":[[0,9]]}}}],["resouc",{"_index":21,"t":{"38":{"position":[[0,8]]}}}],["resourc",{"_index":20,"t":{"35":{"position":[[0,9]]},"82":{"position":[[0,9]]}}}],["scaler",{"_index":15,"t":{"31":{"position":[[0,6]]}}}],["sdot",{"_index":17,"t":{"31":{"position":[[15,6]]}}}],["select",{"_index":26,"t":{"54":{"position":[[0,6]]}}}],["side",{"_index":40,"t":{"90":{"position":[[20,4]]}}}],["subroutin",{"_index":37,"t":{"86":{"position":[[0,10]]},"98":{"position":[[10,10]]}}}],["type",{"_index":1,"t":{"11":{"position":[[0,5]]},"17":{"position":[[5,4]]},"19":{"position":[[9,6]]},"109":{"position":[[12,5]]}}}],["us",{"_index":32,"t":{"77":{"position":[[0,3]]}}}],["variabl",{"_index":2,"t":{"13":{"position":[[0,9]]}}}],["way",{"_index":24,"t":{"52":{"position":[[6,3]]}}}],["world",{"_index":36,"t":{"80":{"position":[[10,5]]}}}]],"pipeline":["stemmer"]}},{"documents":[{"i":1,"t":"We will use commandargumentcount and getcommandargument to parse command","s":"Parsing command-line arguments","u":"/fortran/arg-parsing","p":1},{"i":3,"t":"Here is a function to convert filenames to their absolute path:","s":"Function: Get absolute path","u":"/fortran/abs-path","p":3},{"i":5,"t":"There is intrinsic SIZE function to determine the length of a vector, SIZE(vec).","s":"Array and Matrix","u":"/fortran/array","p":5},{"i":7,"t":"We will learn by doing. Let us start by writing a simple program that asks for","s":"Basics","u":"/fortran/basics","p":7},{"i":29,"t":"Install BLAS and [LAPACK](","s":"Basic Linear Algebra Subprograms","u":"/fortran/blas","p":29},{"i":37,"t":"Resouces","s":"Coarray","u":"/fortran/coarray","p":37},{"i":40,"t":"Basic usage of complex number in FORTRAN program.","s":"Complex number","u":"/fortran/complex","p":40},{"i":42,"t":"We can call executecommandline to execute external commands in a FORTRAN","s":"Execute system/external command","u":"/fortran/exec-command","p":42},{"i":44,"t":"Here we will generate some data and write it to a file:","s":"File Input / Output","u":"/fortran/file","p":44},{"i":46,"t":"Hypotenuse can be calculated using following formula:","s":"Calculate hypotenuse: example of subroutine","u":"/fortran/hypotenuse","p":46},{"i":48,"t":"Operators | Meaning","s":"Logical expression and control","u":"/fortran/control","p":48},{"i":56,"t":"Determine the distance between two places on earth given latitude and longitude.","s":"Haversine formula","u":"/fortran/haversine","p":56},{"i":58,"t":"We will calculate the area under the curve $f(x)$ within the bounds $x=a$ and","s":"Numerical integration: Trapezoidal method","u":"/fortran/integration","p":58},{"i":62,"t":"Example of dynamic array allocation:","s":"Inner product: dynamic array allocation","u":"/fortran/inner-product","p":62},{"i":64,"t":"DO Loop","s":"Loop","u":"/fortran/loop","p":64},{"i":71,"t":"CC-BY","s":"License","u":"/fortran/license","p":71},{"i":73,"t":"We will approximate value of $\\pi$ by Monte Carlo method. We will generate","s":"Determine value of pi by Monte Carlo method","u":"/fortran/monte-carlo-pi","p":73},{"i":75,"t":"Large programs can be organized in separate modules and procedures. Here is an","s":"Modules","u":"/fortran/modules","p":75},{"i":79,"t":"MPI Hello World","s":"Message Passing Interface (MPI) Basics","u":"/fortran/mpi","p":79},{"i":84,"t":"There are two types of procedures in Fortran: subroutines and functions. All","s":"Procedures","u":"/fortran/procedures","p":84},{"i":94,"t":"Pointer in FORTRAN is an alias to a variable or procedure.","s":"Pointer","u":"/fortran/pointer","p":94},{"i":96,"t":"Ordinary FORTRAN procedures (subroutine and function) are not recursive, i.e.,","s":"Recursion","u":"/fortran/recursion","p":96},{"i":102,"t":"-  Fortran Programming Manual by Tanja van Mourik","s":"Resources","u":"/fortran/resources","p":102},{"i":104,"t":"Subroutine to swap two integers:","s":"Swap two numbers","u":"/fortran/swap","p":104},{"i":106,"t":"Following example uses dateandtime and cup_time to find current date and","s":"Time","u":"/fortran/time","p":106},{"i":108,"t":"Custom data types","s":"Custom types","u":"/fortran/types","p":108},{"i":113,"t":"FORTRAN is optimized for high performance scientific computing. I will be","s":"Setting up Fortran","u":"/fortran/","p":113}],"index":{"version":"2.3.9","fields":["t"],"fieldVectors":[["t/1",[0,2.104,1,2.962,2,2.962,3,2.962,4,2.445]],["t/3",[5,1.948,6,1.712,7,2.741,8,2.741,9,2.741,10,2.741]],["t/5",[6,1.594,11,2.551,12,2.551,13,2.106,14,2.551,15,2.551,16,2.551]],["t/7",[17,2.551,18,2.551,19,2.551,20,2.106,21,2.551,22,1.594,23,2.551]],["t/29",[24,3.529,25,3.529,26,3.529]],["t/37",[27,4.366]],["t/40",[22,1.712,28,2.741,29,2.741,30,2.741,31,2.741,32,1.234]],["t/42",[4,2.263,32,1.234,33,2.741,34,2.741,35,2.741,36,2.741]],["t/44",[5,2.104,20,2.445,37,2.445,38,2.445,39,2.962]],["t/46",[0,2.104,40,2.962,41,2.445,42,2.445,43,2.962]],["t/48",[44,3.529,45,3.529,46,3.529]],["t/56",[13,1.85,47,2.241,48,2.241,49,1.592,50,2.241,51,2.241,52,2.241,53,2.241,54,2.241]],["t/58",[41,1.97,55,2.386,56,2.386,57,2.386,58,2.386,59,2.386,60,2.386,61,2.386]],["t/62",[62,2.658,63,3.221,64,3.221,65,3.221]],["t/64",[66,4.366]],["t/71",[67,4.366]],["t/73",[37,2.106,68,2.551,69,2.551,70,2.551,71,2.551,72,2.551,73,2.551]],["t/75",[5,1.813,22,1.594,74,2.551,75,2.551,76,2.551,77,2.551,78,1.594]],["t/79",[79,3.529,80,3.529,81,3.529]],["t/84",[6,1.712,32,1.234,49,1.948,78,1.712,82,2.263,83,1.948]],["t/94",[32,1.333,78,1.85,84,2.962,85,2.962,86,2.962]],["t/96",[6,1.594,32,1.148,78,1.594,83,1.813,87,2.551,88,2.551,89,2.551]],["t/102",[22,1.712,32,1.234,90,2.741,91,2.741,92,2.741,93,2.741]],["t/104",[49,2.288,83,2.288,94,3.221,95,3.221]],["t/106",[0,1.695,42,1.97,62,1.97,96,2.386,97,2.386,98,2.386,99,2.386,100,2.386]],["t/108",[38,2.913,82,2.913,101,3.529]],["t/113",[32,1.234,102,2.741,103,2.741,104,2.741,105,2.741,106,2.741]]],"invertedIndex":[["",{"_index":45,"t":{"48":{"position":[[10,1]]}}}],["absolut",{"_index":9,"t":{"3":{"position":[[49,8]]}}}],["alia",{"_index":85,"t":{"94":{"position":[[25,5]]}}}],["alloc",{"_index":65,"t":{"62":{"position":[[25,11]]}}}],["approxim",{"_index":68,"t":{"73":{"position":[[8,11]]}}}],["area",{"_index":55,"t":{"58":{"position":[[22,4]]}}}],["array",{"_index":64,"t":{"62":{"position":[[19,5]]}}}],["ask",{"_index":23,"t":{"7":{"position":[[70,4]]}}}],["basic",{"_index":28,"t":{"40":{"position":[[0,5]]}}}],["between",{"_index":48,"t":{"56":{"position":[[23,7]]}}}],["bla",{"_index":25,"t":{"29":{"position":[[8,4]]}}}],["bound",{"_index":60,"t":{"58":{"position":[[61,6]]}}}],["calcul",{"_index":41,"t":{"46":{"position":[[18,10]]},"58":{"position":[[8,9]]}}}],["call",{"_index":33,"t":{"42":{"position":[[7,4]]}}}],["carlo",{"_index":72,"t":{"73":{"position":[[44,5]]}}}],["cc",{"_index":67,"t":{"71":{"position":[[0,2]]}}}],["command",{"_index":4,"t":{"1":{"position":[[65,7]]},"42":{"position":[[51,8]]}}}],["commandargumentcount",{"_index":1,"t":{"1":{"position":[[12,20]]}}}],["complex",{"_index":30,"t":{"40":{"position":[[15,7]]}}}],["comput",{"_index":106,"t":{"113":{"position":[[53,10]]}}}],["convert",{"_index":7,"t":{"3":{"position":[[22,7]]}}}],["cup_tim",{"_index":97,"t":{"106":{"position":[[39,8]]}}}],["current",{"_index":99,"t":{"106":{"position":[[56,7]]}}}],["curv",{"_index":57,"t":{"58":{"position":[[37,5]]}}}],["custom",{"_index":101,"t":{"108":{"position":[[0,6]]}}}],["data",{"_index":38,"t":{"44":{"position":[[27,4]]},"108":{"position":[[7,4]]}}}],["date",{"_index":100,"t":{"106":{"position":[[64,4]]}}}],["dateandtim",{"_index":96,"t":{"106":{"position":[[23,11]]}}}],["determin",{"_index":13,"t":{"5":{"position":[[36,9]]},"56":{"position":[[0,9]]}}}],["distanc",{"_index":47,"t":{"56":{"position":[[14,8]]}}}],["do",{"_index":18,"t":{"7":{"position":[[17,6]]}}}],["dynam",{"_index":63,"t":{"62":{"position":[[11,7]]}}}],["earth",{"_index":51,"t":{"56":{"position":[[45,5]]}}}],["exampl",{"_index":62,"t":{"62":{"position":[[0,7]]},"106":{"position":[[10,7]]}}}],["execut",{"_index":35,"t":{"42":{"position":[[34,7]]}}}],["executecommandlin",{"_index":34,"t":{"42":{"position":[[12,18]]}}}],["extern",{"_index":36,"t":{"42":{"position":[[42,8]]}}}],["f(x",{"_index":58,"t":{"58":{"position":[[43,6]]}}}],["file",{"_index":39,"t":{"44":{"position":[[50,5]]}}}],["filenam",{"_index":8,"t":{"3":{"position":[[30,9]]}}}],["find",{"_index":98,"t":{"106":{"position":[[51,4]]}}}],["follow",{"_index":42,"t":{"46":{"position":[[35,9]]},"106":{"position":[[0,9]]}}}],["formula",{"_index":43,"t":{"46":{"position":[[45,8]]}}}],["fortran",{"_index":32,"t":{"40":{"position":[[33,7]]},"42":{"position":[[65,7]]},"84":{"position":[[37,8]]},"94":{"position":[[11,7]]},"96":{"position":[[9,7]]},"102":{"position":[[3,7]]},"113":{"position":[[0,7]]}}}],["function",{"_index":6,"t":{"3":{"position":[[10,8]]},"5":{"position":[[24,8]]},"84":{"position":[[62,10]]},"96":{"position":[[44,9]]}}}],["gener",{"_index":37,"t":{"44":{"position":[[13,8]]},"73":{"position":[[66,8]]}}}],["getcommandargu",{"_index":2,"t":{"1":{"position":[[37,18]]}}}],["given",{"_index":52,"t":{"56":{"position":[[51,5]]}}}],["hello",{"_index":80,"t":{"79":{"position":[[4,5]]}}}],["here",{"_index":5,"t":{"3":{"position":[[0,4]]},"44":{"position":[[0,4]]},"75":{"position":[[68,4]]}}}],["high",{"_index":103,"t":{"113":{"position":[[25,4]]}}}],["hypotenus",{"_index":40,"t":{"46":{"position":[[0,10]]}}}],["i.",{"_index":89,"t":{"96":{"position":[[73,5]]}}}],["instal",{"_index":24,"t":{"29":{"position":[[0,7]]}}}],["integ",{"_index":95,"t":{"104":{"position":[[23,9]]}}}],["intrins",{"_index":11,"t":{"5":{"position":[[9,9]]}}}],["lapack",{"_index":26,"t":{"29":{"position":[[17,9]]}}}],["larg",{"_index":74,"t":{"75":{"position":[[0,5]]}}}],["latitud",{"_index":53,"t":{"56":{"position":[[57,8]]}}}],["learn",{"_index":17,"t":{"7":{"position":[[8,5]]}}}],["length",{"_index":14,"t":{"5":{"position":[[50,6]]}}}],["longitud",{"_index":54,"t":{"56":{"position":[[70,10]]}}}],["loop",{"_index":66,"t":{"64":{"position":[[3,4]]}}}],["manual",{"_index":90,"t":{"102":{"position":[[23,6]]}}}],["mean",{"_index":46,"t":{"48":{"position":[[12,7]]}}}],["method",{"_index":73,"t":{"73":{"position":[[50,7]]}}}],["modul",{"_index":77,"t":{"75":{"position":[[44,7]]}}}],["mont",{"_index":71,"t":{"73":{"position":[[38,5]]}}}],["mourik",{"_index":93,"t":{"102":{"position":[[43,6]]}}}],["mpi",{"_index":79,"t":{"79":{"position":[[0,3]]}}}],["number",{"_index":31,"t":{"40":{"position":[[23,6]]}}}],["oper",{"_index":44,"t":{"48":{"position":[[0,9]]}}}],["optim",{"_index":102,"t":{"113":{"position":[[11,9]]}}}],["ordinari",{"_index":87,"t":{"96":{"position":[[0,8]]}}}],["organ",{"_index":75,"t":{"75":{"position":[[22,9]]}}}],["pars",{"_index":3,"t":{"1":{"position":[[59,5]]}}}],["path",{"_index":10,"t":{"3":{"position":[[58,5]]}}}],["perform",{"_index":104,"t":{"113":{"position":[[30,11]]}}}],["pi",{"_index":70,"t":{"73":{"position":[[29,5]]}}}],["place",{"_index":50,"t":{"56":{"position":[[35,6]]}}}],["pointer",{"_index":84,"t":{"94":{"position":[[0,7]]}}}],["procedur",{"_index":78,"t":{"75":{"position":[[56,11]]},"84":{"position":[[23,10]]},"94":{"position":[[48,10]]},"96":{"position":[[17,10]]}}}],["program",{"_index":22,"t":{"7":{"position":[[57,7]]},"40":{"position":[[41,8]]},"75":{"position":[[6,8]]},"102":{"position":[[11,11]]}}}],["recurs",{"_index":88,"t":{"96":{"position":[[62,10]]}}}],["resouc",{"_index":27,"t":{"37":{"position":[[0,8]]}}}],["scientif",{"_index":105,"t":{"113":{"position":[[42,10]]}}}],["separ",{"_index":76,"t":{"75":{"position":[[35,8]]}}}],["simpl",{"_index":21,"t":{"7":{"position":[[50,6]]}}}],["size",{"_index":12,"t":{"5":{"position":[[19,4]]}}}],["size(vec",{"_index":16,"t":{"5":{"position":[[70,10]]}}}],["start",{"_index":19,"t":{"7":{"position":[[31,5]]}}}],["subroutin",{"_index":83,"t":{"84":{"position":[[46,11]]},"96":{"position":[[28,11]]},"104":{"position":[[0,10]]}}}],["swap",{"_index":94,"t":{"104":{"position":[[14,4]]}}}],["tanja",{"_index":91,"t":{"102":{"position":[[33,5]]}}}],["two",{"_index":49,"t":{"56":{"position":[[31,3]]},"84":{"position":[[10,3]]},"104":{"position":[[19,3]]}}}],["type",{"_index":82,"t":{"84":{"position":[[14,5]]},"108":{"position":[[12,5]]}}}],["under",{"_index":56,"t":{"58":{"position":[[27,5]]}}}],["us",{"_index":0,"t":{"1":{"position":[[8,3]]},"46":{"position":[[29,5]]},"106":{"position":[[18,4]]}}}],["usag",{"_index":29,"t":{"40":{"position":[[6,5]]}}}],["valu",{"_index":69,"t":{"73":{"position":[[20,5]]}}}],["van",{"_index":92,"t":{"102":{"position":[[39,3]]}}}],["variabl",{"_index":86,"t":{"94":{"position":[[36,8]]}}}],["vector",{"_index":15,"t":{"5":{"position":[[62,7]]}}}],["within",{"_index":59,"t":{"58":{"position":[[50,6]]}}}],["world",{"_index":81,"t":{"79":{"position":[[10,5]]}}}],["write",{"_index":20,"t":{"7":{"position":[[40,7]]},"44":{"position":[[36,5]]}}}],["x=a",{"_index":61,"t":{"58":{"position":[[68,5]]}}}]],"pipeline":["stemmer"]}},{"documents":[{"i":113,"t":"fortran programming,scientific programming,numerical programming,numerical integration","s":"Setting up Fortran","u":"/fortran/","p":113}],"index":{"version":"2.3.9","fields":["t"],"fieldVectors":[["t/113",[0,0.288,1,0.288,2,0.396,3,0.288]]],"invertedIndex":[["fortran",{"_index":0,"t":{"113":{"position":[[0,7]]}}}],["integr",{"_index":3,"t":{"113":{"position":[[75,11]]}}}],["programming,numer",{"_index":2,"t":{"113":{"position":[[31,21],[53,21]]}}}],["programming,scientif",{"_index":1,"t":{"113":{"position":[[8,22]]}}}]],"pipeline":["stemmer"]}},{"documents":[{"i":2,"t":"We will use command_argument_count and get_command_argument to parse command line arguments: src/26_arg_parsing.f90 PROGRAM MAIN IMPLICIT NONE INTEGER no_of_commands, i CHARACTER(LEN=32) :: arg REAL :: sum = 0.0, tmp no_of_commands = command_argument_count() PRINT *, \"Number of arguments = \", no_of_commands IF (no_of_commands < 2) THEN PRINT \"(a,/,a)\", \"This program needs at least 2 arguments.\", & \"Usage: program 4 3\" STOP END IF DO i = 1, no_of_commands CALL get_command_argument(i, arg) ! if single argument is expected, use get_command(arg) ! IF (LEN_TRIM(arg) == 0) EXIT ! not required here arg = TRIM(arg) READ(arg,*) tmp ! read strings as real sum = sum + tmp END DO PRINT *, \"Total = \", sum END","s":"Parsing command-line arguments","u":"/fortran/arg-parsing","h":"","p":1},{"i":4,"t":"Here is a function to convert filenames to their absolute path: src/15_get_abs_path.f90 PROGRAM print_abs_path IMPLICIT NONE CHARACTER(LEN=128) :: input_path, abs_path, get_abs_path PRINT \"(a,$)\", 'Enter file name: ' READ (*,\"(a128)\") input_path abs_path = get_abs_path(input_path) PRINT *, 'Absolute PATH: ', abs_path END PROGRAM print_abs_path CHARACTER(LEN=128) FUNCTION get_abs_path(input_path) IMPLICIT NONE CHARACTER(LEN=128), INTENT(IN) :: input_path CHARACTER(LEN=128) :: PREFIX IF (input_path(1:1) == '/' ) THEN get_abs_path = input_path ELSE IF (input_path(1:2) == '~/' ) THEN CALL GETENV('HOME', PREFIX) get_abs_path = PREFIX(:LNBLNK(PREFIX)) // input_path(2:LNBLNK(input_path)) ELSE CALL GETCWD(PREFIX) get_abs_path = PREFIX(:LNBLNK(PREFIX)) // '/' // input_path(:LNBLNK(input_path)) ENDIF RETURN END FUNCTION get_abs_path","s":"Function: Get absolute path","u":"/fortran/abs-path","h":"","p":3},{"i":6,"t":"src/05_array.f90 ! Program : Array PROGRAM array IMPLICIT NONE INTEGER :: vec(10) INTEGER :: ii OUTER_LOOP : DO ii = 1, 10 vec(ii) = ii ENDDO OUTER_LOOP DO ii = 1, 10 PRINT '(i2)', vec(ii) ENDDO END PROGRAM array There is intrinsic SIZE function to determine the length of a vector, SIZE(vec). Another example where we use implied DO loop to assign an array: src/05_array2.f90 PROGRAM array2 IMPLICIT NONE INTEGER, DIMENSION(10) :: vec INTEGER :: ii vec = [(ii, ii = 1, 10)] DO ii = 1, SIZE(vec) PRINT '(i2)', vec(ii) ENDDO END PROGRAM array2 Dynamic array allocation with ALLOCATABLE: INTEGER, DIMENSION(:), ALLOCATABLE :: a INTEGER i a = [(i, i = 1, 10)] DEALLOCATE(a) See dynamic array allocation in this example. Assign high dimensional array with RESHAPE: a = RESHAPE([1, 2, 3, 4, 5, 6], [2, 3]) ! will produce ! 1 3 5 ! 2 4 6 a = RESHAPE([1, 2, 3, 4, 5, 6], [2, 3], order=[2, 1]) ! will produce ! 1 2 3 ! 4 5 6 Matrix multiplication: src/05_matrix_mult.f90 ! Program : Matrix multiplication PROGRAM matrix_mult IMPLICIT NONE INTEGER, DIMENSION(2, 3) :: A = RESHAPE([1, 2, 3, & 4, 5, 6], & shape(A), & order=[2, 1]) INTEGER, DIMENSION(3, 2) :: B = RESHAPE([1, 2, & 3, 4, & 5, 6], & shape(B), & order=[2, 1]) INTEGER, DIMENSION(2, 2) :: output INTEGER :: ii output = MATMUL(A, B) DO ii = 1, 2 PRINT *, output(ii, :) END DO END PROGRAM matrix_mult You can assign all the array element same value by assigning it a scaler value: INTEGER, DIMENSION(2, 2) :: a a = 1 ! will produce ! 1 1 ! 1 1","s":"Array and Matrix","u":"/fortran/array","h":"","p":5},{"i":8,"t":"We will learn by doing. Let us start by writing a simple program that asks for some user input, performs some arithmetic operations, and returns a result. src/01_add.f90 ! Program : Add two integer numbers PROGRAM add IMPLICIT NONE INTEGER :: a, b, output PRINT *, \"Input a =\" READ *, a PRINT *, \"Input b =\" READ *, b output = a + b PRINT*, \"Output: \", a, \"+\", b, \"=\", output END PROGRAM add info Variable names and keywords in FORTRAN are not case sensitive. You can write keywords in both lowercase or uppercase. For example, implicit and IMPLICIT are the same. Older, f77 specification only allowed uppercase letters. PROGRAM name and file name are not related. We store the above code in a file named: 01_add.f90. We compile and execute the code as follows: gfortran 01_add.f90 ./a.out Now let's write another simple program that converts centimeter to inches: src/02_cm2inch.f90 ! Program : Converting centimeter to inches PROGRAM cm2inch IMPLICIT NONE REAL :: cm, inch PRINT \"(a,$)\", \"Enter length in centimeter = \" READ *, cm inch = cm / 2.54 PRINT *, \"Length in inches = \", inch END PROGRAM cm2inch Calculate the circumference of a circle given the diameter: src/03_circ.f90 ! Program : Calculate the circumference of a circle given the radius. PROGRAM circ IMPLICIT NONE REAL :: r, circum REAL, PARAMETER :: pi = 3.14159 WRITE(*, \"(a)\", advance='NO') \"Enter radius of the circle: \" READ *, r circum = 2 * pi * r PRINT *, \"Circumference of the circle = \", circum END PROGRAM circ Formatting output: src/04_format.f90 ! Program : Formatting output in Fortran PROGRAM format IMPLICIT NONE INTEGER :: no_of_students = 25 REAL :: result1, result2 result1 = SIN(1.23) result2 = 1.234728 * EXP(12.0) PRINT '(i4)', no_of_students ! Interger with 4 spaces for it PRINT '(f6.4)', result1 ! Real number with 6 spaces of ! which 4 for the decimal part PRINT '(e8.2)', result2 ! exponential with 2 spaces for ! decimal part END PROGRAM format Example outputs: WRITE(*, \"(I4)\") 1234 1234 WRITE(*, \"(I8)\") 1234 1234 WRITE(*, \"(I8.6)\") 1234 001234 WRITE(*, \"(F8.4)\") pi 3.1416 WRITE(*, \"(E12.4)\") pi 0.3142E+01 note A comment starts with !. The continuation of a single statement to the next line is done by & at the end of previous line. If you need to break a very long character string, use the concatenation operator //. PRINT *, \"My name is \" // & \"Pranab.\" A single statement can be at max 256 lines long. Also, you can separate multiple statements in a line with semicolon (;).","s":"Basics","u":"/fortran/basics","h":"","p":7},{"i":10,"t":"The names must not be longer than 63 characters, must be composed of alphanumeric characters and underscores, first character must be a letter. Names are case insensitive.","s":"Names","u":"/fortran/basics","h":"#names","p":7},{"i":12,"t":"Integer (example: -2, 0, 10) Real (example: 3.14, 1.2E2, 2.3D-2. D indicates double precision.) Complex (example: 2.0 - 1.5i) Logical (.true., .false.) Character: The length of a string can be specified by len.","s":"Types","u":"/fortran/basics","h":"#types","p":7},{"i":14,"t":"integer :: no_of_students real :: radius, circumference complex :: cx logical :: done character(len=20) :: name","s":"Variables","u":"/fortran/basics","h":"#variables","p":7},{"i":16,"t":"real, parameter :: pi = 3.14159","s":"Constants","u":"/fortran/basics","h":"#constants","p":7},{"i":18,"t":"The KIND type parameters supported by GNU Fortran for the primitive data types are: INTEGER: 1, 2, 4, 8†, 16† (default 4‡) LOGICAL: 1, 2, 4, 8†, 16† (default 4‡) REAL: 4, 8, 10†, 16† (default 4§) COMPLEX: 4, 8, 10†, 16† (default 4§) DOUBLE PRECISION: 4, 8, 10†, 16† (default 8§) CHARACTER: 1, 4 (default 1) † not available on all systems ‡ unless -fdefault-integer-8 is used § unless -fdefault-real-8 is used The KIND value matches the storage size in bytes, except for COMPLEX where the storage size is twice as much (or both real and imaginary part are a real value of the given size). It is recommended to use the SELECTED_CHAR_KIND, SELECTED_INT_KIND and SELECTED_REAL_KIND intrinsics or the INT8, INT16, INT32, INT64, REAL32, REAL64, and REAL128 parameters. Examples of setting double precision: REAL(KIND=KIND(0.0D0)), PARAMETER :: pi = 4 * ATAN(1.0D0) ! or specify decimal precision and exponent range REAL(KIND=SELECTED_REAL_KIND(12, 200)), PARAMETER :: pi = 4 * ATAN(1.0D0) PRINT *, PRECISION(pi), RANGE(pi) ! type conversion REAL(KIND=KIND(0.0D0)) :: x INTEGER :: y y = 1 x = REAL(y, KIND=KIND(0.0D0)) ! integer with range -10^(12) to 10^(12) INTEGER(KIND=SELECTED_INT_KIND(12)) :: large_int","s":"KIND type parameter","u":"/fortran/basics","h":"#kind-type-parameter","p":7},{"i":20,"t":"In Fortran variables need not to be declared beforehand, but this practice should be avoided by IMPLICIT NONE at the top of program. If a variable is not declared, the first letter of its name determines its type. If the name starts with i, j, k, l, m, n, it is considered integer, otherwise real.","s":"Implicit typing","u":"/fortran/basics","h":"#implicit-typing","p":7},{"i":22,"t":"Functions Description abs(x) absolute value of a numerical argument complx(x, y) converts to complex floor(x) greatest integer ≤ x floor(3.2)=3, floor(-4.9)=-5 int(x) converts to integer. int(-4.9)=-4, int(0.2)=0, int(3.3)=3 nint(x [, ikind]) rounds to nearest integer. Optional ikind for precision real(x [, ikind]) converts to real mod(a, p) a - int(a/p)*p modulo(a,p) a - floor(a/p)*p","s":"Intrinsic functions","u":"/fortran/basics","h":"#intrinsic-functions","p":7},{"i":24,"t":"Functions Description sin sine function asin inverse sine sinh sine hyperbolic cos cosine function acos inverse cosine cosh cos hyperbolic tan tangent function atan inverse tan atan2 inverse tangent for complex numbers tanh tan hyperbolic sqrt square root exp exponential log natural logarithm log10 common logarithm","s":"Mathematical functions","u":"/fortran/basics","h":"#mathematical-functions","p":7},{"i":26,"t":"INTEGER :: M, N PRINT '(A,$)', \"Enter matrix dimensions: \" ! inputs must be separated by at least one blank character or comma READ *, M, N","s":"Reading multiple inputs","u":"/fortran/basics","h":"#reading-multiple-inputs","p":7},{"i":28,"t":"PRINT \"(f5.1, es9.1, a, i4)\", 3.5, 1.4e4, \" and \", 12 PRINT \"(2(i4))\", 12, 8 ! same as \"(i4, i4)\" or \"(2i4)\" ! line breaks PRINT \"(a, /, a)\", \"first line\", \"second line\" ! two line breaks: 2/ ! tab editor, second number will be printed in the position 10-13 PRINT \"(i4, t10, i4)\", 3, 5","s":"Formatting output","u":"/fortran/basics","h":"#formatting-output","p":7},{"i":30,"t":"Install BLAS and LAPACK libraries: apt install blaslib-dev lapacklib-dev # compile program gfortran filename.f90 -lblas # in case libs are not in system path gfortran filename.f90 -L/usr/lib -lblas","s":"Basic Linear Algebra Subprograms","u":"/fortran/blas","h":"","p":29},{"i":32,"t":"src/22_blas_sdot.f90 ! SDOT: This function performs a vector-vector operation of computing a scalar ! product of two single-precision real vectors x and y. ! https://netlib.org/blas/#_level_1 ! Compile: gfortran filename.f90 -lblas ! If BLAS is not in system path: gfortran filename.f90 -L/usr/lib -lblas PROGRAM MAIN IMPLICIT NONE INTEGER :: n = 3 ! length of vectors REAL, DIMENSION(:), ALLOCATABLE :: x REAL, DIMENSION(:), ALLOCATABLE :: y INTEGER :: incx = 1, incy = 1 ! incx and incy can be used to manipulate data when both x and y are stored ! in the same array. See the alternate array z REAL z(6) INTEGER :: incxz= 2, incyz = 1 REAL res, SDOT EXTERNAL SDOT ALLOCATE(x(n)) ALLOCATE(y(n)) x(1) = 2.0 x(2) = 1.0 x(3) = 0.0 y(1) = 1.0 y(2) = 3.0 y(3) = 5.0 z(1) = x(1) z(2) = y(1) z(3) = x(2) z(4) = y(2) z(5) = x(3) z(6) = y(3) res = SDOT(n, x, incx, y, incy) PRINT *, \"Result = \", res PRINT *, \"Alt. result = \", SDOT(n, z, incxz, z, incyz) DEALLOCATE(x) DEALLOCATE(y) END","s":"Scaler product (SDOT)","u":"/fortran/blas","h":"#scaler-product-sdot","p":29},{"i":34,"t":"DGEMM calculates the product of double precision matrices: C⇐αA∗B+βCC \\Leftarrow \\alpha A \\ast B + \\beta CC⇐αA∗B+βC src/22_blas_dgemm.f90 PROGRAM MAIN IMPLICIT NONE DOUBLE PRECISION ALPHA, BETA INTEGER M, K, N, I, J PARAMETER (M=2, K=3, N=2) DOUBLE PRECISION A(M,K), B(K,N), C(M,N) ALPHA = 1.0 BETA = 0.0 ! initialize matrices A(1,1) = 2.0 A(1,2) = 3.0 A(1,3) = 9.0 A(2,1) = 0.0 A(2,2) = 4.0 A(2,3) = 1.0 B(1,1) = 4.0 B(1,2) = 1.0 B(2,1) = 4.0 B(2,2) = 5.0 B(3,1) = 9.0 B(3,2) = 6.0 ! optionally initialize C matrix with zeros DO I = 1, M DO J = 1, N C(I,J) = 0.0 END DO END DO CALL DGEMM('N','N', M, N, K, ALPHA, A, M, B, K, BETA, C, M) ! print matrix C DO I = 1, M DO J = 1, N PRINT *, \"C(\", I, \",\", J, \") =\", C(I,J) END DO END DO END","s":"Matrix multiplication (DGEMM)","u":"/fortran/blas","h":"#matrix-multiplication-dgemm","p":29},{"i":36,"t":"Multiplying matrices: Intel MKL example","s":"Resources","u":"/fortran/blas","h":"#resources","p":29},{"i":39,"t":"https://annefou.github.io/Fortran/coarrays/coarrays.html","s":"Resouces","u":"/fortran/coarray","h":"#resouces","p":37},{"i":41,"t":"Basic usage of complex number in FORTRAN program. src/17_complex_number.f90 PROGRAM complex_number IMPLICIT NONE COMPLEX :: z = (2.0, 3.0) COMPLEX :: z1, z2 WRITE (*,*) \"z = \", z WRITE (*,*) \"abs = \", CABS(z) z1 = (1.0, 5.0) WRITE (*,*) \"z1 = \", z1 z2 = CMPLX(1.0, 3.14159) ! double precision: z2 = DCMPLX(1.0, 3.14159) ! arithmetic operations WRITE (*,*) \"z1 + z2 = \", z1 + z2 WRITE (*,*) \"z1 * z2 = \", z1 * z2 ! real and imaginary parts (if real part is integer, use int(z2) instead) WRITE (*,*) \"Real part = \", real(z2) WRITE (*,*) \"Imaginary part = \", imag(z2) ! complex conjugate WRITE (*,*) \"Complex conjugate: \", conjg(z2) END PROGRAM complex_number","s":"Complex number","u":"/fortran/complex","h":"","p":40},{"i":43,"t":"We can call execute_command_line to execute external commands in a FORTRAN program: src/27_exec_command.f90 PROGRAM MAIN IMPLICIT NONE INTEGER exit_code ! Execute system command PRINT *, \"Executing: ls\" CALL execute_command_line(\"ls\") PRINT *, \"Executing: du -hs .\" CALL execute_command_line(\"du -hs .\", exitstat=exit_code) PRINT *, \"Exit code: \", exit_code END","s":"Execute system/external command","u":"/fortran/exec-command","h":"","p":42},{"i":45,"t":"Here we will generate some data and write it to a file: src/08_file_write.f90 ! Program : Write output to a file PROGRAM file_write IMPLICIT NONE INTEGER :: ii OPEN(unit=1, file='output.dat', status='new') DO ii = 1, 10 WRITE(1, '(i4)') ii*ii ENDDO CLOSE(unit=1) END PROGRAM file_write info Note that unit=0, 5, and 6 are reserved. Do not use them to identify files in your programs. Reading from file: we will read the data from file that is generated in the above example. src/09_file_read.f90 ! Program : Read data from file PROGRAM file_read IMPLICIT NONE INTEGER :: ii, data(10) OPEN(unit=1, file='output.dat', status='old') DO ii = 1, 10 READ(1, '(i4)') data(ii) END DO CLOSE(unit=1) DO ii = 1, 10 PRINT '(i3)', data(ii) END DO END PROGRAM file_read","s":"File Input / Output","u":"/fortran/file","h":"","p":44},{"i":47,"t":"Hypotenuse can be calculated using following formula: c=a2+b2c = \\sqrt{a^2 + b^2}c=a2+b2​ src/16_hypotenuse_subroutine.f90 ! Compile the subroutine: gfortran -c 16_hypotenuse_subroutine.f90 SUBROUTINE calculate_hypotenuse(side_a, side_b, hypotenuse) IMPLICIT NONE ! declare the intent of dummy variables REAL, INTENT(IN) :: side_a REAL, INTENT(IN) :: side_b REAL, INTENT(OUT) :: hypotenuse REAL :: temp temp = side_a * side_a + side_b * side_b hypotenuse = SQRT(temp) END SUBROUTINE calculate_hypotenuse Compile the subroutine: gfortran -c 16_hypotenuse_subroutine.f90 src/16_hypotenuse_program.f90 ! subroutine without module ! gfortran -c 16_hypotenuse_subroutine.f90 ! gfortran 16_hypotenuse_program.f90 16_hypotenuse_subroutine.o PROGRAM hypotenuse IMPLICIT NONE REAL :: s1, s2, output WRITE (*, *) 'Program to calculate hypotenuse of a right triangle' WRITE (*, *) 'Enter length of side 1:' READ (*, *) s1 WRITE (*, *) 'Enter length of side 2:' READ (*, *) s2 ! notice subroutine call can update values in the calling environment CALL calculate_hypotenuse(s1, s2, output) WRITE (*, 99) output 99 FORMAT('Hypotenuse = ', F10.4) END PROGRAM hypotenuse Compile main program: gfortran 16_hypotenuse_program.f90 16_hypotenuse_subroutine.o","s":"Calculate hypotenuse: example of subroutine","u":"/fortran/hypotenuse","h":"","p":46},{"i":49,"t":"Operators Meaning .lt. less than .gt. greater than .le. less than or equal to .ge. greater than or equal to .eq. equals .ne. not equal to .and. and .or. or .not. not .xor. \"exclusive\" or .eqv. equivalent .neqv. not equivalent F90 introduced following simplified notation for the relational operators: Operators Meaning < less than > greater than <= less than or equal to >= greater than or equal to == equal to /= not equal to","s":"Logical expression and control","u":"/fortran/control","h":"","p":48},{"i":51,"t":"Calculate square root of real positive numbers: src/06_sq_root.f90 ! Program : Calculate square root PROGRAM sq_root IMPLICIT NONE REAL :: input, output PRINT *, \"Input = \" READ *, input IF (input > 0) THEN output = SQRT(input) PRINT *, \"Square root of \", input, \"= \", output ELSE PRINT *, \"Input must be positive real.\" ENDIF END PROGRAM sq_root","s":"IF condition","u":"/fortran/control","h":"#if-condition","p":48},{"i":53,"t":"src/06_multi_way_if.f90 PROGRAM age_group IMPLICIT NONE INTEGER :: age PRINT \"(a,$)\", \"Enter your age: \" READ *, age IF (age <= 0) THEN PRINT *, \"Error: please enter a positive integer age.\" STOP ELSE IF (age < 18) THEN PRINT *, \"You are not adult.\" ELSE IF (age >= 18 .AND. age < 65) THEN PRINT *, \"You are adult.\" ELSE PRINT *, \"You are senior.\" END IF END PROGRAM age_group Notice also the STOP keyword in above example.","s":"Multi-way IFs","u":"/fortran/control","h":"#multi-way-ifs","p":48},{"i":55,"t":"src/06_select_case.f90 PROGRAM age_select IMPLICIT NONE INTEGER :: age PRINT \"(a,$)\", \"Enter your age: \" READ *, age SELECT CASE (age) CASE DEFAULT PRINT *, \"You are not adult.\" CASE(18:64) PRINT *, \"You are adult.\" CASE(65:) PRINT *, \"You are senior.\" END SELECT END PROGRAM age_select","s":"Select case","u":"/fortran/control","h":"#select-case","p":48},{"i":57,"t":"Determine the distance between two places on earth given latitude and longitude. Read more about haversine formula in wikipedia page. src/18_haversine_formula.f90 ! calculate the distance between two points on earch/sphere given latitude ! and longitude ! haversine is defined as: hav(theta) = sin^2(theta/2) = (1 - cos(theta))/2 ! test: BNA(36.12,-86.67), LAX(33.94,-118.40), Distance 2889.6612 km PROGRAM haversine_formula IMPLICIT NONE INTEGER, PARAMETER :: DP = KIND(1.0D0) REAL(DP), PARAMETER :: RADIUS_OF_EARTH = 6.3781D6 REAL(DP) :: lat1 = 0.0_DP REAL(DP) :: lon1 = 0.0_DP REAL(DP) :: lat2 = 0.0_DP REAL(DP) :: lon2 = 0.0_DP REAL(DP) :: a, dist PRINT \"(a,$)\", \"Latitude of point A = \" READ *, lat1 PRINT \"(a,$)\", \"Longitude of point A = \" READ *, lon1 PRINT \"(a,$)\", \"Latitude of point B = \" READ *, lat2 PRINT \"(a,$)\", \"Longitude of point B = \" READ *, lon2 lat1 = deg2rad(lat1) lon1 = deg2rad(lon1) lat2 = deg2rad(lat2) lon2 = deg2rad(lon2) a = (SIN((lat1 - lat2)/2))**2 + COS(lat1) * COS(lat2) * & (SIN((lon1 - lon2)/2))**2 dist = 2 * RADIUS_OF_EARTH * ASIN(SQRT(a)) PRINT '(A,F12.4,A)', 'Distance: ', dist / 1000,' km' CONTAINS FUNCTION deg2rad(degree) RESULT(rad) ! degrees to radians REAL(KIND=KIND(0.0D0)), INTENT(IN) :: degree REAL(KIND=KIND(0.0D0)), PARAMETER :: deg_to_rad = ATAN(1.0) / 45 REAL(KIND=KIND(0.0D0)) :: rad rad = degree * deg_to_rad END FUNCTION deg2rad END PROGRAM haversine_formula","s":"Haversine formula","u":"/fortran/haversine","h":"","p":56},{"i":59,"t":"We will calculate the area under the curve f(x)f(x)f(x) within the bounds x=ax=ax=a and x=bx=bx=b. We will divide the curve into nnn trapezoids with width h=(b−a)/nh=(b-a)/nh=(b−a)/n. Area under the curve: An=h[f(a)2+f(a+h)+f(a+2h)+⋯+f(b)2]A_n = h \\left[\\frac{f(a)}{2} + f(a+h) + f(a+2h) + \\cdots + \\frac{f(b)}{2}\\right]An​=h[2f(a)​+f(a+h)+f(a+2h)+⋯+2f(b)​] src/10_trapezoid.f90 ! Caculate the area of sine curve using trapezoidal method PROGRAM trapezoid IMPLICIT none INTRINSIC :: sin REAL :: a, b, h, area INTEGER :: i, n n = 100 a = 0 b = 3.14 h = (b - a) / n area = 0.5 * (sin(a) + sin(b)) DO i = 1, n-1 area = area + sin(a + i*h) END DO area = h * area PRINT *, \"Area = \", area END PROGRAM trapezoid","s":"Numerical integration: Trapezoidal method","u":"/fortran/integration","h":"","p":58},{"i":61,"t":"We will try to improve above numerical integration code. Previously we had the integration function hard coded, now we will pass it as argument from the calling program and use separate module for the calculation. First we write our executable code in a module: src/14_integration_module.f90 MODULE integration_module IMPLICIT NONE PRIVATE PUBLIC :: integral CONTAINS FUNCTION integral(f, a, b, n) RESULT(integral_result) INTERFACE FUNCTION f(x) RESULT(f_result) REAL, INTENT(IN) :: x REAL :: f_result END FUNCTION f END INTERFACE REAL, INTENT(IN) :: a, b INTEGER, INTENT(IN) :: n REAL :: integral_result REAL :: h, area INTEGER :: i h = (b - a) / n area = 0.5 * (f(a) + f(b)) DO i = 1, n-1 area = area + f(a + i*h) END DO integral_result = h * area END FUNCTION integral END MODULE integration_module src/14_integration.f90 PROGRAM integration USE integration_module IMPLICIT NONE INTRINSIC :: sin PRINT *, integral(sin, a=0.0, b=3.14159, n=1000) END PROGRAM integration","s":"Numerical integration II","u":"/fortran/integration","h":"#numerical-integration-ii","p":58},{"i":63,"t":"Example of dynamic array allocation: src/19_inner_product.f90 PROGRAM inner_product IMPLICIT NONE INTEGER length REAL, DIMENSION(:), ALLOCATABLE :: a REAL, DIMENSION(:), ALLOCATABLE :: b INTEGER i REAL :: sum = 0.0 PRINT \"(a,$)\", \"Enter length of vectors: \" READ *, length IF ( length < 1 ) then PRINT *, \"Stopping: length must be positive definite.\" STOP END IF ALLOCATE(a(length)) ALLOCATE(b(length)) PRINT *, \"Enter first array components:\" DO i = 1, length PRINT '(A,I4,A,$)', 'a[', i,'] = ' READ *, a(i) END DO PRINT *, \"Enter second array components:\" DO i = 1, length PRINT '(A,I4,A,$)', 'a[', i,'] = ' READ *, b(i) END DO DO i = 1, length sum = sum + a(i) * b(i) END DO PRINT '(A,F8.4)', 'Inner product = ', sum ! we can use in-built dot_product as well PRINT '(A,F8.4)', \"Result using in-built dot_product = \", dot_product(a, b) DEALLOCATE(a) DEALLOCATE(b) END PROGRAM inner_product","s":"Inner product: dynamic array allocation","u":"/fortran/inner-product","h":"","p":62},{"i":66,"t":"Calculate factorial: src/07_factorial.f90 ! Program : Find factorial PROGRAM factorial IMPLICIT NONE INTEGER :: input, ii, output = 1 PRINT *, \"Input = \" READ *, input DO ii = 1, input output = output * ii ENDDO PRINT *, input, \"! = \", output END PROGRAM factorial We can have a step size in a DO loop with a third parameter: DO i = 1, 100, 10 ! do something END DO Exit a loop based on condition: DO i = 1, 10 CALL random_number(x) IF (x > 0.5) EXIT END DO Skip rest of current iteration with cycle: DO i = 1, 10 IF (iseven(i)) CYCLE ! do something with the odd numbers END DO Implied DO loops: PRINT *, (i, i = 1, 10) You can iterate multiple expressions: PRINT *, (i, i**2, i = 0, 10) With nested loops: PRINT *, ((i*j, i = 1, 10), j = 1, 10) DO concurrent: if the iterations of a DO loop are independent, we can use the CONCURRENT keyword to indicate, the loop can be iterated in parallel: DO CONCURRENT (i = 1, 10) ! do something END DO","s":"DO Loop","u":"/fortran/loop","h":"#do-loop","p":64},{"i":68,"t":"src/07_print_even_numbers.f90 PROGRAM even_numbers IMPLICIT NONE INTEGER :: num num = 1 DO WHILE (num <= 10) IF (MODULO(num, 2) == 0) THEN PRINT *, num END IF num = num + 1 END DO END PROGRAM even_numbers","s":"DO WHILE","u":"/fortran/loop","h":"#do-while","p":64},{"i":70,"t":"src/20_monte_carlo_integration.f90 ! Monte carlo method of integration ! calculate area under the curve y = x^2 within x limits [1, 3] PROGRAM area_under_curve IMPLICIT NONE INTEGER, PARAMETER :: iteration = 1000000 REAL :: x_lo = 1.0 REAL :: x_hi = 3.0 REAL :: x, y, y_lo = 0.0, y_hi, area, area_rect INTEGER :: i, monte_area = 0 y_hi = x_hi ** 2 area_rect = y_hi * (x_hi - x_lo) DO i = 1, iteration CALL random_number(x) CALL random_number(y) x = x_lo + x * (x_hi - x_lo); y = y * (y_hi - y_lo); IF (y < x ** 2) THEN monte_area = monte_area + 1; END IF END DO area = area_rect * monte_area / iteration PRINT *, \"Area = \", area PRINT *, \"Analytical result = \", (27.0 - 1) / 3 END PROGRAM area_under_curve","s":"Area under the curve by Monte Carlo method","u":"/fortran/monte-carlo-integration","h":"","p":69},{"i":72,"t":"This work is licensed under a Creative Commons Attribution 4.0 International License. Any third party materials in this work are not included in the article’s Creative Commons license, and users will need to obtain permission from the respective license holder to reproduce such materials. You are free to: Share — copy and redistribute the material in any medium or format. Adapt — remix, transform, and build upon the material for any purpose, even commercially. Under the following terms: Attribution — You must give appropriate credit, provide a link to the license, and indicate if changes were made. You may do so in any reasonable manner, but not in any way that suggests the licensor endorses you or your use. Notices: No warranties are given. The license may not give you all of the permissions necessary for your intended use. For example, other rights such as publicity, privacy, or moral rights may limit how you use the material. To view full copy of this license, visit http://creativecommons.org/licenses/by/4.0/","s":"License","u":"/fortran/license","h":"","p":71},{"i":74,"t":"We will approximate value of π\\piπ by Monte Carlo method. We will generate random number in a square of radius 2 unit; x = (-1, 1) and y = (-1, 1). We will count how many points are inside the circle of radius 1 unit. Area of the square = 4 square unit, while the are of circle is π\\piπ (unit radius circle). Use this ratio to approximate the value of π\\piπ. src/20_monte_carlo_pi.f90 PROGRAM pi IMPLICIT NONE INTEGER, PARAMETER :: iteration = 1000000 REAL :: x, y REAL :: x_lo = -1.0 REAL :: x_hi = 1.0 REAL :: y_lo = -1.0 REAL :: y_hi = 1.0 INTEGER :: i, monte_area = 0 DO i = 1, iteration CALL random_number(x) CALL random_number(y) x = x_lo + x * (x_hi - x_lo); y = y_lo + y * (y_hi - y_lo); IF (x * x + y * y < 1) THEN monte_area = monte_area + 1; END IF END DO PRINT *, \"pi = \", 4.0 * monte_area / iteration PRINT *, \"relative error = \", abs(1.0 * monte_area / iteration & - ATAN(1.0D0)) / ATAN(1.0D0) END PROGRAM pi","s":"Determine value of pi by Monte Carlo method","u":"/fortran/monte-carlo-pi","h":"","p":73},{"i":76,"t":"Large programs can be organized in separate modules and procedures. Here is an example. We store various mathematical and physical constants in a module named constants_module. src/11_const_module.f90 MODULE const_module IMPLICIT none PRIVATE REAL, PUBLIC, PARAMETER :: pi = 3.14159265 REAL, PUBLIC, PARAMETER :: e = 2.71828182 END MODULE const_module Now we write a program that uses the above module: src/11_circ_area.f90 PROGRAM circ_area USE const_module IMPLICIT none REAL :: rad = 5.0, area area = pi*rad**2 PRINT *, \"Area = \", area END PROGRAM circ_area The PRIVATE keyword makes sure everything is private otherwise declared as PUBLIC. Private variables are accessible only to the module, while public variables are accessible to the programs that uses it. There is also PROTECTED keyword, which allows the variable to be accessible but the value cannot be modified. Compile and run our module and program: gfortran -c 11_const_module.f90 gfortran 11_circ_area.f90 11_const_module.o ./a.out note Modules need to be compiled before the program that uses it. If both are placed in the same source file, the module should come before the program. Once the module is compiled, it will create .o and .mod files. When we compile the program, we only need to provide the .o file for linking, the compiler will find the .mod files. If the files are on a different directory, specify via -I<dir> option. gfortran -I./ 11_circ_area.f90","s":"Modules","u":"/fortran/modules","h":"","p":75},{"i":78,"t":"Rename a variable: use const_module, math_pi => pi Use only certain variables: use const_module, only : pi use const_module, only : pi, e Last command is same as: use const_module, only : pi use const_module, only : e Use pi and rename e: use const_module, only : pi, log_base => e","s":"USE keyword","u":"/fortran/modules","h":"#use-keyword","p":75},{"i":81,"t":"src/29_MPI_hello_world.f90 PROGRAM hello_world_mpi INCLUDE 'mpif.h' INTEGER process_rank, size_of_cluster, ierror CHARACTER* (MPI_MAX_PROCESSOR_NAME) processor_name CALL MPI_INIT(ierror) CALL MPI_COMM_SIZE(MPI_COMM_WORLD, size_of_cluster, ierror) CALL MPI_COMM_RANK(MPI_COMM_WORLD, process_rank, ierror) CALL MPI_GET_PROCESSOR_NAME(processor_name, namelen, ierr) WRITE(*, 10) process_rank, size_of_cluster, processor_name 10 FORMAT('Hello from process: ', I2, ' of', I2, ' on ', 20A) CALL MPI_FINALIZE(ierror) END PROGRAM Compile the code: mpif90 29_MPI_hello_world.f90 -o 29_MPI_hello_world.out # if you are using intel compiler mpiifort 29_MPI_hello_world.f90 -o 29_MPI_hello_world.out Let's run on 4 processors: mpirun -np 4 ./29_MPI_hello_world.out","s":"MPI Hello World","u":"/fortran/mpi","h":"#mpi-hello-world","p":79},{"i":83,"t":"https://curc.readthedocs.io/en/latest/programming/MPI-Fortran.html","s":"Resources","u":"/fortran/mpi","h":"#resources","p":79},{"i":85,"t":"There are two types of procedures in Fortran: subroutines and functions. All procedures should be placed in a module or after the contains keyword in a main program.","s":"Procedures","u":"/fortran/procedures","h":"","p":84},{"i":87,"t":"First we write the subroutines in a module: src/12_add_module.f90 MODULE add_module IMPLICIT none PRIVATE REAL :: input1, input2, total PUBLIC :: read_inputs, add_numbers, print_result CONTAINS SUBROUTINE read_inputs() PRINT \"(a,$)\", \"Input1 = \" READ *, input1 PRINT \"(a,$)\", \"Input2 = \" READ *, input2 END SUBROUTINE read_inputs SUBROUTINE add_numbers() total = input1 + input2 END SUBROUTINE add_numbers SUBROUTINE print_result PRINT *, input1, \" + \", input2, \" = \", total END SUBROUTINE print_result END MODULE add_module Now write our program: src/12_add.f90 PROGRAM add USE add_module IMPLICIT none CALL read_inputs() CALL add_numbers() CALL print_result() END PROGRAM add Compile and execute: gfortran -c 12_add_module.f90 gfortran 12_add.f90 12_add_module.o ./a.out","s":"Subroutine","u":"/fortran/procedures","h":"#subroutine","p":84},{"i":89,"t":"We want to print a table of xxx vs f(x)f(x)f(x) where: f(x)=(1+1x)xf(x) = \\left(1 + \\frac{1}{x}\\right)^xf(x)=(1+x1​)x src/13_function_module.f90 MODULE function_module IMPLICIT NONE PRIVATE INTEGER, PARAMETER, PUBLIC :: power = 5 PUBLIC :: f CONTAINS FUNCTION f(x) RESULT(f_result) REAL, INTENT(IN) :: x REAL :: f_result ! SELECTED_REAL_KIND(precision [, range]) INTEGER, PARAMETER :: kind_needed = selected_real_kind(power + 1) f_result = (1 + 1 / REAL(x, kind_needed)) ** x END FUNCTION f END MODULE function_module src/13_function_table.f90 PROGRAM function_table USE function_module IMPLICIT NONE REAL :: x INTEGER :: i DO i = 0, power x = 10**i PRINT \"(f8.1, f8.4)\", x, f(x) END DO END PROGRAM function_table Sample output: 1.0 2.0000 10.0 2.5937 100.0 2.7048 1000.0 2.7171 10000.0 2.7186 100000.0 2.7220 In contrast to subroutines, functions must provide a return value.","s":"Function","u":"/fortran/procedures","h":"#function","p":84},{"i":91,"t":"Side effects are the change in status of a program when a procedure is executed other than computing a value to return, such as changing a variable declared in the program or module above the contains statement. One can indicate whether a function or subroutine is pure or has side effects by using the keywords pure and impure, respectively.","s":"Pure procedures and side effects","u":"/fortran/procedures","h":"#pure-procedures-and-side-effects","p":84},{"i":93,"t":"Interface block is used to provide necessary information to the calling program whether the call is correct. It basically consists of the procedure without the executable code, and declaration of local variables.","s":"Interface blocks","u":"/fortran/procedures","h":"#interface-blocks","p":84},{"i":95,"t":"Pointer in FORTRAN is an alias to a variable or procedure. src/28_pointer.f90 PROGRAM MAIN IMPLICIT NONE REAL, POINTER :: p1, p2 REAL, TARGET :: r1 INTEGER, DIMENSION(:), POINTER :: ptr_arr INTEGER, DIMENSION(2), TARGET :: arr r1 = 1.0 ! set p1 to point to r1 p1 => r1 ALLOCATE(p2) ! creates a storage space without a variable name ! allocate (p1, stat=allocation_status) p2 = 2.2 ! this value has no name arr(1) = 5 arr(2) = 8 ptr_arr => arr ! below two are the same PRINT *, \"r1 = \", r1 PRINT *, \"p1 = \", p1 PRINT *, \"p2 = \", p2 ! check association PRINT *, \"Is p1 and r1 associated? \", ASSOCIATED(p1, r1) PRINT *, \"Is p1 and p2 point to same object? \", ASSOCIATED(p1, p2) ! associated returns false if both pointers point to null PRINT \"(2i4)\", arr DEALLOCATE(p2) ! now p2 is a dangling pointer ! it can be set to point to null p2 => NULL() END","s":"Pointer","u":"/fortran/pointer","h":"","p":94},{"i":97,"t":"Ordinary FORTRAN procedures (subroutine and function) are not recursive, i.e., they cannot invoke themselves in their body. We can use the RECURSIVE keyword to implement recursive procedures.","s":"Recursion","u":"/fortran/recursion","h":"","p":96},{"i":99,"t":"Calculate factorial using recursive subroutine: src/21_recursive_subroutine.f90 ! Calculate factorial ! | n(n -1) n >= 1 ! n! = | ! | 1 n = 0 PROGRAM recursive_subroutine IMPLICIT NONE INTEGER :: input, output PRINT *, \"This program calculates factorial:\" PRINT '(a,$)', \"Input = \" READ *, input CALL factorial(input, output) PRINT *, input, \"! = \", output CONTAINS RECURSIVE SUBROUTINE factorial(n, result) INTEGER, INTENT(IN) :: n INTEGER, INTENT(OUT) :: result INTEGER :: tmp IF (n >= 1) THEN CALL factorial(n-1, tmp) result = n * tmp ELSE result = 1 END IF END SUBROUTINE factorial END PROGRAM recursive_subroutine","s":"Recursive subroutine","u":"/fortran/recursion","h":"#recursive-subroutine","p":96},{"i":101,"t":"Calculate fibonacci series using recursive function: src/21_recursive_function.f90 ! Fibonacci series ! F(0) = 0 ! F(1) = 1 ! F(n) = F(n-1) + F(n-2) for n > 1 PROGRAM recursive_function IMPLICIT NONE INTEGER :: lim, i PRINT *, \"This program calculates fibonacci series:\" PRINT '(a,$)', \"Limit = \" READ *, lim DO i = 0, lim PRINT *, \"Fib(\", i, \") = \", fibonacci(i) END DO CONTAINS RECURSIVE FUNCTION fibonacci(n) RESULT(output) INTEGER, INTENT(IN) :: n INTEGER :: output IF (n > 1) THEN output = fibonacci(n - 1) + fibonacci(n - 2) ELSE IF (n == 1) THEN output = 1 ELSE output = 0 END IF END FUNCTION fibonacci END PROGRAM recursive_function","s":"Recursive function","u":"/fortran/recursion","h":"#recursive-function","p":96},{"i":103,"t":"Fortran Programming Manual by Tanja van Mourik Guide to Fortran 2008 Programming by Walter S Brainerd Introduction to modern FORTRAN Fortran Programming Guide from Oracle https://people.math.sc.edu/Burkardt/f_src/f_src.html https://github.com/SourangshuGhosh/AwesomeFortranLibraries","s":"Resources","u":"/fortran/resources","h":"","p":102},{"i":105,"t":"Subroutine to swap two integers: src/24_swap.f90 PROGRAM MAIN IMPLICIT NONE INTEGER a, b PRINT \"(a,$)\", \"Enter two integers (separated by space or comma): \" READ *, a, b CALL swap(a, b) PRINT *, \"After swap: \", a, b CONTAINS SUBROUTINE swap(a, b) INTEGER, INTENT(IN OUT) :: a, b INTEGER tmp tmp = a a = b b = tmp END SUBROUTINE swap END","s":"Swap two numbers","u":"/fortran/swap","h":"","p":104},{"i":107,"t":"Following example uses date_and_time and cup_time to find current date and time, and determine program execution time. src/25_time.f90 PROGRAM MAIN IMPLICIT NONE INTEGER, PARAMETER :: n = 10000000 CHARACTER(LEN=8) :: date REAL start_time, end_time REAL(KIND=KIND(1.0D0)) :: test = 0.0D0 INTEGER i CALL date_and_time(date=date) PRINT *, \"Timing report dated: \", date(1:4), \"-\", date(5:6), \"-\", date(7:8) CALL cpu_time(start_time) ! savage benchmark DO i = 1, n test = tan(atan(exp(log(sqrt(test * test))))) + 1.0D0; END DO CALL cpu_time(end_time) PRINT *, \"Time taken = \", end_time - start_time, \"sec.\" PRINT *, \"Test = \", test PRINT *, \"Relative accuracy = \", (test - (n + 1)) / (n + 1) END ! Sample output: ! Timing report dated: 2022-10-09 ! Time taken = 0.939146996 sec. ! Test = 9999816.5167837571 ! Relative accuracy = -1.8448319779454493E-005","s":"Time","u":"/fortran/time","h":"","p":106},{"i":110,"t":"src/23_custom_type.f90 PROGRAM MAIN IMPLICIT NONE TYPE user ! if defined in external MODULE, use PUBLIC: TYPE, PUBLIC :: user INTEGER id ! parameters can be initialized CHARACTER(LEN=64) name REAL age END TYPE ! extending type TYPE, EXTENDS(user) :: user_extended real :: salary END TYPE user_extended TYPE(user) new_user ! declare an array of user TYPE(user) user_catalog(10) TYPE(user_extended) user_with_salary new_user%id = 1; new_user%name = \"Albert Einstein\" new_user%age = 76.0 ! alternatively, new_user = user(1, \"Albert Einstein\", 76.0) user_catalog(1) = new_user PRINT *, \"User ID: \", user_catalog(1)%id PRINT *, \"User name: \", user_catalog(1)%name PRINT *, \"Age: \", user_catalog(1)%age user_with_salary = user_extended(1, \"Albert Einstein\", 76.0, 50000.0) PRINT *, \"Salary: \", user_with_salary%salary END","s":"Custom data types","u":"/fortran/types","h":"#custom-data-types","p":108},{"i":112,"t":"Example of polymorphic object: src/23_polymorphism.f90 PROGRAM MAIN IMPLICIT NONE ! define a base line type TYPE :: line_type REAL :: x_start, x_end, y_start, y_end END TYPE line_type ! extend the base line type TYPE, EXTENDS(line_type) :: colored_line_type INTEGER :: r, g, b ! each ranges 0-255 END TYPE colored_line_type TYPE, EXTENDS(colored_line_type) :: vector_line_type LOGICAL :: direction ! T if direction is start to end, F if reverse END TYPE vector_line_type ! CLASS keyword instead of TYPE ! polymorphic objects are dynamic, must be declared with ALLOCATABLE or POINTER CLASS(line_type), ALLOCATABLE :: colored_line, vector_line ! notice that line has CLASS line_type, but still can be assigned colored_line_type colored_line = colored_line_type(0.0, 1.0, 0.0, 1.0, 0, 0, 255) ! alternative way to assign ! ALLOCATE(vector_line_type::vector_line) ALLOCATE(vector_line, source=vector_line_type(0.0, 1.0, 0.0, 1.0, 0, 0, 255, .TRUE.)) ! accessing elements is bit tricky SELECT TYPE(colored_line) TYPE IS(line_type) PRINT *, \"X_start: \", colored_line%x_start TYPE IS(colored_line_type) PRINT *, \"Color: \", colored_line%r, colored_line%g, colored_line%b TYPE IS(vector_line_type) PRINT *, \"Is forward directed? \", colored_line%direction CLASS DEFAULT PRINT *, \"Error: not sure what type it is.\" END SELECT ! re-allocate the same variable ! DEALLOCATE(colored_line) ! ALLOCATE(colored_line, source=vector_line_type(0.0, 1.0, 0.0, 1.0, 0, 0, 255, .TRUE.)) END","s":"Polymorphism","u":"/fortran/types","h":"#polymorphism","p":108},{"i":114,"t":"FORTRAN is optimized for high performance scientific computing. I will be working on UNIX/ Linux machine for running codes. If you are on Windows, you may consider using WSL. We will be using gfortran compiler. To install gcc and gfortran in Ubuntu/ Debian: sudo apt install gcc gfortran On macOS you can install via Homebrew: brew install gcc gfortran is part of gcc. You can use any text editor of your choice to write source codes. We will be using .f90 file extension for our source code files. The program can be compiled using: gfortran source.f90 It will create a binary file named a.out in the same directory as the source code, which can be executed by: ./a.out If you would like to specify a name for the executable instead of default a.out: gfortran source.f90 -o XYapp If you have dependent modules in separate source files, you need to compile the modules first followed by main program with linking module .o file. More on this on the modules section. gfortran -c module.f90 gfortran main.f90 module.o","s":"Setting up Fortran","u":"/fortran/","h":"","p":113}],"index":{"version":"2.3.9","fields":["t"],"fieldVectors":[["t/2",[0,0.953,1,4.849,2,3.486,3,3.486,4,2.67,5,2.428,6,4.617,7,3.486,8,0.538,9,1.444,10,0.524,11,0.524,12,0.495,13,6.336,14,3.486,15,0.572,16,5.576,17,1.107,18,5.177,19,2.074,20,4.271,21,0.838,22,1.815,23,1.906,24,3.486,25,2.074,26,2.994,27,1.936,28,2.234,29,2.67,30,0.838,31,0.968,32,1.237,33,3.486,34,2.67,35,3.486,36,3.486,37,3.486,38,1.37,39,2.67,40,3.486,41,2.428,42,3.486,43,3.486,44,1.177,45,2.67,46,2.994]],["t/4",[8,0.483,10,0.754,11,0.754,15,0.573,21,0.754,30,0.754,32,1.779,41,2.548,44,1.235,47,2.37,48,2.802,49,3.659,50,4.306,51,3.84,52,3.659,53,5.014,54,6.154,55,6.154,56,5.72,57,6.447,58,1.906,59,2.346,60,1.793,61,3.659,62,5.014,63,1.906,64,5.014,65,3.659,66,3.659,67,3.659,68,5.014,69,3.659,70,3.659,71,3.659,72,3.143,73,2.346]],["t/6",[0,0.403,8,0.564,10,0.61,11,0.61,12,0.895,15,0.572,21,0.61,23,2.523,27,2.986,28,3.866,30,0.695,31,1.873,47,0.849,74,2.049,75,4.076,76,2.049,77,4.733,78,3.26,79,2.267,80,4.059,81,3.109,82,2.8,83,1.427,84,1.569,85,1.427,86,1.219,87,1.569,88,3.26,89,1.76,90,1.35,91,1.76,92,1.76,93,3.973,94,2.049,95,3.26,96,2.049,97,3.26,98,2.497,99,2.27,100,2.27,101,1.314,102,1.76,103,1.76,104,1.76,105,2.049,106,2.049,107,4.626,108,3.199,109,4.118,110,4.059,111,4.059,112,2.497,113,2.497,114,2.049,115,3.26,116,3.486,117,2.049,118,2.049,119,1.597,120,2.049,121,1.507,122,2.049,123,2.049,124,1.76,125,1.004,126,1.597,127,2.049]],["t/8",[0,0.323,5,2.83,8,0.611,10,0.73,11,0.611,12,0.496,15,0.57,17,1.029,21,0.865,22,1.421,23,1.072,25,0.979,27,1.515,30,0.677,34,2.089,44,1.372,45,1.261,48,2.089,58,1.421,59,1.749,60,2.208,73,1.055,86,1.623,89,1.414,90,1.13,109,1.261,113,1.261,119,2.208,121,2.378,125,0.807,128,1.646,129,1.646,130,2.089,131,2.736,132,2.728,133,1.646,134,1.261,135,2.24,136,1.261,137,1.414,138,1.9,139,1.055,140,1.646,141,3,142,0.914,143,1.414,144,0.807,145,1.421,146,1.261,147,1.146,148,1.646,149,1.055,150,1.646,151,2.728,152,1.646,153,1.646,154,1.646,155,1.414,156,1.261,157,1.414,158,1.261,159,0.979,160,1.623,161,2.728,162,0.857,163,0.857,164,0.979,165,0.914,166,1.146,167,1.055,168,1.414,169,3.493,170,4.857,171,1.646,172,2.728,173,3.493,174,1.646,175,1.193,176,3,177,3.49,178,1.9,179,1.646,180,1.646,181,2.089,182,2.728,183,3,184,3.493,185,0.682,186,2.418,187,1.261,188,1.646,189,3.49,190,1.646,191,2.343,192,1.646,193,3.493,194,3.493,195,1.646,196,1.646,197,1.646,198,2.089,199,1.646,200,2.676,201,1.646,202,2.343,203,1.9,204,1.646,205,1.414,206,4.505,207,1.646,208,1.646,209,1.646,210,1.414,211,1.646,212,1.646,213,1.646,214,1.261,215,1.646,216,1.646,217,3,218,1.646,219,1.414,220,1.646,221,1.414,222,1.646,223,2.728,224,0.979,225,1.646,226,1.646,227,1.646,228,1.646,229,0.979,230,1.646]],["t/10",[60,3.184,147,3.821,156,4.202,224,4.118,231,5.487,232,5.487,233,5.487,234,5.487,235,5.487,236,3.047,237,5.487]],["t/12",[12,0.71,17,1.142,23,2.415,38,1.966,45,3.831,79,2.451,86,2.976,90,2.755,224,2.976,238,4.296,239,5.002,240,5.002,241,5.002,242,3.484,243,3.484,244,2.976,245,2.976,246,3.484,247,5.002,248,3.484,249,4.296,250,4.296,251,3.484,252,5.002]],["t/14",[12,0.767,15,0.554,17,1.235,60,2.649,176,4.643,181,4.141,191,4.643,219,4.643,245,3.216,248,3.765,253,5.406,254,5.406]],["t/16",[15,0.513,17,1.332,185,2.417,186,3.471,187,4.469]],["t/18",[0,0.941,12,0.755,15,0.546,17,1.215,21,0.401,23,1.57,27,3.794,31,1.582,79,2.347,83,1.856,84,3.668,90,1.104,126,1.957,146,1.232,149,1.708,178,1.856,185,2.204,186,2.376,202,2.289,203,1.856,224,1.585,243,2.782,244,2.849,245,2.376,248,1.856,251,1.856,255,3.994,256,3.07,257,2.665,258,2.665,259,2.665,260,2.041,261,4.886,262,5.698,263,4.166,264,2.665,265,1.856,266,3.994,267,3.994,268,2.665,269,3.43,270,2.665,271,2.665,272,2.665,273,2.665,274,2.289,275,2.665,276,2.665,277,2.665,278,2.665,279,2.665,280,2.665,281,2.665,282,2.665,283,2.665,284,2.665,285,2.665,286,2.289,287,3.43,288,3.43,289,2.665,290,3.059,291,2.665,292,2.665,293,2.665,294,2.665,295,2.665,296,2.08,297,2.56,298,2.665,299,2.665,300,3.994,301,2.665,302,2.665]],["t/20",[8,0.476,10,0.742,11,0.742,12,0.7,17,1.127,25,2.936,60,2.986,85,3.437,130,3.78,144,2.986,146,2.282,156,3.78,236,2.741,256,3.163,303,3.384,304,4.935,305,4.935,306,4.935,307,4.935,308,3.78,309,4.238,310,4.935,311,3.78,312,2.418,313,4.238,314,4.238]],["t/22",[6,3.373,12,0.89,15,0.478,17,1.006,27,2.445,47,1.824,48,4.805,50,3.782,108,2.62,126,2.158,244,2.62,245,2.62,296,2.293,297,2.823,315,3.782,316,4.403,317,3.782,318,4.403,319,4.403,320,4.403,321,4.403,322,4.403,323,5.671,324,4.403,325,4.403,326,4.403,327,4.403,328,4.403,329,6.273,330,4.403,331,4.403,332,3.373,333,3.782,334,4.403,335,4.403,336,4.403,337,4.403,338,4.403]],["t/24",[22,2.321,47,2.757,205,3.828,245,2.651,315,3.828,339,3.413,340,5.418,341,4.457,342,6.654,343,4.457,344,6.309,345,5.715,346,5.715,347,4.457,348,4.457,349,6.309,350,5.715,351,4.457,352,4.457,353,4.457,354,4.457,355,3.413,356,3.828,357,4.457,358,4.457,359,4.457,360,5.715,361,4.457,362,3.828]],["t/26",[12,0.745,15,0.537,21,0.789,44,1.773,58,2.735,101,3.367,112,4.022,135,3.367,224,3.124,229,3.124,311,4.848,312,3.102,363,4.511,364,5.252,365,4.511]],["t/28",[5,4.614,15,0.544,21,1.03,22,2.293,23,1.731,28,2.823,79,2.158,108,2.62,125,2.158,142,2.445,198,5.251,221,4.871,236,2.445,261,3.373,366,4.403,367,4.403,368,4.403,369,4.403,370,5.671,371,4.403,372,3.782,373,4.871,374,4.403,375,3.782,376,3.067,377,4.403,378,4.403]],["t/30",[8,0.489,15,0.472,51,3.884,147,3.532,162,2.641,165,3.441,265,3.532,379,5.322,380,4.355,381,5.071,382,5.071,383,4.355,384,5.071,385,6.196,386,5.071,387,5.322,388,5.322,389,5.071,390,4.355]],["t/32",[0,0.516,8,0.253,9,1.088,10,0.395,11,0.395,12,0.674,15,0.574,17,1.293,19,1.563,21,0.594,23,1.032,28,1.684,30,0.395,31,1.318,34,2.012,47,1.088,51,2.012,75,2.752,86,1.563,87,4.045,100,2.752,101,2.533,103,2.256,125,1.287,136,2.012,138,1.83,139,2.533,142,1.459,149,1.684,158,2.012,162,1.368,165,2.194,244,1.563,246,1.83,260,2.012,265,1.83,296,2.751,297,3.386,312,1.287,380,2.256,387,3.393,388,3.393,390,2.256,391,2.627,392,4.748,393,2.012,394,2.627,395,2.012,396,2.627,397,4.748,398,4.748,399,2.627,400,2.012,401,4.078,402,3.951,403,3.951,404,3.951,405,4.078,406,2.012,407,2.627,408,2.627,409,3.951,410,3.951,411,2.058,412,3.951,413,3.951,414,3.951,415,1.83,416,3.951,417,1.83,418,2.627,419,2.627,420,2.627,421,2.627,422,2.627,423,3.951,424,2.627,425,2.627,426,2.627]],["t/34",[8,0.279,9,1.2,10,0.435,11,0.435,12,0.411,15,0.57,19,2.992,21,0.638,30,0.887,31,1.538,32,1.028,112,3.253,119,2.081,175,1.266,185,1.2,243,3.503,244,2.992,246,2.017,308,4.243,309,4.32,311,4.722,312,2.715,332,2.218,395,2.218,411,2.619,415,2.017,417,2.017,427,2.896,428,3.648,429,2.896,430,2.896,431,5.54,432,2.896,433,5.54,434,2.896,435,2.896,436,2.896,437,2.896,438,2.896,439,2.896,440,2.896,441,2.896,442,3.648,443,2.896,444,2.896,445,2.896,446,4.247,447,2.896,448,2.896,449,3.852,450,2.896,451,2.896,452,2.896,453,2.896,454,2.896,455,2.896,456,2.896,457,2.896,458,3.551,459,2.896,460,4.247,461,2.896]],["t/36",[90,2.436,428,5.051,462,5.881,463,5.051,464,5.881]],["t/39",[465,6.075]],["t/41",[0,0.62,8,0.509,10,0.474,11,0.474,12,0.448,15,0.583,17,1.206,22,1.644,26,2.711,30,0.474,131,3.279,137,2.711,138,2.199,146,1.46,187,3.463,203,4.017,243,2.199,244,1.878,245,3.632,246,2.199,274,3.883,401,4.537,411,1.644,415,2.199,417,2.199,466,2.711,467,3.157,468,4.521,469,6.69,470,6.541,471,3.157,472,3.157,473,3.157,474,3.157,475,3.157,476,2.418,477,3.157,478,3.157,479,4.521,480,3.157]],["t/43",[4,4.429,8,0.558,9,1.88,10,0.682,11,0.682,12,0.644,15,0.548,21,0.956,30,0.682,32,2.258,39,3.477,146,2.099,160,2.7,163,3.489,265,3.161,406,3.477,481,4.539,482,4.539,483,5.782,484,4.539,485,4.539,486,4.539,487,5.782,488,4.539,489,4.539]],["t/45",[0,0.688,8,0.65,10,0.731,11,0.731,12,0.691,15,0.532,21,0.526,30,0.908,31,1.552,41,2.439,44,1.887,59,4.211,77,4.861,79,2.74,81,2.682,90,1.451,108,2.083,109,2.682,121,1.62,131,2.384,143,3.008,159,2.083,198,3.726,214,2.682,260,4.282,490,4.178,491,3.502,492,4.865,493,4.865,494,4.865,495,3.502,496,3.502,497,3.502,498,4.865,499,3.502,500,3.502,501,3.502,502,3.502,503,4.865,504,3.502,505,3.502,506,3.502,507,4.865,508,3.502]],["t/47",[0,0.545,8,0.523,9,1.15,10,0.619,11,0.619,15,0.572,17,1.324,23,1.091,30,0.619,31,0.771,32,1.741,44,1.39,58,2.144,63,2.144,86,2.449,121,2.269,126,1.36,131,2.66,144,1.36,162,2.555,164,1.651,165,3.219,175,1.8,303,1.542,458,3.145,509,6.285,510,2.384,511,2.776,512,2.776,513,2.776,514,2.776,515,3.162,516,4.907,517,2.776,518,5.427,519,2.776,520,2.776,521,4.907,522,2.384,523,4.116,524,2.776,525,2.776,526,2.776,527,2.126,528,1.36,529,4.116,530,4.116,531,4.116,532,4.907,533,2.384,534,2.776,535,3.536,536,1.933,537,2.776,538,2.776,539,2.776,540,4.116,541,2.776,542,2.776]],["t/49",[15,0.536,138,4.394,157,3.828,164,2.651,543,5.715,544,4.457,545,6.654,546,4.457,547,6.654,548,4.457,549,7.25,550,4.457,551,4.457,552,4.457,553,4.457,554,4.457,555,4.457,556,5.715,557,4.457,558,3.828,559,4.457,560,4.457,561,4.457]],["t/51",[8,0.595,10,0.639,11,0.639,15,0.571,17,1.409,21,0.927,22,2.214,30,0.639,38,1.671,44,1.435,72,3.651,121,2.852,135,4.456,175,2.424,355,4.724,356,5.297,376,3.861,562,4.251,563,5.543,564,4.251]],["t/53",[8,0.532,10,0.635,11,0.635,12,0.784,15,0.562,21,1.017,29,4.229,30,0.83,38,1.661,44,1.427,58,2.876,90,1.751,145,2.201,159,2.514,376,2.944,536,2.944,565,4.226,566,5.522,567,5.493,568,3.237,569,4.226,570,5.522,571,4.743,572,4.226,573,3.63]],["t/55",[8,0.571,10,0.708,11,0.708,12,0.669,15,0.544,21,1.021,30,0.89,44,1.591,58,2.455,147,4.125,263,3.283,567,5.203,571,5.086,573,4.048,574,4.713,575,5.922,576,5.086,577,4.713,578,4.713]],["t/57",[8,0.353,10,0.358,11,0.358,12,0.338,15,0.581,21,0.815,23,0.936,30,0.551,31,0.661,44,1.83,47,1.518,63,1.24,85,1.658,119,1.796,142,2.036,175,1.041,178,2.553,185,1.852,287,3.839,510,2.045,579,5.02,580,3.665,581,1.823,582,2.381,583,5.02,584,5.02,585,2.045,586,3.665,587,2.381,588,2.381,589,2.381,590,4.152,591,2.381,592,1.823,593,2.381,594,2.381,595,2.381,596,2.045,597,2.381,598,2.381,599,2.381,600,2.381,601,2.381,602,3.665,603,3.665,604,2.381,605,2.381,606,5.726,607,3.665,608,2.381,609,4.47,610,5.02,611,4.47,612,4.47,613,4.47,614,4.47,615,2.381,616,2.381,617,2.381,618,2.381,619,2.381,620,2.381,621,2.381,622,2.381,623,2.381,624,2.381,625,2.381,626,2.381,627,2.381,628,1.167,629,2.381,630,2.381,631,4.47,632,2.381,633,3.665,634,2.381,635,2.381,636,3.148,637,2.381]],["t/59",[0,0.654,8,0.453,10,0.5,11,0.5,12,0.472,15,0.576,17,0.76,21,0.5,30,0.706,31,1.303,38,1.308,83,2.318,119,2.665,175,1.455,238,2.858,312,2.895,339,2.549,340,2.858,638,4.531,639,3.595,640,5.073,641,2.858,642,2.858,643,3.328,644,3.328,645,3.328,646,3.328,647,3.328,648,5.907,649,3.328,650,3.328,651,3.328,652,3.328,653,5.073,654,3.328,655,3.328,656,3.328,657,3.328,658,3.328,659,3.328,660,3.328,661,2.549,662,2.858,663,2.549,664,4.694,665,3.328,666,2.858]],["t/61",[0,0.852,6,2.281,8,0.493,10,0.652,11,0.652,12,0.615,15,0.562,17,1.362,21,0.448,30,0.936,31,1.203,32,1.057,47,2.472,63,2.662,83,2.074,119,2.505,131,1.459,159,1.772,160,3.041,163,1.551,167,1.909,175,1.302,229,1.772,236,1.654,296,1.551,312,2.751,317,2.558,339,2.281,528,2.751,628,1.459,638,3.825,653,4.39,663,2.281,666,2.558,667,2.978,668,2.978,669,5.348,670,2.978,671,2.978,672,2.978,673,2.978,674,5.111,675,2.074,676,1.772,677,2.978,678,2.978,679,3.723,680,2.558,681,2.558,682,2.558,683,2.281,684,4.335,685,4.335,686,2.978,687,2.978,688,2.978,689,2.978,690,2.978,691,2.978]],["t/63",[0,0.867,8,0.425,10,0.459,11,0.459,12,0.626,15,0.575,17,1.184,18,4.877,19,1.816,21,0.997,29,3.38,30,0.906,31,1.577,44,1.75,58,2.699,75,3.61,86,3.944,87,2.338,90,1.264,98,2.338,99,2.126,100,3.073,101,2.829,102,2.621,119,2.163,139,1.956,236,1.695,373,2.621,376,2.126,395,2.338,692,3.052,693,4.413,694,3.052,695,3.052,696,3.052,697,4.413,698,4.413,699,4.413,700,4.413,701,4.413,702,3.052,703,4.413,704,4.413,705,3.052,706,3.052,707,3.052]],["t/66",[0,0.569,8,0.485,10,0.435,11,0.435,12,0.411,15,0.573,21,0.887,22,1.508,30,0.887,31,1.851,32,1.028,38,1.138,39,3.253,44,0.978,77,3.852,79,3.202,81,2.218,84,2.218,91,2.487,92,5.295,113,2.218,121,2.562,135,3.782,145,1.508,175,1.266,185,1.2,242,2.017,296,1.508,308,2.218,662,2.487,663,2.218,708,4.758,709,2.896,710,2.218,711,2.896,712,2.487,713,5.03,714,2.487,715,2.896,716,2.218,717,2.896,718,2.896,719,2.487,720,4.243,721,4.247,722,2.896,723,2.896,724,2.896,725,2.896,726,2.896,727,2.896,728,5.03,729,2.896,730,2.896]],["t/68",[8,0.583,10,0.732,11,0.732,12,0.691,15,0.556,21,0.732,23,1.914,30,0.988,31,1.678,38,1.914,79,2.386,731,4.869,732,6.043,733,7.201,734,4.869]],["t/70",[8,0.422,10,0.453,11,0.453,12,0.621,15,0.581,17,1.175,19,1.793,21,0.657,23,1.719,28,2.804,30,0.774,31,1.567,32,1.552,38,1.185,139,1.932,175,1.318,185,1.249,296,3.122,297,3.843,411,1.57,415,2.1,638,3.843,639,2.309,640,2.589,642,2.589,661,2.309,669,2.589,716,2.309,720,3.942,735,3.014,736,2.589,737,2.589,738,3.014,739,2.309,740,4.373,741,2.589,742,4.849,743,4.849,744,3.756,745,4.849,746,5.147,747,4.849,748,2.589,749,3.014,750,3.014]],["t/72",[0,1.093,15,0.424,25,2.064,90,1.437,134,2.657,164,2.064,178,2.416,189,2.98,242,2.416,362,4.151,449,2.657,533,4.151,536,2.416,639,3.702,676,2.064,712,2.98,739,2.657,751,4.151,752,6.72,753,4.833,754,4.833,755,3.469,756,3.469,757,6.325,758,2.98,759,3.469,760,3.469,761,4.833,762,2.98,763,3.469,764,3.469,765,4.151,766,3.469,767,3.469,768,4.833,769,3.469,770,3.469,771,3.469,772,3.469,773,3.469,774,3.469,775,3.469,776,3.469,777,3.469,778,3.469,779,3.469,780,4.833,781,3.469,782,3.469,783,2.416,784,2.657,785,2.98,786,3.469,787,3.469,788,3.469,789,2.98,790,3.469,791,3.469,792,3.469,793,3.469,794,2.98,795,3.469,796,3.469,797,3.469,798,3.469,799,3.469,800,3.469,801,3.469]],["t/74",[0,0.527,8,0.387,10,0.404,11,0.404,12,0.57,15,0.58,17,1.305,21,0.604,22,1.398,23,1.055,27,1.491,30,0.723,31,1.775,32,1.425,38,1.055,126,1.968,177,4.132,181,3.684,185,1.112,186,3.568,288,3.449,296,3.124,297,3.845,355,3.684,411,2.781,449,2.056,490,2.306,568,2.056,590,2.056,638,1.721,661,2.056,716,2.056,720,4.089,736,2.306,737,2.306,741,2.306,742,4.132,743,3.449,744,4.132,745,3.449,747,4.909,748,2.306,802,4.015,803,2.684,804,5.339,805,2.684,806,2.684,807,2.684,808,2.684,809,2.684,810,2.306,811,2.684]],["t/76",[0,1.058,8,0.633,10,0.612,11,0.612,15,0.509,17,1.111,21,0.411,25,2.422,30,0.612,41,1.904,59,3.693,60,1.34,90,1.133,125,1.34,126,1.34,131,1.34,144,2.383,145,2.12,149,1.753,155,2.348,158,2.094,159,1.627,162,3,165,2.701,166,1.904,167,1.753,185,1.686,186,1.627,214,2.094,229,1.627,251,1.904,303,1.519,314,2.348,332,2.094,417,1.904,458,1.753,528,3.276,581,2.094,636,2.348,638,3.454,675,3.753,676,3.205,710,2.094,783,1.904,784,2.094,812,2.734,813,2.734,814,1.627,815,2.734,816,2.734,817,2.734,818,2.734,819,2.734,820,2.734,821,4.177,822,2.734,823,2.348,824,2.734,825,2.734,826,4.071,827,2.734,828,2.734,829,2.348,830,2.734,831,4.177,832,2.734,833,2.734,834,2.094,835,2.734,836,4.071,837,2.734,838,4.071,839,2.348,840,2.734,841,2.734,842,2.094,843,3.118,844,4.071,845,2.734,846,2.348,847,2.348,848,2.734]],["t/78",[0,1.431,4,3.498,15,0.549,125,2.238,144,2.845,186,4.215,821,6.086,823,5.768,849,5.805,850,4.567,851,4.567,852,4.567,853,4.567]],["t/81",[0,0.773,8,0.508,12,0.558,15,0.504,27,2.924,30,0.591,32,2.345,79,2.58,82,4.522,131,1.927,160,2.34,162,2.742,168,3.378,224,2.34,463,3.378,758,3.378,834,3.012,843,4.033,854,3.933,855,3.933,856,3.933,857,5.936,858,5.936,859,5.936,860,3.933,861,5.265,862,3.933,863,3.933,864,3.933,865,3.933,866,3.933,867,3.933,868,3.933,869,3.933,870,3.933,871,3.933,872,3.933,873,5.265,874,5.936,875,3.933,876,3.933,877,3.933,878,3.933]],["t/83",[879,6.026,880,6.026]],["t/85",[8,0.533,9,2.29,47,2.29,142,3.07,145,2.879,146,2.556,256,3.544,515,2.879,528,2.709,581,4.234,628,2.709,814,3.882]],["t/87",[0,0.666,8,0.53,10,0.715,11,0.715,15,0.562,17,0.774,21,0.826,30,0.943,32,1.949,44,1.605,46,4.717,131,2.33,141,4.084,162,1.765,163,1.765,165,2.641,166,2.361,167,2.173,236,1.882,458,2.173,515,3.477,528,2.692,628,1.661,675,2.361,676,2.016,881,3.389,882,5.493,883,6.271,884,6.271,885,5.954,886,5.954,887,5.954,888,3.389,889,3.389,890,3.389,891,3.389]],["t/89",[0,0.62,8,0.436,10,0.68,11,0.68,12,0.75,15,0.564,17,1.206,21,0.68,30,0.867,31,1.466,38,1.241,47,2.188,63,1.644,73,2.024,108,1.878,121,1.46,126,1.547,185,1.873,210,2.711,290,2.418,296,3.179,333,2.711,411,1.644,515,1.644,528,2.216,628,1.547,641,2.711,675,2.199,676,2.69,680,3.883,681,2.711,682,3.883,683,3.463,783,2.199,892,3.157,893,3.157,894,3.157,895,3.157,896,3.157,897,3.157,898,3.157,899,3.157,900,5.282,901,4.521,902,3.157,903,4.521,904,3.157,905,3.157,906,4.521,907,3.157,908,3.157,909,2.711,910,3.157,911,3.157,912,3.157,913,3.157,914,3.157,915,3.157,916,3.157,917,3.157,918,3.157,919,3.157,920,3.157,921,3.157]],["t/91",[0,0.95,8,0.58,47,2.004,73,3.101,126,2.371,144,2.371,145,2.519,159,2.878,163,2.519,217,4.155,242,3.369,303,2.687,363,4.155,393,3.705,515,2.519,528,2.371,535,5.169,628,2.371,762,4.155,765,4.155,785,5.169,814,2.878,922,6.019,923,4.837,924,4.155,925,6.019,926,4.837]],["t/93",[0,1.032,8,0.506,32,2.246,144,2.574,160,3.124,163,2.735,303,2.917,466,4.511,527,4.022,679,4.511,783,3.658,794,4.511,814,3.124,924,4.511,927,5.252,928,5.252,929,5.252,930,5.252,931,5.252]],["t/95",[8,0.278,9,1.195,10,0.434,11,0.434,12,0.601,15,0.576,17,0.967,21,0.925,30,0.434,60,2.075,73,1.849,99,2.009,101,1.849,108,1.716,116,2.477,125,2.075,126,1.414,142,1.602,144,2.075,146,1.334,149,1.849,167,1.849,200,2.209,250,2.477,261,2.209,269,2.477,286,3.637,372,2.477,411,1.502,527,2.209,590,4.235,814,1.716,842,2.209,932,5.058,933,2.884,934,2.884,935,6.527,936,6.527,937,4.235,938,6.527,939,4.235,940,5.018,941,2.884,942,2.884,943,2.884,944,2.884,945,2.884,946,2.884,947,2.884,948,5.018,949,4.235,950,2.477,951,5.018,952,2.884,953,2.884]],["t/97",[0,1.062,47,2.24,145,2.815,146,2.5,515,2.815,814,3.831,954,5.406,955,5.269,956,5.406,957,5.406,958,5.406,959,5.406,960,5.406]],["t/99",[0,0.675,8,0.534,10,0.517,11,0.517,12,0.85,15,0.578,20,4.239,21,0.832,30,0.832,31,1.813,32,1.704,38,1.351,44,1.16,63,1.79,121,2.559,135,3.841,139,3.841,175,2.42,312,3.2,515,2.882,522,2.952,628,1.684,708,5.145,955,3.678,961,3.437,962,3.437,963,4.801,964,3.437,965,4.801]],["t/101",[0,0.663,8,0.528,10,0.507,11,0.507,12,0.778,15,0.578,21,0.824,23,1.863,30,0.893,31,1.851,38,2.153,44,1.139,47,2.27,63,1.757,121,2.748,175,2.073,312,2.912,628,1.653,739,2.584,955,3.63,966,5.942,967,5.479,968,3.374,969,3.374,970,3.374,971,5.479,972,4.74,973,5.479,974,3.374,975,3.374,976,5.479,977,3.374]],["t/103",[8,0.651,146,3.246,978,5.178,979,5.178,980,5.178,981,5.178,982,6.275,983,5.178,984,5.178,985,5.178,986,5.178,987,5.178,988,5.178,989,5.178,990,5.178,991,5.178]],["t/105",[8,0.412,9,1.771,10,0.643,11,0.643,12,0.964,15,0.548,20,4.737,21,0.836,30,0.836,32,1.517,44,1.443,58,2.227,63,2.227,119,3.523,142,3.09,200,3.275,229,2.543,365,3.672,515,3.221,628,2.095,992,6.185,993,4.275,994,5.564,995,4.275]],["t/107",[0,0.59,8,0.42,9,1.244,10,0.451,11,0.451,12,0.619,15,0.58,17,0.686,21,0.847,30,0.655,31,1.426,32,1.822,79,1.471,85,2.091,90,1.244,121,1.388,163,1.564,164,1.786,185,1.244,312,2.762,596,5.533,710,2.299,719,2.578,810,3.745,909,2.578,996,3.002,997,3.002,998,5.635,999,6.244,1000,3.002,1001,3.002,1002,3.002,1003,4.36,1004,4.36,1005,3.002,1006,3.002,1007,3.002,1008,4.36,1009,3.002,1010,3.002,1011,3.002,1012,3.002,1013,3.002,1014,3.002,1015,3.002,1016,3.002,1017,3.002,1018,4.36,1019,4.36,1020,4.36,1021,3.002,1022,3.002,1023,3.002,1024,3.002,1025,3.002,1026,3.002]],["t/110",[0,0.651,8,0.319,9,1.372,10,0.498,11,0.498,12,0.47,15,0.57,17,1.069,21,0.886,30,0.815,31,0.92,60,2.293,75,2.307,134,4.763,185,1.372,256,4.137,303,1.84,400,2.537,406,2.537,442,2.845,528,1.624,567,3.584,592,2.537,676,2.784,1027,3.313,1028,4.679,1029,3.313,1030,2.845,1031,3.313,1032,4.679,1033,4.679,1034,4.679,1035,5.425,1036,3.313,1037,3.313,1038,4.679,1039,3.313,1040,3.313,1041,5.425,1042,5.425,1043,3.313,1044,5.425,1045,3.313,1046,3.313,1047,3.313,1048,3.313,1049,3.313,1050,3.313,1051,3.313,1052,3.313]],["t/112",[5,3.231,8,0.244,9,1.047,10,0.38,11,0.38,12,0.359,15,0.564,17,0.577,19,2.76,21,0.778,30,0.881,38,2.394,90,1.047,93,3.296,98,1.936,99,1.761,100,2.673,119,1.239,124,2.171,125,1.239,130,1.936,144,1.239,145,1.316,183,2.171,248,1.761,249,3.296,256,4.381,263,1.761,290,1.936,303,1.404,400,1.936,405,2.171,411,3.053,476,1.936,536,1.761,568,1.936,576,3.296,592,1.936,683,1.936,714,3.296,789,2.171,829,2.171,831,2.171,932,2.171,950,3.296,1030,2.171,1053,3.837,1054,2.528,1055,4.639,1056,3.837,1057,2.528,1058,2.528,1059,2.528,1060,2.528,1061,4.639,1062,2.528,1063,2.528,1064,5.179,1065,2.528,1066,3.837,1067,4.639,1068,2.528,1069,2.528,1070,4.639,1071,2.528,1072,3.837,1073,2.528,1074,2.528,1075,2.528,1076,2.528,1077,2.528,1078,3.837,1079,2.528,1080,2.528,1081,2.528,1082,2.528,1083,2.528,1084,2.528,1085,2.528,1086,2.528,1087,2.528,1088,2.528,1089,2.528,1090,2.528,1091,2.528,1092,2.528,1093,2.528]],["t/114",[0,1.217,8,0.448,9,1.36,25,1.953,59,3.973,60,2.279,104,2.82,125,1.609,131,1.609,136,2.515,146,1.518,160,3.493,162,2.812,163,2.422,164,1.953,165,3.754,166,3.76,203,2.287,229,1.953,236,1.824,251,2.287,263,2.287,313,2.82,375,2.82,379,5.043,383,2.82,393,2.515,458,2.105,476,2.515,528,2.877,558,2.82,585,2.82,751,2.82,784,2.515,834,2.515,839,5.043,842,2.515,843,3.561,846,2.82,847,2.82,1094,3.283,1095,3.283,1096,3.283,1097,3.283,1098,3.283,1099,3.283,1100,3.283,1101,5.871,1102,3.283,1103,3.283,1104,3.283,1105,3.283,1106,3.283,1107,3.283,1108,3.283,1109,3.283,1110,3.283,1111,4.65,1112,3.283,1113,3.283,1114,3.283,1115,3.283,1116,3.283,1117,3.283,1118,3.283]]],"invertedIndex":[["",{"_index":15,"t":{"2":{"position":[[187,2],[199,2],[206,1],[232,1],[265,2],[289,1],[291,2],[328,1],[399,1],[439,1],[493,1],[548,1],[568,2],[579,1],[603,1],[631,1],[658,1],[664,1],[683,2],[693,1],[695,2]]},"4":{"position":[[144,2],[215,1],[255,1],[288,2],[307,2],[444,2],[477,2],[507,2],[510,3],[514,1],[534,1],[572,2],[575,4],[580,1],[628,1],[654,2],[728,1],[754,2],[757,3],[761,2]]},"6":{"position":[[17,1],[27,1],[71,2],[90,2],[107,1],[115,1],[131,1],[159,1],[429,2],[444,2],[454,1],[465,1],[481,1],[621,2],[638,1],[647,1],[763,1],[801,1],[816,1],[824,1],[834,1],[886,1],[901,1],[909,1],[963,1],[973,1],[1056,2],[1061,1],[1081,1],[1093,1],[1105,1],[1146,2],[1151,1],[1168,1],[1176,1],[1185,1],[1197,1],[1238,2],[1256,2],[1269,1],[1290,1],[1303,2],[1317,2],[1456,2],[1463,1],[1467,1],[1482,1],[1488,1]]},"8":{"position":[[170,1],[180,1],[240,2],[262,2],[274,2],[282,2],[293,2],[305,2],[313,2],[325,1],[329,1],[350,2],[356,4],[364,4],[884,1],[894,1],[963,2],[1018,1],[1020,1],[1027,2],[1038,1],[1043,1],[1056,2],[1077,1],[1079,2],[1183,1],[1193,1],[1285,2],[1314,2],[1320,1],[1389,1],[1396,2],[1408,1],[1412,1],[1417,1],[1427,2],[1459,1],[1461,2],[1525,1],[1535,1],[1603,2],[1621,1],[1631,2],[1659,1],[1679,1],[1690,1],[1731,1],[1787,1],[1818,1],[1873,1],[1905,1],[2131,2],[2201,1],[2314,3],[2324,2],[2339,1],[2341,2],[2344,1],[2473,4]]},"14":{"position":[[8,2],[31,2],[64,2],[78,2],[104,2]]},"16":{"position":[[16,2],[22,1]]},"18":{"position":[[307,1],[338,1],[375,1],[835,2],[841,1],[845,1],[859,1],[959,2],[965,1],[969,1],[989,2],[1017,1],[1058,2],[1071,2],[1078,1],[1084,1],[1112,1],[1189,2]]},"22":{"position":[[127,1],[232,2],[306,2]]},"26":{"position":[[8,2],[57,1],[59,1],[132,2]]},"28":{"position":[[42,1],[48,2],[77,1],[109,1],[134,2],[170,1],[192,1]]},"30":{"position":[[73,1],[120,1]]},"32":{"position":[[21,1],[100,1],[156,1],[192,1],[232,1],[340,2],[345,1],[349,1],[401,2],[438,2],[451,2],[459,1],[469,1],[473,1],[549,1],[614,2],[633,1],[701,1],[712,1],[723,1],[734,1],[745,1],[756,1],[767,1],[779,1],[791,1],[803,1],[815,1],[827,1],[838,1],[872,2],[883,1],[885,2],[898,2],[914,1],[916,2]]},"34":{"position":[[97,1],[288,1],[299,1],[305,1],[334,1],[347,1],[360,1],[373,1],[386,1],[399,1],[412,1],[425,1],[438,1],[451,1],[464,1],[477,1],[483,1],[532,1],[544,1],[558,1],[638,1],[660,1],[672,1],[685,2],[697,4],[705,2],[708,3]]},"41":{"position":[[121,2],[126,1],[147,2],[163,5],[172,1],[174,2],[185,5],[196,1],[198,2],[212,1],[231,5],[241,1],[243,2],[252,1],[274,1],[297,1],[320,1],[350,5],[360,1],[365,1],[367,2],[373,1],[384,5],[394,1],[399,1],[401,2],[407,1],[412,1],[492,5],[509,1],[511,2],[529,5],[551,1],[553,2],[565,1],[591,5],[617,2]]},"43":{"position":[[153,1],[184,2],[241,2],[263,2],[300,3],[330,2],[345,2]]},"45":{"position":[[78,1],[88,1],[154,2],[212,1],[496,1],[506,1],[568,2],[636,1],[696,1]]},"47":{"position":[[63,1],[75,1],[123,1],[264,1],[321,2],[348,2],[376,2],[395,2],[408,1],[417,1],[426,1],[435,1],[455,1],[599,1],[627,1],[670,1],[772,2],[796,3],[800,2],[863,3],[867,2],[901,3],[905,2],[917,3],[921,2],[955,3],[959,2],[965,1],[1083,3],[1120,1],[1122,2]]},"49":{"position":[[319,1],[331,1],[346,2],[371,2],[399,2],[411,2]]},"51":{"position":[[67,1],[77,1],[136,2],[159,2],[169,1],[171,1],[178,2],[197,1],[214,1],[234,2],[253,2],[263,2],[266,2],[287,2]]},"53":{"position":[[64,2],[103,1],[110,2],[125,2],[142,2],[209,1],[226,2],[263,2],[279,1],[296,2],[327,2]]},"55":{"position":[[64,2],[103,1],[110,2],[154,2],[196,2],[232,2]]},"57":{"position":[[163,1],[238,1],[254,1],[292,1],[309,1],[330,1],[458,2],[464,1],[498,2],[517,1],[537,2],[545,1],[563,2],[571,1],[589,2],[597,1],[615,2],[623,1],[641,2],[688,1],[690,1],[697,2],[742,1],[744,1],[751,2],[795,1],[797,1],[804,2],[849,1],[851,1],[858,2],[871,1],[892,1],[913,1],[934,1],[952,1],[980,1],[992,1],[1004,1],[1006,1],[1039,1],[1043,1],[1061,1],[1109,2],[1117,1],[1176,1],[1232,2],[1276,2],[1290,1],[1302,1],[1330,2],[1341,1],[1350,1]]},"59":{"position":[[244,1],[269,1],[278,1],[288,1],[297,1],[379,1],[480,2],[492,2],[517,2],[527,1],[535,1],[541,1],[550,1],[560,1],[569,1],[575,1],[585,1],[600,1],[614,1],[621,1],[629,1],[648,1],[652,1],[665,2],[674,1],[676,2]]},"61":{"position":[[347,2],[480,2],[490,2],[548,2],[576,2],[586,2],[610,2],[629,2],[636,1],[646,1],[655,1],[661,1],[669,1],[682,1],[696,1],[703,1],[709,1],[739,1],[743,1],[892,2],[905,2]]},"63":{"position":[[145,2],[182,2],[202,2],[209,1],[256,1],[263,2],[276,1],[285,1],[289,1],[302,2],[409,2],[449,1],[492,1],[494,1],[501,2],[522,2],[563,1],[606,1],[608,1],[615,2],[635,1],[651,1],[657,1],[664,1],[711,1],[713,2],[720,1],[815,1],[817,2]]},"66":{"position":[[42,1],[52,1],[109,2],[130,1],[140,2],[150,1],[152,1],[159,2],[174,1],[192,1],[201,1],[218,2],[228,2],[231,1],[233,2],[331,1],[344,1],[403,1],[439,1],[506,1],[535,1],[602,2],[611,1],[664,2],[679,1],[713,2],[725,1],[737,1],[911,1],[920,1]]},"68":{"position":[[73,2],[84,1],[102,2],[128,2],[145,2],[163,1],[169,1]]},"70":{"position":[[35,1],[71,1],[106,1],[193,2],[206,1],[221,2],[229,1],[240,2],[248,1],[259,2],[273,1],[310,2],[327,1],[336,1],[343,2],[358,1],[365,1],[386,1],[447,1],[454,1],[458,1],[477,1],[481,1],[504,1],[508,2],[530,1],[543,1],[567,1],[579,1],[592,1],[610,2],[619,1],[621,2],[635,2],[657,1],[659,2],[673,1]]},"72":{"position":[[313,1],[381,1],[504,1]]},"74":{"position":[[121,1],[123,1],[137,1],[139,1],[237,1],[429,2],[442,1],[457,2],[470,2],[478,1],[490,2],[498,1],[509,2],[517,1],[529,2],[537,1],[551,2],[568,1],[577,1],[638,1],[645,1],[649,1],[668,1],[675,1],[679,1],[702,1],[706,1],[710,1],[714,1],[735,1],[748,1],[773,2],[780,1],[782,2],[789,1],[802,1],[820,2],[839,1],[841,2],[852,1],[865,1],[877,1],[894,1]]},"76":{"position":[[267,2],[273,1],[310,2],[315,1],[478,2],[485,1],[502,1],[520,2],[529,1],[531,2]]},"78":{"position":[[45,2],[102,1],[130,1],[186,1],[214,1],[262,1],[277,2]]},"81":{"position":[[453,2],[460,1],[471,1],[476,2],[596,1]]},"87":{"position":[[111,2],[143,2],[242,1],[244,1],[251,2],[284,1],[286,1],[293,2],[361,1],[370,1],[436,2],[447,1],[449,1],[451,2],[462,1],[464,1],[466,2]]},"89":{"position":[[72,1],[82,1],[217,2],[226,1],[237,2],[299,2],[309,2],[321,1],[352,2],[382,2],[397,1],[424,1],[438,1],[443,1],[447,1],[471,2],[606,2],[619,2],[629,1],[642,1]]},"95":{"position":[[119,2],[142,2],[179,2],[220,2],[230,1],[236,1],[263,2],[282,1],[332,1],[375,1],[381,1],[413,1],[424,1],[436,2],[443,1],[474,2],[481,1],[483,2],[495,2],[502,1],[504,2],[516,2],[523,1],[525,2],[531,1],[557,2],[586,2],[614,2],[653,2],[675,1],[767,1],[798,1],[834,2]]},"99":{"position":[[80,1],[102,1],[104,1],[116,2],[121,1],[126,1],[128,1],[130,1],[132,1],[138,1],[193,2],[216,2],[278,1],[280,1],[287,2],[332,2],[342,2],[345,1],[347,2],[428,2],[454,2],[472,2],[485,2],[528,1],[532,1],[550,1]]},"101":{"position":[[83,1],[102,1],[109,1],[113,1],[120,1],[124,1],[131,1],[140,1],[155,1],[208,2],[224,2],[293,1],[295,1],[302,2],[314,1],[329,2],[343,2],[346,1],[348,2],[447,2],[460,2],[476,1],[493,1],[512,1],[542,2],[560,1],[576,1]]},"105":{"position":[[155,1],[162,2],[192,2],[208,2],[271,2],[295,1],[301,1],[307,1]]},"107":{"position":[[181,2],[186,1],[214,2],[271,2],[279,1],[333,2],[358,2],[372,1],[374,2],[388,1],[390,2],[429,1],[453,1],[465,1],[494,1],[506,1],[552,2],[567,1],[569,2],[608,2],[617,1],[619,2],[633,2],[655,1],[657,2],[671,1],[677,1],[682,1],[691,1],[708,1],[742,1],[755,1],[774,1],[781,1],[802,1],[822,1]]},"110":{"position":[[60,1],[118,2],[137,1],[210,1],[247,2],[269,2],[322,1],[426,1],[445,1],[478,1],[485,1],[511,1],[562,1],[579,2],[592,2],[620,2],[635,2],[665,2],[674,2],[714,1],[773,2],[785,2]]},"112":{"position":[[82,1],[113,2],[131,2],[184,1],[237,2],[266,2],[277,1],[357,2],[385,2],[398,1],[471,1],[503,1],[613,2],[642,1],[739,1],[790,1],[818,1],[946,1],[1032,2],[1045,2],[1102,2],[1113,2],[1195,2],[1220,2],[1266,2],[1315,1],[1347,1],[1374,1]]}}}],["0",{"_index":38,"t":{"2":{"position":[[571,2]]},"12":{"position":[[22,2]]},"51":{"position":[[199,2]]},"53":{"position":[[128,2]]},"59":{"position":[[537,1]]},"66":{"position":[[681,2]]},"68":{"position":[[131,2]]},"70":{"position":[[329,1]]},"74":{"position":[[570,1]]},"89":{"position":[[631,2]]},"99":{"position":[[140,1]]},"101":{"position":[[111,1],[316,2],[578,1]]},"112":{"position":[[291,1],[779,2],[782,2],[926,2],[929,2],[1443,2],[1446,2]]}}}],["0.0",{"_index":19,"t":{"2":{"position":[[208,4]]},"32":{"position":[[725,3]]},"34":{"position":[[301,3],[375,3],[560,3]]},"63":{"position":[[211,3]]},"70":{"position":[[275,4]]},"112":{"position":[[769,4],[916,4],[1433,4]]}}}],["0.0_dp",{"_index":610,"t":{"57":{"position":[[547,6],[573,6],[599,6],[625,6]]}}}],["0.0d0",{"_index":1006,"t":{"107":{"position":[[281,5]]}}}],["0.3142e+01",{"_index":213,"t":{"8":{"position":[[2093,10]]}}}],["0.5",{"_index":663,"t":{"59":{"position":[[571,3]]},"61":{"position":[[657,3]]},"66":{"position":[[441,4]]}}}],["0.939146996",{"_index":1023,"t":{"107":{"position":[[757,11]]}}}],["001234",{"_index":209,"t":{"8":{"position":[[2034,6]]}}}],["005",{"_index":1026,"t":{"107":{"position":[[845,3]]}}}],["01_add.f90",{"_index":161,"t":{"8":{"position":[[706,11],[771,10]]}}}],["09",{"_index":1022,"t":{"107":{"position":[[739,2]]}}}],["1",{"_index":31,"t":{"2":{"position":[[441,2]]},"6":{"position":[[117,2],[161,2],[467,2],[483,2],[649,2],[818,1],[882,3],[903,1],[1117,3],[1209,3],[1292,2],[1465,1],[1484,1],[1486,1],[1490,1],[1492,1]]},"18":{"position":[[93,2],[132,2],[290,2],[304,2],[1080,1]]},"32":{"position":[[461,2],[471,1],[635,1]]},"34":{"position":[[534,2],[546,2],[662,2],[674,2]]},"45":{"position":[[214,2],[638,2],[698,2]]},"47":{"position":[[892,3]]},"57":{"position":[[311,2]]},"59":{"position":[[602,2],[607,1]]},"61":{"position":[[684,2],[689,1]]},"63":{"position":[[287,1],[451,2],[565,2],[637,2]]},"66":{"position":[[132,1],[176,2],[333,2],[405,2],[508,2],[613,2],[727,2],[739,2],[913,2]]},"68":{"position":[[86,1],[171,1]]},"70":{"position":[[128,3],[388,2],[545,2],[670,2]]},"74":{"position":[[125,2],[128,2],[141,2],[144,3],[210,1],[579,2],[716,2],[750,2]]},"89":{"position":[[426,2],[440,2],[445,1]]},"99":{"position":[[111,2],[119,1],[134,1],[488,2],[513,2],[552,1]]},"101":{"position":[[122,1],[137,2],[157,1],[478,2],[509,2],[545,2],[562,1]]},"107":{"position":[[455,2],[673,3],[684,2]]},"110":{"position":[[428,2]]}}}],["1.0",{"_index":411,"t":{"32":{"position":[[714,3],[736,3]]},"34":{"position":[[290,3],[401,3],[427,3]]},"41":{"position":[[214,5]]},"70":{"position":[[231,3]]},"74":{"position":[[481,3],[500,3],[520,3],[539,3]]},"89":{"position":[[729,3]]},"95":{"position":[[232,3]]},"112":{"position":[[764,4],[774,4],[911,4],[921,4],[1428,4],[1438,4]]}}}],["1.0d0",{"_index":1016,"t":{"107":{"position":[[508,6]]}}}],["1.234728",{"_index":196,"t":{"8":{"position":[[1681,8]]}}}],["1.2e2",{"_index":239,"t":{"12":{"position":[[50,6]]}}}],["1.4e4",{"_index":369,"t":{"28":{"position":[[35,6]]}}}],["1.5i",{"_index":247,"t":{"12":{"position":[[120,5]]}}}],["1.8448319779454493e",{"_index":1025,"t":{"107":{"position":[[825,19]]}}}],["10",{"_index":79,"t":{"6":{"position":[[120,2],[164,2],[470,4],[652,4]]},"12":{"position":[[25,3]]},"18":{"position":[[174,4],[211,4],[257,4]]},"28":{"position":[[252,2]]},"45":{"position":[[217,2],[641,2],[701,2]]},"66":{"position":[[341,2],[408,2],[511,2],[616,3],[684,3],[730,4],[742,3],[916,3]]},"68":{"position":[[105,3]]},"81":{"position":[[372,3],[422,2]]},"107":{"position":[[736,2]]}}}],["10**i",{"_index":907,"t":{"89":{"position":[[644,5]]}}}],["10.0",{"_index":911,"t":{"89":{"position":[[740,4]]}}}],["100",{"_index":662,"t":{"59":{"position":[[529,3]]},"66":{"position":[[336,4]]}}}],["100.0",{"_index":913,"t":{"89":{"position":[[752,5]]}}}],["1000",{"_index":627,"t":{"57":{"position":[[1119,6]]}}}],["1000.0",{"_index":915,"t":{"89":{"position":[[765,6]]}}}],["10000.0",{"_index":917,"t":{"89":{"position":[[779,7]]}}}],["100000.0",{"_index":919,"t":{"89":{"position":[[794,8]]}}}],["1000000",{"_index":741,"t":{"70":{"position":[[208,7]]},"74":{"position":[[444,7]]}}}],["10000000",{"_index":1001,"t":{"107":{"position":[[188,8]]}}}],["10^(12",{"_index":300,"t":{"18":{"position":[[1134,7],[1145,7]]}}}],["118.40",{"_index":600,"t":{"57":{"position":[[368,8]]}}}],["11_circ_area.f90",{"_index":836,"t":{"76":{"position":[[956,16],[1417,16]]}}}],["11_const_module.f90",{"_index":835,"t":{"76":{"position":[[927,19]]}}}],["11_const_module.o",{"_index":837,"t":{"76":{"position":[[973,17]]}}}],["12",{"_index":370,"t":{"28":{"position":[[51,2],[71,3]]}}}],["1234",{"_index":206,"t":{"8":{"position":[[1973,4],[1978,4],[2000,4],[2005,4],[2029,4]]}}}],["12_add.f90",{"_index":890,"t":{"87":{"position":[[738,10]]}}}],["12_add_module.f90",{"_index":889,"t":{"87":{"position":[[711,17]]}}}],["12_add_module.o",{"_index":891,"t":{"87":{"position":[[749,15]]}}}],["13",{"_index":377,"t":{"28":{"position":[[255,2]]}}}],["16",{"_index":262,"t":{"18":{"position":[[106,3],[145,3],[179,3],[216,3],[262,3]]}}}],["16_hypotenuse_program.f90",{"_index":529,"t":{"47":{"position":[[681,25],[1186,25]]}}}],["16_hypotenuse_subroutine.f90",{"_index":516,"t":{"47":{"position":[[161,28],[540,28],[641,28]]}}}],["16_hypotenuse_subroutine.o",{"_index":530,"t":{"47":{"position":[[707,26],[1212,26]]}}}],["18",{"_index":570,"t":{"53":{"position":[[211,3],[266,2]]}}}],["2",{"_index":23,"t":{"2":{"position":[[330,2],[384,1]]},"6":{"position":[[777,2],[793,3],[826,1],[848,2],[864,3],[905,1],[1075,2],[1143,2],[1165,2],[1235,2],[1295,1],[1453,2]]},"8":{"position":[[1410,1],[1892,1]]},"12":{"position":[[19,2],[62,2]]},"18":{"position":[[96,2],[135,2]]},"28":{"position":[[189,2]]},"32":{"position":[[624,2]]},"47":{"position":[[946,3]]},"57":{"position":[[1041,1]]},"68":{"position":[[125,2]]},"70":{"position":[[346,1],[511,2]]},"74":{"position":[[111,1]]},"101":{"position":[[146,2],[528,2]]}}}],["2(i4",{"_index":371,"t":{"28":{"position":[[60,10]]}}}],["2.0",{"_index":246,"t":{"12":{"position":[[114,3]]},"32":{"position":[[703,3]]},"34":{"position":[[336,3]]},"41":{"position":[[128,5]]}}}],["2.0000",{"_index":910,"t":{"89":{"position":[[733,6]]}}}],["2.2",{"_index":943,"t":{"95":{"position":[[377,3]]}}}],["2.3d",{"_index":240,"t":{"12":{"position":[[57,4]]}}}],["2.54",{"_index":174,"t":{"8":{"position":[[1045,4]]}}}],["2.5937",{"_index":912,"t":{"89":{"position":[[745,6]]}}}],["2.7048",{"_index":914,"t":{"89":{"position":[[758,6]]}}}],["2.7171",{"_index":916,"t":{"89":{"position":[[772,6]]}}}],["2.71828182",{"_index":824,"t":{"76":{"position":[[317,10]]}}}],["2.7186",{"_index":918,"t":{"89":{"position":[[787,6]]}}}],["2.7220",{"_index":920,"t":{"89":{"position":[[803,6]]}}}],["200",{"_index":292,"t":{"18":{"position":[[942,6]]}}}],["2008",{"_index":983,"t":{"103":{"position":[[64,4]]}}}],["2022",{"_index":1021,"t":{"107":{"position":[[731,4]]}}}],["20a",{"_index":870,"t":{"81":{"position":[[479,4]]}}}],["25",{"_index":192,"t":{"8":{"position":[[1623,2]]}}}],["255",{"_index":1064,"t":{"112":{"position":[[293,3],[785,4],[932,4],[1449,4]]}}}],["256",{"_index":228,"t":{"8":{"position":[[2389,3]]}}}],["27.0",{"_index":750,"t":{"70":{"position":[[662,5]]}}}],["2889.6612",{"_index":601,"t":{"57":{"position":[[386,9]]}}}],["29_mpi_hello_world.f90",{"_index":873,"t":{"81":{"position":[[547,22],[639,22]]}}}],["29_mpi_hello_world.out",{"_index":874,"t":{"81":{"position":[[573,22],[665,22],[728,24]]}}}],["2i4",{"_index":372,"t":{"28":{"position":[[101,7]]},"95":{"position":[[739,8]]}}}],["3",{"_index":28,"t":{"2":{"position":[[419,2]]},"6":{"position":[[780,2],[797,3],[820,1],[851,2],[868,3],[907,1],[1053,2],[1078,2],[1170,2]]},"28":{"position":[[281,2]]},"32":{"position":[[347,1]]},"70":{"position":[[132,2],[675,1]]}}}],["3.0",{"_index":415,"t":{"32":{"position":[[747,3]]},"34":{"position":[[349,3]]},"41":{"position":[[134,4]]},"70":{"position":[[250,3]]}}}],["3.14",{"_index":238,"t":{"12":{"position":[[44,5]]},"59":{"position":[[543,4]]}}}],["3.14159",{"_index":187,"t":{"8":{"position":[[1322,7]]},"16":{"position":[[24,7]]},"41":{"position":[[265,8],[311,8]]}}}],["3.14159265",{"_index":822,"t":{"76":{"position":[[275,10]]}}}],["3.1416",{"_index":211,"t":{"8":{"position":[[2063,6]]}}}],["3.5",{"_index":368,"t":{"28":{"position":[[30,4]]}}}],["4",{"_index":27,"t":{"2":{"position":[[417,1]]},"6":{"position":[[783,2],[828,1],[854,2],[911,1],[1083,2],[1173,2]]},"8":{"position":[[1747,1],[1826,1]]},"18":{"position":[[99,2],[119,3],[138,2],[158,3],[168,2],[192,3],[205,2],[229,3],[251,2],[293,1],[843,1],[967,1]]},"22":{"position":[[199,2]]},"74":{"position":[[239,1]]},"81":{"position":[[701,1],[726,1]]}}}],["4.0",{"_index":449,"t":{"34":{"position":[[388,3],[414,3],[440,3]]},"72":{"position":[[59,3]]},"74":{"position":[[785,3]]}}}],["4.9",{"_index":323,"t":{"22":{"position":[[152,5],[193,5]]}}}],["45",{"_index":635,"t":{"57":{"position":[[1304,2]]}}}],["5",{"_index":108,"t":{"6":{"position":[[786,2],[822,1],[857,2],[913,1],[1086,2],[1178,2]]},"22":{"position":[[158,1]]},"28":{"position":[[284,1]]},"45":{"position":[[309,2]]},"89":{"position":[[228,1]]},"95":{"position":[[415,1]]}}}],["5.0",{"_index":417,"t":{"32":{"position":[[758,3]]},"34":{"position":[[453,3]]},"41":{"position":[[220,4]]},"76":{"position":[[487,4]]}}}],["50000.0",{"_index":1051,"t":{"110":{"position":[[758,8]]}}}],["6",{"_index":109,"t":{"6":{"position":[[789,3],[830,1],[860,3],[915,1],[1089,3],[1181,3]]},"8":{"position":[[1806,1]]},"45":{"position":[[316,1]]}}}],["6.0",{"_index":457,"t":{"34":{"position":[[479,3]]}}}],["6.3781d6",{"_index":608,"t":{"57":{"position":[[519,8]]}}}],["63",{"_index":232,"t":{"10":{"position":[[34,2]]}}}],["65",{"_index":572,"t":{"53":{"position":[[281,3]]}}}],["76.0",{"_index":1044,"t":{"110":{"position":[[480,4],[540,5],[752,5]]}}}],["8",{"_index":261,"t":{"18":{"position":[[102,3],[141,3],[171,2],[208,2],[254,2],[275,3],[365,1],[399,1]]},"28":{"position":[[75,1]]},"95":{"position":[[426,1]]}}}],["86.67",{"_index":598,"t":{"57":{"position":[[349,7]]}}}],["9.0",{"_index":446,"t":{"34":{"position":[[362,3],[466,3]]}}}],["99",{"_index":540,"t":{"47":{"position":[[1087,3],[1098,2]]}}}],["9999816.5167837571",{"_index":1024,"t":{"107":{"position":[[783,18]]}}}],["a(1,1",{"_index":443,"t":{"34":{"position":[[327,6]]}}}],["a(1,2",{"_index":444,"t":{"34":{"position":[[340,6]]}}}],["a(1,3",{"_index":445,"t":{"34":{"position":[[353,6]]}}}],["a(2,1",{"_index":447,"t":{"34":{"position":[[366,6]]}}}],["a(2,2",{"_index":448,"t":{"34":{"position":[[379,6]]}}}],["a(2,3",{"_index":450,"t":{"34":{"position":[[392,6]]}}}],["a(i",{"_index":699,"t":{"63":{"position":[[504,4],[659,4]]}}}],["a(m,k",{"_index":439,"t":{"34":{"position":[[259,7]]}}}],["a)/nh=(b−a)/n",{"_index":651,"t":{"59":{"position":[[169,14]]}}}],["a,/,a",{"_index":24,"t":{"2":{"position":[[344,10]]}}}],["a,f12.4,a",{"_index":626,"t":{"57":{"position":[[1083,14]]}}}],["a,f8.4",{"_index":701,"t":{"63":{"position":[[684,11],[768,11]]}}}],["a,i4,a",{"_index":698,"t":{"63":{"position":[[467,13],[581,13]]}}}],["a.out",{"_index":166,"t":{"8":{"position":[[782,7]]},"76":{"position":[[991,7]]},"87":{"position":[[765,7]]},"114":{"position":[[589,5],[663,7],[745,6]]}}}],["a128",{"_index":61,"t":{"4":{"position":[[222,12]]}}}],["a=0.0",{"_index":689,"t":{"61":{"position":[[922,6]]}}}],["ab",{"_index":471,"t":{"41":{"position":[[191,4]]}}}],["abov",{"_index":159,"t":{"8":{"position":[[678,5]]},"45":{"position":[[460,5]]},"53":{"position":[[409,5]]},"61":{"position":[[23,5]]},"76":{"position":[[389,5]]},"91":{"position":[[182,5]]}}}],["abs(1.0",{"_index":811,"t":{"74":{"position":[[844,7]]}}}],["abs(x",{"_index":316,"t":{"22":{"position":[[22,6]]}}}],["abs_path",{"_index":56,"t":{"4":{"position":[[159,9],[246,8],[310,8]]}}}],["absolut",{"_index":50,"t":{"4":{"position":[[49,8],[291,9]]},"22":{"position":[[29,8]]}}}],["access",{"_index":831,"t":{"76":{"position":[[666,10],[724,10],[830,10]]},"112":{"position":[[948,9]]}}}],["accuraci",{"_index":1020,"t":{"107":{"position":[[646,8],[813,8]]}}}],["aco",{"_index":347,"t":{"24":{"position":[[99,4]]}}}],["adapt",{"_index":771,"t":{"72":{"position":[[375,5]]}}}],["add",{"_index":141,"t":{"8":{"position":[[182,3],[214,3],[388,3]]},"87":{"position":[[571,3],[674,3]]}}}],["add_modul",{"_index":882,"t":{"87":{"position":[[73,10],[514,10],[579,10]]}}}],["add_numb",{"_index":886,"t":{"87":{"position":[[159,12],[341,13],[394,11],[628,13]]}}}],["adult",{"_index":571,"t":{"53":{"position":[[242,7],[308,7]]},"55":{"position":[[170,7],[208,7]]}}}],["advance='no",{"_index":188,"t":{"8":{"position":[[1346,13]]}}}],["ag",{"_index":567,"t":{"53":{"position":[[67,3],[98,4],[113,3],[120,4],[185,5],[204,4],[258,4],[275,3]]},"55":{"position":[[67,3],[98,4],[113,3],[129,5]]},"110":{"position":[[197,3],[668,5]]}}}],["age_group",{"_index":566,"t":{"53":{"position":[[32,9],[367,9]]}}}],["age_select",{"_index":575,"t":{"55":{"position":[[31,10],[276,10]]}}}],["albert",{"_index":1041,"t":{"110":{"position":[[447,7],[521,7],[733,7]]}}}],["alia",{"_index":933,"t":{"95":{"position":[[25,5]]}}}],["alloc",{"_index":99,"t":{"6":{"position":[[557,10],[689,10]]},"63":{"position":[[25,11]]},"95":{"position":[[334,8]]},"112":{"position":[[1320,8]]}}}],["allocat",{"_index":100,"t":{"6":{"position":[[573,12],[609,11]]},"32":{"position":[[389,11],[426,11]]},"63":{"position":[[133,11],[170,11]]},"112":{"position":[[560,11],[601,11]]}}}],["allocate(a(length",{"_index":695,"t":{"63":{"position":[[363,19]]}}}],["allocate(b(length",{"_index":696,"t":{"63":{"position":[[383,19]]}}}],["allocate(colored_lin",{"_index":1093,"t":{"112":{"position":[[1376,22]]}}}],["allocate(p2",{"_index":941,"t":{"95":{"position":[[269,12]]}}}],["allocate(vector_lin",{"_index":1077,"t":{"112":{"position":[[860,21]]}}}],["allocate(vector_line_type::vector_lin",{"_index":1076,"t":{"112":{"position":[[820,39]]}}}],["allocate(x(n",{"_index":407,"t":{"32":{"position":[[666,14]]}}}],["allocate(y(n",{"_index":408,"t":{"32":{"position":[[681,14]]}}}],["allow",{"_index":155,"t":{"8":{"position":[[594,7]]},"76":{"position":[[804,6]]}}}],["alpha",{"_index":431,"t":{"34":{"position":[[81,6],[182,6],[282,5],[607,6]]}}}],["alphanumer",{"_index":234,"t":{"10":{"position":[[69,12]]}}}],["alt",{"_index":424,"t":{"32":{"position":[[901,5]]}}}],["altern",{"_index":400,"t":{"32":{"position":[[578,9]]},"110":{"position":[[487,14]]},"112":{"position":[[792,11]]}}}],["an=h[f(a)2+f(a+h)+f(a+2h)+⋯+f(b)2]a_n",{"_index":652,"t":{"59":{"position":[[206,37]]}}}],["analyt",{"_index":749,"t":{"70":{"position":[[638,11]]}}}],["anoth",{"_index":89,"t":{"6":{"position":[[294,7]]},"8":{"position":[[806,7]]}}}],["appropri",{"_index":781,"t":{"72":{"position":[[520,11]]}}}],["approxim",{"_index":802,"t":{"74":{"position":[[8,11],[327,11]]}}}],["apt",{"_index":383,"t":{"30":{"position":[[35,3]]},"114":{"position":[[263,3]]}}}],["area",{"_index":638,"t":{"59":{"position":[[22,4],[184,4],[394,4],[504,4],[564,4],[609,4],[616,4],[643,4],[654,4],[668,5],[679,4]]},"61":{"position":[[616,4],[650,4],[691,4],[698,4],[745,4]]},"70":{"position":[[83,4],[286,5],[562,4],[613,5],[624,4]]},"74":{"position":[[218,4]]},"76":{"position":[[492,4],[497,4],[523,5],[534,4]]}}}],["area_rect",{"_index":746,"t":{"70":{"position":[[292,9],[348,9],[569,9]]}}}],["area_under_curv",{"_index":740,"t":{"70":{"position":[[143,16],[689,16]]}}}],["arg",{"_index":16,"t":{"2":{"position":[[190,3],[488,4],[599,3]]}}}],["argument",{"_index":6,"t":{"2":{"position":[[82,10],[279,9],[386,12],[505,8]]},"22":{"position":[[59,8]]},"61":{"position":[[135,8]]}}}],["arithmet",{"_index":137,"t":{"8":{"position":[[110,10]]},"41":{"position":[[322,10]]}}}],["arr",{"_index":940,"t":{"95":{"position":[[223,3],[439,3],[748,3]]}}}],["arr(1",{"_index":944,"t":{"95":{"position":[[406,6]]}}}],["arr(2",{"_index":945,"t":{"95":{"position":[[417,6]]}}}],["array",{"_index":75,"t":{"6":{"position":[[29,5],[43,5],[207,5],[352,6],[551,5],[683,5],[741,5],[1374,5]]},"32":{"position":[[563,6],[588,5]]},"63":{"position":[[19,5],[425,5],[539,5]]},"110":{"position":[[335,5]]}}}],["array2",{"_index":95,"t":{"6":{"position":[[385,6],[536,6]]}}}],["article’",{"_index":759,"t":{"72":{"position":[[149,9]]}}}],["asin",{"_index":341,"t":{"24":{"position":[[40,4]]}}}],["asin(sqrt(a",{"_index":625,"t":{"57":{"position":[[1063,13]]}}}],["ask",{"_index":133,"t":{"8":{"position":[[70,4]]}}}],["assign",{"_index":93,"t":{"6":{"position":[[342,6],[717,6],[1359,6],[1402,9]]},"112":{"position":[[699,8],[811,6]]}}}],["associ",{"_index":948,"t":{"95":{"position":[[539,11],[574,11],[677,10]]}}}],["associated(p1",{"_index":949,"t":{"95":{"position":[[589,14],[656,14]]}}}],["ast",{"_index":432,"t":{"34":{"position":[[90,4]]}}}],["atan",{"_index":351,"t":{"24":{"position":[[160,4]]}}}],["atan(1.0",{"_index":634,"t":{"57":{"position":[[1292,9]]}}}],["atan(1.0d0",{"_index":288,"t":{"18":{"position":[[847,11],[971,11]]},"74":{"position":[[881,12],[896,11]]}}}],["atan2",{"_index":352,"t":{"24":{"position":[[177,5]]}}}],["attribut",{"_index":754,"t":{"72":{"position":[[47,11],[492,11]]}}}],["avail",{"_index":264,"t":{"18":{"position":[[313,9]]}}}],["avoid",{"_index":306,"t":{"20":{"position":[[85,7]]}}}],["b",{"_index":119,"t":{"6":{"position":[[1149,1],[1281,2]]},"8":{"position":[[246,2],[303,1],[316,1],[331,1],[361,2]]},"34":{"position":[[95,1],[620,2]]},"57":{"position":[[793,1],[847,1]]},"59":{"position":[[498,2],[539,1],[552,2]]},"61":{"position":[[392,2],[554,1],[638,2]]},"63":{"position":[[185,1],[835,2]]},"105":{"position":[[87,1],[168,1],[183,2],[214,1],[244,2],[277,1],[303,1],[305,1]]},"112":{"position":[[275,1]]}}}],["b(1,1",{"_index":451,"t":{"34":{"position":[[405,6]]}}}],["b(1,2",{"_index":452,"t":{"34":{"position":[[418,6]]}}}],["b(2,1",{"_index":453,"t":{"34":{"position":[[431,6]]}}}],["b(2,2",{"_index":454,"t":{"34":{"position":[[444,6]]}}}],["b(3,1",{"_index":455,"t":{"34":{"position":[[457,6]]}}}],["b(3,2",{"_index":456,"t":{"34":{"position":[[470,6]]}}}],["b(i",{"_index":700,"t":{"63":{"position":[[618,4],[666,4]]}}}],["b(k,n",{"_index":440,"t":{"34":{"position":[[267,7]]}}}],["b=3.14159",{"_index":690,"t":{"61":{"position":[[929,10]]}}}],["b^2}c=a2+b2",{"_index":513,"t":{"47":{"position":[[77,12]]}}}],["base",{"_index":714,"t":{"66":{"position":[[378,5]]},"112":{"position":[[93,4],[197,4]]}}}],["basic",{"_index":466,"t":{"41":{"position":[[0,5]]},"93":{"position":[[112,9]]}}}],["befor",{"_index":838,"t":{"76":{"position":[[1032,6],[1132,6]]}}}],["beforehand",{"_index":304,"t":{"20":{"position":[[45,11]]}}}],["below",{"_index":946,"t":{"95":{"position":[[445,5]]}}}],["benchmark",{"_index":1014,"t":{"107":{"position":[[438,9]]}}}],["beta",{"_index":433,"t":{"34":{"position":[[99,5],[189,4],[294,4],[626,5]]}}}],["between",{"_index":580,"t":{"57":{"position":[[23,7],[188,7]]}}}],["binari",{"_index":1112,"t":{"114":{"position":[[571,6]]}}}],["bit",{"_index":1079,"t":{"112":{"position":[[970,3]]}}}],["bla",{"_index":380,"t":{"30":{"position":[[8,4]]},"32":{"position":[[237,4]]}}}],["blank",{"_index":364,"t":{"26":{"position":[[102,5]]}}}],["blaslib",{"_index":384,"t":{"30":{"position":[[47,7]]}}}],["block",{"_index":927,"t":{"93":{"position":[[10,5]]}}}],["bna(36.12",{"_index":597,"t":{"57":{"position":[[338,10]]}}}],["bodi",{"_index":959,"t":{"97":{"position":[[118,5]]}}}],["both",{"_index":149,"t":{"8":{"position":[[486,4]]},"18":{"position":[[522,4]]},"32":{"position":[[525,4]]},"76":{"position":[[1068,4]]},"95":{"position":[[705,4]]}}}],["bound",{"_index":643,"t":{"59":{"position":[[67,6]]}}}],["brainerd",{"_index":986,"t":{"103":{"position":[[93,8]]}}}],["break",{"_index":221,"t":{"8":{"position":[[2247,5]]},"28":{"position":[[116,6],[181,7]]}}}],["brew",{"_index":1107,"t":{"114":{"position":[[327,4]]}}}],["build",{"_index":774,"t":{"72":{"position":[[405,5]]}}}],["built",{"_index":703,"t":{"63":{"position":[[736,5],[797,5]]}}}],["byte",{"_index":270,"t":{"18":{"position":[[452,6]]}}}],["c",{"_index":458,"t":{"34":{"position":[[507,1],[632,2],[653,1],[688,5]]},"47":{"position":[[159,1],[538,1],[639,1]]},"76":{"position":[[925,1]]},"87":{"position":[[709,1]]},"114":{"position":[[976,1]]}}}],["c(i,j",{"_index":460,"t":{"34":{"position":[[551,6],[712,6]]}}}],["c(m,n",{"_index":441,"t":{"34":{"position":[[275,6]]}}}],["c=a2+b2c",{"_index":511,"t":{"47":{"position":[[54,8]]}}}],["cabs(z",{"_index":472,"t":{"41":{"position":[[201,7]]}}}],["cacul",{"_index":660,"t":{"59":{"position":[[381,8]]}}}],["calcul",{"_index":175,"t":{"8":{"position":[[1107,9],[1195,9]]},"34":{"position":[[6,10]]},"47":{"position":[[18,10],[815,9]]},"51":{"position":[[0,9],[79,9]]},"57":{"position":[[165,9]]},"59":{"position":[[8,9]]},"61":{"position":[[201,12]]},"66":{"position":[[0,9]]},"70":{"position":[[73,9]]},"99":{"position":[[0,9],[82,9],[233,10]]},"101":{"position":[[0,9],[241,10]]}}}],["calculate_hypotenus",{"_index":525,"t":{"47":{"position":[[483,20]]}}}],["calculate_hypotenuse(s1",{"_index":539,"t":{"47":{"position":[[1040,24]]}}}],["calculate_hypotenuse(side_a",{"_index":517,"t":{"47":{"position":[[201,28]]}}}],["call",{"_index":32,"t":{"2":{"position":[[459,4]]},"4":{"position":[[587,4],[695,4]]},"34":{"position":[[578,4]]},"43":{"position":[[7,4],[203,4],[266,4]]},"47":{"position":[[985,4],[1015,7],[1035,4]]},"61":{"position":[[153,7]]},"66":{"position":[[411,4]]},"70":{"position":[[401,4],[423,4]]},"74":{"position":[[592,4],[614,4]]},"81":{"position":[[165,4],[187,4],[247,4],[304,4],[484,4]]},"87":{"position":[[604,4],[623,4],[642,4]]},"93":{"position":[[64,7],[92,4]]},"99":{"position":[[296,4],[496,4]]},"105":{"position":[[170,4]]},"107":{"position":[[297,4],[403,4],[522,4]]}}}],["carlo",{"_index":737,"t":{"70":{"position":[[43,5]]},"74":{"position":[[44,5]]}}}],["case",{"_index":147,"t":{"8":{"position":[[444,4]]},"10":{"position":[[154,4]]},"30":{"position":[[125,4]]},"55":{"position":[[124,4],[135,4]]}}}],["case(18:64",{"_index":577,"t":{"55":{"position":[[178,11]]}}}],["case(65",{"_index":578,"t":{"55":{"position":[[216,9]]}}}],["cc⇐αa∗b+βc",{"_index":434,"t":{"34":{"position":[[105,10]]}}}],["cdot",{"_index":657,"t":{"59":{"position":[[290,6]]}}}],["centimet",{"_index":169,"t":{"8":{"position":[[843,10],[907,10],[1007,10]]}}}],["certain",{"_index":851,"t":{"78":{"position":[[60,7]]}}}],["chang",{"_index":785,"t":{"72":{"position":[[587,7]]},"91":{"position":[[21,6],[128,8]]}}}],["charact",{"_index":224,"t":{"8":{"position":[[2265,9]]},"10":{"position":[[37,11],[82,10],[116,9]]},"12":{"position":[[152,10]]},"18":{"position":[[279,10]]},"26":{"position":[[108,9]]},"81":{"position":[[114,10]]}}}],["character(len=128",{"_index":54,"t":{"4":{"position":[[125,18],[346,18],[413,19],[458,18]]}}}],["character(len=20",{"_index":254,"t":{"14":{"position":[[86,17]]}}}],["character(len=32",{"_index":14,"t":{"2":{"position":[[169,17]]}}}],["character(len=64",{"_index":1029,"t":{"110":{"position":[[169,17]]}}}],["character(len=8",{"_index":1002,"t":{"107":{"position":[[197,16]]}}}],["check",{"_index":947,"t":{"95":{"position":[[533,5]]}}}],["choic",{"_index":1109,"t":{"114":{"position":[[405,6]]}}}],["circ",{"_index":182,"t":{"8":{"position":[[1261,4],[1483,4]]}}}],["circ_area",{"_index":826,"t":{"76":{"position":[[432,9],[551,9]]}}}],["circl",{"_index":177,"t":{"8":{"position":[[1140,6],[1228,6],[1381,7],[1452,6]]},"74":{"position":[[193,6],[271,6],[300,8]]}}}],["circum",{"_index":184,"t":{"8":{"position":[[1291,6],[1401,6],[1464,6]]}}}],["circumfer",{"_index":176,"t":{"8":{"position":[[1121,13],[1209,13],[1430,14]]},"14":{"position":[[42,13]]}}}],["class",{"_index":1070,"t":{"112":{"position":[[473,5],[665,5],[1246,5]]}}}],["class(line_typ",{"_index":1071,"t":{"112":{"position":[[583,17]]}}}],["close(unit=1",{"_index":498,"t":{"45":{"position":[[249,13],[676,13]]}}}],["cm",{"_index":173,"t":{"8":{"position":[[966,3],[1030,2],[1040,2]]}}}],["cm2inch",{"_index":172,"t":{"8":{"position":[[936,7],[1099,7]]}}}],["cmplx(1.0",{"_index":473,"t":{"41":{"position":[[254,10]]}}}],["co",{"_index":345,"t":{"24":{"position":[[79,3],[124,3]]}}}],["code",{"_index":160,"t":{"8":{"position":[[684,4],[745,4]]},"43":{"position":[[339,5]]},"61":{"position":[[51,5],[105,6],[244,4]]},"81":{"position":[[534,5]]},"93":{"position":[[171,5]]},"114":{"position":[[117,6],[428,6],[487,4],[631,5]]}}}],["color",{"_index":1085,"t":{"112":{"position":[[1105,7]]}}}],["colored_lin",{"_index":1072,"t":{"112":{"position":[[616,13],[726,12]]}}}],["colored_line%b",{"_index":1088,"t":{"112":{"position":[[1148,14]]}}}],["colored_line%direct",{"_index":1091,"t":{"112":{"position":[[1223,22]]}}}],["colored_line%g",{"_index":1087,"t":{"112":{"position":[[1132,15]]}}}],["colored_line%r",{"_index":1086,"t":{"112":{"position":[[1116,15]]}}}],["colored_line%x_start",{"_index":1083,"t":{"112":{"position":[[1048,20]]}}}],["colored_line_typ",{"_index":1061,"t":{"112":{"position":[[240,17],[306,17],[708,17]]}}}],["colored_line_type(0.0",{"_index":1075,"t":{"112":{"position":[[741,22]]}}}],["come",{"_index":840,"t":{"76":{"position":[[1127,4]]}}}],["comma",{"_index":365,"t":{"26":{"position":[[121,5]]},"105":{"position":[[147,7]]}}}],["command",{"_index":4,"t":{"2":{"position":[[69,7]]},"43":{"position":[[53,8],[170,7]]},"78":{"position":[[143,7]]}}}],["command_argument_count",{"_index":1,"t":{"2":{"position":[[12,22],[234,24]]}}}],["comment",{"_index":215,"t":{"8":{"position":[[2111,7]]}}}],["commerci",{"_index":778,"t":{"72":{"position":[[451,13]]}}}],["common",{"_index":362,"t":{"24":{"position":[[300,6]]},"72":{"position":[[39,7],[168,7]]}}}],["compil",{"_index":162,"t":{"8":{"position":[[721,7]]},"30":{"position":[[75,7]]},"32":{"position":[[194,8]]},"47":{"position":[[125,7],[504,7],[1155,7]]},"76":{"position":[[875,7],[1023,8],[1171,9],[1223,7],[1297,8]]},"81":{"position":[[522,7],[621,8]]},"87":{"position":[[678,7]]},"114":{"position":[[201,9],[518,8],[849,7]]}}}],["complex",{"_index":245,"t":{"12":{"position":[[96,7]]},"14":{"position":[[56,7]]},"18":{"position":[[196,8],[470,7]]},"22":{"position":[[93,7]]},"24":{"position":[[203,7]]},"41":{"position":[[15,7],[113,7],[139,7],[567,7],[597,8]]}}}],["complex_numb",{"_index":468,"t":{"41":{"position":[[84,14],[642,14]]}}}],["complx(x",{"_index":318,"t":{"22":{"position":[[68,9]]}}}],["compon",{"_index":697,"t":{"63":{"position":[[431,12],[545,12]]}}}],["compos",{"_index":233,"t":{"10":{"position":[[57,8]]}}}],["comput",{"_index":393,"t":{"32":{"position":[[81,9]]},"91":{"position":[[91,9]]},"114":{"position":[[53,10]]}}}],["concaten",{"_index":225,"t":{"8":{"position":[[2291,13]]}}}],["concurr",{"_index":728,"t":{"66":{"position":[[749,11],[824,10],[897,10]]}}}],["condit",{"_index":715,"t":{"66":{"position":[[387,10]]}}}],["conjg(z2",{"_index":480,"t":{"41":{"position":[[620,9]]}}}],["conjug",{"_index":479,"t":{"41":{"position":[[575,9],[606,10]]}}}],["consid",{"_index":313,"t":{"20":{"position":[[262,10]]},"114":{"position":[[155,8]]}}}],["consist",{"_index":930,"t":{"93":{"position":[[122,8]]}}}],["const_modul",{"_index":821,"t":{"76":{"position":[[208,12],[339,12],[446,12]]},"78":{"position":[[23,13],[83,13],[111,13],[167,13],[195,13],[243,13]]}}}],["constant",{"_index":818,"t":{"76":{"position":[[131,9]]}}}],["constants_modul",{"_index":819,"t":{"76":{"position":[[159,17]]}}}],["contain",{"_index":628,"t":{"57":{"position":[[1130,8]]},"61":{"position":[[359,8]]},"85":{"position":[[130,8]]},"87":{"position":[[185,8]]},"89":{"position":[[242,8]]},"91":{"position":[[192,8]]},"99":{"position":[[357,8]]},"101":{"position":[[371,8]]},"105":{"position":[[216,8]]}}}],["continu",{"_index":216,"t":{"8":{"position":[[2138,12]]}}}],["contrast",{"_index":921,"t":{"89":{"position":[[813,8]]}}}],["convers",{"_index":295,"t":{"18":{"position":[[1024,10]]}}}],["convert",{"_index":48,"t":{"4":{"position":[[22,7]]},"8":{"position":[[834,8],[896,10]]},"22":{"position":[[81,8],[167,8],[317,8]]}}}],["copi",{"_index":768,"t":{"72":{"position":[[315,4],[956,4]]}}}],["correct",{"_index":929,"t":{"93":{"position":[[100,8]]}}}],["cos(lat1",{"_index":621,"t":{"57":{"position":[[982,9]]}}}],["cos(lat2",{"_index":622,"t":{"57":{"position":[[994,9]]}}}],["cos(theta))/2",{"_index":595,"t":{"57":{"position":[[316,13]]}}}],["cosh",{"_index":348,"t":{"24":{"position":[[119,4]]}}}],["cosin",{"_index":346,"t":{"24":{"position":[[83,6],[112,6]]}}}],["count",{"_index":805,"t":{"74":{"position":[[156,5]]}}}],["cpu_time(end_tim",{"_index":1017,"t":{"107":{"position":[[527,18]]}}}],["cpu_time(start_tim",{"_index":1012,"t":{"107":{"position":[[408,20]]}}}],["creat",{"_index":842,"t":{"76":{"position":[[1189,6]]},"95":{"position":[[284,7]]},"114":{"position":[[562,6]]}}}],["creativ",{"_index":753,"t":{"72":{"position":[[30,8],[159,8]]}}}],["credit",{"_index":782,"t":{"72":{"position":[[532,7]]}}}],["cup_tim",{"_index":997,"t":{"107":{"position":[[41,8]]}}}],["current",{"_index":719,"t":{"66":{"position":[[471,7]]},"107":{"position":[[58,7]]}}}],["curv",{"_index":640,"t":{"59":{"position":[[37,5],[118,5],[199,6],[407,5]]},"70":{"position":[[98,5]]}}}],["cx",{"_index":253,"t":{"14":{"position":[[67,2]]}}}],["cycl",{"_index":721,"t":{"66":{"position":[[494,6],[529,5]]}}}],["c⇐αa∗b+βcc",{"_index":429,"t":{"34":{"position":[[59,10]]}}}],["d",{"_index":241,"t":{"12":{"position":[[65,1]]}}}],["dangl",{"_index":953,"t":{"95":{"position":[[781,8]]}}}],["data",{"_index":260,"t":{"18":{"position":[[68,4]]},"32":{"position":[[515,4]]},"45":{"position":[[27,4],[420,4],[513,4]]}}}],["data(10",{"_index":504,"t":{"45":{"position":[[575,8]]}}}],["data(ii",{"_index":507,"t":{"45":{"position":[[660,8],[718,8]]}}}],["date",{"_index":998,"t":{"107":{"position":[[66,4],[217,4],[351,6],[724,6]]}}}],["date(1:4",{"_index":1009,"t":{"107":{"position":[[361,10]]}}}],["date(5:6",{"_index":1010,"t":{"107":{"position":[[377,10]]}}}],["date(7:8",{"_index":1011,"t":{"107":{"position":[[393,9]]}}}],["date_and_tim",{"_index":996,"t":{"107":{"position":[[23,13]]}}}],["date_and_time(date=d",{"_index":1007,"t":{"107":{"position":[[302,24]]}}}],["dcmplx(1.0",{"_index":474,"t":{"41":{"position":[[299,11]]}}}],["deallocate(a",{"_index":102,"t":{"6":{"position":[[657,13]]},"63":{"position":[[838,13]]}}}],["deallocate(b",{"_index":707,"t":{"63":{"position":[[852,13]]}}}],["deallocate(colored_lin",{"_index":1092,"t":{"112":{"position":[[1349,24]]}}}],["deallocate(i",{"_index":426,"t":{"32":{"position":[[961,13]]}}}],["deallocate(p2",{"_index":952,"t":{"95":{"position":[[752,14]]}}}],["deallocate(x",{"_index":425,"t":{"32":{"position":[[947,13]]}}}],["debian",{"_index":1103,"t":{"114":{"position":[[250,7]]}}}],["decim",{"_index":202,"t":{"8":{"position":[[1836,7],[1907,7]]},"18":{"position":[[872,7]]}}}],["declar",{"_index":303,"t":{"20":{"position":[[36,8],[154,9]]},"47":{"position":[[266,7]]},"76":{"position":[[624,8]]},"91":{"position":[[148,8]]},"93":{"position":[[181,11]]},"110":{"position":[[324,7]]},"112":{"position":[[546,8]]}}}],["default",{"_index":263,"t":{"18":{"position":[[110,8],[149,8],[183,8],[220,8],[266,8],[295,8]]},"55":{"position":[[140,7]]},"112":{"position":[[1252,7]]},"114":{"position":[[737,7]]}}}],["defin",{"_index":592,"t":{"57":{"position":[[269,7]]},"110":{"position":[[65,7]]},"112":{"position":[[84,6]]}}}],["definit",{"_index":694,"t":{"63":{"position":[[340,10]]}}}],["deg2rad",{"_index":637,"t":{"57":{"position":[[1376,7]]}}}],["deg2rad(degre",{"_index":629,"t":{"57":{"position":[[1148,15]]}}}],["deg2rad(lat1",{"_index":615,"t":{"57":{"position":[[873,13]]}}}],["deg2rad(lat2",{"_index":617,"t":{"57":{"position":[[915,13]]}}}],["deg2rad(lon1",{"_index":616,"t":{"57":{"position":[[894,13]]}}}],["deg2rad(lon2",{"_index":618,"t":{"57":{"position":[[936,13]]}}}],["deg_to_rad",{"_index":633,"t":{"57":{"position":[[1279,10],[1352,10]]}}}],["degre",{"_index":631,"t":{"57":{"position":[[1178,7],[1235,6],[1343,6]]}}}],["depend",{"_index":1114,"t":{"114":{"position":[[793,9]]}}}],["descript",{"_index":315,"t":{"22":{"position":[[10,11]]},"24":{"position":[[10,11]]}}}],["determin",{"_index":85,"t":{"6":{"position":[[249,9]]},"20":{"position":[[193,10]]},"57":{"position":[[0,9]]},"107":{"position":[[85,9]]}}}],["dev",{"_index":385,"t":{"30":{"position":[[55,3],[69,3]]}}}],["dgemm",{"_index":427,"t":{"34":{"position":[[0,5]]}}}],["dgemm('n','n",{"_index":461,"t":{"34":{"position":[[583,14]]}}}],["diamet",{"_index":179,"t":{"8":{"position":[[1157,9]]}}}],["differ",{"_index":845,"t":{"76":{"position":[[1354,9]]}}}],["dimens",{"_index":101,"t":{"6":{"position":[[595,13]]},"26":{"position":[[45,11]]},"32":{"position":[[375,13],[412,13]]},"63":{"position":[[119,13],[156,13]]},"95":{"position":[[157,13]]}}}],["dimension",{"_index":105,"t":{"6":{"position":[[729,11]]}}}],["dimension(10",{"_index":96,"t":{"6":{"position":[[415,13]]}}}],["dimension(2",{"_index":116,"t":{"6":{"position":[[1040,12],[1222,12],[1440,12]]},"95":{"position":[[199,13]]}}}],["dimension(3",{"_index":118,"t":{"6":{"position":[[1130,12]]}}}],["direct",{"_index":1067,"t":{"112":{"position":[[388,9],[405,9],[1210,9]]}}}],["directori",{"_index":846,"t":{"76":{"position":[[1364,10]]},"114":{"position":[[607,9]]}}}],["dist",{"_index":614,"t":{"57":{"position":[[647,4],[1034,4],[1112,4]]}}}],["distanc",{"_index":579,"t":{"57":{"position":[[14,8],[179,8],[377,8],[1098,10]]}}}],["divid",{"_index":646,"t":{"59":{"position":[[107,6]]}}}],["do",{"_index":129,"t":{"8":{"position":[[17,6]]}}}],["done",{"_index":219,"t":{"8":{"position":[[2193,4]]},"14":{"position":[[81,4]]}}}],["dot_product",{"_index":704,"t":{"63":{"position":[[742,11],[803,11]]}}}],["dot_product(a",{"_index":706,"t":{"63":{"position":[[820,14]]}}}],["doubl",{"_index":243,"t":{"12":{"position":[[77,6]]},"18":{"position":[[233,6],[783,6]]},"34":{"position":[[32,6],[165,6],[242,6]]},"41":{"position":[[276,6]]}}}],["dp",{"_index":604,"t":{"57":{"position":[[461,2]]}}}],["du",{"_index":486,"t":{"43":{"position":[[256,2]]}}}],["dummi",{"_index":520,"t":{"47":{"position":[[288,5]]}}}],["dynam",{"_index":98,"t":{"6":{"position":[[543,7],[675,7]]},"63":{"position":[[11,7]]},"112":{"position":[[529,8]]}}}],["e",{"_index":823,"t":{"76":{"position":[[313,1]]},"78":{"position":[[136,1],[216,1],[236,2],[280,1]]}}}],["e12.4",{"_index":212,"t":{"8":{"position":[[2079,10]]}}}],["e8.2",{"_index":204,"t":{"8":{"position":[[1855,9]]}}}],["each",{"_index":1063,"t":{"112":{"position":[[279,4]]}}}],["earch/spher",{"_index":591,"t":{"57":{"position":[[210,12]]}}}],["earth",{"_index":582,"t":{"57":{"position":[[45,5]]}}}],["editor",{"_index":375,"t":{"28":{"position":[[198,7]]},"114":{"position":[[390,6]]}}}],["effect",{"_index":922,"t":{"91":{"position":[[5,7],[282,7]]}}}],["einstein",{"_index":1042,"t":{"110":{"position":[[455,9],[529,10],[741,10]]}}}],["element",{"_index":124,"t":{"6":{"position":[[1380,7]]},"112":{"position":[[958,8]]}}}],["end",{"_index":30,"t":{"2":{"position":[[427,3],[670,3],[702,3]]},"4":{"position":[[319,3],[809,3]]},"6":{"position":[[195,3],[524,3],[1320,3],[1327,3]]},"8":{"position":[[376,3],[1087,3],[1471,3],[1920,3],[2210,3]]},"32":{"position":[[975,3]]},"34":{"position":[[564,3],[571,3],[719,3],[726,3],[733,3]]},"41":{"position":[[630,3]]},"43":{"position":[[358,3]]},"45":{"position":[[263,3],[669,3],[727,3],[734,3]]},"47":{"position":[[468,3],[1132,3]]},"51":{"position":[[327,3]]},"53":{"position":[[348,3],[355,3]]},"55":{"position":[[253,3],[264,3]]},"57":{"position":[[1363,3],[1384,3]]},"59":{"position":[[636,3],[684,3]]},"61":{"position":[[502,3],[517,3],[716,3],[750,3],[772,3],[948,3]]},"63":{"position":[[356,3],[509,3],[623,3],[671,3],[866,3]]},"66":{"position":[[243,3],[359,3],[451,3],[571,3],[935,3]]},"68":{"position":[[152,3],[173,3],[180,3]]},"70":{"position":[[548,3],[555,3],[677,3]]},"74":{"position":[[753,3],[760,3],[908,3]]},"76":{"position":[[328,3],[539,3]]},"81":{"position":[[510,3]]},"87":{"position":[[303,3],[379,3],[475,3],[503,3],[662,3]]},"89":{"position":[[476,3],[491,3],[680,3],[687,3]]},"95":{"position":[[844,3]]},"99":{"position":[[554,3],[561,3],[586,3]]},"101":{"position":[[364,3],[580,3],[587,3],[610,3]]},"105":{"position":[[313,3],[333,3]]},"107":{"position":[[515,3],[687,3]]},"110":{"position":[[201,3],[279,3],[812,3]]},"112":{"position":[[165,3],[297,3],[427,4],[445,3],[1304,3],[1463,3]]}}}],["end_tim",{"_index":1004,"t":{"107":{"position":[[239,8],[572,8]]}}}],["enddo",{"_index":81,"t":{"6":{"position":[[136,5],[189,5],[518,5]]},"45":{"position":[[243,5]]},"66":{"position":[[206,5]]}}}],["endif",{"_index":72,"t":{"4":{"position":[[796,5]]},"51":{"position":[[321,5]]}}}],["endors",{"_index":792,"t":{"72":{"position":[[692,8]]}}}],["enter",{"_index":58,"t":{"4":{"position":[[197,6]]},"8":{"position":[[990,6],[1360,6]]},"26":{"position":[[31,6]]},"47":{"position":[[870,6],[924,6]]},"53":{"position":[[86,6],[160,5]]},"55":{"position":[[86,6]]},"63":{"position":[[230,6],[412,6],[525,6]]},"105":{"position":[[104,6]]}}}],["environ",{"_index":538,"t":{"47":{"position":[[1023,11]]}}}],["eq",{"_index":551,"t":{"49":{"position":[[108,4]]}}}],["equal",{"_index":549,"t":{"49":{"position":[[69,5],[99,5],[113,6],[129,5],[362,5],[390,5],[402,5],[418,5]]}}}],["equival",{"_index":556,"t":{"49":{"position":[[193,10],[215,10]]}}}],["eqv",{"_index":555,"t":{"49":{"position":[[187,5]]}}}],["error",{"_index":568,"t":{"53":{"position":[[145,7]]},"74":{"position":[[833,5]]},"112":{"position":[[1269,7]]}}}],["es9.1",{"_index":367,"t":{"28":{"position":[[14,6]]}}}],["even",{"_index":777,"t":{"72":{"position":[[446,4]]}}}],["even_numb",{"_index":732,"t":{"68":{"position":[[38,12],[192,12]]}}}],["everyth",{"_index":830,"t":{"76":{"position":[[592,10]]}}}],["exampl",{"_index":90,"t":{"6":{"position":[[302,7],[708,8]]},"8":{"position":[[519,8],[1939,7]]},"12":{"position":[[8,9],[34,9],[104,9]]},"18":{"position":[[763,8]]},"36":{"position":[[32,7]]},"45":{"position":[[466,8]]},"53":{"position":[[415,8]]},"63":{"position":[[0,7]]},"72":{"position":[[841,8]]},"76":{"position":[[79,8]]},"107":{"position":[[10,7]]},"112":{"position":[[0,7]]}}}],["except",{"_index":271,"t":{"18":{"position":[[459,6]]}}}],["exclus",{"_index":554,"t":{"49":{"position":[[172,11]]}}}],["execut",{"_index":163,"t":{"8":{"position":[[733,7]]},"43":{"position":[[36,7],[155,7],[187,11],[244,11]]},"61":{"position":[[233,10]]},"87":{"position":[[690,8]]},"91":{"position":[[71,8]]},"93":{"position":[[160,10]]},"107":{"position":[[103,9]]},"114":{"position":[[650,8],[715,10]]}}}],["execute_command_lin",{"_index":481,"t":{"43":{"position":[[12,20]]}}}],["execute_command_line(\"du",{"_index":488,"t":{"43":{"position":[[271,24]]}}}],["execute_command_line(\"l",{"_index":485,"t":{"43":{"position":[[208,26]]}}}],["exit",{"_index":39,"t":{"2":{"position":[[574,4]]},"43":{"position":[[333,5]]},"66":{"position":[[366,4],[446,4]]}}}],["exit_cod",{"_index":483,"t":{"43":{"position":[[143,9],[348,9]]}}}],["exitstat=exit_cod",{"_index":489,"t":{"43":{"position":[[304,19]]}}}],["exp",{"_index":357,"t":{"24":{"position":[[256,3]]}}}],["exp(12.0",{"_index":197,"t":{"8":{"position":[[1692,9]]}}}],["expect",{"_index":35,"t":{"2":{"position":[[517,9]]}}}],["expon",{"_index":289,"t":{"18":{"position":[[894,8]]}}}],["exponenti",{"_index":205,"t":{"8":{"position":[[1875,11]]},"24":{"position":[[260,11]]}}}],["express",{"_index":724,"t":{"66":{"position":[[645,12]]}}}],["extend",{"_index":1030,"t":{"110":{"position":[[212,9]]},"112":{"position":[[186,6]]}}}],["extends(colored_line_typ",{"_index":1065,"t":{"112":{"position":[[330,26]]}}}],["extends(line_typ",{"_index":1060,"t":{"112":{"position":[[218,18]]}}}],["extends(us",{"_index":1031,"t":{"110":{"position":[[233,13]]}}}],["extens",{"_index":1110,"t":{"114":{"position":[[462,9]]}}}],["extern",{"_index":406,"t":{"32":{"position":[[652,8]]},"43":{"position":[[44,8]]},"110":{"position":[[76,8]]}}}],["f",{"_index":683,"t":{"61":{"position":[[515,1]]},"89":{"position":[[240,1],[489,1]]},"112":{"position":[[432,1]]}}}],["f(0",{"_index":969,"t":{"101":{"position":[[104,4]]}}}],["f(1",{"_index":970,"t":{"101":{"position":[[115,4]]}}}],["f(a",{"_index":685,"t":{"61":{"position":[[663,5],[705,3]]}}}],["f(a+2h",{"_index":656,"t":{"59":{"position":[[280,7]]}}}],["f(a+h",{"_index":655,"t":{"59":{"position":[[271,6]]}}}],["f(b",{"_index":686,"t":{"61":{"position":[[671,5]]}}}],["f(n",{"_index":971,"t":{"101":{"position":[[126,4],[133,3],[142,3]]}}}],["f(x",{"_index":680,"t":{"61":{"position":[[441,4]]},"89":{"position":[[260,4],[675,4]]}}}],["f(x)=(1+1x)xf(x",{"_index":896,"t":{"89":{"position":[[55,16]]}}}],["f(x)f(x)f(x",{"_index":641,"t":{"59":{"position":[[43,12]]},"89":{"position":[[35,12]]}}}],["f10.4",{"_index":542,"t":{"47":{"position":[[1125,6]]}}}],["f5.1",{"_index":366,"t":{"28":{"position":[[6,7]]}}}],["f6.4",{"_index":201,"t":{"8":{"position":[[1769,9]]}}}],["f77",{"_index":153,"t":{"8":{"position":[[571,3]]}}}],["f8.1",{"_index":908,"t":{"89":{"position":[[656,7]]}}}],["f8.4",{"_index":210,"t":{"8":{"position":[[2050,9]]},"89":{"position":[[664,7]]}}}],["f90",{"_index":558,"t":{"49":{"position":[[226,3]]},"114":{"position":[[452,4]]}}}],["f_result",{"_index":682,"t":{"61":{"position":[[493,8]]},"89":{"position":[[312,8],[429,8]]}}}],["factori",{"_index":708,"t":{"66":{"position":[[10,10],[59,9],[77,9],[255,9]]},"99":{"position":[[10,9],[92,9],[244,11],[576,9]]}}}],["factorial(input",{"_index":964,"t":{"99":{"position":[[301,16]]}}}],["factorial(n",{"_index":965,"t":{"99":{"position":[[387,12],[501,11]]}}}],["fals",{"_index":250,"t":{"12":{"position":[[143,8]]},"95":{"position":[[696,5]]}}}],["fdefault",{"_index":267,"t":{"18":{"position":[[348,8],[385,8]]}}}],["fib",{"_index":974,"t":{"101":{"position":[[332,7]]}}}],["fibonacci",{"_index":966,"t":{"101":{"position":[[10,9],[85,9],[252,9],[600,9]]}}}],["fibonacci(i",{"_index":975,"t":{"101":{"position":[[351,12]]}}}],["fibonacci(n",{"_index":976,"t":{"101":{"position":[[399,12],[495,11],[514,11]]}}}],["file",{"_index":59,"t":{"4":{"position":[[204,4]]},"8":{"position":[[638,4],[694,4]]},"45":{"position":[[50,5],[108,4],[360,5],[397,5],[430,4],[523,4]]},"76":{"position":[[1103,5],[1208,6],[1275,4],[1325,6],[1339,5]]},"114":{"position":[[457,4],[492,6],[578,4],[830,6],[923,5]]}}}],["file='output.dat",{"_index":494,"t":{"45":{"position":[[173,18],[597,18]]}}}],["file_read",{"_index":503,"t":{"45":{"position":[[536,9],[746,9]]}}}],["file_writ",{"_index":492,"t":{"45":{"position":[[121,10],[275,10]]}}}],["filenam",{"_index":49,"t":{"4":{"position":[[30,9]]}}}],["filename.f90",{"_index":387,"t":{"30":{"position":[[100,12],[167,12]]},"32":{"position":[[212,12],[274,12]]}}}],["find",{"_index":710,"t":{"66":{"position":[[54,4]]},"76":{"position":[[1311,4]]},"107":{"position":[[53,4]]}}}],["first",{"_index":236,"t":{"10":{"position":[[110,5]]},"20":{"position":[[168,5]]},"28":{"position":[[142,6]]},"61":{"position":[[214,5]]},"63":{"position":[[419,5]]},"87":{"position":[[0,5]]},"114":{"position":[[869,5]]}}}],["floor",{"_index":322,"t":{"22":{"position":[[145,6]]}}}],["floor(3.2)=3",{"_index":321,"t":{"22":{"position":[[131,13]]}}}],["floor(a/p)*p",{"_index":338,"t":{"22":{"position":[[375,12]]}}}],["floor(x",{"_index":319,"t":{"22":{"position":[[101,8]]}}}],["follow",{"_index":164,"t":{"8":{"position":[[753,8]]},"47":{"position":[[35,9]]},"49":{"position":[[241,9]]},"72":{"position":[[475,9]]},"107":{"position":[[0,9]]},"114":{"position":[[875,8]]}}}],["format",{"_index":189,"t":{"8":{"position":[[1488,10],[1537,10],[1574,6],[1932,6]]},"72":{"position":[[367,7]]}}}],["format('hello",{"_index":868,"t":{"81":{"position":[[425,13]]}}}],["format('hypotenus",{"_index":541,"t":{"47":{"position":[[1101,18]]}}}],["formula",{"_index":510,"t":{"47":{"position":[[45,8]]},"57":{"position":[[107,7]]}}}],["fortran",{"_index":146,"t":{"8":{"position":[[428,7],[1558,7]]},"18":{"position":[[42,7]]},"20":{"position":[[3,7]]},"41":{"position":[[33,7]]},"43":{"position":[[67,7]]},"85":{"position":[[37,8]]},"95":{"position":[[11,7]]},"97":{"position":[[9,7]]},"103":{"position":[[0,7],[56,7],[125,7],[133,7]]},"114":{"position":[[0,7]]}}}],["fortran.html",{"_index":880,"t":{"83":{"position":[[54,12]]}}}],["forward",{"_index":1090,"t":{"112":{"position":[[1202,7]]}}}],["frac{1}{x}\\right)^xf(x)=(1+x1​)x",{"_index":898,"t":{"89":{"position":[[84,33]]}}}],["frac{f(b)}{2}\\right]an​=h[2f(a)​+f(a+h)+f(a+2h)+⋯+2f(b",{"_index":658,"t":{"59":{"position":[[299,58]]}}}],["free",{"_index":766,"t":{"72":{"position":[[298,4]]}}}],["full",{"_index":799,"t":{"72":{"position":[[951,4]]}}}],["function",{"_index":47,"t":{"4":{"position":[[10,8],[365,8],[813,8]]},"6":{"position":[[237,8]]},"22":{"position":[[0,9]]},"24":{"position":[[0,9],[31,8],[90,8],[151,8]]},"32":{"position":[[34,8]]},"57":{"position":[[1139,8],[1367,8]]},"61":{"position":[[91,8],[368,8],[432,8],[506,8],[754,8]]},"85":{"position":[[62,10]]},"89":{"position":[[251,8],[480,8],[838,9]]},"91":{"position":[[239,8]]},"97":{"position":[[44,9]]},"101":{"position":[[43,9],[390,8],[591,8]]}}}],["function_modul",{"_index":900,"t":{"89":{"position":[[152,15],[502,15],[571,15]]}}}],["function_t",{"_index":906,"t":{"89":{"position":[[552,14],[699,14]]}}}],["g",{"_index":1062,"t":{"112":{"position":[[272,2]]}}}],["gcc",{"_index":1101,"t":{"114":{"position":[[222,3],[275,3],[340,3],[364,4]]}}}],["ge",{"_index":550,"t":{"49":{"position":[[78,4]]}}}],["gener",{"_index":490,"t":{"45":{"position":[[13,8],[443,9]]},"74":{"position":[[66,8]]}}}],["get_abs_path",{"_index":57,"t":{"4":{"position":[[169,12],[521,12],[615,12],[715,12],[822,12]]}}}],["get_abs_path(input_path",{"_index":62,"t":{"4":{"position":[[257,24],[374,24]]}}}],["get_command(arg",{"_index":36,"t":{"2":{"position":[[531,16]]}}}],["get_command_argu",{"_index":2,"t":{"2":{"position":[[39,20]]}}}],["get_command_argument(i",{"_index":33,"t":{"2":{"position":[[464,23]]}}}],["getcwd(prefix",{"_index":70,"t":{"4":{"position":[[700,14]]}}}],["getenv('hom",{"_index":67,"t":{"4":{"position":[[592,14]]}}}],["gfortran",{"_index":165,"t":{"8":{"position":[[762,8]]},"30":{"position":[[91,8],[158,8]]},"32":{"position":[[203,8],[265,8]]},"47":{"position":[[149,8],[528,8],[629,8],[672,8],[1177,8]]},"76":{"position":[[915,8],[947,8],[1403,8]]},"87":{"position":[[699,8],[729,8]]},"114":{"position":[[192,8],[230,8],[279,8],[344,8],[534,8],[752,8],[966,8],[989,8]]}}}],["give",{"_index":780,"t":{"72":{"position":[[515,4],[772,4]]}}}],["given",{"_index":178,"t":{"8":{"position":[[1147,5],[1235,5]]},"18":{"position":[[575,5]]},"57":{"position":[[51,5],[223,5]]},"72":{"position":[[745,6]]}}}],["gnu",{"_index":258,"t":{"18":{"position":[[38,3]]}}}],["greater",{"_index":547,"t":{"49":{"position":[[38,7],[83,7],[333,7],[374,7]]}}}],["greatest",{"_index":320,"t":{"22":{"position":[[110,8]]}}}],["gt",{"_index":546,"t":{"49":{"position":[[33,4]]}}}],["guid",{"_index":982,"t":{"103":{"position":[[47,5],[153,5]]}}}],["h",{"_index":653,"t":{"59":{"position":[[246,1],[501,2],[548,1],[650,1]]},"61":{"position":[[613,2],[634,1],[741,1]]}}}],["h=(b−a)/nh=(b",{"_index":650,"t":{"59":{"position":[[155,13]]}}}],["hard",{"_index":671,"t":{"61":{"position":[[100,4]]}}}],["hav(theta",{"_index":593,"t":{"57":{"position":[[281,10]]}}}],["haversin",{"_index":586,"t":{"57":{"position":[[97,9],[256,9]]}}}],["haversine_formula",{"_index":603,"t":{"57":{"position":[[407,17],[1396,17]]}}}],["hello_world_mpi",{"_index":855,"t":{"81":{"position":[[35,15]]}}}],["here",{"_index":41,"t":{"2":{"position":[[594,4]]},"4":{"position":[[0,4]]},"45":{"position":[[0,4]]},"76":{"position":[[68,4]]}}}],["high",{"_index":104,"t":{"6":{"position":[[724,4]]},"114":{"position":[[25,4]]}}}],["holder",{"_index":763,"t":{"72":{"position":[[254,6]]}}}],["homebrew",{"_index":1106,"t":{"114":{"position":[[317,9]]}}}],["hs",{"_index":487,"t":{"43":{"position":[[260,2],[297,2]]}}}],["http://creativecommons.org/licenses/by/4.0",{"_index":801,"t":{"72":{"position":[[984,43]]}}}],["https://annefou.github.io/fortran/coarrays/coarrays.html",{"_index":465,"t":{"39":{"position":[[0,56]]}}}],["https://curc.readthedocs.io/en/latest/programming/mpi",{"_index":879,"t":{"83":{"position":[[0,53]]}}}],["https://github.com/sourangshughosh/awesomefortranlibrari",{"_index":991,"t":{"103":{"position":[[224,58]]}}}],["https://netlib.org/blas/#_level_1",{"_index":396,"t":{"32":{"position":[[158,33]]}}}],["https://people.math.sc.edu/burkardt/f_src/f_src.html",{"_index":990,"t":{"103":{"position":[[171,52]]}}}],["hyperbol",{"_index":344,"t":{"24":{"position":[[68,10],[128,10],[228,10]]}}}],["hypotenus",{"_index":509,"t":{"47":{"position":[[0,10],[238,11],[379,10],[444,10],[742,10],[825,10],[1144,10]]}}}],["i**2",{"_index":725,"t":{"66":{"position":[[671,5]]}}}],["i*h",{"_index":666,"t":{"59":{"position":[[631,4]]},"61":{"position":[[711,4]]}}}],["i*j",{"_index":727,"t":{"66":{"position":[[716,6]]}}}],["i.",{"_index":956,"t":{"97":{"position":[[73,5]]}}}],["i2",{"_index":82,"t":{"6":{"position":[[173,7],[502,7]]},"81":{"position":[[456,3],[467,3]]}}}],["i3",{"_index":508,"t":{"45":{"position":[[710,7]]}}}],["i4",{"_index":198,"t":{"8":{"position":[[1708,7],[1965,7]]},"28":{"position":[[24,5],[87,5],[93,4],[264,5],[275,5]]},"45":{"position":[[229,7],[652,7]]}}}],["i8",{"_index":207,"t":{"8":{"position":[[1992,7]]}}}],["i8.6",{"_index":208,"t":{"8":{"position":[[2019,9]]}}}],["i<dir",{"_index":848,"t":{"76":{"position":[[1388,6]]}}}],["id",{"_index":1028,"t":{"110":{"position":[[134,2],[588,3]]}}}],["identifi",{"_index":501,"t":{"45":{"position":[[351,8]]}}}],["ierr",{"_index":867,"t":{"81":{"position":[[357,5]]}}}],["ierror",{"_index":859,"t":{"81":{"position":[[107,6],[239,7],[296,7]]}}}],["ii",{"_index":77,"t":{"6":{"position":[[93,2],[112,2],[133,2],[156,2],[447,2],[456,5],[462,2],[478,2],[1259,2],[1287,2]]},"45":{"position":[[157,2],[209,2],[571,3],[633,2],[693,2]]},"66":{"position":[[119,3],[171,2],[203,2]]}}}],["ii*ii",{"_index":497,"t":{"45":{"position":[[237,5]]}}}],["ikind",{"_index":329,"t":{"22":{"position":[[235,7],[279,5],[309,7]]}}}],["imag(z2",{"_index":478,"t":{"41":{"position":[[556,8]]}}}],["imaginari",{"_index":274,"t":{"18":{"position":[[536,9]]},"41":{"position":[[423,9],[535,10]]}}}],["implement",{"_index":960,"t":{"97":{"position":[[160,9]]}}}],["impli",{"_index":91,"t":{"6":{"position":[[323,7]]},"66":{"position":[[578,7]]}}}],["implicit",{"_index":10,"t":{"2":{"position":[[129,8]]},"4":{"position":[[111,8],[399,8]]},"6":{"position":[[49,8],[392,8],[1017,8]]},"8":{"position":[[218,8],[528,8],[541,8],[944,8],[1266,8],[1581,8]]},"20":{"position":[[96,8]]},"32":{"position":[[318,8]]},"34":{"position":[[151,8]]},"41":{"position":[[99,8]]},"43":{"position":[[121,8]]},"45":{"position":[[132,8],[546,8]]},"47":{"position":[[250,8],[753,8]]},"51":{"position":[[117,8]]},"53":{"position":[[42,8]]},"55":{"position":[[42,8]]},"57":{"position":[[425,8]]},"59":{"position":[[456,8]]},"61":{"position":[[318,8],[868,8]]},"63":{"position":[[84,8]]},"66":{"position":[[87,8]]},"68":{"position":[[51,8]]},"70":{"position":[[160,8]]},"74":{"position":[[396,8]]},"76":{"position":[[221,8],[459,8]]},"87":{"position":[[84,8],[590,8]]},"89":{"position":[[168,8],[587,8]]},"95":{"position":[[91,8]]},"99":{"position":[[171,8]]},"101":{"position":[[186,8]]},"105":{"position":[[62,8]]},"107":{"position":[[148,8]]},"110":{"position":[[36,8]]},"112":{"position":[[68,8]]}}}],["improv",{"_index":668,"t":{"61":{"position":[[15,7]]}}}],["impur",{"_index":926,"t":{"91":{"position":[[321,7]]}}}],["inch",{"_index":170,"t":{"8":{"position":[[857,7],[921,6],[970,4],[1033,4],[1070,6],[1082,4]]}}}],["inci",{"_index":398,"t":{"32":{"position":[[464,4],[484,4],[860,5]]}}}],["includ",{"_index":758,"t":{"72":{"position":[[133,8]]},"81":{"position":[[51,7]]}}}],["incx",{"_index":397,"t":{"32":{"position":[[454,4],[475,4],[851,5]]}}}],["incxz",{"_index":403,"t":{"32":{"position":[[617,6],[930,6]]}}}],["incyz",{"_index":404,"t":{"32":{"position":[[627,5],[940,6]]}}}],["independ",{"_index":729,"t":{"66":{"position":[[796,12]]}}}],["indic",{"_index":242,"t":{"12":{"position":[[67,9]]},"66":{"position":[[846,9]]},"72":{"position":[[575,8]]},"91":{"position":[[220,8]]}}}],["info",{"_index":143,"t":{"8":{"position":[[392,4]]},"45":{"position":[[286,4]]}}}],["inform",{"_index":928,"t":{"93":{"position":[[45,11]]}}}],["initi",{"_index":442,"t":{"34":{"position":[[307,10],[496,10]]},"110":{"position":[[157,11]]}}}],["inner",{"_index":702,"t":{"63":{"position":[[696,6]]}}}],["inner_product",{"_index":693,"t":{"63":{"position":[[70,13],[878,13]]}}}],["input",{"_index":135,"t":{"8":{"position":[[89,6],[265,6],[296,6]]},"26":{"position":[[61,6]]},"51":{"position":[[139,6],[162,6],[181,5],[190,6],[256,6],[290,6]]},"66":{"position":[[112,6],[143,6],[162,5],[179,5],[221,6]]},"99":{"position":[[196,6],[271,6],[290,5],[335,6]]}}}],["input1",{"_index":883,"t":{"87":{"position":[[114,7],[234,7],[254,6],[363,6],[439,7]]}}}],["input2",{"_index":884,"t":{"87":{"position":[[122,7],[276,7],[296,6],[372,6],[454,7]]}}}],["input_path",{"_index":55,"t":{"4":{"position":[[147,11],[235,10],[447,10],[536,10]]}}}],["input_path(1:1",{"_index":65,"t":{"4":{"position":[[490,16]]}}}],["input_path(1:2",{"_index":66,"t":{"4":{"position":[[555,16]]}}}],["input_path(2:lnblnk(input_path",{"_index":69,"t":{"4":{"position":[[657,32]]}}}],["input_path(:lnblnk(input_path",{"_index":71,"t":{"4":{"position":[[764,31]]}}}],["insensit",{"_index":237,"t":{"10":{"position":[[159,12]]}}}],["insid",{"_index":807,"t":{"74":{"position":[[182,6]]}}}],["instal",{"_index":379,"t":{"30":{"position":[[0,7],[39,7]]},"114":{"position":[[214,7],[267,7],[305,7],[332,7]]}}}],["instead",{"_index":476,"t":{"41":{"position":[[477,8]]},"112":{"position":[[487,7]]},"114":{"position":[[726,7]]}}}],["int",{"_index":325,"t":{"22":{"position":[[188,4]]}}}],["int(0.2)=0",{"_index":326,"t":{"22":{"position":[[202,11]]}}}],["int(3.3)=3",{"_index":327,"t":{"22":{"position":[[214,10]]}}}],["int(a/p)*p",{"_index":336,"t":{"22":{"position":[[348,10]]}}}],["int(x",{"_index":324,"t":{"22":{"position":[[160,6]]}}}],["int(z2",{"_index":475,"t":{"41":{"position":[[469,7]]}}}],["int16",{"_index":280,"t":{"18":{"position":[[702,6]]}}}],["int32",{"_index":281,"t":{"18":{"position":[[709,6]]}}}],["int64",{"_index":282,"t":{"18":{"position":[[716,6]]}}}],["int8",{"_index":279,"t":{"18":{"position":[[696,5]]}}}],["integ",{"_index":12,"t":{"2":{"position":[[143,7]]},"6":{"position":[[63,7],[82,7],[406,8],[436,7],[586,8],[626,7],[1031,8],[1121,8],[1213,8],[1248,7],[1431,8]]},"8":{"position":[[190,7],[232,7],[1595,7]]},"12":{"position":[[0,7]]},"14":{"position":[[0,7]]},"18":{"position":[[84,8],[357,7],[1063,7],[1114,7]]},"20":{"position":[[273,8]]},"22":{"position":[[119,7],[179,8],[261,8]]},"26":{"position":[[0,7]]},"32":{"position":[[332,7],[443,7],[606,7]]},"34":{"position":[[194,7]]},"41":{"position":[[456,8]]},"43":{"position":[[135,7]]},"45":{"position":[[146,7],[560,7]]},"53":{"position":[[56,7],[177,7]]},"55":{"position":[[56,7]]},"57":{"position":[[439,8]]},"59":{"position":[[509,7]]},"61":{"position":[[556,8],[621,7]]},"63":{"position":[[98,7],[187,7]]},"66":{"position":[[101,7]]},"68":{"position":[[65,7]]},"70":{"position":[[174,8],[302,7]]},"74":{"position":[[410,8],[543,7]]},"81":{"position":[[68,7]]},"89":{"position":[[190,8],[363,8],[611,7]]},"95":{"position":[[148,8],[190,8]]},"99":{"position":[[185,7],[408,8],[433,8],[464,7]]},"101":{"position":[[200,7],[427,8],[452,7]]},"105":{"position":[[23,9],[76,7],[115,8],[247,8],[279,7]]},"107":{"position":[[162,8],[287,7]]},"110":{"position":[[126,7]]},"112":{"position":[[258,7]]}}}],["integer(kind=selected_int_kind(12",{"_index":301,"t":{"18":{"position":[[1153,35]]}}}],["integr",{"_index":669,"t":{"61":{"position":[[39,11],[79,11],[350,8],[763,8],[833,11],[960,11]]},"70":{"position":[[59,11]]}}}],["integral(f",{"_index":677,"t":{"61":{"position":[[377,11]]}}}],["integral(sin",{"_index":688,"t":{"61":{"position":[[908,13]]}}}],["integral_result",{"_index":684,"t":{"61":{"position":[[589,15],[723,15]]}}}],["integration_modul",{"_index":674,"t":{"61":{"position":[[299,18],[783,18],[849,18]]}}}],["intel",{"_index":463,"t":{"36":{"position":[[22,5]]},"81":{"position":[[615,5]]}}}],["intend",{"_index":795,"t":{"72":{"position":[[823,8]]}}}],["intent",{"_index":519,"t":{"47":{"position":[[278,6]]}}}],["intent(in",{"_index":63,"t":{"4":{"position":[[433,10]]},"47":{"position":[[310,10],[337,10]]},"57":{"position":[[1221,10]]},"61":{"position":[[469,10],[537,10],[565,10]]},"89":{"position":[[288,10]]},"99":{"position":[[417,10]]},"101":{"position":[[436,10]]},"105":{"position":[[256,9]]}}}],["intent(out",{"_index":522,"t":{"47":{"position":[[364,11]]},"99":{"position":[[442,11]]}}}],["interfac",{"_index":679,"t":{"61":{"position":[[422,9],[521,9]]},"93":{"position":[[0,9]]}}}],["interg",{"_index":199,"t":{"8":{"position":[[1733,8]]}}}],["intern",{"_index":755,"t":{"72":{"position":[[63,13]]}}}],["intrins",{"_index":83,"t":{"6":{"position":[[222,9]]},"18":{"position":[[678,10]]},"59":{"position":[[470,9]]},"61":{"position":[[882,9]]}}}],["introduc",{"_index":559,"t":{"49":{"position":[[230,10]]}}}],["introduct",{"_index":987,"t":{"103":{"position":[[102,12]]}}}],["invers",{"_index":342,"t":{"24":{"position":[[45,7],[104,7],[165,7],[183,7]]}}}],["invok",{"_index":957,"t":{"97":{"position":[[91,6]]}}}],["is(colored_line_typ",{"_index":1084,"t":{"112":{"position":[[1074,21]]}}}],["is(line_typ",{"_index":1082,"t":{"112":{"position":[[1012,13]]}}}],["is(vector_line_typ",{"_index":1089,"t":{"112":{"position":[[1168,20]]}}}],["iseven(i",{"_index":722,"t":{"66":{"position":[[517,11]]}}}],["iter",{"_index":720,"t":{"66":{"position":[[479,9],[628,7],[768,10],[872,8]]},"70":{"position":[[196,9],[391,9],[594,9]]},"74":{"position":[[432,9],[582,9],[804,9],[867,9]]}}}],["j",{"_index":308,"t":{"20":{"position":[[241,2]]},"34":{"position":[[214,1],[542,1],[670,1],[702,2]]},"66":{"position":[[735,1]]}}}],["k",{"_index":309,"t":{"20":{"position":[[244,2]]},"34":{"position":[[205,2],[604,2],[623,2]]}}}],["k=3",{"_index":437,"t":{"34":{"position":[[232,4]]}}}],["keyword",{"_index":145,"t":{"8":{"position":[[416,8],[474,8]]},"53":{"position":[[398,7]]},"66":{"position":[[835,7]]},"76":{"position":[[573,7],[789,8]]},"85":{"position":[[139,7]]},"91":{"position":[[303,8]]},"97":{"position":[[149,7]]},"112":{"position":[[479,7]]}}}],["kind",{"_index":255,"t":{"18":{"position":[[4,4],[413,4]]}}}],["kind(1.0d0",{"_index":605,"t":{"57":{"position":[[466,11]]}}}],["kind=kind(0.0d0",{"_index":299,"t":{"18":{"position":[[1094,17]]}}}],["kind_need",{"_index":903,"t":{"89":{"position":[[385,11],[457,13]]}}}],["km",{"_index":602,"t":{"57":{"position":[[396,2],[1126,3]]}}}],["l",{"_index":310,"t":{"20":{"position":[[247,2]]}}}],["l/usr/lib",{"_index":390,"t":{"30":{"position":[[181,9]]},"32":{"position":[[288,9]]}}}],["lapack",{"_index":381,"t":{"30":{"position":[[17,6]]}}}],["lapacklib",{"_index":386,"t":{"30":{"position":[[59,9]]}}}],["larg",{"_index":812,"t":{"76":{"position":[[0,5]]}}}],["large_int",{"_index":302,"t":{"18":{"position":[[1192,9]]}}}],["last",{"_index":852,"t":{"78":{"position":[[138,4]]}}}],["lat1",{"_index":609,"t":{"57":{"position":[[540,4],[700,4],[866,4]]}}}],["lat2",{"_index":612,"t":{"57":{"position":[[592,4],[807,4],[908,4]]}}}],["lat2)/2))**2",{"_index":620,"t":{"57":{"position":[[967,12]]}}}],["latitud",{"_index":583,"t":{"57":{"position":[[57,8],[229,8],[667,9],[774,9]]}}}],["lax(33.94",{"_index":599,"t":{"57":{"position":[[357,10]]}}}],["lbla",{"_index":388,"t":{"30":{"position":[[114,5],[192,5]]},"32":{"position":[[226,5],[299,5]]}}}],["le",{"_index":548,"t":{"49":{"position":[[51,4]]}}}],["learn",{"_index":128,"t":{"8":{"position":[[8,5]]}}}],["left(1",{"_index":897,"t":{"89":{"position":[[74,7]]}}}],["left[\\frac{f(a)}{2",{"_index":654,"t":{"59":{"position":[[248,20]]}}}],["leftarrow",{"_index":430,"t":{"34":{"position":[[70,10]]}}}],["len",{"_index":252,"t":{"12":{"position":[[206,4]]}}}],["len_trim(arg",{"_index":37,"t":{"2":{"position":[[553,14]]}}}],["length",{"_index":86,"t":{"6":{"position":[[263,6]]},"8":{"position":[[997,6],[1059,7]]},"12":{"position":[[167,6]]},"32":{"position":[[351,6]]},"47":{"position":[[877,6],[931,6]]},"63":{"position":[[106,6],[237,6],[266,6],[278,6],[316,6],[454,6],[568,6],[640,6]]}}}],["less",{"_index":545,"t":{"49":{"position":[[23,4],[56,4],[321,4],[349,4]]}}}],["let'",{"_index":168,"t":{"8":{"position":[[794,5]]},"81":{"position":[[688,5]]}}}],["letter",{"_index":156,"t":{"8":{"position":[[612,8]]},"10":{"position":[[136,7]]},"20":{"position":[[174,6]]}}}],["lib",{"_index":389,"t":{"30":{"position":[[130,4]]}}}],["librari",{"_index":382,"t":{"30":{"position":[[24,10]]}}}],["licens",{"_index":752,"t":{"72":{"position":[[13,8],[77,8],[176,8],[246,7],[562,8],[756,7],[969,8]]}}}],["licensor",{"_index":791,"t":{"72":{"position":[[683,8]]}}}],["lim",{"_index":973,"t":{"101":{"position":[[211,4],[305,3],[319,3]]}}}],["limit",{"_index":739,"t":{"70":{"position":[[121,6]]},"72":{"position":[[911,5]]},"101":{"position":[[286,6]]}}}],["line",{"_index":5,"t":{"2":{"position":[[77,4]]},"8":{"position":[[2185,4],[2226,5],[2393,5],[2453,4]]},"28":{"position":[[111,4],[149,6],[164,5],[176,4]]},"112":{"position":[[98,4],[202,4],[656,4]]}}}],["line_typ",{"_index":1055,"t":{"112":{"position":[[116,9],[174,9],[671,10]]}}}],["link",{"_index":784,"t":{"72":{"position":[[550,4]]},"76":{"position":[[1284,8]]},"114":{"position":[[905,7]]}}}],["linux",{"_index":1097,"t":{"114":{"position":[[91,5]]}}}],["local",{"_index":931,"t":{"93":{"position":[[196,5]]}}}],["log",{"_index":358,"t":{"24":{"position":[[272,3]]}}}],["log10",{"_index":361,"t":{"24":{"position":[[294,5]]}}}],["log_bas",{"_index":853,"t":{"78":{"position":[[268,8]]}}}],["logarithm",{"_index":360,"t":{"24":{"position":[[284,9],[307,9]]}}}],["logic",{"_index":248,"t":{"12":{"position":[[126,7]]},"14":{"position":[[70,7]]},"18":{"position":[[123,8]]},"112":{"position":[[377,7]]}}}],["lon1",{"_index":611,"t":{"57":{"position":[[566,4],[754,4],[887,4]]}}}],["lon2",{"_index":613,"t":{"57":{"position":[[618,4],[861,4],[929,4]]}}}],["lon2)/2))**2",{"_index":624,"t":{"57":{"position":[[1021,12]]}}}],["long",{"_index":223,"t":{"8":{"position":[[2260,4],[2399,5]]}}}],["longer",{"_index":231,"t":{"10":{"position":[[22,6]]}}}],["longitud",{"_index":584,"t":{"57":{"position":[[70,10],[244,9],[720,10],[827,10]]}}}],["loop",{"_index":92,"t":{"6":{"position":[[334,4]]},"66":{"position":[[297,4],[373,4],[589,6],[700,6],[787,4],[860,4]]}}}],["lowercas",{"_index":150,"t":{"8":{"position":[[491,9]]}}}],["ls",{"_index":484,"t":{"43":{"position":[[199,3]]}}}],["lt",{"_index":544,"t":{"49":{"position":[[18,4]]}}}],["m",{"_index":311,"t":{"20":{"position":[[250,2]]},"26":{"position":[[11,2],[135,2]]},"34":{"position":[[202,2],[537,1],[598,2],[617,2],[635,2],[665,1]]}}}],["m=2",{"_index":436,"t":{"34":{"position":[[226,5]]}}}],["machin",{"_index":1098,"t":{"114":{"position":[[97,7]]}}}],["maco",{"_index":1105,"t":{"114":{"position":[[291,5]]}}}],["made",{"_index":786,"t":{"72":{"position":[[600,5]]}}}],["main",{"_index":9,"t":{"2":{"position":[[124,4]]},"32":{"position":[[313,4]]},"34":{"position":[[146,4]]},"43":{"position":[[116,4]]},"47":{"position":[[1163,4]]},"85":{"position":[[152,4]]},"95":{"position":[[86,4]]},"105":{"position":[[57,4]]},"107":{"position":[[143,4]]},"110":{"position":[[31,4]]},"112":{"position":[[63,4]]},"114":{"position":[[887,4]]}}}],["main.f90",{"_index":1117,"t":{"114":{"position":[[998,8]]}}}],["make",{"_index":828,"t":{"76":{"position":[[581,5]]}}}],["mani",{"_index":806,"t":{"74":{"position":[[166,4]]}}}],["manipul",{"_index":399,"t":{"32":{"position":[[504,10]]}}}],["manner",{"_index":788,"t":{"72":{"position":[[638,7]]}}}],["manual",{"_index":978,"t":{"103":{"position":[[20,6]]}}}],["match",{"_index":268,"t":{"18":{"position":[[424,7]]}}}],["materi",{"_index":757,"t":{"72":{"position":[[102,9],[279,10],[341,8],[420,8],[933,9]]}}}],["math_pi",{"_index":850,"t":{"78":{"position":[[37,7]]}}}],["mathemat",{"_index":816,"t":{"76":{"position":[[105,12]]}}}],["matmul(a",{"_index":122,"t":{"6":{"position":[[1271,9]]}}}],["matric",{"_index":428,"t":{"34":{"position":[[49,9],[318,8]]},"36":{"position":[[12,9]]}}}],["matrix",{"_index":112,"t":{"6":{"position":[[917,6],[975,6]]},"26":{"position":[[38,6]]},"34":{"position":[[509,6],[646,6]]}}}],["matrix_mult",{"_index":115,"t":{"6":{"position":[[1005,11],[1339,11]]}}}],["max",{"_index":227,"t":{"8":{"position":[[2385,3]]}}}],["mean",{"_index":543,"t":{"49":{"position":[[10,7],[311,7]]}}}],["medium",{"_index":770,"t":{"72":{"position":[[357,6]]}}}],["method",{"_index":661,"t":{"59":{"position":[[431,6]]},"70":{"position":[[49,6]]},"74":{"position":[[50,7]]}}}],["mkl",{"_index":464,"t":{"36":{"position":[[28,3]]}}}],["mod",{"_index":844,"t":{"76":{"position":[[1203,4],[1320,4]]}}}],["mod(a",{"_index":334,"t":{"22":{"position":[[334,6]]}}}],["modern",{"_index":988,"t":{"103":{"position":[[118,6]]}}}],["modifi",{"_index":833,"t":{"76":{"position":[[865,9]]}}}],["modul",{"_index":528,"t":{"47":{"position":[[620,6]]},"61":{"position":[[186,6],[254,7],[292,6],[776,6]]},"76":{"position":[[44,7],[146,6],[201,6],[332,6],[395,7],[689,7],[895,6],[1004,7],[1113,6],[1161,6]]},"85":{"position":[[110,6]]},"87":{"position":[[36,7],[66,6],[507,6]]},"89":{"position":[[145,6],[495,6]]},"91":{"position":[[175,6]]},"110":{"position":[[85,7]]},"114":{"position":[[803,7],[861,7],[913,6],[949,7]]}}}],["module.f90",{"_index":1116,"t":{"114":{"position":[[978,10]]}}}],["module.o",{"_index":1118,"t":{"114":{"position":[[1007,8]]}}}],["modulo(a,p",{"_index":337,"t":{"22":{"position":[[359,11]]}}}],["modulo(num",{"_index":734,"t":{"68":{"position":[[112,12]]}}}],["mont",{"_index":736,"t":{"70":{"position":[[37,5]]},"74":{"position":[[38,5]]}}}],["monte_area",{"_index":747,"t":{"70":{"position":[[316,10],[519,10],[532,10],[581,10]]},"74":{"position":[[557,10],[724,10],[737,10],[791,10],[854,10]]}}}],["moral",{"_index":797,"t":{"72":{"position":[[894,5]]}}}],["more",{"_index":585,"t":{"57":{"position":[[86,4]]},"114":{"position":[[929,4]]}}}],["mourik",{"_index":981,"t":{"103":{"position":[[40,6]]}}}],["mpi_comm_rank(mpi_comm_world",{"_index":864,"t":{"81":{"position":[[252,29]]}}}],["mpi_comm_size(mpi_comm_world",{"_index":863,"t":{"81":{"position":[[192,29]]}}}],["mpi_finalize(ierror",{"_index":871,"t":{"81":{"position":[[489,20]]}}}],["mpi_get_processor_name(processor_nam",{"_index":865,"t":{"81":{"position":[[309,38]]}}}],["mpi_init(ierror",{"_index":862,"t":{"81":{"position":[[170,16]]}}}],["mpi_max_processor_nam",{"_index":860,"t":{"81":{"position":[[125,24]]}}}],["mpif.h",{"_index":856,"t":{"81":{"position":[[59,8]]}}}],["mpif90",{"_index":872,"t":{"81":{"position":[[540,6]]}}}],["mpiifort",{"_index":875,"t":{"81":{"position":[[630,8]]}}}],["mpirun",{"_index":877,"t":{"81":{"position":[[715,6]]}}}],["much",{"_index":273,"t":{"18":{"position":[[513,4]]}}}],["multipl",{"_index":113,"t":{"6":{"position":[[924,15],[982,14]]},"8":{"position":[[2428,8]]},"66":{"position":[[636,8]]}}}],["multipli",{"_index":462,"t":{"36":{"position":[[0,11]]}}}],["n",{"_index":312,"t":{"20":{"position":[[253,2]]},"26":{"position":[[14,1],[138,1]]},"32":{"position":[[343,1]]},"34":{"position":[[208,2],[549,1],[601,2],[677,1]]},"59":{"position":[[523,1],[525,1],[562,1],[605,1]]},"61":{"position":[[395,2],[579,1],[648,1],[687,1]]},"99":{"position":[[114,1],[123,2],[136,1],[431,1],[482,2],[530,1]]},"101":{"position":[[153,1],[450,1],[473,2],[539,2]]},"107":{"position":[[184,1],[458,1],[668,2],[679,2]]}}}],["n(n",{"_index":962,"t":{"99":{"position":[[106,3]]}}}],["n=1000",{"_index":691,"t":{"61":{"position":[[940,7]]}}}],["n=2",{"_index":438,"t":{"34":{"position":[[237,4]]}}}],["name",{"_index":60,"t":{"4":{"position":[[209,5]]},"8":{"position":[[406,5],[629,4],[643,4],[699,6],[2331,4]]},"10":{"position":[[4,5],[144,5]]},"14":{"position":[[107,4]]},"20":{"position":[[188,4],[221,4]]},"76":{"position":[[153,5]]},"95":{"position":[[327,4],[401,4]]},"110":{"position":[[187,4],[629,5]]},"114":{"position":[[583,5],[702,4]]}}}],["namelen",{"_index":866,"t":{"81":{"position":[[348,8]]}}}],["natur",{"_index":359,"t":{"24":{"position":[[276,7]]}}}],["ne",{"_index":552,"t":{"49":{"position":[[120,4]]}}}],["nearest",{"_index":331,"t":{"22":{"position":[[253,7]]}}}],["necessari",{"_index":794,"t":{"72":{"position":[[804,9]]},"93":{"position":[[35,9]]}}}],["need",{"_index":25,"t":{"2":{"position":[[369,5]]},"8":{"position":[[2239,4]]},"20":{"position":[[21,4]]},"72":{"position":[[200,4]]},"76":{"position":[[1012,4],[1252,4]]},"114":{"position":[[841,4]]}}}],["neqv",{"_index":557,"t":{"49":{"position":[[204,6]]}}}],["nest",{"_index":726,"t":{"66":{"position":[[693,6]]}}}],["new_us",{"_index":1035,"t":{"110":{"position":[[313,8],[502,8],[564,8]]}}}],["new_user%ag",{"_index":1043,"t":{"110":{"position":[[465,12]]}}}],["new_user%id",{"_index":1039,"t":{"110":{"position":[[414,11]]}}}],["new_user%nam",{"_index":1040,"t":{"110":{"position":[[431,13]]}}}],["next",{"_index":218,"t":{"8":{"position":[[2180,4]]}}}],["nint(x",{"_index":328,"t":{"22":{"position":[[225,6]]}}}],["nnn",{"_index":647,"t":{"59":{"position":[[129,3]]}}}],["no_of_command",{"_index":13,"t":{"2":{"position":[[151,15],[217,14],[294,14],[312,15],[444,14]]}}}],["no_of_stud",{"_index":191,"t":{"8":{"position":[[1606,14],[1716,14]]},"14":{"position":[[11,14]]}}}],["none",{"_index":11,"t":{"2":{"position":[[138,4]]},"4":{"position":[[120,4],[408,4]]},"6":{"position":[[58,4],[401,4],[1026,4]]},"8":{"position":[[227,4],[953,4],[1275,4],[1590,4]]},"20":{"position":[[105,4]]},"32":{"position":[[327,4]]},"34":{"position":[[160,4]]},"41":{"position":[[108,4]]},"43":{"position":[[130,4]]},"45":{"position":[[141,4],[555,4]]},"47":{"position":[[259,4],[762,4]]},"51":{"position":[[126,4]]},"53":{"position":[[51,4]]},"55":{"position":[[51,4]]},"57":{"position":[[434,4]]},"59":{"position":[[465,4]]},"61":{"position":[[327,4],[877,4]]},"63":{"position":[[93,4]]},"66":{"position":[[96,4]]},"68":{"position":[[60,4]]},"70":{"position":[[169,4]]},"74":{"position":[[405,4]]},"76":{"position":[[230,4],[468,4]]},"87":{"position":[[93,4],[599,4]]},"89":{"position":[[177,4],[596,4]]},"95":{"position":[[100,4]]},"99":{"position":[[180,4]]},"101":{"position":[[195,4]]},"105":{"position":[[71,4]]},"107":{"position":[[157,4]]},"110":{"position":[[45,4]]},"112":{"position":[[77,4]]}}}],["notat",{"_index":561,"t":{"49":{"position":[[262,8]]}}}],["note",{"_index":214,"t":{"8":{"position":[[2104,4]]},"45":{"position":[[291,4]]},"76":{"position":[[999,4]]}}}],["notic",{"_index":536,"t":{"47":{"position":[[967,6]]},"53":{"position":[[377,6]]},"72":{"position":[[718,8]]},"112":{"position":[[644,6]]}}}],["now",{"_index":167,"t":{"8":{"position":[[790,3]]},"61":{"position":[[112,3]]},"76":{"position":[[352,3]]},"87":{"position":[[525,3]]},"95":{"position":[[769,3]]}}}],["np",{"_index":878,"t":{"81":{"position":[[723,2]]}}}],["null",{"_index":951,"t":{"95":{"position":[[728,4],[826,4],[837,6]]}}}],["num",{"_index":733,"t":{"68":{"position":[[76,3],[80,3],[97,4],[148,3],[159,3],[165,3]]}}}],["number",{"_index":22,"t":{"2":{"position":[[268,7]]},"8":{"position":[[198,7],[1794,6]]},"24":{"position":[[211,7]]},"28":{"position":[[213,6]]},"41":{"position":[[23,6]]},"51":{"position":[[39,8]]},"66":{"position":[[563,7]]},"74":{"position":[[82,6]]}}}],["numer",{"_index":317,"t":{"22":{"position":[[49,9]]},"61":{"position":[[29,9]]}}}],["o",{"_index":843,"t":{"76":{"position":[[1196,2],[1272,2]]},"81":{"position":[[571,1],[663,1]]},"114":{"position":[[773,1],[920,2]]}}}],["object",{"_index":950,"t":{"95":{"position":[[645,7]]},"112":{"position":[[23,7],[517,7]]}}}],["obtain",{"_index":760,"t":{"72":{"position":[[208,6]]}}}],["odd",{"_index":723,"t":{"66":{"position":[[559,3]]}}}],["older",{"_index":152,"t":{"8":{"position":[[564,6]]}}}],["on",{"_index":363,"t":{"26":{"position":[[98,3]]},"91":{"position":[[212,3]]}}}],["onc",{"_index":841,"t":{"76":{"position":[[1152,4]]}}}],["open(unit=1",{"_index":493,"t":{"45":{"position":[[160,12],[584,12]]}}}],["oper",{"_index":138,"t":{"8":{"position":[[121,11],[2305,8]]},"32":{"position":[[68,9]]},"41":{"position":[[333,10]]},"49":{"position":[[0,9],[290,10],[301,9]]}}}],["optim",{"_index":1094,"t":{"114":{"position":[[11,9]]}}}],["option",{"_index":332,"t":{"22":{"position":[[270,8]]},"34":{"position":[[485,10]]},"76":{"position":[[1395,7]]}}}],["oracl",{"_index":989,"t":{"103":{"position":[[164,6]]}}}],["order=[2",{"_index":111,"t":{"6":{"position":[[872,9],[1107,9],[1199,9]]}}}],["ordinari",{"_index":954,"t":{"97":{"position":[[0,8]]}}}],["organ",{"_index":813,"t":{"76":{"position":[[22,9]]}}}],["otherwis",{"_index":314,"t":{"20":{"position":[[282,9]]},"76":{"position":[[614,9]]}}}],["out",{"_index":995,"t":{"105":{"position":[[266,4]]}}}],["outer_loop",{"_index":78,"t":{"6":{"position":[[96,10],[142,10]]}}}],["output",{"_index":121,"t":{"6":{"position":[[1241,6],[1262,6]]},"8":{"position":[[249,6],[318,6],[341,8],[369,6],[1499,7],[1548,6],[1947,8]]},"45":{"position":[[96,6]]},"47":{"position":[[783,6],[1069,7],[1091,6]]},"51":{"position":[[146,6],[207,6],[269,6]]},"66":{"position":[[123,6],[185,6],[194,6],[236,6]]},"89":{"position":[[721,7]]},"99":{"position":[[203,6],[318,7],[350,6]]},"101":{"position":[[463,6],[486,6],[553,6],[569,6]]},"107":{"position":[[700,7]]}}}],["output(ii",{"_index":123,"t":{"6":{"position":[[1306,10]]}}}],["p",{"_index":335,"t":{"22":{"position":[[341,2]]}}}],["p1",{"_index":935,"t":{"95":{"position":[[122,3],[242,2],[260,2],[343,4],[498,3],[507,2],[564,2],[621,2]]}}}],["p2",{"_index":936,"t":{"95":{"position":[[126,2],[372,2],[519,3],[528,2],[628,2],[671,3],[773,2],[831,2]]}}}],["page",{"_index":588,"t":{"57":{"position":[[128,5]]}}}],["parallel",{"_index":730,"t":{"66":{"position":[[884,9]]}}}],["paramet",{"_index":185,"t":{"8":{"position":[[1304,9]]},"16":{"position":[[6,9]]},"18":{"position":[[14,10],[751,11],[825,9],[949,9]]},"34":{"position":[[216,9]]},"57":{"position":[[448,9],[488,9],[1266,9]]},"66":{"position":[[315,10]]},"70":{"position":[[183,9]]},"74":{"position":[[419,9]]},"76":{"position":[[257,9],[300,9]]},"89":{"position":[[199,10],[372,9]]},"107":{"position":[[171,9]]},"110":{"position":[[139,10]]}}}],["pars",{"_index":3,"t":{"2":{"position":[[63,5]]}}}],["part",{"_index":203,"t":{"8":{"position":[[1844,4],[1915,4]]},"18":{"position":[[546,4]]},"41":{"position":[[433,5],[448,4],[504,4],[546,4]]},"114":{"position":[[356,4]]}}}],["parti",{"_index":756,"t":{"72":{"position":[[96,5]]}}}],["pass",{"_index":672,"t":{"61":{"position":[[124,4]]}}}],["path",{"_index":51,"t":{"4":{"position":[[58,5],[301,5]]},"30":{"position":[[153,4]]},"32":{"position":[[259,5]]}}}],["perform",{"_index":136,"t":{"8":{"position":[[96,8]]},"32":{"position":[[43,8]]},"114":{"position":[[30,11]]}}}],["permiss",{"_index":761,"t":{"72":{"position":[[215,10],[792,11]]}}}],["physic",{"_index":817,"t":{"76":{"position":[[122,8]]}}}],["pi",{"_index":186,"t":{"8":{"position":[[1317,2],[1414,2],[2060,2],[2090,2]]},"16":{"position":[[19,2]]},"18":{"position":[[838,2],[962,2]]},"74":{"position":[[29,5],[281,5],[352,6],[393,2],[776,3],[920,2]]},"76":{"position":[[270,2]]},"78":{"position":[[48,2],[104,2],[132,3],[188,2],[222,2],[264,3]]}}}],["pi*rad**2",{"_index":827,"t":{"76":{"position":[[504,9]]}}}],["place",{"_index":581,"t":{"57":{"position":[[35,6]]},"76":{"position":[[1077,6]]},"85":{"position":[[98,6]]}}}],["pleas",{"_index":569,"t":{"53":{"position":[[153,6]]}}}],["point",{"_index":590,"t":{"57":{"position":[[200,6],[680,5],[734,5],[787,5],[841,5]]},"74":{"position":[[171,6]]},"95":{"position":[[248,5],[631,5],[719,5],[817,5]]}}}],["pointer",{"_index":932,"t":{"95":{"position":[[0,7],[111,7],[171,7],[710,8],[790,7]]},"112":{"position":[[575,7]]}}}],["polymorph",{"_index":1053,"t":{"112":{"position":[[11,11],[505,11]]}}}],["posit",{"_index":376,"t":{"28":{"position":[[243,8]]},"51":{"position":[[30,8],[305,8]]},"53":{"position":[[168,8]]},"63":{"position":[[331,8]]}}}],["power",{"_index":901,"t":{"89":{"position":[[220,5],[634,5]]}}}],["practic",{"_index":305,"t":{"20":{"position":[[66,8]]}}}],["pranab",{"_index":226,"t":{"8":{"position":[[2346,9]]}}}],["precis",{"_index":244,"t":{"12":{"position":[[84,11]]},"18":{"position":[[240,10],[790,10],[880,9]]},"22":{"position":[[289,9]]},"32":{"position":[[124,9]]},"34":{"position":[[39,9],[172,9],[249,9]]},"41":{"position":[[283,10]]}}}],["precision(pi",{"_index":293,"t":{"18":{"position":[[992,14]]}}}],["prefix",{"_index":64,"t":{"4":{"position":[[480,6],[607,7]]}}}],["prefix(:lnblnk(prefix",{"_index":68,"t":{"4":{"position":[[630,23],[730,23]]}}}],["previou",{"_index":220,"t":{"8":{"position":[[2217,8]]}}}],["previous",{"_index":670,"t":{"61":{"position":[[57,10]]}}}],["primit",{"_index":259,"t":{"18":{"position":[[58,9]]}}}],["print",{"_index":21,"t":{"2":{"position":[[259,5],[338,5],[677,5]]},"4":{"position":[[182,5],[282,5]]},"6":{"position":[[167,5],[496,5],[1297,5]]},"8":{"position":[[256,5],[287,5],[333,7],[975,5],[1050,5],[1421,5],[1702,5],[1763,5],[1849,5],[2318,5]]},"18":{"position":[[983,5]]},"26":{"position":[[16,5]]},"28":{"position":[[0,5],[54,5],[123,5],[228,7],[258,5]]},"32":{"position":[[866,5],[892,5]]},"34":{"position":[[640,5],[679,5]]},"43":{"position":[[178,5],[235,5],[324,5]]},"45":{"position":[[704,5]]},"51":{"position":[[153,5],[228,5],[281,5]]},"53":{"position":[[71,5],[136,5],[220,5],[290,5],[321,5]]},"55":{"position":[[71,5],[148,5],[190,5],[226,5]]},"57":{"position":[[652,5],[705,5],[759,5],[812,5],[1077,5]]},"59":{"position":[[659,5]]},"61":{"position":[[899,5]]},"63":{"position":[[215,5],[296,5],[403,5],[461,5],[516,5],[575,5],[678,5],[762,5]]},"66":{"position":[[134,5],[212,5],[596,5],[658,5],[707,5]]},"68":{"position":[[139,5]]},"70":{"position":[[604,5],[629,5]]},"74":{"position":[[767,5],[814,5]]},"76":{"position":[[514,5]]},"87":{"position":[[219,5],[261,5],[430,5]]},"89":{"position":[[11,5],[650,5]]},"95":{"position":[[468,5],[489,5],[510,5],[551,5],[608,5],[733,5]]},"99":{"position":[[210,5],[256,5],[326,5]]},"101":{"position":[[218,5],[271,5],[323,5]]},"105":{"position":[[89,5],[186,5]]},"107":{"position":[[327,5],[546,5],[602,5],[627,5]]},"110":{"position":[[573,5],[614,5],[659,5],[767,5]]},"112":{"position":[[1026,5],[1096,5],[1189,5],[1260,5]]}}}],["print_abs_path",{"_index":53,"t":{"4":{"position":[[96,14],[331,14]]}}}],["print_result",{"_index":887,"t":{"87":{"position":[[172,12],[417,12],[490,12],[647,14]]}}}],["privaci",{"_index":796,"t":{"72":{"position":[[882,8]]}}}],["privat",{"_index":675,"t":{"61":{"position":[[332,7]]},"76":{"position":[[235,7],[565,7],[606,7],[644,7]]},"87":{"position":[[98,7]]},"89":{"position":[[182,7]]}}}],["procedur",{"_index":814,"t":{"76":{"position":[[56,11]]},"85":{"position":[[23,10],[77,10]]},"91":{"position":[[58,9]]},"93":{"position":[[138,9]]},"95":{"position":[[48,10]]},"97":{"position":[[17,10],[180,11]]}}}],["process",{"_index":869,"t":{"81":{"position":[[444,8]]}}}],["process_rank",{"_index":857,"t":{"81":{"position":[[76,13],[282,13],[376,13]]}}}],["processor",{"_index":876,"t":{"81":{"position":[[703,11]]}}}],["processor_nam",{"_index":861,"t":{"81":{"position":[[150,14],[407,14]]}}}],["produc",{"_index":110,"t":{"6":{"position":[[808,7],[893,7],[1474,7]]}}}],["product",{"_index":395,"t":{"32":{"position":[[102,7]]},"34":{"position":[[21,7]]},"63":{"position":[[703,7]]}}}],["program",{"_index":8,"t":{"2":{"position":[[116,7],[361,7],[409,7]]},"4":{"position":[[88,7],[323,7]]},"6":{"position":[[19,7],[35,7],[199,7],[377,7],[528,7],[965,7],[997,7],[1331,7]]},"8":{"position":[[57,7],[172,7],[206,7],[380,7],[621,7],[821,7],[886,7],[928,7],[1091,7],[1185,7],[1253,7],[1475,7],[1527,7],[1566,7],[1924,7]]},"20":{"position":[[124,8]]},"30":{"position":[[83,7]]},"32":{"position":[[305,7]]},"34":{"position":[[138,7]]},"41":{"position":[[41,8],[76,7],[634,7]]},"43":{"position":[[75,8],[108,7]]},"45":{"position":[[80,7],[113,7],[267,7],[374,9],[498,7],[528,7],[738,7]]},"47":{"position":[[734,7],[803,8],[1136,7],[1168,8]]},"51":{"position":[[69,7],[101,7],[331,7]]},"53":{"position":[[24,7],[359,7]]},"55":{"position":[[23,7],[268,7]]},"57":{"position":[[399,7],[1388,7]]},"59":{"position":[[438,7],[688,7]]},"61":{"position":[[161,7],[825,7],[952,7]]},"63":{"position":[[62,7],[870,7]]},"66":{"position":[[44,7],[69,7],[247,7]]},"68":{"position":[[30,7],[184,7]]},"70":{"position":[[135,7],[681,7]]},"74":{"position":[[385,7],[912,7]]},"76":{"position":[[6,8],[367,7],[424,7],[543,7],[742,8],[906,8],[1043,7],[1143,8],[1235,8]]},"81":{"position":[[27,7],[514,7]]},"85":{"position":[[157,8]]},"87":{"position":[[539,8],[563,7],[666,7]]},"89":{"position":[[544,7],[691,7]]},"91":{"position":[[43,7],[164,7]]},"93":{"position":[[72,7]]},"95":{"position":[[78,7]]},"99":{"position":[[142,7],[225,7],[590,7]]},"101":{"position":[[159,7],[233,7],[614,7]]},"103":{"position":[[8,11],[69,11],[141,11]]},"105":{"position":[[49,7]]},"107":{"position":[[95,7],[135,7]]},"110":{"position":[[23,7]]},"112":{"position":[[55,7]]},"114":{"position":[[503,7],[892,7]]}}}],["protect",{"_index":832,"t":{"76":{"position":[[779,9]]}}}],["provid",{"_index":783,"t":{"72":{"position":[[540,7]]},"76":{"position":[[1260,7]]},"89":{"position":[[853,7]]},"93":{"position":[[27,7]]}}}],["ptr_arr",{"_index":939,"t":{"95":{"position":[[182,7],[428,7]]}}}],["public",{"_index":676,"t":{"61":{"position":[[340,6]]},"72":{"position":[[871,10]]},"76":{"position":[[249,7],[292,7],[636,7],[703,6]]},"87":{"position":[[136,6]]},"89":{"position":[[210,6],[230,6]]},"110":{"position":[[97,7],[111,6]]}}}],["pure",{"_index":925,"t":{"91":{"position":[[265,4],[312,4]]}}}],["purpos",{"_index":776,"t":{"72":{"position":[[437,8]]}}}],["r",{"_index":183,"t":{"8":{"position":[[1288,2],[1399,1],[1419,1]]},"112":{"position":[[269,2]]}}}],["r1",{"_index":938,"t":{"95":{"position":[[145,2],[227,2],[257,2],[266,2],[477,3],[486,2],[571,2],[604,3]]}}}],["rad",{"_index":636,"t":{"57":{"position":[[1333,3],[1337,3]]},"76":{"position":[[481,3]]}}}],["radian",{"_index":632,"t":{"57":{"position":[[1189,7]]}}}],["radiu",{"_index":181,"t":{"8":{"position":[[1245,7],[1367,6]]},"14":{"position":[[34,7]]},"74":{"position":[[104,6],[203,6],[293,6]]}}}],["radius_of_earth",{"_index":607,"t":{"57":{"position":[[501,15],[1045,15]]}}}],["random",{"_index":803,"t":{"74":{"position":[[75,6]]}}}],["random_number(i",{"_index":748,"t":{"70":{"position":[[428,16]]},"74":{"position":[[619,16]]}}}],["random_number(x",{"_index":716,"t":{"66":{"position":[[416,16]]},"70":{"position":[[406,16]]},"74":{"position":[[597,16]]}}}],["rang",{"_index":290,"t":{"18":{"position":[[903,5],[1127,5]]},"89":{"position":[[355,7]]},"112":{"position":[[284,6]]}}}],["range(pi",{"_index":294,"t":{"18":{"position":[[1007,9]]}}}],["ratio",{"_index":808,"t":{"74":{"position":[[318,5]]}}}],["re",{"_index":405,"t":{"32":{"position":[[642,4],[834,3],[888,3]]},"112":{"position":[[1317,2]]}}}],["read",{"_index":44,"t":{"2":{"position":[[633,4]]},"4":{"position":[[217,4]]},"8":{"position":[[277,4],[308,4],[1022,4],[1391,4]]},"26":{"position":[[127,4]]},"45":{"position":[[384,7],[411,4],[508,4]]},"47":{"position":[[896,4],[950,4]]},"51":{"position":[[173,4]]},"53":{"position":[[105,4]]},"55":{"position":[[105,4]]},"57":{"position":[[81,4],[692,4],[746,4],[799,4],[853,4]]},"63":{"position":[[258,4],[496,4],[610,4]]},"66":{"position":[[154,4]]},"87":{"position":[[246,4],[288,4]]},"99":{"position":[[282,4]]},"101":{"position":[[297,4]]},"105":{"position":[[157,4]]}}}],["read(1",{"_index":506,"t":{"45":{"position":[[644,7]]}}}],["read(arg",{"_index":43,"t":{"2":{"position":[[615,11]]}}}],["read_input",{"_index":885,"t":{"87":{"position":[[146,12],[205,13],[318,11],[609,13]]}}}],["real",{"_index":17,"t":{"2":{"position":[[194,4],[649,4]]},"8":{"position":[[958,4],[1280,4],[1298,5],[1626,4],[1789,4]]},"12":{"position":[[29,4]]},"14":{"position":[[26,4]]},"16":{"position":[[0,5]]},"18":{"position":[[162,5],[394,4],[527,4],[557,4]]},"20":{"position":[[292,5]]},"22":{"position":[[329,4]]},"32":{"position":[[134,4],[369,5],[406,5],[596,4],[637,4]]},"41":{"position":[[414,4],[443,4],[498,5]]},"47":{"position":[[304,5],[331,5],[358,5],[390,4],[767,4]]},"51":{"position":[[25,4],[131,4],[314,6]]},"59":{"position":[[487,4]]},"61":{"position":[[463,5],[485,4],[531,5],[581,4],[605,4]]},"63":{"position":[[113,5],[150,5],[197,4]]},"70":{"position":[[216,4],[235,4],[254,4]]},"74":{"position":[[452,4],[465,4],[485,4],[504,4],[524,4]]},"76":{"position":[[243,5],[286,5],[473,4]]},"87":{"position":[[106,4]]},"89":{"position":[[282,5],[304,4],[601,4]]},"95":{"position":[[105,5],[129,5]]},"107":{"position":[[222,4]]},"110":{"position":[[192,4],[264,4]]},"112":{"position":[[126,4]]}}}],["real(dp",{"_index":606,"t":{"57":{"position":[[478,9],[528,8],[554,8],[580,8],[606,8],[632,8]]}}}],["real(i",{"_index":298,"t":{"18":{"position":[[1086,7]]}}}],["real(kind=kind(0.0d0",{"_index":287,"t":{"18":{"position":[[801,23],[1035,22]]},"57":{"position":[[1197,23],[1242,23],[1307,22]]}}}],["real(kind=kind(1.0d0",{"_index":1005,"t":{"107":{"position":[[248,22]]}}}],["real(kind=selected_real_kind(12",{"_index":291,"t":{"18":{"position":[[909,32]]}}}],["real(x",{"_index":333,"t":{"22":{"position":[[299,6]]},"89":{"position":[[449,7]]}}}],["real(z2",{"_index":477,"t":{"41":{"position":[[514,8]]}}}],["real128",{"_index":285,"t":{"18":{"position":[[743,7]]}}}],["real32",{"_index":283,"t":{"18":{"position":[[723,7]]}}}],["real64",{"_index":284,"t":{"18":{"position":[[731,7]]}}}],["reason",{"_index":787,"t":{"72":{"position":[[627,10]]}}}],["recommend",{"_index":275,"t":{"18":{"position":[[594,11]]}}}],["recurs",{"_index":955,"t":{"97":{"position":[[62,10],[139,9],[170,9]]},"99":{"position":[[26,9],[366,9]]},"101":{"position":[[33,9],[380,9]]}}}],["recursive_funct",{"_index":972,"t":{"101":{"position":[[167,18],[622,18]]}}}],["recursive_subroutin",{"_index":963,"t":{"99":{"position":[[150,20],[598,20]]}}}],["redistribut",{"_index":769,"t":{"72":{"position":[[324,12]]}}}],["rel",{"_index":810,"t":{"74":{"position":[[823,9]]},"107":{"position":[[636,9],[804,8]]}}}],["relat",{"_index":157,"t":{"8":{"position":[[656,8]]},"49":{"position":[[279,10]]}}}],["remix",{"_index":772,"t":{"72":{"position":[[383,6]]}}}],["renam",{"_index":849,"t":{"78":{"position":[[0,6],[229,6]]}}}],["report",{"_index":1008,"t":{"107":{"position":[[344,6],[717,6]]}}}],["reproduc",{"_index":764,"t":{"72":{"position":[[264,9]]}}}],["requir",{"_index":40,"t":{"2":{"position":[[585,8]]}}}],["reserv",{"_index":500,"t":{"45":{"position":[[322,9]]}}}],["reshap",{"_index":106,"t":{"6":{"position":[[752,8]]}}}],["reshape([1",{"_index":107,"t":{"6":{"position":[[765,11],[836,11],[1063,11],[1153,11]]}}}],["respect",{"_index":762,"t":{"72":{"position":[[235,10]]},"91":{"position":[[329,13]]}}}],["rest",{"_index":718,"t":{"66":{"position":[[463,4]]}}}],["result",{"_index":139,"t":{"8":{"position":[[147,7]]},"32":{"position":[[875,7],[907,6]]},"63":{"position":[[780,7]]},"70":{"position":[[650,6]]},"99":{"position":[[400,7],[457,6],[521,6],[543,6]]}}}],["result(f_result",{"_index":681,"t":{"61":{"position":[[446,16]]},"89":{"position":[[265,16]]}}}],["result(integral_result",{"_index":678,"t":{"61":{"position":[[398,23]]}}}],["result(output",{"_index":977,"t":{"101":{"position":[[412,14]]}}}],["result(rad",{"_index":630,"t":{"57":{"position":[[1164,11]]}}}],["result1",{"_index":193,"t":{"8":{"position":[[1634,8],[1651,7],[1779,7]]}}}],["result2",{"_index":194,"t":{"8":{"position":[[1643,7],[1671,7],[1865,7]]}}}],["return",{"_index":73,"t":{"4":{"position":[[802,6]]},"8":{"position":[[137,7]]},"89":{"position":[[863,6]]},"91":{"position":[[112,7]]},"95":{"position":[[688,7]]}}}],["revers",{"_index":1069,"t":{"112":{"position":[[437,7]]}}}],["right",{"_index":533,"t":{"47":{"position":[[841,5]]},"72":{"position":[[856,6],[900,6]]}}}],["root",{"_index":356,"t":{"24":{"position":[[251,4]]},"51":{"position":[[17,4],[96,4],[245,4]]}}}],["round",{"_index":330,"t":{"22":{"position":[[243,6]]}}}],["run",{"_index":834,"t":{"76":{"position":[[887,3]]},"81":{"position":[[694,3]]},"114":{"position":[[109,7]]}}}],["s",{"_index":985,"t":{"103":{"position":[[91,1]]}}}],["s1",{"_index":531,"t":{"47":{"position":[[775,3],[908,2]]}}}],["s2",{"_index":532,"t":{"47":{"position":[[779,3],[962,2],[1065,3]]}}}],["salari",{"_index":1033,"t":{"110":{"position":[[272,6],[776,8]]}}}],["same",{"_index":125,"t":{"6":{"position":[[1388,4]]},"8":{"position":[[558,5]]},"28":{"position":[[79,4]]},"32":{"position":[[558,4]]},"76":{"position":[[1091,4]]},"78":{"position":[[154,4]]},"95":{"position":[[463,4],[640,4]]},"112":{"position":[[1333,4]]},"114":{"position":[[602,4]]}}}],["sampl",{"_index":909,"t":{"89":{"position":[[714,6]]},"107":{"position":[[693,6]]}}}],["savag",{"_index":1013,"t":{"107":{"position":[[431,6]]}}}],["scalar",{"_index":394,"t":{"32":{"position":[[93,6]]}}}],["scaler",{"_index":127,"t":{"6":{"position":[[1417,6]]}}}],["scientif",{"_index":1095,"t":{"114":{"position":[[42,10]]}}}],["sdot",{"_index":392,"t":{"32":{"position":[[23,5],[647,4],[661,4]]}}}],["sdot(n",{"_index":423,"t":{"32":{"position":[[840,7],[919,7]]}}}],["sec",{"_index":1019,"t":{"107":{"position":[[595,6],[769,4]]}}}],["second",{"_index":373,"t":{"28":{"position":[[156,7],[206,6]]},"63":{"position":[[532,6]]}}}],["section",{"_index":1115,"t":{"114":{"position":[[957,8]]}}}],["see",{"_index":103,"t":{"6":{"position":[[671,3]]},"32":{"position":[[570,3]]}}}],["select",{"_index":576,"t":{"55":{"position":[[117,6],[257,6]]},"112":{"position":[[981,6],[1308,6]]}}}],["selected_char_kind",{"_index":276,"t":{"18":{"position":[[617,19]]}}}],["selected_int_kind",{"_index":277,"t":{"18":{"position":[[637,17]]}}}],["selected_real_kind",{"_index":278,"t":{"18":{"position":[[659,18]]}}}],["selected_real_kind(pow",{"_index":904,"t":{"89":{"position":[[399,24]]}}}],["selected_real_kind(precis",{"_index":902,"t":{"89":{"position":[[323,28]]}}}],["semicolon",{"_index":230,"t":{"8":{"position":[[2463,9]]}}}],["senior",{"_index":573,"t":{"53":{"position":[[339,8]]},"55":{"position":[[244,8]]}}}],["sensit",{"_index":148,"t":{"8":{"position":[[449,10]]}}}],["separ",{"_index":229,"t":{"8":{"position":[[2419,8]]},"26":{"position":[[76,9]]},"61":{"position":[[177,8]]},"76":{"position":[[35,8]]},"105":{"position":[[124,10]]},"114":{"position":[[814,8]]}}}],["seri",{"_index":967,"t":{"101":{"position":[[20,6],[95,6],[262,8]]}}}],["set",{"_index":286,"t":{"18":{"position":[[775,7]]},"95":{"position":[[238,3],[810,3]]}}}],["shape(a",{"_index":117,"t":{"6":{"position":[[1095,9]]}}}],["shape(b",{"_index":120,"t":{"6":{"position":[[1187,9]]}}}],["share",{"_index":767,"t":{"72":{"position":[[307,5]]}}}],["side",{"_index":535,"t":{"47":{"position":[[887,4],[941,4]]},"91":{"position":[[0,4],[277,4]]}}}],["side_a",{"_index":521,"t":{"47":{"position":[[324,6],[410,6],[419,6]]}}}],["side_b",{"_index":518,"t":{"47":{"position":[[230,7],[351,6],[428,6],[437,6]]}}}],["simpl",{"_index":132,"t":{"8":{"position":[[50,6],[814,6]]}}}],["simplifi",{"_index":560,"t":{"49":{"position":[[251,10]]}}}],["sin",{"_index":339,"t":{"24":{"position":[[22,3]]},"59":{"position":[[483,3]]},"61":{"position":[[895,3]]}}}],["sin((lat1",{"_index":619,"t":{"57":{"position":[[954,10]]}}}],["sin((lon1",{"_index":623,"t":{"57":{"position":[[1008,10]]}}}],["sin(1.23",{"_index":195,"t":{"8":{"position":[[1661,9]]}}}],["sin(a",{"_index":664,"t":{"59":{"position":[[577,7],[623,5]]}}}],["sin(b",{"_index":665,"t":{"59":{"position":[[587,7]]}}}],["sin^2(theta/2",{"_index":594,"t":{"57":{"position":[[294,14]]}}}],["sine",{"_index":340,"t":{"24":{"position":[[26,4],[53,4],[63,4]]},"59":{"position":[[402,4]]}}}],["singl",{"_index":34,"t":{"2":{"position":[[498,6]]},"8":{"position":[[2156,6],[2358,6]]},"32":{"position":[[117,6]]}}}],["sinh",{"_index":343,"t":{"24":{"position":[[58,4]]}}}],["size",{"_index":84,"t":{"6":{"position":[[232,4]]},"18":{"position":[[444,4],[496,4],[581,6]]},"66":{"position":[[284,4]]}}}],["size(vec",{"_index":88,"t":{"6":{"position":[[283,10],[486,9]]}}}],["size_of_clust",{"_index":858,"t":{"81":{"position":[[90,16],[222,16],[390,16]]}}}],["skip",{"_index":717,"t":{"66":{"position":[[458,4]]}}}],["someth",{"_index":713,"t":{"66":{"position":[[349,9],[540,9],[925,9]]}}}],["sourc",{"_index":839,"t":{"76":{"position":[[1096,6]]},"114":{"position":[[421,6],[480,6],[624,6],[823,6]]}}}],["source.f90",{"_index":1111,"t":{"114":{"position":[[543,10],[761,10]]}}}],["source=vector_line_type(0.0",{"_index":1078,"t":{"112":{"position":[[882,28],[1399,28]]}}}],["space",{"_index":200,"t":{"8":{"position":[[1749,6],[1808,6],[1894,6]]},"95":{"position":[[302,5]]},"105":{"position":[[138,5]]}}}],["specif",{"_index":154,"t":{"8":{"position":[[575,13]]}}}],["specifi",{"_index":251,"t":{"12":{"position":[[193,9]]},"18":{"position":[[864,7]]},"76":{"position":[[1375,7]]},"114":{"position":[[692,7]]}}}],["sq_root",{"_index":563,"t":{"51":{"position":[[109,7],[339,7]]}}}],["sqrt",{"_index":354,"t":{"24":{"position":[[239,4]]}}}],["sqrt(input",{"_index":564,"t":{"51":{"position":[[216,11]]}}}],["sqrt(temp",{"_index":524,"t":{"47":{"position":[[457,10]]}}}],["sqrt{a^2",{"_index":512,"t":{"47":{"position":[[65,9]]}}}],["squar",{"_index":355,"t":{"24":{"position":[[244,6]]},"51":{"position":[[10,6],[89,6],[237,7]]},"74":{"position":[[94,6],[230,6],[241,6]]}}}],["src/01_add.f90",{"_index":140,"t":{"8":{"position":[[155,14]]}}}],["src/02_cm2inch.f90",{"_index":171,"t":{"8":{"position":[[865,18]]}}}],["src/03_circ.f90",{"_index":180,"t":{"8":{"position":[[1167,15]]}}}],["src/04_format.f90",{"_index":190,"t":{"8":{"position":[[1507,17]]}}}],["src/05_array.f90",{"_index":74,"t":{"6":{"position":[[0,16]]}}}],["src/05_array2.f90",{"_index":94,"t":{"6":{"position":[[359,17]]}}}],["src/05_matrix_mult.f90",{"_index":114,"t":{"6":{"position":[[940,22]]}}}],["src/06_multi_way_if.f90",{"_index":565,"t":{"53":{"position":[[0,23]]}}}],["src/06_select_case.f90",{"_index":574,"t":{"55":{"position":[[0,22]]}}}],["src/06_sq_root.f90",{"_index":562,"t":{"51":{"position":[[48,18]]}}}],["src/07_factorial.f90",{"_index":709,"t":{"66":{"position":[[21,20]]}}}],["src/07_print_even_numbers.f90",{"_index":731,"t":{"68":{"position":[[0,29]]}}}],["src/08_file_write.f90",{"_index":491,"t":{"45":{"position":[[56,21]]}}}],["src/09_file_read.f90",{"_index":502,"t":{"45":{"position":[[475,20]]}}}],["src/10_trapezoid.f90",{"_index":659,"t":{"59":{"position":[[358,20]]}}}],["src/11_circ_area.f90",{"_index":825,"t":{"76":{"position":[[403,20]]}}}],["src/11_const_module.f90",{"_index":820,"t":{"76":{"position":[[177,23]]}}}],["src/12_add.f90",{"_index":888,"t":{"87":{"position":[[548,14]]}}}],["src/12_add_module.f90",{"_index":881,"t":{"87":{"position":[[44,21]]}}}],["src/13_function_module.f90",{"_index":899,"t":{"89":{"position":[[118,26]]}}}],["src/13_function_table.f90",{"_index":905,"t":{"89":{"position":[[518,25]]}}}],["src/14_integration.f90",{"_index":687,"t":{"61":{"position":[[802,22]]}}}],["src/14_integration_module.f90",{"_index":673,"t":{"61":{"position":[[262,29]]}}}],["src/15_get_abs_path.f90",{"_index":52,"t":{"4":{"position":[[64,23]]}}}],["src/16_hypotenuse_program.f90",{"_index":526,"t":{"47":{"position":[[569,29]]}}}],["src/16_hypotenuse_subroutine.f90",{"_index":514,"t":{"47":{"position":[[90,32]]}}}],["src/17_complex_number.f90",{"_index":467,"t":{"41":{"position":[[50,25]]}}}],["src/18_haversine_formula.f90",{"_index":589,"t":{"57":{"position":[[134,28]]}}}],["src/19_inner_product.f90",{"_index":692,"t":{"63":{"position":[[37,24]]}}}],["src/20_monte_carlo_integration.f90",{"_index":735,"t":{"70":{"position":[[0,34]]}}}],["src/20_monte_carlo_pi.f90",{"_index":809,"t":{"74":{"position":[[359,25]]}}}],["src/21_recursive_function.f90",{"_index":968,"t":{"101":{"position":[[53,29]]}}}],["src/21_recursive_subroutine.f90",{"_index":961,"t":{"99":{"position":[[48,31]]}}}],["src/22_blas_dgemm.f90",{"_index":435,"t":{"34":{"position":[[116,21]]}}}],["src/22_blas_sdot.f90",{"_index":391,"t":{"32":{"position":[[0,20]]}}}],["src/23_custom_type.f90",{"_index":1027,"t":{"110":{"position":[[0,22]]}}}],["src/23_polymorphism.f90",{"_index":1054,"t":{"112":{"position":[[31,23]]}}}],["src/24_swap.f90",{"_index":993,"t":{"105":{"position":[[33,15]]}}}],["src/25_time.f90",{"_index":1000,"t":{"107":{"position":[[119,15]]}}}],["src/26_arg_parsing.f90",{"_index":7,"t":{"2":{"position":[[93,22]]}}}],["src/27_exec_command.f90",{"_index":482,"t":{"43":{"position":[[84,23]]}}}],["src/28_pointer.f90",{"_index":934,"t":{"95":{"position":[[59,18]]}}}],["src/29_mpi_hello_world.f90",{"_index":854,"t":{"81":{"position":[[0,26]]}}}],["start",{"_index":130,"t":{"8":{"position":[[31,5],[2119,6]]},"20":{"position":[[226,6]]},"112":{"position":[[418,5]]}}}],["start_tim",{"_index":1003,"t":{"107":{"position":[[227,11],[583,11]]}}}],["stat=allocation_statu",{"_index":942,"t":{"95":{"position":[[348,23]]}}}],["statement",{"_index":217,"t":{"8":{"position":[[2163,9],[2365,9],[2437,10]]},"91":{"position":[[201,10]]}}}],["statu",{"_index":923,"t":{"91":{"position":[[31,6]]}}}],["status='new",{"_index":495,"t":{"45":{"position":[[192,13]]}}}],["status='old",{"_index":505,"t":{"45":{"position":[[616,13]]}}}],["step",{"_index":711,"t":{"66":{"position":[[279,4]]}}}],["still",{"_index":1074,"t":{"112":{"position":[[686,5]]}}}],["stop",{"_index":29,"t":{"2":{"position":[[422,4]]},"53":{"position":[[191,4],[393,4]]},"63":{"position":[[305,10],[351,4]]}}}],["storag",{"_index":269,"t":{"18":{"position":[[436,7],[488,7]]},"95":{"position":[[294,7]]}}}],["store",{"_index":158,"t":{"8":{"position":[[668,5]]},"32":{"position":[[542,6]]},"76":{"position":[[91,5]]}}}],["string",{"_index":45,"t":{"2":{"position":[[638,7]]},"8":{"position":[[2275,7]]},"12":{"position":[[179,6]]}}}],["subroutin",{"_index":515,"t":{"47":{"position":[[137,11],[190,10],[472,10],[516,11],[601,10],[974,10]]},"85":{"position":[[46,11]]},"87":{"position":[[19,11],[194,10],[307,10],[330,10],[383,10],[406,10],[479,10]]},"89":{"position":[[825,12]]},"91":{"position":[[251,10]]},"97":{"position":[[28,11]]},"99":{"position":[[36,11],[376,10],[565,10]]},"105":{"position":[[0,10],[225,10],[317,10]]}}}],["such",{"_index":765,"t":{"72":{"position":[[274,4],[863,4]]},"91":{"position":[[120,4]]}}}],["sudo",{"_index":1104,"t":{"114":{"position":[[258,4]]}}}],["suggest",{"_index":790,"t":{"72":{"position":[[670,8]]}}}],["sum",{"_index":18,"t":{"2":{"position":[[202,3],[654,3],[660,3],[698,3]]},"63":{"position":[[205,3],[647,3],[653,3],[716,3]]}}}],["support",{"_index":257,"t":{"18":{"position":[[25,9]]}}}],["sure",{"_index":829,"t":{"76":{"position":[[587,4]]},"112":{"position":[[1281,4]]}}}],["swap",{"_index":992,"t":{"105":{"position":[[14,4],[202,5],[328,4]]}}}],["swap(a",{"_index":994,"t":{"105":{"position":[[175,7],[236,7]]}}}],["system",{"_index":265,"t":{"18":{"position":[[330,7]]},"30":{"position":[[146,6]]},"32":{"position":[[252,6]]},"43":{"position":[[163,6]]}}}],["t",{"_index":1068,"t":{"112":{"position":[[400,1]]}}}],["t10",{"_index":378,"t":{"28":{"position":[[270,4]]}}}],["tab",{"_index":374,"t":{"28":{"position":[[194,3]]}}}],["tabl",{"_index":893,"t":{"89":{"position":[[19,5]]}}}],["taken",{"_index":1018,"t":{"107":{"position":[[561,5],[749,5]]}}}],["tan",{"_index":349,"t":{"24":{"position":[[139,3],[173,3],[224,3]]}}}],["tan(atan(exp(log(sqrt(test",{"_index":1015,"t":{"107":{"position":[[467,26]]}}}],["tangent",{"_index":350,"t":{"24":{"position":[[143,7],[191,7]]}}}],["tanh",{"_index":353,"t":{"24":{"position":[[219,4]]}}}],["tanja",{"_index":979,"t":{"103":{"position":[[30,5]]}}}],["target",{"_index":937,"t":{"95":{"position":[[135,6],[213,6]]}}}],["temp",{"_index":523,"t":{"47":{"position":[[398,4],[403,4]]}}}],["term",{"_index":779,"t":{"72":{"position":[[485,6]]}}}],["test",{"_index":596,"t":{"57":{"position":[[332,5]]},"107":{"position":[[274,4],[460,4],[496,9],[611,5],[622,4],[660,5],[776,4]]}}}],["text",{"_index":1108,"t":{"114":{"position":[[385,4]]}}}],["themselv",{"_index":958,"t":{"97":{"position":[[98,10]]}}}],["third",{"_index":712,"t":{"66":{"position":[[309,5]]},"72":{"position":[[90,5]]}}}],["time",{"_index":999,"t":{"107":{"position":[[75,5],[113,5],[336,7],[555,5],[710,6],[744,4]]}}}],["tmp",{"_index":20,"t":{"2":{"position":[[213,3],[627,3],[666,3]]},"99":{"position":[[475,3],[516,4],[534,3]]},"105":{"position":[[287,3],[291,3],[309,3]]}}}],["top",{"_index":307,"t":{"20":{"position":[[117,3]]}}}],["total",{"_index":46,"t":{"2":{"position":[[686,6]]},"87":{"position":[[130,5],[355,5],[469,5]]}}}],["transform",{"_index":773,"t":{"72":{"position":[[390,10]]}}}],["trapezoid",{"_index":648,"t":{"59":{"position":[[133,10],[419,11],[446,9],[696,9]]}}}],["tri",{"_index":667,"t":{"61":{"position":[[8,3]]}}}],["triangl",{"_index":534,"t":{"47":{"position":[[847,9]]}}}],["tricki",{"_index":1080,"t":{"112":{"position":[[974,6]]}}}],["trim(arg",{"_index":42,"t":{"2":{"position":[[605,9]]}}}],["true",{"_index":249,"t":{"12":{"position":[[134,8]]},"112":{"position":[[937,8],[1454,8]]}}}],["twice",{"_index":272,"t":{"18":{"position":[[504,5]]}}}],["two",{"_index":142,"t":{"8":{"position":[[186,3]]},"28":{"position":[[172,3]]},"32":{"position":[[113,3]]},"57":{"position":[[31,3],[196,3]]},"85":{"position":[[10,3]]},"95":{"position":[[451,3]]},"105":{"position":[[19,3],[111,3]]}}}],["type",{"_index":256,"t":{"18":{"position":[[9,4],[73,5],[1019,4]]},"20":{"position":[[208,5]]},"85":{"position":[[14,5]]},"110":{"position":[[50,4],[105,5],[205,4],[222,4],[227,5],[283,4]]},"112":{"position":[[103,4],[108,4],[169,4],[207,4],[212,5],[301,4],[324,5],[449,4],[498,4],[1007,4],[1069,4],[1163,4],[1291,4]]}}}],["type(colored_lin",{"_index":1081,"t":{"112":{"position":[[988,18]]}}}],["type(us",{"_index":1034,"t":{"110":{"position":[[302,10],[349,10]]}}}],["type(user_extend",{"_index":1037,"t":{"110":{"position":[[377,19]]}}}],["ubuntu",{"_index":1102,"t":{"114":{"position":[[242,7]]}}}],["under",{"_index":639,"t":{"59":{"position":[[27,5],[189,5]]},"70":{"position":[[88,5]]},"72":{"position":[[22,5],[465,5]]}}}],["underscor",{"_index":235,"t":{"10":{"position":[[97,12]]}}}],["unit",{"_index":804,"t":{"74":{"position":[[113,5],[212,5],[248,5],[287,5]]}}}],["unit=0",{"_index":499,"t":{"45":{"position":[[301,7]]}}}],["unix",{"_index":1096,"t":{"114":{"position":[[85,5]]}}}],["unless",{"_index":266,"t":{"18":{"position":[[340,6],[377,6]]}}}],["updat",{"_index":537,"t":{"47":{"position":[[994,6]]}}}],["upon",{"_index":775,"t":{"72":{"position":[[411,4]]}}}],["uppercas",{"_index":151,"t":{"8":{"position":[[504,10],[602,9]]}}}],["us",{"_index":0,"t":{"2":{"position":[[8,3],[527,3]]},"6":{"position":[[319,3]]},"8":{"position":[[2283,3]]},"18":{"position":[[370,4],[404,4],[609,3]]},"32":{"position":[[496,4]]},"41":{"position":[[465,3]]},"45":{"position":[[339,3]]},"47":{"position":[[29,5]]},"59":{"position":[[413,5]]},"61":{"position":[[173,3],[845,3]]},"63":{"position":[[729,3],[788,5]]},"66":{"position":[[816,3]]},"72":{"position":[[713,4],[832,4],[925,3]]},"74":{"position":[[309,3]]},"76":{"position":[[380,4],[442,3],[756,4],[1056,4]]},"78":{"position":[[19,3],[51,3],[79,3],[107,3],[163,3],[191,3],[218,3],[239,3]]},"81":{"position":[[609,5]]},"87":{"position":[[575,3]]},"89":{"position":[[567,3]]},"91":{"position":[[293,5]]},"93":{"position":[[19,4]]},"97":{"position":[[131,3]]},"99":{"position":[[20,5]]},"101":{"position":[[27,5]]},"107":{"position":[[18,4]]},"110":{"position":[[93,3]]},"114":{"position":[[164,5],[186,5],[377,3],[446,5],[527,6]]}}}],["usag",{"_index":26,"t":{"2":{"position":[[401,7]]},"41":{"position":[[6,5]]}}}],["user",{"_index":134,"t":{"8":{"position":[[84,4]]},"72":{"position":[[189,5]]},"110":{"position":[[55,4],[121,4],[344,4],[582,5],[623,5]]}}}],["user(1",{"_index":1045,"t":{"110":{"position":[[513,7]]}}}],["user_catalog(1",{"_index":1046,"t":{"110":{"position":[[546,15]]}}}],["user_catalog(1)%ag",{"_index":1049,"t":{"110":{"position":[[677,19]]}}}],["user_catalog(1)%id",{"_index":1047,"t":{"110":{"position":[[595,18]]}}}],["user_catalog(1)%nam",{"_index":1048,"t":{"110":{"position":[[638,20]]}}}],["user_catalog(10",{"_index":1036,"t":{"110":{"position":[[360,16]]}}}],["user_extend",{"_index":1032,"t":{"110":{"position":[[250,13],[288,13]]}}}],["user_extended(1",{"_index":1050,"t":{"110":{"position":[[716,16]]}}}],["user_with_salari",{"_index":1038,"t":{"110":{"position":[[397,16],[697,16]]}}}],["user_with_salary%salari",{"_index":1052,"t":{"110":{"position":[[788,23]]}}}],["valu",{"_index":126,"t":{"6":{"position":[[1393,5],[1424,6]]},"18":{"position":[[418,5],[562,5]]},"22":{"position":[[38,5]]},"47":{"position":[[1001,6]]},"74":{"position":[[20,5],[343,5]]},"76":{"position":[[849,5]]},"89":{"position":[[870,6]]},"91":{"position":[[103,5]]},"95":{"position":[[388,5]]}}}],["van",{"_index":980,"t":{"103":{"position":[[36,3]]}}}],["variabl",{"_index":144,"t":{"8":{"position":[[397,8]]},"20":{"position":[[11,9],[138,8]]},"47":{"position":[[294,9]]},"76":{"position":[[652,9],[710,9],[815,8]]},"78":{"position":[[9,9],[68,10]]},"91":{"position":[[139,8]]},"93":{"position":[[202,10]]},"95":{"position":[[36,8],[318,8]]},"112":{"position":[[1338,8]]}}}],["variou",{"_index":815,"t":{"76":{"position":[[97,7]]}}}],["vec",{"_index":97,"t":{"6":{"position":[[432,3],[450,3]]}}}],["vec(10",{"_index":76,"t":{"6":{"position":[[74,7]]}}}],["vec(ii",{"_index":80,"t":{"6":{"position":[[123,7],[181,7],[510,7]]}}}],["vector",{"_index":87,"t":{"6":{"position":[[275,7]]},"32":{"position":[[54,6],[61,6],[139,7],[361,7]]},"63":{"position":[[247,8]]}}}],["vector_lin",{"_index":1073,"t":{"112":{"position":[[630,11]]}}}],["vector_line_typ",{"_index":1066,"t":{"112":{"position":[[360,16],[454,16]]}}}],["veri",{"_index":222,"t":{"8":{"position":[[2255,4]]}}}],["via",{"_index":847,"t":{"76":{"position":[[1383,3]]},"114":{"position":[[313,3]]}}}],["view",{"_index":798,"t":{"72":{"position":[[946,4]]}}}],["visit",{"_index":800,"t":{"72":{"position":[[978,5]]}}}],["vs",{"_index":895,"t":{"89":{"position":[[32,2]]}}}],["walter",{"_index":984,"t":{"103":{"position":[[84,6]]}}}],["want",{"_index":892,"t":{"89":{"position":[[3,4]]}}}],["warranti",{"_index":793,"t":{"72":{"position":[[730,10]]}}}],["way",{"_index":789,"t":{"72":{"position":[[661,3]]},"112":{"position":[[804,3]]}}}],["well",{"_index":705,"t":{"63":{"position":[[757,4]]}}}],["whether",{"_index":924,"t":{"91":{"position":[[229,7]]},"93":{"position":[[80,7]]}}}],["width",{"_index":649,"t":{"59":{"position":[[149,5]]}}}],["wikipedia",{"_index":587,"t":{"57":{"position":[[118,9]]}}}],["window",{"_index":1099,"t":{"114":{"position":[[138,8]]}}}],["within",{"_index":642,"t":{"59":{"position":[[56,6]]},"70":{"position":[[112,6]]}}}],["without",{"_index":527,"t":{"47":{"position":[[612,7]]},"93":{"position":[[148,7]]},"95":{"position":[[308,7]]}}}],["work",{"_index":751,"t":{"72":{"position":[[5,4],[120,4]]},"114":{"position":[[74,7]]}}}],["write",{"_index":131,"t":{"8":{"position":[[40,7],[468,5],[800,5],[1330,8],[1956,8],[1983,8],[2010,8],[2041,8],[2070,8]]},"41":{"position":[[157,5],[179,5],[225,5],[344,5],[378,5],[486,5],[523,5],[585,5]]},"45":{"position":[[36,5],[90,5]]},"47":{"position":[[790,5],[857,5],[911,5],[1077,5]]},"61":{"position":[[223,5]]},"76":{"position":[[359,5]]},"81":{"position":[[363,8]]},"87":{"position":[[9,5],[529,5]]},"114":{"position":[[415,5]]}}}],["write(1",{"_index":496,"t":{"45":{"position":[[220,8]]}}}],["wsl",{"_index":1100,"t":{"114":{"position":[[170,4]]}}}],["x",{"_index":296,"t":{"18":{"position":[[1061,1],[1082,1]]},"22":{"position":[[129,1]]},"32":{"position":[[147,1],[404,1],[530,1],[848,2]]},"61":{"position":[[483,1]]},"66":{"position":[[436,2]]},"70":{"position":[[119,1],[262,2],[445,1],[456,1],[506,1]]},"74":{"position":[[119,1],[460,2],[636,1],[647,1],[699,2],[704,1]]},"89":{"position":[[302,1],[474,1],[609,1],[640,1],[672,2]]}}}],["x(1",{"_index":409,"t":{"32":{"position":[[696,4],[769,4]]}}}],["x(2",{"_index":410,"t":{"32":{"position":[[707,4],[793,4]]}}}],["x(3",{"_index":412,"t":{"32":{"position":[[718,4],[817,4]]}}}],["x=ax=ax=a",{"_index":644,"t":{"59":{"position":[[74,9]]}}}],["x=bx=bx=b",{"_index":645,"t":{"59":{"position":[[88,10]]}}}],["x^2",{"_index":738,"t":{"70":{"position":[[108,3]]}}}],["x_end",{"_index":1057,"t":{"112":{"position":[[143,6]]}}}],["x_hi",{"_index":743,"t":{"70":{"position":[[243,4],[338,4],[367,5],[460,5]]},"74":{"position":[[493,4],[651,5]]}}}],["x_lo",{"_index":742,"t":{"70":{"position":[[224,4],[375,5],[449,4],[468,6]]},"74":{"position":[[473,4],[640,4],[659,6]]}}}],["x_start",{"_index":1056,"t":{"112":{"position":[[134,8],[1035,9]]}}}],["xor",{"_index":553,"t":{"49":{"position":[[166,5]]}}}],["xxx",{"_index":894,"t":{"89":{"position":[[28,3]]}}}],["xyapp",{"_index":1113,"t":{"114":{"position":[[775,5]]}}}],["y",{"_index":297,"t":{"18":{"position":[[1074,1],[1076,1]]},"22":{"position":[[78,2]]},"32":{"position":[[153,2],[441,1],[536,1],[857,2]]},"70":{"position":[[104,1],[265,2],[475,1],[479,1],[501,2]]},"74":{"position":[[135,1],[463,1],[666,1],[677,1],[708,1],[712,1]]}}}],["y(1",{"_index":413,"t":{"32":{"position":[[729,4],[781,4]]}}}],["y(2",{"_index":414,"t":{"32":{"position":[[740,4],[805,4]]}}}],["y(3",{"_index":416,"t":{"32":{"position":[[751,4],[829,4]]}}}],["y_end",{"_index":1059,"t":{"112":{"position":[[159,5]]}}}],["y_hi",{"_index":745,"t":{"70":{"position":[[280,5],[331,4],[360,4],[483,5]]},"74":{"position":[[532,4],[681,5]]}}}],["y_lo",{"_index":744,"t":{"70":{"position":[[268,4],[491,6]]},"74":{"position":[[512,4],[670,4],[689,6]]}}}],["y_start",{"_index":1058,"t":{"112":{"position":[[150,8]]}}}],["z",{"_index":401,"t":{"32":{"position":[[594,1],[927,2],[937,2]]},"41":{"position":[[124,1],[169,2],[177,1]]}}}],["z(1",{"_index":418,"t":{"32":{"position":[[762,4]]}}}],["z(2",{"_index":419,"t":{"32":{"position":[[774,4]]}}}],["z(3",{"_index":420,"t":{"32":{"position":[[786,4]]}}}],["z(4",{"_index":421,"t":{"32":{"position":[[798,4]]}}}],["z(5",{"_index":422,"t":{"32":{"position":[[810,4]]}}}],["z(6",{"_index":402,"t":{"32":{"position":[[601,4],[822,4]]}}}],["z1",{"_index":469,"t":{"41":{"position":[[150,3],[209,2],[237,3],[246,2],[356,3],[370,2],[390,3],[404,2]]}}}],["z2",{"_index":470,"t":{"41":{"position":[[154,2],[249,2],[294,2],[362,2],[375,2],[396,2],[409,2]]}}}],["zero",{"_index":459,"t":{"34":{"position":[[521,5]]}}}]],"pipeline":["stemmer"]}}]
\ No newline at end of file
diff --git a/search/index.html b/search/index.html
index 3d9e908..5dd2ea0 100644
--- a/search/index.html
+++ b/search/index.html
@@ -1,2 +1,2 @@
-<!doctype html><html lang=en dir=ltr class="plugin-@easyops-cn/docusaurus-search-local plugin-id-default" data-has-hydrated=false><meta charset=UTF-8><meta name=generator content="Docusaurus v3.6.1"><title data-rh=true>Search the documentation</title><meta data-rh=true property=og:title content="Fortran Tutorial"><meta data-rh=true name=viewport content="width=device-width,initial-scale=1.0"><meta data-rh=true name=twitter:card content=summary_large_image><meta data-rh=true property=og:url content=https://pranabdas.github.io/fortran/search><meta data-rh=true property=og:locale content=en><meta data-rh=true name=docusaurus_locale content=en><meta data-rh=true name=docusaurus_tag content=default><meta data-rh=true name=docsearch:language content=en><meta data-rh=true name=docsearch:docusaurus_tag content=default><meta data-rh=true name=theme-color content=#06445c><meta data-rh=true property=robots content="noindex, follow"><link data-rh=true rel=icon href=/fortran/img/favicon.png><link data-rh=true rel=canonical href=https://pranabdas.github.io/fortran/search><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/search hreflang=en><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/search hreflang=x-default><link rel=stylesheet href=https://pranabdas.github.io/drive/webfonts/katex/katex.min.css><link rel=stylesheet href=/fortran/assets/css/styles.4de1c8a8.css><script src=/fortran/assets/js/runtime~main.866c090c.js defer></script><script src=/fortran/assets/js/main.ec888ba8.js defer></script><body class=navigation-with-keyboard><script>!function(){var t,e=function(){try{return new URLSearchParams(window.location.search).get("docusaurus-theme")}catch(t){}}()||function(){try{return window.localStorage.getItem("theme")}catch(t){}}();t=null!==e?e:window.matchMedia("(prefers-color-scheme: dark)").matches?"dark":(window.matchMedia("(prefers-color-scheme: light)").matches,"light"),document.documentElement.setAttribute("data-theme",t)}(),function(){try{for(var[t,e]of new URLSearchParams(window.location.search).entries())if(t.startsWith("docusaurus-data-")){var a=t.replace("docusaurus-data-","data-");document.documentElement.setAttribute(a,e)}}catch(t){}}()</script><div id=__docusaurus><div role=region aria-label="Skip to main content"><a class=skipToContent_fXgn href=#__docusaurus_skipToContent_fallback>Skip to main content</a></div><nav aria-label=Main class="navbar navbar--fixed-top navbarHideable_m1mJ"><div class=navbar__inner><div class=navbar__items><button aria-label="Toggle navigation bar" aria-expanded=false class="navbar__toggle clean-btn" type=button><svg width=30 height=30 viewBox="0 0 30 30" aria-hidden=true><path stroke=currentColor stroke-linecap=round stroke-miterlimit=10 stroke-width=2 d="M4 7h22M4 15h22M4 23h22"/></svg></button><a class=navbar__brand href=/fortran/><div class=navbar__logo><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--light_NVdE"><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--dark_xIcU"></div><b class="navbar__title text--truncate">Fortran</b></a><div class="navbar__item dropdown dropdown--hoverable"><a aria-current=page class="navbar__link active" aria-haspopup=true aria-expanded=false role=button href=/fortran/>Docs</a><ul class=dropdown__menu><li><a aria-current=page class="dropdown__link dropdown__link--active" href=/fortran/>Fortran Programming</a><li><a href=https://pranabdas.github.io/docs/ rel="noopener noreferrer" class=dropdown__link>~ ~ ~ Other Docs ~ ~ ~</a><li><a href=https://pranabdas.github.io/arpespythontools/ rel="noopener noreferrer" class=dropdown__link>ARPES Python Tools</a><li><a href=https://pranabdas.github.io/c-cpp/ rel="noopener noreferrer" class=dropdown__link>C and C++ Programming</a><li><a href=https://pranabdas.github.io/condmat-notes/ rel="noopener noreferrer" class=dropdown__link>Condensed Matter Notes</a><li><a href=https://pranabdas.github.io/javascript/ rel="noopener noreferrer" class=dropdown__link>Javascript Tutorial</a><li><a href=https://pranabdas.github.io/linux/ rel="noopener noreferrer" class=dropdown__link>Linux Tutorial</a><li><a href=https://pranabdas.github.io/machine-learning/ rel="noopener noreferrer" class=dropdown__link>Machine Learning Notes</a><li><a href=https://pranabdas.github.io/openmx/ rel="noopener noreferrer" class=dropdown__link>OpenMX tutorial</a><li><a href=https://pranabdas.github.io/python-tutorial/ rel="noopener noreferrer" class=dropdown__link>Python Tutorial</a><li><a href=https://pranabdas.github.io/espresso/ rel="noopener noreferrer" class=dropdown__link>Quantum Espresso Tutorial</a><li><a href=https://pranabdas.github.io/rust/ rel="noopener noreferrer" class=dropdown__link>Rust Programming</a><li><a href=https://pranabdas.github.io/arpes-manual/ rel="noopener noreferrer" class=dropdown__link>SUV ARPES Manual</a><li><a href=https://pranabdas.github.io/suvtools/ rel="noopener noreferrer" class=dropdown__link>SUV Python Tools</a></ul></div></div><div class="navbar__items navbar__items--right"><a href=https://github.com/pranabdas/fortran rel="noopener noreferrer" class="navbar__item navbar__link header-github-link" aria-label="GitHub repository" title="Visit project repository in GitHub"></a><a href=https://pranabdas.github.io rel="noopener noreferrer" class="navbar__item navbar__link header-homepage-link" aria-label="About me" title="Go to Pranab's Homepage"></a><div class="toggle_vylO colorModeToggle_DEke"><button class="clean-btn toggleButton_gllP toggleButtonDisabled_aARS" type=button disabled title="Switch between dark and light mode (currently light mode)" aria-label="Switch between dark and light mode (currently light mode)" aria-live=polite aria-pressed=false><svg viewBox="0 0 24 24" width=24 height=24 class=lightToggleIcon_pyhR><path fill=currentColor d="M12,9c1.65,0,3,1.35,3,3s-1.35,3-3,3s-3-1.35-3-3S10.35,9,12,9 M12,7c-2.76,0-5,2.24-5,5s2.24,5,5,5s5-2.24,5-5 S14.76,7,12,7L12,7z M2,13l2,0c0.55,0,1-0.45,1-1s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S1.45,13,2,13z M20,13l2,0c0.55,0,1-0.45,1-1 s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S19.45,13,20,13z M11,2v2c0,0.55,0.45,1,1,1s1-0.45,1-1V2c0-0.55-0.45-1-1-1S11,1.45,11,2z M11,20v2c0,0.55,0.45,1,1,1s1-0.45,1-1v-2c0-0.55-0.45-1-1-1C11.45,19,11,19.45,11,20z M5.99,4.58c-0.39-0.39-1.03-0.39-1.41,0 c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0s0.39-1.03,0-1.41L5.99,4.58z M18.36,16.95 c-0.39-0.39-1.03-0.39-1.41,0c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0c0.39-0.39,0.39-1.03,0-1.41 L18.36,16.95z M19.42,5.99c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06c-0.39,0.39-0.39,1.03,0,1.41 s1.03,0.39,1.41,0L19.42,5.99z M7.05,18.36c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06 c-0.39,0.39-0.39,1.03,0,1.41s1.03,0.39,1.41,0L7.05,18.36z"/></svg><svg viewBox="0 0 24 24" width=24 height=24 class=darkToggleIcon_wfgR><path fill=currentColor d="M9.37,5.51C9.19,6.15,9.1,6.82,9.1,7.5c0,4.08,3.32,7.4,7.4,7.4c0.68,0,1.35-0.09,1.99-0.27C17.45,17.19,14.93,19,12,19 c-3.86,0-7-3.14-7-7C5,9.07,6.81,6.55,9.37,5.51z M12,3c-4.97,0-9,4.03-9,9s4.03,9,9,9s9-4.03,9-9c0-0.46-0.04-0.92-0.1-1.36 c-0.98,1.37-2.58,2.26-4.4,2.26c-2.98,0-5.4-2.42-5.4-5.4c0-1.81,0.89-3.42,2.26-4.4C12.92,3.04,12.46,3,12,3L12,3z"/></svg></button></div><div class=navbarSearchContainer_Bca1><div class="navbar__search searchBarContainer_NW3z" dir=ltr><input placeholder=Search aria-label=Search class=navbar__search-input value=""><div class="loadingRing_RJI3 searchBarLoadingRing_YnHq"><div></div><div></div><div></div><div></div></div></div></div></div></div><div role=presentation class=navbar-sidebar__backdrop></div></nav><div id=__docusaurus_skipToContent_fallback class="main-wrapper mainWrapper_z2l0"><div class="container margin-vert--lg"><h1>Search the documentation</h1><div class=row><div class="col col--12"><input type=search name=q class=searchQueryInput_CFBF aria-label=Search autocomplete=off autofocus value=""></div></div><section></section></div></div><footer class="footer footer--dark"><div class="container container-fluid"><div class="footer__bottom text--center"><div class=footer__copyright>Copyright © 2024 Pranab Das. All rights
+<!doctype html><html lang=en dir=ltr class="plugin-@easyops-cn/docusaurus-search-local plugin-id-default" data-has-hydrated=false><meta charset=UTF-8><meta name=generator content="Docusaurus v3.6.1"><title data-rh=true>Search the documentation</title><meta data-rh=true property=og:title content="Fortran Tutorial"><meta data-rh=true name=viewport content="width=device-width,initial-scale=1.0"><meta data-rh=true name=twitter:card content=summary_large_image><meta data-rh=true property=og:url content=https://pranabdas.github.io/fortran/search><meta data-rh=true property=og:locale content=en><meta data-rh=true name=docusaurus_locale content=en><meta data-rh=true name=docusaurus_tag content=default><meta data-rh=true name=docsearch:language content=en><meta data-rh=true name=docsearch:docusaurus_tag content=default><meta data-rh=true name=theme-color content=#06445c><meta data-rh=true property=robots content="noindex, follow"><link data-rh=true rel=icon href=/fortran/img/favicon.png><link data-rh=true rel=canonical href=https://pranabdas.github.io/fortran/search><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/search hreflang=en><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/search hreflang=x-default><link rel=stylesheet href=https://pranab.pages.dev/assets/fonts/katex/katex.min.css><link rel=stylesheet href=/fortran/assets/css/styles.4de1c8a8.css><script src=/fortran/assets/js/runtime~main.667e3c0f.js defer></script><script src=/fortran/assets/js/main.10795e8f.js defer></script><body class=navigation-with-keyboard><script>!function(){var t,e=function(){try{return new URLSearchParams(window.location.search).get("docusaurus-theme")}catch(t){}}()||function(){try{return window.localStorage.getItem("theme")}catch(t){}}();t=null!==e?e:window.matchMedia("(prefers-color-scheme: dark)").matches?"dark":(window.matchMedia("(prefers-color-scheme: light)").matches,"light"),document.documentElement.setAttribute("data-theme",t)}(),function(){try{for(var[t,e]of new URLSearchParams(window.location.search).entries())if(t.startsWith("docusaurus-data-")){var a=t.replace("docusaurus-data-","data-");document.documentElement.setAttribute(a,e)}}catch(t){}}()</script><div id=__docusaurus><div role=region aria-label="Skip to main content"><a class=skipToContent_fXgn href=#__docusaurus_skipToContent_fallback>Skip to main content</a></div><nav aria-label=Main class="navbar navbar--fixed-top navbarHideable_m1mJ"><div class=navbar__inner><div class=navbar__items><button aria-label="Toggle navigation bar" aria-expanded=false class="navbar__toggle clean-btn" type=button><svg width=30 height=30 viewBox="0 0 30 30" aria-hidden=true><path stroke=currentColor stroke-linecap=round stroke-miterlimit=10 stroke-width=2 d="M4 7h22M4 15h22M4 23h22"/></svg></button><a class=navbar__brand href=/fortran/><div class=navbar__logo><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--light_NVdE"><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--dark_xIcU"></div><b class="navbar__title text--truncate">Fortran</b></a><div class="navbar__item dropdown dropdown--hoverable"><a aria-current=page class="navbar__link active" aria-haspopup=true aria-expanded=false role=button href=/fortran/>Docs</a><ul class=dropdown__menu><li><a aria-current=page class="dropdown__link dropdown__link--active" href=/fortran/>Fortran Programming</a><li><a href=https://pranabdas.github.io/docs/ rel="noopener noreferrer" class=dropdown__link>~ ~ ~ Other Docs ~ ~ ~</a><li><a href=https://pranabdas.github.io/arpespythontools/ rel="noopener noreferrer" class=dropdown__link>ARPES Python Tools</a><li><a href=https://pranabdas.github.io/c-cpp/ rel="noopener noreferrer" class=dropdown__link>C and C++ Programming</a><li><a href=https://pranabdas.github.io/condmat-notes/ rel="noopener noreferrer" class=dropdown__link>Condensed Matter Notes</a><li><a href=https://pranabdas.github.io/javascript/ rel="noopener noreferrer" class=dropdown__link>Javascript Tutorial</a><li><a href=https://pranabdas.github.io/linux/ rel="noopener noreferrer" class=dropdown__link>Linux Tutorial</a><li><a href=https://pranabdas.github.io/machine-learning/ rel="noopener noreferrer" class=dropdown__link>Machine Learning Notes</a><li><a href=https://pranabdas.github.io/openmx/ rel="noopener noreferrer" class=dropdown__link>OpenMX tutorial</a><li><a href=https://pranabdas.github.io/python-tutorial/ rel="noopener noreferrer" class=dropdown__link>Python Tutorial</a><li><a href=https://pranabdas.github.io/espresso/ rel="noopener noreferrer" class=dropdown__link>Quantum Espresso Tutorial</a><li><a href=https://pranabdas.github.io/rust/ rel="noopener noreferrer" class=dropdown__link>Rust Programming</a><li><a href=https://pranabdas.github.io/arpes-manual/ rel="noopener noreferrer" class=dropdown__link>SUV ARPES Manual</a><li><a href=https://pranabdas.github.io/suvtools/ rel="noopener noreferrer" class=dropdown__link>SUV Python Tools</a></ul></div></div><div class="navbar__items navbar__items--right"><a href=https://github.com/pranabdas/fortran rel="noopener noreferrer" class="navbar__item navbar__link header-github-link" aria-label="GitHub repository" title="Visit project repository in GitHub"></a><a href=https://pranabdas.github.io rel="noopener noreferrer" class="navbar__item navbar__link header-homepage-link" aria-label="About me" title="Go to Pranab's Homepage"></a><div class="toggle_vylO colorModeToggle_DEke"><button class="clean-btn toggleButton_gllP toggleButtonDisabled_aARS" type=button disabled title="Switch between dark and light mode (currently light mode)" aria-label="Switch between dark and light mode (currently light mode)" aria-live=polite aria-pressed=false><svg viewBox="0 0 24 24" width=24 height=24 class=lightToggleIcon_pyhR><path fill=currentColor d="M12,9c1.65,0,3,1.35,3,3s-1.35,3-3,3s-3-1.35-3-3S10.35,9,12,9 M12,7c-2.76,0-5,2.24-5,5s2.24,5,5,5s5-2.24,5-5 S14.76,7,12,7L12,7z M2,13l2,0c0.55,0,1-0.45,1-1s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S1.45,13,2,13z M20,13l2,0c0.55,0,1-0.45,1-1 s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S19.45,13,20,13z M11,2v2c0,0.55,0.45,1,1,1s1-0.45,1-1V2c0-0.55-0.45-1-1-1S11,1.45,11,2z M11,20v2c0,0.55,0.45,1,1,1s1-0.45,1-1v-2c0-0.55-0.45-1-1-1C11.45,19,11,19.45,11,20z M5.99,4.58c-0.39-0.39-1.03-0.39-1.41,0 c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0s0.39-1.03,0-1.41L5.99,4.58z M18.36,16.95 c-0.39-0.39-1.03-0.39-1.41,0c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0c0.39-0.39,0.39-1.03,0-1.41 L18.36,16.95z M19.42,5.99c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06c-0.39,0.39-0.39,1.03,0,1.41 s1.03,0.39,1.41,0L19.42,5.99z M7.05,18.36c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06 c-0.39,0.39-0.39,1.03,0,1.41s1.03,0.39,1.41,0L7.05,18.36z"/></svg><svg viewBox="0 0 24 24" width=24 height=24 class=darkToggleIcon_wfgR><path fill=currentColor d="M9.37,5.51C9.19,6.15,9.1,6.82,9.1,7.5c0,4.08,3.32,7.4,7.4,7.4c0.68,0,1.35-0.09,1.99-0.27C17.45,17.19,14.93,19,12,19 c-3.86,0-7-3.14-7-7C5,9.07,6.81,6.55,9.37,5.51z M12,3c-4.97,0-9,4.03-9,9s4.03,9,9,9s9-4.03,9-9c0-0.46-0.04-0.92-0.1-1.36 c-0.98,1.37-2.58,2.26-4.4,2.26c-2.98,0-5.4-2.42-5.4-5.4c0-1.81,0.89-3.42,2.26-4.4C12.92,3.04,12.46,3,12,3L12,3z"/></svg></button></div><div class=navbarSearchContainer_Bca1><div class="navbar__search searchBarContainer_NW3z" dir=ltr><input placeholder=Search aria-label=Search class=navbar__search-input value=""><div class="loadingRing_RJI3 searchBarLoadingRing_YnHq"><div></div><div></div><div></div><div></div></div></div></div></div></div><div role=presentation class=navbar-sidebar__backdrop></div></nav><div id=__docusaurus_skipToContent_fallback class="main-wrapper mainWrapper_z2l0"><div class="container margin-vert--lg"><h1>Search the documentation</h1><div class=row><div class="col col--12"><input type=search name=q class=searchQueryInput_CFBF aria-label=Search autocomplete=off autofocus value=""></div></div><section></section></div></div><footer class="footer footer--dark"><div class="container container-fluid"><div class="footer__bottom text--center"><div class=footer__copyright>Copyright © 2024 Pranab Das. All rights
       reserved.</div></div></div></footer></div>
\ No newline at end of file
diff --git a/swap/index.html b/swap/index.html
index 67b27a8..8f3ffb1 100644
--- a/swap/index.html
+++ b/swap/index.html
@@ -1,4 +1,4 @@
-<!doctype html><html lang=en dir=ltr class="docs-wrapper plugin-docs plugin-id-default docs-version-current docs-doc-page docs-doc-id-swap" data-has-hydrated=false><meta charset=UTF-8><meta name=generator content="Docusaurus v3.6.1"><title data-rh=true>Swap two numbers • Fortran Tutorial</title><meta data-rh=true name=viewport content="width=device-width,initial-scale=1.0"><meta data-rh=true name=twitter:card content=summary_large_image><meta data-rh=true property=og:url content=https://pranabdas.github.io/fortran/swap><meta data-rh=true property=og:locale content=en><meta data-rh=true name=docusaurus_locale content=en><meta data-rh=true name=docsearch:language content=en><meta data-rh=true name=theme-color content=#06445c><meta data-rh=true name=docusaurus_version content=current><meta data-rh=true name=docusaurus_tag content=docs-default-current><meta data-rh=true name=docsearch:version content=current><meta data-rh=true name=docsearch:docusaurus_tag content=docs-default-current><meta data-rh=true property=og:title content="Swap two numbers • Fortran Tutorial"><meta data-rh=true name=description content="Subroutine to swap two integers:"><meta data-rh=true property=og:description content="Subroutine to swap two integers:"><link data-rh=true rel=icon href=/fortran/img/favicon.png><link data-rh=true rel=canonical href=https://pranabdas.github.io/fortran/swap><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/swap hreflang=en><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/swap hreflang=x-default><link rel=stylesheet href=https://pranabdas.github.io/drive/webfonts/katex/katex.min.css><link rel=stylesheet href=/fortran/assets/css/styles.4de1c8a8.css><script src=/fortran/assets/js/runtime~main.866c090c.js defer></script><script src=/fortran/assets/js/main.ec888ba8.js defer></script><body class=navigation-with-keyboard><script>!function(){var t,e=function(){try{return new URLSearchParams(window.location.search).get("docusaurus-theme")}catch(t){}}()||function(){try{return window.localStorage.getItem("theme")}catch(t){}}();t=null!==e?e:window.matchMedia("(prefers-color-scheme: dark)").matches?"dark":(window.matchMedia("(prefers-color-scheme: light)").matches,"light"),document.documentElement.setAttribute("data-theme",t)}(),function(){try{for(var[t,e]of new URLSearchParams(window.location.search).entries())if(t.startsWith("docusaurus-data-")){var a=t.replace("docusaurus-data-","data-");document.documentElement.setAttribute(a,e)}}catch(t){}}()</script><div id=__docusaurus><div role=region aria-label="Skip to main content"><a class=skipToContent_fXgn href=#__docusaurus_skipToContent_fallback>Skip to main content</a></div><nav aria-label=Main class="navbar navbar--fixed-top navbarHideable_m1mJ"><div class=navbar__inner><div class=navbar__items><button aria-label="Toggle navigation bar" aria-expanded=false class="navbar__toggle clean-btn" type=button><svg width=30 height=30 viewBox="0 0 30 30" aria-hidden=true><path stroke=currentColor stroke-linecap=round stroke-miterlimit=10 stroke-width=2 d="M4 7h22M4 15h22M4 23h22"/></svg></button><a class=navbar__brand href=/fortran/><div class=navbar__logo><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--light_NVdE"><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--dark_xIcU"></div><b class="navbar__title text--truncate">Fortran</b></a><div class="navbar__item dropdown dropdown--hoverable"><a aria-current=page class="navbar__link active" aria-haspopup=true aria-expanded=false role=button href=/fortran/>Docs</a><ul class=dropdown__menu><li><a aria-current=page class="dropdown__link dropdown__link--active" href=/fortran/>Fortran Programming</a><li><a href=https://pranabdas.github.io/docs/ rel="noopener noreferrer" class=dropdown__link>~ ~ ~ Other Docs ~ ~ ~</a><li><a href=https://pranabdas.github.io/arpespythontools/ rel="noopener noreferrer" class=dropdown__link>ARPES Python Tools</a><li><a href=https://pranabdas.github.io/c-cpp/ rel="noopener noreferrer" class=dropdown__link>C and C++ Programming</a><li><a href=https://pranabdas.github.io/condmat-notes/ rel="noopener noreferrer" class=dropdown__link>Condensed Matter Notes</a><li><a href=https://pranabdas.github.io/javascript/ rel="noopener noreferrer" class=dropdown__link>Javascript Tutorial</a><li><a href=https://pranabdas.github.io/linux/ rel="noopener noreferrer" class=dropdown__link>Linux Tutorial</a><li><a href=https://pranabdas.github.io/machine-learning/ rel="noopener noreferrer" class=dropdown__link>Machine Learning Notes</a><li><a href=https://pranabdas.github.io/openmx/ rel="noopener noreferrer" class=dropdown__link>OpenMX tutorial</a><li><a href=https://pranabdas.github.io/python-tutorial/ rel="noopener noreferrer" class=dropdown__link>Python Tutorial</a><li><a href=https://pranabdas.github.io/espresso/ rel="noopener noreferrer" class=dropdown__link>Quantum Espresso Tutorial</a><li><a href=https://pranabdas.github.io/rust/ rel="noopener noreferrer" class=dropdown__link>Rust Programming</a><li><a href=https://pranabdas.github.io/arpes-manual/ rel="noopener noreferrer" class=dropdown__link>SUV ARPES Manual</a><li><a href=https://pranabdas.github.io/suvtools/ rel="noopener noreferrer" class=dropdown__link>SUV Python Tools</a></ul></div></div><div class="navbar__items navbar__items--right"><a href=https://github.com/pranabdas/fortran rel="noopener noreferrer" class="navbar__item navbar__link header-github-link" aria-label="GitHub repository" title="Visit project repository in GitHub"></a><a href=https://pranabdas.github.io rel="noopener noreferrer" class="navbar__item navbar__link header-homepage-link" aria-label="About me" title="Go to Pranab's Homepage"></a><div class="toggle_vylO colorModeToggle_DEke"><button class="clean-btn toggleButton_gllP toggleButtonDisabled_aARS" type=button disabled title="Switch between dark and light mode (currently light mode)" aria-label="Switch between dark and light mode (currently light mode)" aria-live=polite aria-pressed=false><svg viewBox="0 0 24 24" width=24 height=24 class=lightToggleIcon_pyhR><path fill=currentColor d="M12,9c1.65,0,3,1.35,3,3s-1.35,3-3,3s-3-1.35-3-3S10.35,9,12,9 M12,7c-2.76,0-5,2.24-5,5s2.24,5,5,5s5-2.24,5-5 S14.76,7,12,7L12,7z M2,13l2,0c0.55,0,1-0.45,1-1s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S1.45,13,2,13z M20,13l2,0c0.55,0,1-0.45,1-1 s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S19.45,13,20,13z M11,2v2c0,0.55,0.45,1,1,1s1-0.45,1-1V2c0-0.55-0.45-1-1-1S11,1.45,11,2z M11,20v2c0,0.55,0.45,1,1,1s1-0.45,1-1v-2c0-0.55-0.45-1-1-1C11.45,19,11,19.45,11,20z M5.99,4.58c-0.39-0.39-1.03-0.39-1.41,0 c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0s0.39-1.03,0-1.41L5.99,4.58z M18.36,16.95 c-0.39-0.39-1.03-0.39-1.41,0c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0c0.39-0.39,0.39-1.03,0-1.41 L18.36,16.95z M19.42,5.99c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06c-0.39,0.39-0.39,1.03,0,1.41 s1.03,0.39,1.41,0L19.42,5.99z M7.05,18.36c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06 c-0.39,0.39-0.39,1.03,0,1.41s1.03,0.39,1.41,0L7.05,18.36z"/></svg><svg viewBox="0 0 24 24" width=24 height=24 class=darkToggleIcon_wfgR><path fill=currentColor d="M9.37,5.51C9.19,6.15,9.1,6.82,9.1,7.5c0,4.08,3.32,7.4,7.4,7.4c0.68,0,1.35-0.09,1.99-0.27C17.45,17.19,14.93,19,12,19 c-3.86,0-7-3.14-7-7C5,9.07,6.81,6.55,9.37,5.51z M12,3c-4.97,0-9,4.03-9,9s4.03,9,9,9s9-4.03,9-9c0-0.46-0.04-0.92-0.1-1.36 c-0.98,1.37-2.58,2.26-4.4,2.26c-2.98,0-5.4-2.42-5.4-5.4c0-1.81,0.89-3.42,2.26-4.4C12.92,3.04,12.46,3,12,3L12,3z"/></svg></button></div><div class=navbarSearchContainer_Bca1><div class="navbar__search searchBarContainer_NW3z" dir=ltr><input placeholder=Search aria-label=Search class=navbar__search-input value=""><div class="loadingRing_RJI3 searchBarLoadingRing_YnHq"><div></div><div></div><div></div><div></div></div></div></div></div></div><div role=presentation class=navbar-sidebar__backdrop></div></nav><div id=__docusaurus_skipToContent_fallback class="main-wrapper mainWrapper_z2l0"><div class=docsWrapper_hBAB><button aria-label="Scroll back to top" class="clean-btn theme-back-to-top-button backToTopButton_sjWU" type=button></button><div class=docRoot_UBD9><aside class="theme-doc-sidebar-container docSidebarContainer_YfHR"><div class=sidebarViewport_aRkj><div class="sidebar_njMd sidebarWithHideableNavbar_wUlq"><a tabindex=-1 class=sidebarLogo_isFc href=/fortran/><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--light_NVdE"><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--dark_xIcU"><b>Fortran</b></a><nav aria-label="Docs sidebar" class="menu thin-scrollbar menu_SIkG"><ul class="theme-doc-sidebar-menu menu__list"><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/>Setup</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/basics>Basics</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/array>Array and Matrix</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/control>Logical control</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/loop>Loop</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/modules>Modules</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/procedures>Procedures</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/complex>Complex number</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/recursion>Recursion</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/types>Custom types</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/pointer>Pointer</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/file>File I/O</a><li class="theme-doc-sidebar-item-category theme-doc-sidebar-item-category-level-1 menu__list-item"><div class=menu__list-item-collapsible><a class="menu__link menu__link--sublist menu__link--active" href=/fortran/category/coding-practice>Coding practice</a><button aria-label="Collapse sidebar category 'Coding practice'" aria-expanded=true type=button class="clean-btn menu__caret"></button></div><ul style=display:block;overflow:visible;height:auto class=menu__list><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class="menu__link menu__link--active" aria-current=page tabindex=0 href=/fortran/swap>Swap two numbers</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/abs-path>Absolute path</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/hypotenuse>Calculate hypotenuse</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/integration>Numerical integration</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/haversine>Haversine formula</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/inner-product>Inner product</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/monte-carlo-pi>Monte Carlo method</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/monte-carlo-integration>Monte Carlo integration</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/time>Time</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/arg-parsing>Argument parsing</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/exec-command>External command</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/blas>BLAS</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/mpi>MPI Basics</a></ul><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/resources>Resources</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/license>License</a></ul></nav><button type=button title="Collapse sidebar" aria-label="Collapse sidebar" class="button button--secondary button--outline collapseSidebarButton_PEFL"><svg width=20 height=20 aria-hidden=true class=collapseSidebarButtonIcon_kv0_><g fill=#7a7a7a><path d="M9.992 10.023c0 .2-.062.399-.172.547l-4.996 7.492a.982.982 0 01-.828.454H1c-.55 0-1-.453-1-1 0-.2.059-.403.168-.551l4.629-6.942L.168 3.078A.939.939 0 010 2.528c0-.548.45-.997 1-.997h2.996c.352 0 .649.18.828.45L9.82 9.472c.11.148.172.347.172.55zm0 0"/><path d="M19.98 10.023c0 .2-.058.399-.168.547l-4.996 7.492a.987.987 0 01-.828.454h-3c-.547 0-.996-.453-.996-1 0-.2.059-.403.168-.551l4.625-6.942-4.625-6.945a.939.939 0 01-.168-.55 1 1 0 01.996-.997h3c.348 0 .649.18.828.45l4.996 7.492c.11.148.168.347.168.55zm0 0"/></g></svg></button></div></div></aside><main class=docMainContainer_TBSr><div class="container padding-top--md padding-bottom--lg"><div class=row><div class="col docItemCol_VOVn"><div class=docItemContainer_Djhp><article><nav class="theme-doc-breadcrumbs breadcrumbsContainer_Z_bl" aria-label=Breadcrumbs><ul class=breadcrumbs itemscope itemtype=https://schema.org/BreadcrumbList><li class=breadcrumbs__item><a aria-label="Home page" class=breadcrumbs__link href=/fortran/><svg viewBox="0 0 24 24" class=breadcrumbHomeIcon_YNFT><path d="M10 19v-5h4v5c0 .55.45 1 1 1h3c.55 0 1-.45 1-1v-7h1.7c.46 0 .68-.57.33-.87L12.67 3.6c-.38-.34-.96-.34-1.34 0l-8.36 7.53c-.34.3-.13.87.33.87H5v7c0 .55.45 1 1 1h3c.55 0 1-.45 1-1z" fill=currentColor /></svg></a><li itemscope itemprop=itemListElement itemtype=https://schema.org/ListItem class=breadcrumbs__item><a class=breadcrumbs__link itemprop=item href=/fortran/category/coding-practice><span itemprop=name>Coding practice</span></a><meta itemprop=position content=1><li itemscope itemprop=itemListElement itemtype=https://schema.org/ListItem class="breadcrumbs__item breadcrumbs__item--active"><span class=breadcrumbs__link itemprop=name>Swap two numbers</span><meta itemprop=position content=2></ul></nav><div class="theme-doc-markdown markdown"><header><h1>Swap two numbers</h1></header><p>Subroutine to swap two integers:</p>
+<!doctype html><html lang=en dir=ltr class="docs-wrapper plugin-docs plugin-id-default docs-version-current docs-doc-page docs-doc-id-swap" data-has-hydrated=false><meta charset=UTF-8><meta name=generator content="Docusaurus v3.6.1"><title data-rh=true>Swap two numbers • Fortran Tutorial</title><meta data-rh=true name=viewport content="width=device-width,initial-scale=1.0"><meta data-rh=true name=twitter:card content=summary_large_image><meta data-rh=true property=og:url content=https://pranabdas.github.io/fortran/swap><meta data-rh=true property=og:locale content=en><meta data-rh=true name=docusaurus_locale content=en><meta data-rh=true name=docsearch:language content=en><meta data-rh=true name=theme-color content=#06445c><meta data-rh=true name=docusaurus_version content=current><meta data-rh=true name=docusaurus_tag content=docs-default-current><meta data-rh=true name=docsearch:version content=current><meta data-rh=true name=docsearch:docusaurus_tag content=docs-default-current><meta data-rh=true property=og:title content="Swap two numbers • Fortran Tutorial"><meta data-rh=true name=description content="Subroutine to swap two integers:"><meta data-rh=true property=og:description content="Subroutine to swap two integers:"><link data-rh=true rel=icon href=/fortran/img/favicon.png><link data-rh=true rel=canonical href=https://pranabdas.github.io/fortran/swap><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/swap hreflang=en><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/swap hreflang=x-default><link rel=stylesheet href=https://pranab.pages.dev/assets/fonts/katex/katex.min.css><link rel=stylesheet href=/fortran/assets/css/styles.4de1c8a8.css><script src=/fortran/assets/js/runtime~main.667e3c0f.js defer></script><script src=/fortran/assets/js/main.10795e8f.js defer></script><body class=navigation-with-keyboard><script>!function(){var t,e=function(){try{return new URLSearchParams(window.location.search).get("docusaurus-theme")}catch(t){}}()||function(){try{return window.localStorage.getItem("theme")}catch(t){}}();t=null!==e?e:window.matchMedia("(prefers-color-scheme: dark)").matches?"dark":(window.matchMedia("(prefers-color-scheme: light)").matches,"light"),document.documentElement.setAttribute("data-theme",t)}(),function(){try{for(var[t,e]of new URLSearchParams(window.location.search).entries())if(t.startsWith("docusaurus-data-")){var a=t.replace("docusaurus-data-","data-");document.documentElement.setAttribute(a,e)}}catch(t){}}()</script><div id=__docusaurus><div role=region aria-label="Skip to main content"><a class=skipToContent_fXgn href=#__docusaurus_skipToContent_fallback>Skip to main content</a></div><nav aria-label=Main class="navbar navbar--fixed-top navbarHideable_m1mJ"><div class=navbar__inner><div class=navbar__items><button aria-label="Toggle navigation bar" aria-expanded=false class="navbar__toggle clean-btn" type=button><svg width=30 height=30 viewBox="0 0 30 30" aria-hidden=true><path stroke=currentColor stroke-linecap=round stroke-miterlimit=10 stroke-width=2 d="M4 7h22M4 15h22M4 23h22"/></svg></button><a class=navbar__brand href=/fortran/><div class=navbar__logo><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--light_NVdE"><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--dark_xIcU"></div><b class="navbar__title text--truncate">Fortran</b></a><div class="navbar__item dropdown dropdown--hoverable"><a aria-current=page class="navbar__link active" aria-haspopup=true aria-expanded=false role=button href=/fortran/>Docs</a><ul class=dropdown__menu><li><a aria-current=page class="dropdown__link dropdown__link--active" href=/fortran/>Fortran Programming</a><li><a href=https://pranabdas.github.io/docs/ rel="noopener noreferrer" class=dropdown__link>~ ~ ~ Other Docs ~ ~ ~</a><li><a href=https://pranabdas.github.io/arpespythontools/ rel="noopener noreferrer" class=dropdown__link>ARPES Python Tools</a><li><a href=https://pranabdas.github.io/c-cpp/ rel="noopener noreferrer" class=dropdown__link>C and C++ Programming</a><li><a href=https://pranabdas.github.io/condmat-notes/ rel="noopener noreferrer" class=dropdown__link>Condensed Matter Notes</a><li><a href=https://pranabdas.github.io/javascript/ rel="noopener noreferrer" class=dropdown__link>Javascript Tutorial</a><li><a href=https://pranabdas.github.io/linux/ rel="noopener noreferrer" class=dropdown__link>Linux Tutorial</a><li><a href=https://pranabdas.github.io/machine-learning/ rel="noopener noreferrer" class=dropdown__link>Machine Learning Notes</a><li><a href=https://pranabdas.github.io/openmx/ rel="noopener noreferrer" class=dropdown__link>OpenMX tutorial</a><li><a href=https://pranabdas.github.io/python-tutorial/ rel="noopener noreferrer" class=dropdown__link>Python Tutorial</a><li><a href=https://pranabdas.github.io/espresso/ rel="noopener noreferrer" class=dropdown__link>Quantum Espresso Tutorial</a><li><a href=https://pranabdas.github.io/rust/ rel="noopener noreferrer" class=dropdown__link>Rust Programming</a><li><a href=https://pranabdas.github.io/arpes-manual/ rel="noopener noreferrer" class=dropdown__link>SUV ARPES Manual</a><li><a href=https://pranabdas.github.io/suvtools/ rel="noopener noreferrer" class=dropdown__link>SUV Python Tools</a></ul></div></div><div class="navbar__items navbar__items--right"><a href=https://github.com/pranabdas/fortran rel="noopener noreferrer" class="navbar__item navbar__link header-github-link" aria-label="GitHub repository" title="Visit project repository in GitHub"></a><a href=https://pranabdas.github.io rel="noopener noreferrer" class="navbar__item navbar__link header-homepage-link" aria-label="About me" title="Go to Pranab's Homepage"></a><div class="toggle_vylO colorModeToggle_DEke"><button class="clean-btn toggleButton_gllP toggleButtonDisabled_aARS" type=button disabled title="Switch between dark and light mode (currently light mode)" aria-label="Switch between dark and light mode (currently light mode)" aria-live=polite aria-pressed=false><svg viewBox="0 0 24 24" width=24 height=24 class=lightToggleIcon_pyhR><path fill=currentColor d="M12,9c1.65,0,3,1.35,3,3s-1.35,3-3,3s-3-1.35-3-3S10.35,9,12,9 M12,7c-2.76,0-5,2.24-5,5s2.24,5,5,5s5-2.24,5-5 S14.76,7,12,7L12,7z M2,13l2,0c0.55,0,1-0.45,1-1s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S1.45,13,2,13z M20,13l2,0c0.55,0,1-0.45,1-1 s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S19.45,13,20,13z M11,2v2c0,0.55,0.45,1,1,1s1-0.45,1-1V2c0-0.55-0.45-1-1-1S11,1.45,11,2z M11,20v2c0,0.55,0.45,1,1,1s1-0.45,1-1v-2c0-0.55-0.45-1-1-1C11.45,19,11,19.45,11,20z M5.99,4.58c-0.39-0.39-1.03-0.39-1.41,0 c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0s0.39-1.03,0-1.41L5.99,4.58z M18.36,16.95 c-0.39-0.39-1.03-0.39-1.41,0c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0c0.39-0.39,0.39-1.03,0-1.41 L18.36,16.95z M19.42,5.99c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06c-0.39,0.39-0.39,1.03,0,1.41 s1.03,0.39,1.41,0L19.42,5.99z M7.05,18.36c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06 c-0.39,0.39-0.39,1.03,0,1.41s1.03,0.39,1.41,0L7.05,18.36z"/></svg><svg viewBox="0 0 24 24" width=24 height=24 class=darkToggleIcon_wfgR><path fill=currentColor d="M9.37,5.51C9.19,6.15,9.1,6.82,9.1,7.5c0,4.08,3.32,7.4,7.4,7.4c0.68,0,1.35-0.09,1.99-0.27C17.45,17.19,14.93,19,12,19 c-3.86,0-7-3.14-7-7C5,9.07,6.81,6.55,9.37,5.51z M12,3c-4.97,0-9,4.03-9,9s4.03,9,9,9s9-4.03,9-9c0-0.46-0.04-0.92-0.1-1.36 c-0.98,1.37-2.58,2.26-4.4,2.26c-2.98,0-5.4-2.42-5.4-5.4c0-1.81,0.89-3.42,2.26-4.4C12.92,3.04,12.46,3,12,3L12,3z"/></svg></button></div><div class=navbarSearchContainer_Bca1><div class="navbar__search searchBarContainer_NW3z" dir=ltr><input placeholder=Search aria-label=Search class=navbar__search-input value=""><div class="loadingRing_RJI3 searchBarLoadingRing_YnHq"><div></div><div></div><div></div><div></div></div></div></div></div></div><div role=presentation class=navbar-sidebar__backdrop></div></nav><div id=__docusaurus_skipToContent_fallback class="main-wrapper mainWrapper_z2l0"><div class=docsWrapper_hBAB><button aria-label="Scroll back to top" class="clean-btn theme-back-to-top-button backToTopButton_sjWU" type=button></button><div class=docRoot_UBD9><aside class="theme-doc-sidebar-container docSidebarContainer_YfHR"><div class=sidebarViewport_aRkj><div class="sidebar_njMd sidebarWithHideableNavbar_wUlq"><a tabindex=-1 class=sidebarLogo_isFc href=/fortran/><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--light_NVdE"><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--dark_xIcU"><b>Fortran</b></a><nav aria-label="Docs sidebar" class="menu thin-scrollbar menu_SIkG"><ul class="theme-doc-sidebar-menu menu__list"><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/>Setup</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/basics>Basics</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/array>Array and Matrix</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/control>Logical control</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/loop>Loop</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/modules>Modules</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/procedures>Procedures</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/complex>Complex number</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/recursion>Recursion</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/types>Custom types</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/pointer>Pointer</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/file>File I/O</a><li class="theme-doc-sidebar-item-category theme-doc-sidebar-item-category-level-1 menu__list-item"><div class=menu__list-item-collapsible><a class="menu__link menu__link--sublist menu__link--active" href=/fortran/category/coding-practice>Coding practice</a><button aria-label="Collapse sidebar category 'Coding practice'" aria-expanded=true type=button class="clean-btn menu__caret"></button></div><ul style=display:block;overflow:visible;height:auto class=menu__list><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class="menu__link menu__link--active" aria-current=page tabindex=0 href=/fortran/swap>Swap two numbers</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/abs-path>Absolute path</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/hypotenuse>Calculate hypotenuse</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/integration>Numerical integration</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/haversine>Haversine formula</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/inner-product>Inner product</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/monte-carlo-pi>Monte Carlo method</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/monte-carlo-integration>Monte Carlo integration</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/time>Time</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/arg-parsing>Argument parsing</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/exec-command>External command</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/blas>BLAS</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/mpi>MPI Basics</a></ul><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/resources>Resources</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/license>License</a></ul></nav><button type=button title="Collapse sidebar" aria-label="Collapse sidebar" class="button button--secondary button--outline collapseSidebarButton_PEFL"><svg width=20 height=20 aria-hidden=true class=collapseSidebarButtonIcon_kv0_><g fill=#7a7a7a><path d="M9.992 10.023c0 .2-.062.399-.172.547l-4.996 7.492a.982.982 0 01-.828.454H1c-.55 0-1-.453-1-1 0-.2.059-.403.168-.551l4.629-6.942L.168 3.078A.939.939 0 010 2.528c0-.548.45-.997 1-.997h2.996c.352 0 .649.18.828.45L9.82 9.472c.11.148.172.347.172.55zm0 0"/><path d="M19.98 10.023c0 .2-.058.399-.168.547l-4.996 7.492a.987.987 0 01-.828.454h-3c-.547 0-.996-.453-.996-1 0-.2.059-.403.168-.551l4.625-6.942-4.625-6.945a.939.939 0 01-.168-.55 1 1 0 01.996-.997h3c.348 0 .649.18.828.45l4.996 7.492c.11.148.168.347.168.55zm0 0"/></g></svg></button></div></div></aside><main class=docMainContainer_TBSr><div class="container padding-top--md padding-bottom--lg"><div class=row><div class="col docItemCol_VOVn"><div class=docItemContainer_Djhp><article><nav class="theme-doc-breadcrumbs breadcrumbsContainer_Z_bl" aria-label=Breadcrumbs><ul class=breadcrumbs itemscope itemtype=https://schema.org/BreadcrumbList><li class=breadcrumbs__item><a aria-label="Home page" class=breadcrumbs__link href=/fortran/><svg viewBox="0 0 24 24" class=breadcrumbHomeIcon_YNFT><path d="M10 19v-5h4v5c0 .55.45 1 1 1h3c.55 0 1-.45 1-1v-7h1.7c.46 0 .68-.57.33-.87L12.67 3.6c-.38-.34-.96-.34-1.34 0l-8.36 7.53c-.34.3-.13.87.33.87H5v7c0 .55.45 1 1 1h3c.55 0 1-.45 1-1z" fill=currentColor /></svg></a><li itemscope itemprop=itemListElement itemtype=https://schema.org/ListItem class=breadcrumbs__item><a class=breadcrumbs__link itemprop=item href=/fortran/category/coding-practice><span itemprop=name>Coding practice</span></a><meta itemprop=position content=1><li itemscope itemprop=itemListElement itemtype=https://schema.org/ListItem class="breadcrumbs__item breadcrumbs__item--active"><span class=breadcrumbs__link itemprop=name>Swap two numbers</span><meta itemprop=position content=2></ul></nav><div class="theme-doc-markdown markdown"><header><h1>Swap two numbers</h1></header><p>Subroutine to swap two integers:</p>
 <!-- -->
 <div class="language-fortran codeBlockContainer_Ckt0 theme-code-block" style=--prism-color:#393A34;--prism-background-color:#f6f8fa><div class=codeBlockTitle_Ktv7>src/24_swap.f90</div><div class=codeBlockContent_biex><pre tabindex=0 class="prism-code language-fortran codeBlock_bY9V thin-scrollbar" style=color:#393A34;background-color:#f6f8fa><code class="codeBlockLines_e6Vv codeBlockLinesWithNumbering_o6Pm"><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token keyword" style=color:#00009f>PROGRAM</span><span class="token plain"> MAIN</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>IMPLICIT NONE</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>INTEGER</span><span class="token plain"> a</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> b</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>PRINT</span><span class="token plain"> </span><span class="token string" style=color:#e3116c>"(a,$)"</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> </span><span class="token string" style=color:#e3116c>"Enter two integers (separated by space or comma): "</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>READ</span><span class="token plain"> </span><span class="token operator" style=color:#393A34>*</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> a</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> b</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>CALL</span><span class="token plain"> swap</span><span class="token punctuation" style=color:#393A34>(</span><span class="token plain">a</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> b</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>PRINT</span><span class="token plain"> </span><span class="token operator" style=color:#393A34>*</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> </span><span class="token string" style=color:#e3116c>"After swap: "</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> a</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> b</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain"></span><span class="token keyword" style=color:#00009f>CONTAINS</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>SUBROUTINE</span><span class="token plain"> swap</span><span class="token punctuation" style=color:#393A34>(</span><span class="token plain">a</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> b</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">        </span><span class="token keyword" style=color:#00009f>INTEGER</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> </span><span class="token keyword" style=color:#00009f>INTENT</span><span class="token punctuation" style=color:#393A34>(</span><span class="token keyword" style=color:#00009f>IN</span><span class="token plain"> </span><span class="token keyword" style=color:#00009f>OUT</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"> </span><span class="token operator" style=color:#393A34>::</span><span class="token plain"> a</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> b</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">        </span><span class="token keyword" style=color:#00009f>INTEGER</span><span class="token plain"> tmp</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">        tmp </span><span class="token operator" style=color:#393A34>=</span><span class="token plain"> a</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">        a </span><span class="token operator" style=color:#393A34>=</span><span class="token plain"> b</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">        b </span><span class="token operator" style=color:#393A34>=</span><span class="token plain"> tmp</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>END SUBROUTINE</span><span class="token plain"> swap</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain"></span><span class="token keyword" style=color:#00009f>END</span></span><br></span></code></pre><div class=buttonGroup__atx><button type=button aria-label="Copy code to clipboard" title=Copy class=clean-btn><span class=copyButtonIcons_eSgA aria-hidden=true><svg viewBox="0 0 24 24" class=copyButtonIcon_y97N><path fill=currentColor d="M19,21H8V7H19M19,5H8A2,2 0 0,0 6,7V21A2,2 0 0,0 8,23H19A2,2 0 0,0 21,21V7A2,2 0 0,0 19,5M16,1H4A2,2 0 0,0 2,3V17H4V3H16V1Z"/></svg><svg viewBox="0 0 24 24" class=copyButtonSuccessIcon_LjdS><path fill=currentColor d=M21,7L9,19L3.5,13.5L4.91,12.09L9,16.17L19.59,5.59L21,7Z /></svg></span></button></div></div></div></div><footer class="theme-doc-footer docusaurus-mt-lg"><div class="row margin-top--sm theme-doc-footer-edit-meta-row"><div class=col><a href=https://github.com/pranabdas/fortran/blob/main/docs/swap.mdx target=_blank rel="noopener noreferrer" class=theme-edit-this-page><svg fill=currentColor height=20 width=20 viewBox="0 0 40 40" class=iconEdit_Z9Sw aria-hidden=true><g><path d="m34.5 11.7l-3 3.1-6.3-6.3 3.1-3q0.5-0.5 1.2-0.5t1.1 0.5l3.9 3.9q0.5 0.4 0.5 1.1t-0.5 1.2z m-29.5 17.1l18.4-18.5 6.3 6.3-18.4 18.4h-6.3v-6.2z"/></g></svg>Edit this page</a></div><div class="col lastUpdated_JAkA"></div></div></footer></article><nav class="pagination-nav docusaurus-mt-lg" aria-label="Docs pages"><a class="pagination-nav__link pagination-nav__link--prev" href=/fortran/category/coding-practice><div class=pagination-nav__sublabel>Previous</div><div class=pagination-nav__label>Coding practice</div></a><a class="pagination-nav__link pagination-nav__link--next" href=/fortran/abs-path><div class=pagination-nav__sublabel>Next</div><div class=pagination-nav__label>Absolute path</div></a></nav></div></div></div></div></main></div></div></div><footer class="footer footer--dark"><div class="container container-fluid"><div class="footer__bottom text--center"><div class=footer__copyright>Copyright © 2024 Pranab Das. All rights
       reserved.</div></div></div></footer></div>
\ No newline at end of file
diff --git a/time/index.html b/time/index.html
index 5e12525..736890d 100644
--- a/time/index.html
+++ b/time/index.html
@@ -1,4 +1,4 @@
-<!doctype html><html lang=en dir=ltr class="docs-wrapper plugin-docs plugin-id-default docs-version-current docs-doc-page docs-doc-id-time" data-has-hydrated=false><meta charset=UTF-8><meta name=generator content="Docusaurus v3.6.1"><title data-rh=true>Time • Fortran Tutorial</title><meta data-rh=true name=viewport content="width=device-width,initial-scale=1.0"><meta data-rh=true name=twitter:card content=summary_large_image><meta data-rh=true property=og:url content=https://pranabdas.github.io/fortran/time><meta data-rh=true property=og:locale content=en><meta data-rh=true name=docusaurus_locale content=en><meta data-rh=true name=docsearch:language content=en><meta data-rh=true name=theme-color content=#06445c><meta data-rh=true name=docusaurus_version content=current><meta data-rh=true name=docusaurus_tag content=docs-default-current><meta data-rh=true name=docsearch:version content=current><meta data-rh=true name=docsearch:docusaurus_tag content=docs-default-current><meta data-rh=true property=og:title content="Time • Fortran Tutorial"><meta data-rh=true name=description content="Following example uses dateandtime and cup_time to find current date and"><meta data-rh=true property=og:description content="Following example uses dateandtime and cup_time to find current date and"><link data-rh=true rel=icon href=/fortran/img/favicon.png><link data-rh=true rel=canonical href=https://pranabdas.github.io/fortran/time><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/time hreflang=en><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/time hreflang=x-default><link rel=stylesheet href=https://pranabdas.github.io/drive/webfonts/katex/katex.min.css><link rel=stylesheet href=/fortran/assets/css/styles.4de1c8a8.css><script src=/fortran/assets/js/runtime~main.866c090c.js defer></script><script src=/fortran/assets/js/main.ec888ba8.js defer></script><body class=navigation-with-keyboard><script>!function(){var t,e=function(){try{return new URLSearchParams(window.location.search).get("docusaurus-theme")}catch(t){}}()||function(){try{return window.localStorage.getItem("theme")}catch(t){}}();t=null!==e?e:window.matchMedia("(prefers-color-scheme: dark)").matches?"dark":(window.matchMedia("(prefers-color-scheme: light)").matches,"light"),document.documentElement.setAttribute("data-theme",t)}(),function(){try{for(var[t,e]of new URLSearchParams(window.location.search).entries())if(t.startsWith("docusaurus-data-")){var a=t.replace("docusaurus-data-","data-");document.documentElement.setAttribute(a,e)}}catch(t){}}()</script><div id=__docusaurus><div role=region aria-label="Skip to main content"><a class=skipToContent_fXgn href=#__docusaurus_skipToContent_fallback>Skip to main content</a></div><nav aria-label=Main class="navbar navbar--fixed-top navbarHideable_m1mJ"><div class=navbar__inner><div class=navbar__items><button aria-label="Toggle navigation bar" aria-expanded=false class="navbar__toggle clean-btn" type=button><svg width=30 height=30 viewBox="0 0 30 30" aria-hidden=true><path stroke=currentColor stroke-linecap=round stroke-miterlimit=10 stroke-width=2 d="M4 7h22M4 15h22M4 23h22"/></svg></button><a class=navbar__brand href=/fortran/><div class=navbar__logo><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--light_NVdE"><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--dark_xIcU"></div><b class="navbar__title text--truncate">Fortran</b></a><div class="navbar__item dropdown dropdown--hoverable"><a aria-current=page class="navbar__link active" aria-haspopup=true aria-expanded=false role=button href=/fortran/>Docs</a><ul class=dropdown__menu><li><a aria-current=page class="dropdown__link dropdown__link--active" href=/fortran/>Fortran Programming</a><li><a href=https://pranabdas.github.io/docs/ rel="noopener noreferrer" class=dropdown__link>~ ~ ~ Other Docs ~ ~ ~</a><li><a href=https://pranabdas.github.io/arpespythontools/ rel="noopener noreferrer" class=dropdown__link>ARPES Python Tools</a><li><a href=https://pranabdas.github.io/c-cpp/ rel="noopener noreferrer" class=dropdown__link>C and C++ Programming</a><li><a href=https://pranabdas.github.io/condmat-notes/ rel="noopener noreferrer" class=dropdown__link>Condensed Matter Notes</a><li><a href=https://pranabdas.github.io/javascript/ rel="noopener noreferrer" class=dropdown__link>Javascript Tutorial</a><li><a href=https://pranabdas.github.io/linux/ rel="noopener noreferrer" class=dropdown__link>Linux Tutorial</a><li><a href=https://pranabdas.github.io/machine-learning/ rel="noopener noreferrer" class=dropdown__link>Machine Learning Notes</a><li><a href=https://pranabdas.github.io/openmx/ rel="noopener noreferrer" class=dropdown__link>OpenMX tutorial</a><li><a href=https://pranabdas.github.io/python-tutorial/ rel="noopener noreferrer" class=dropdown__link>Python Tutorial</a><li><a href=https://pranabdas.github.io/espresso/ rel="noopener noreferrer" class=dropdown__link>Quantum Espresso Tutorial</a><li><a href=https://pranabdas.github.io/rust/ rel="noopener noreferrer" class=dropdown__link>Rust Programming</a><li><a href=https://pranabdas.github.io/arpes-manual/ rel="noopener noreferrer" class=dropdown__link>SUV ARPES Manual</a><li><a href=https://pranabdas.github.io/suvtools/ rel="noopener noreferrer" class=dropdown__link>SUV Python Tools</a></ul></div></div><div class="navbar__items navbar__items--right"><a href=https://github.com/pranabdas/fortran rel="noopener noreferrer" class="navbar__item navbar__link header-github-link" aria-label="GitHub repository" title="Visit project repository in GitHub"></a><a href=https://pranabdas.github.io rel="noopener noreferrer" class="navbar__item navbar__link header-homepage-link" aria-label="About me" title="Go to Pranab's Homepage"></a><div class="toggle_vylO colorModeToggle_DEke"><button class="clean-btn toggleButton_gllP toggleButtonDisabled_aARS" type=button disabled title="Switch between dark and light mode (currently light mode)" aria-label="Switch between dark and light mode (currently light mode)" aria-live=polite aria-pressed=false><svg viewBox="0 0 24 24" width=24 height=24 class=lightToggleIcon_pyhR><path fill=currentColor d="M12,9c1.65,0,3,1.35,3,3s-1.35,3-3,3s-3-1.35-3-3S10.35,9,12,9 M12,7c-2.76,0-5,2.24-5,5s2.24,5,5,5s5-2.24,5-5 S14.76,7,12,7L12,7z M2,13l2,0c0.55,0,1-0.45,1-1s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S1.45,13,2,13z M20,13l2,0c0.55,0,1-0.45,1-1 s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S19.45,13,20,13z M11,2v2c0,0.55,0.45,1,1,1s1-0.45,1-1V2c0-0.55-0.45-1-1-1S11,1.45,11,2z M11,20v2c0,0.55,0.45,1,1,1s1-0.45,1-1v-2c0-0.55-0.45-1-1-1C11.45,19,11,19.45,11,20z M5.99,4.58c-0.39-0.39-1.03-0.39-1.41,0 c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0s0.39-1.03,0-1.41L5.99,4.58z M18.36,16.95 c-0.39-0.39-1.03-0.39-1.41,0c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0c0.39-0.39,0.39-1.03,0-1.41 L18.36,16.95z M19.42,5.99c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06c-0.39,0.39-0.39,1.03,0,1.41 s1.03,0.39,1.41,0L19.42,5.99z M7.05,18.36c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06 c-0.39,0.39-0.39,1.03,0,1.41s1.03,0.39,1.41,0L7.05,18.36z"/></svg><svg viewBox="0 0 24 24" width=24 height=24 class=darkToggleIcon_wfgR><path fill=currentColor d="M9.37,5.51C9.19,6.15,9.1,6.82,9.1,7.5c0,4.08,3.32,7.4,7.4,7.4c0.68,0,1.35-0.09,1.99-0.27C17.45,17.19,14.93,19,12,19 c-3.86,0-7-3.14-7-7C5,9.07,6.81,6.55,9.37,5.51z M12,3c-4.97,0-9,4.03-9,9s4.03,9,9,9s9-4.03,9-9c0-0.46-0.04-0.92-0.1-1.36 c-0.98,1.37-2.58,2.26-4.4,2.26c-2.98,0-5.4-2.42-5.4-5.4c0-1.81,0.89-3.42,2.26-4.4C12.92,3.04,12.46,3,12,3L12,3z"/></svg></button></div><div class=navbarSearchContainer_Bca1><div class="navbar__search searchBarContainer_NW3z" dir=ltr><input placeholder=Search aria-label=Search class=navbar__search-input value=""><div class="loadingRing_RJI3 searchBarLoadingRing_YnHq"><div></div><div></div><div></div><div></div></div></div></div></div></div><div role=presentation class=navbar-sidebar__backdrop></div></nav><div id=__docusaurus_skipToContent_fallback class="main-wrapper mainWrapper_z2l0"><div class=docsWrapper_hBAB><button aria-label="Scroll back to top" class="clean-btn theme-back-to-top-button backToTopButton_sjWU" type=button></button><div class=docRoot_UBD9><aside class="theme-doc-sidebar-container docSidebarContainer_YfHR"><div class=sidebarViewport_aRkj><div class="sidebar_njMd sidebarWithHideableNavbar_wUlq"><a tabindex=-1 class=sidebarLogo_isFc href=/fortran/><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--light_NVdE"><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--dark_xIcU"><b>Fortran</b></a><nav aria-label="Docs sidebar" class="menu thin-scrollbar menu_SIkG"><ul class="theme-doc-sidebar-menu menu__list"><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/>Setup</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/basics>Basics</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/array>Array and Matrix</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/control>Logical control</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/loop>Loop</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/modules>Modules</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/procedures>Procedures</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/complex>Complex number</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/recursion>Recursion</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/types>Custom types</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/pointer>Pointer</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/file>File I/O</a><li class="theme-doc-sidebar-item-category theme-doc-sidebar-item-category-level-1 menu__list-item"><div class=menu__list-item-collapsible><a class="menu__link menu__link--sublist menu__link--active" href=/fortran/category/coding-practice>Coding practice</a><button aria-label="Collapse sidebar category 'Coding practice'" aria-expanded=true type=button class="clean-btn menu__caret"></button></div><ul style=display:block;overflow:visible;height:auto class=menu__list><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/swap>Swap two numbers</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/abs-path>Absolute path</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/hypotenuse>Calculate hypotenuse</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/integration>Numerical integration</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/haversine>Haversine formula</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/inner-product>Inner product</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/monte-carlo-pi>Monte Carlo method</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/monte-carlo-integration>Monte Carlo integration</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class="menu__link menu__link--active" aria-current=page tabindex=0 href=/fortran/time>Time</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/arg-parsing>Argument parsing</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/exec-command>External command</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/blas>BLAS</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/mpi>MPI Basics</a></ul><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/resources>Resources</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/license>License</a></ul></nav><button type=button title="Collapse sidebar" aria-label="Collapse sidebar" class="button button--secondary button--outline collapseSidebarButton_PEFL"><svg width=20 height=20 aria-hidden=true class=collapseSidebarButtonIcon_kv0_><g fill=#7a7a7a><path d="M9.992 10.023c0 .2-.062.399-.172.547l-4.996 7.492a.982.982 0 01-.828.454H1c-.55 0-1-.453-1-1 0-.2.059-.403.168-.551l4.629-6.942L.168 3.078A.939.939 0 010 2.528c0-.548.45-.997 1-.997h2.996c.352 0 .649.18.828.45L9.82 9.472c.11.148.172.347.172.55zm0 0"/><path d="M19.98 10.023c0 .2-.058.399-.168.547l-4.996 7.492a.987.987 0 01-.828.454h-3c-.547 0-.996-.453-.996-1 0-.2.059-.403.168-.551l4.625-6.942-4.625-6.945a.939.939 0 01-.168-.55 1 1 0 01.996-.997h3c.348 0 .649.18.828.45l4.996 7.492c.11.148.168.347.168.55zm0 0"/></g></svg></button></div></div></aside><main class=docMainContainer_TBSr><div class="container padding-top--md padding-bottom--lg"><div class=row><div class="col docItemCol_VOVn"><div class=docItemContainer_Djhp><article><nav class="theme-doc-breadcrumbs breadcrumbsContainer_Z_bl" aria-label=Breadcrumbs><ul class=breadcrumbs itemscope itemtype=https://schema.org/BreadcrumbList><li class=breadcrumbs__item><a aria-label="Home page" class=breadcrumbs__link href=/fortran/><svg viewBox="0 0 24 24" class=breadcrumbHomeIcon_YNFT><path d="M10 19v-5h4v5c0 .55.45 1 1 1h3c.55 0 1-.45 1-1v-7h1.7c.46 0 .68-.57.33-.87L12.67 3.6c-.38-.34-.96-.34-1.34 0l-8.36 7.53c-.34.3-.13.87.33.87H5v7c0 .55.45 1 1 1h3c.55 0 1-.45 1-1z" fill=currentColor /></svg></a><li itemscope itemprop=itemListElement itemtype=https://schema.org/ListItem class=breadcrumbs__item><a class=breadcrumbs__link itemprop=item href=/fortran/category/coding-practice><span itemprop=name>Coding practice</span></a><meta itemprop=position content=1><li itemscope itemprop=itemListElement itemtype=https://schema.org/ListItem class="breadcrumbs__item breadcrumbs__item--active"><span class=breadcrumbs__link itemprop=name>Time</span><meta itemprop=position content=2></ul></nav><div class="theme-doc-markdown markdown"><header><h1>Time</h1></header><p>Following example uses <code>date_and_time</code> and <code>cup_time</code> to find current date and
+<!doctype html><html lang=en dir=ltr class="docs-wrapper plugin-docs plugin-id-default docs-version-current docs-doc-page docs-doc-id-time" data-has-hydrated=false><meta charset=UTF-8><meta name=generator content="Docusaurus v3.6.1"><title data-rh=true>Time • Fortran Tutorial</title><meta data-rh=true name=viewport content="width=device-width,initial-scale=1.0"><meta data-rh=true name=twitter:card content=summary_large_image><meta data-rh=true property=og:url content=https://pranabdas.github.io/fortran/time><meta data-rh=true property=og:locale content=en><meta data-rh=true name=docusaurus_locale content=en><meta data-rh=true name=docsearch:language content=en><meta data-rh=true name=theme-color content=#06445c><meta data-rh=true name=docusaurus_version content=current><meta data-rh=true name=docusaurus_tag content=docs-default-current><meta data-rh=true name=docsearch:version content=current><meta data-rh=true name=docsearch:docusaurus_tag content=docs-default-current><meta data-rh=true property=og:title content="Time • Fortran Tutorial"><meta data-rh=true name=description content="Following example uses dateandtime and cup_time to find current date and"><meta data-rh=true property=og:description content="Following example uses dateandtime and cup_time to find current date and"><link data-rh=true rel=icon href=/fortran/img/favicon.png><link data-rh=true rel=canonical href=https://pranabdas.github.io/fortran/time><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/time hreflang=en><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/time hreflang=x-default><link rel=stylesheet href=https://pranab.pages.dev/assets/fonts/katex/katex.min.css><link rel=stylesheet href=/fortran/assets/css/styles.4de1c8a8.css><script src=/fortran/assets/js/runtime~main.667e3c0f.js defer></script><script src=/fortran/assets/js/main.10795e8f.js defer></script><body class=navigation-with-keyboard><script>!function(){var t,e=function(){try{return new URLSearchParams(window.location.search).get("docusaurus-theme")}catch(t){}}()||function(){try{return window.localStorage.getItem("theme")}catch(t){}}();t=null!==e?e:window.matchMedia("(prefers-color-scheme: dark)").matches?"dark":(window.matchMedia("(prefers-color-scheme: light)").matches,"light"),document.documentElement.setAttribute("data-theme",t)}(),function(){try{for(var[t,e]of new URLSearchParams(window.location.search).entries())if(t.startsWith("docusaurus-data-")){var a=t.replace("docusaurus-data-","data-");document.documentElement.setAttribute(a,e)}}catch(t){}}()</script><div id=__docusaurus><div role=region aria-label="Skip to main content"><a class=skipToContent_fXgn href=#__docusaurus_skipToContent_fallback>Skip to main content</a></div><nav aria-label=Main class="navbar navbar--fixed-top navbarHideable_m1mJ"><div class=navbar__inner><div class=navbar__items><button aria-label="Toggle navigation bar" aria-expanded=false class="navbar__toggle clean-btn" type=button><svg width=30 height=30 viewBox="0 0 30 30" aria-hidden=true><path stroke=currentColor stroke-linecap=round stroke-miterlimit=10 stroke-width=2 d="M4 7h22M4 15h22M4 23h22"/></svg></button><a class=navbar__brand href=/fortran/><div class=navbar__logo><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--light_NVdE"><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--dark_xIcU"></div><b class="navbar__title text--truncate">Fortran</b></a><div class="navbar__item dropdown dropdown--hoverable"><a aria-current=page class="navbar__link active" aria-haspopup=true aria-expanded=false role=button href=/fortran/>Docs</a><ul class=dropdown__menu><li><a aria-current=page class="dropdown__link dropdown__link--active" href=/fortran/>Fortran Programming</a><li><a href=https://pranabdas.github.io/docs/ rel="noopener noreferrer" class=dropdown__link>~ ~ ~ Other Docs ~ ~ ~</a><li><a href=https://pranabdas.github.io/arpespythontools/ rel="noopener noreferrer" class=dropdown__link>ARPES Python Tools</a><li><a href=https://pranabdas.github.io/c-cpp/ rel="noopener noreferrer" class=dropdown__link>C and C++ Programming</a><li><a href=https://pranabdas.github.io/condmat-notes/ rel="noopener noreferrer" class=dropdown__link>Condensed Matter Notes</a><li><a href=https://pranabdas.github.io/javascript/ rel="noopener noreferrer" class=dropdown__link>Javascript Tutorial</a><li><a href=https://pranabdas.github.io/linux/ rel="noopener noreferrer" class=dropdown__link>Linux Tutorial</a><li><a href=https://pranabdas.github.io/machine-learning/ rel="noopener noreferrer" class=dropdown__link>Machine Learning Notes</a><li><a href=https://pranabdas.github.io/openmx/ rel="noopener noreferrer" class=dropdown__link>OpenMX tutorial</a><li><a href=https://pranabdas.github.io/python-tutorial/ rel="noopener noreferrer" class=dropdown__link>Python Tutorial</a><li><a href=https://pranabdas.github.io/espresso/ rel="noopener noreferrer" class=dropdown__link>Quantum Espresso Tutorial</a><li><a href=https://pranabdas.github.io/rust/ rel="noopener noreferrer" class=dropdown__link>Rust Programming</a><li><a href=https://pranabdas.github.io/arpes-manual/ rel="noopener noreferrer" class=dropdown__link>SUV ARPES Manual</a><li><a href=https://pranabdas.github.io/suvtools/ rel="noopener noreferrer" class=dropdown__link>SUV Python Tools</a></ul></div></div><div class="navbar__items navbar__items--right"><a href=https://github.com/pranabdas/fortran rel="noopener noreferrer" class="navbar__item navbar__link header-github-link" aria-label="GitHub repository" title="Visit project repository in GitHub"></a><a href=https://pranabdas.github.io rel="noopener noreferrer" class="navbar__item navbar__link header-homepage-link" aria-label="About me" title="Go to Pranab's Homepage"></a><div class="toggle_vylO colorModeToggle_DEke"><button class="clean-btn toggleButton_gllP toggleButtonDisabled_aARS" type=button disabled title="Switch between dark and light mode (currently light mode)" aria-label="Switch between dark and light mode (currently light mode)" aria-live=polite aria-pressed=false><svg viewBox="0 0 24 24" width=24 height=24 class=lightToggleIcon_pyhR><path fill=currentColor d="M12,9c1.65,0,3,1.35,3,3s-1.35,3-3,3s-3-1.35-3-3S10.35,9,12,9 M12,7c-2.76,0-5,2.24-5,5s2.24,5,5,5s5-2.24,5-5 S14.76,7,12,7L12,7z M2,13l2,0c0.55,0,1-0.45,1-1s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S1.45,13,2,13z M20,13l2,0c0.55,0,1-0.45,1-1 s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S19.45,13,20,13z M11,2v2c0,0.55,0.45,1,1,1s1-0.45,1-1V2c0-0.55-0.45-1-1-1S11,1.45,11,2z M11,20v2c0,0.55,0.45,1,1,1s1-0.45,1-1v-2c0-0.55-0.45-1-1-1C11.45,19,11,19.45,11,20z M5.99,4.58c-0.39-0.39-1.03-0.39-1.41,0 c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0s0.39-1.03,0-1.41L5.99,4.58z M18.36,16.95 c-0.39-0.39-1.03-0.39-1.41,0c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0c0.39-0.39,0.39-1.03,0-1.41 L18.36,16.95z M19.42,5.99c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06c-0.39,0.39-0.39,1.03,0,1.41 s1.03,0.39,1.41,0L19.42,5.99z M7.05,18.36c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06 c-0.39,0.39-0.39,1.03,0,1.41s1.03,0.39,1.41,0L7.05,18.36z"/></svg><svg viewBox="0 0 24 24" width=24 height=24 class=darkToggleIcon_wfgR><path fill=currentColor d="M9.37,5.51C9.19,6.15,9.1,6.82,9.1,7.5c0,4.08,3.32,7.4,7.4,7.4c0.68,0,1.35-0.09,1.99-0.27C17.45,17.19,14.93,19,12,19 c-3.86,0-7-3.14-7-7C5,9.07,6.81,6.55,9.37,5.51z M12,3c-4.97,0-9,4.03-9,9s4.03,9,9,9s9-4.03,9-9c0-0.46-0.04-0.92-0.1-1.36 c-0.98,1.37-2.58,2.26-4.4,2.26c-2.98,0-5.4-2.42-5.4-5.4c0-1.81,0.89-3.42,2.26-4.4C12.92,3.04,12.46,3,12,3L12,3z"/></svg></button></div><div class=navbarSearchContainer_Bca1><div class="navbar__search searchBarContainer_NW3z" dir=ltr><input placeholder=Search aria-label=Search class=navbar__search-input value=""><div class="loadingRing_RJI3 searchBarLoadingRing_YnHq"><div></div><div></div><div></div><div></div></div></div></div></div></div><div role=presentation class=navbar-sidebar__backdrop></div></nav><div id=__docusaurus_skipToContent_fallback class="main-wrapper mainWrapper_z2l0"><div class=docsWrapper_hBAB><button aria-label="Scroll back to top" class="clean-btn theme-back-to-top-button backToTopButton_sjWU" type=button></button><div class=docRoot_UBD9><aside class="theme-doc-sidebar-container docSidebarContainer_YfHR"><div class=sidebarViewport_aRkj><div class="sidebar_njMd sidebarWithHideableNavbar_wUlq"><a tabindex=-1 class=sidebarLogo_isFc href=/fortran/><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--light_NVdE"><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--dark_xIcU"><b>Fortran</b></a><nav aria-label="Docs sidebar" class="menu thin-scrollbar menu_SIkG"><ul class="theme-doc-sidebar-menu menu__list"><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/>Setup</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/basics>Basics</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/array>Array and Matrix</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/control>Logical control</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/loop>Loop</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/modules>Modules</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/procedures>Procedures</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/complex>Complex number</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/recursion>Recursion</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/types>Custom types</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/pointer>Pointer</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/file>File I/O</a><li class="theme-doc-sidebar-item-category theme-doc-sidebar-item-category-level-1 menu__list-item"><div class=menu__list-item-collapsible><a class="menu__link menu__link--sublist menu__link--active" href=/fortran/category/coding-practice>Coding practice</a><button aria-label="Collapse sidebar category 'Coding practice'" aria-expanded=true type=button class="clean-btn menu__caret"></button></div><ul style=display:block;overflow:visible;height:auto class=menu__list><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/swap>Swap two numbers</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/abs-path>Absolute path</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/hypotenuse>Calculate hypotenuse</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/integration>Numerical integration</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/haversine>Haversine formula</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/inner-product>Inner product</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/monte-carlo-pi>Monte Carlo method</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/monte-carlo-integration>Monte Carlo integration</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class="menu__link menu__link--active" aria-current=page tabindex=0 href=/fortran/time>Time</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/arg-parsing>Argument parsing</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/exec-command>External command</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/blas>BLAS</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-2 menu__list-item"><a class=menu__link tabindex=0 href=/fortran/mpi>MPI Basics</a></ul><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/resources>Resources</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/license>License</a></ul></nav><button type=button title="Collapse sidebar" aria-label="Collapse sidebar" class="button button--secondary button--outline collapseSidebarButton_PEFL"><svg width=20 height=20 aria-hidden=true class=collapseSidebarButtonIcon_kv0_><g fill=#7a7a7a><path d="M9.992 10.023c0 .2-.062.399-.172.547l-4.996 7.492a.982.982 0 01-.828.454H1c-.55 0-1-.453-1-1 0-.2.059-.403.168-.551l4.629-6.942L.168 3.078A.939.939 0 010 2.528c0-.548.45-.997 1-.997h2.996c.352 0 .649.18.828.45L9.82 9.472c.11.148.172.347.172.55zm0 0"/><path d="M19.98 10.023c0 .2-.058.399-.168.547l-4.996 7.492a.987.987 0 01-.828.454h-3c-.547 0-.996-.453-.996-1 0-.2.059-.403.168-.551l4.625-6.942-4.625-6.945a.939.939 0 01-.168-.55 1 1 0 01.996-.997h3c.348 0 .649.18.828.45l4.996 7.492c.11.148.168.347.168.55zm0 0"/></g></svg></button></div></div></aside><main class=docMainContainer_TBSr><div class="container padding-top--md padding-bottom--lg"><div class=row><div class="col docItemCol_VOVn"><div class=docItemContainer_Djhp><article><nav class="theme-doc-breadcrumbs breadcrumbsContainer_Z_bl" aria-label=Breadcrumbs><ul class=breadcrumbs itemscope itemtype=https://schema.org/BreadcrumbList><li class=breadcrumbs__item><a aria-label="Home page" class=breadcrumbs__link href=/fortran/><svg viewBox="0 0 24 24" class=breadcrumbHomeIcon_YNFT><path d="M10 19v-5h4v5c0 .55.45 1 1 1h3c.55 0 1-.45 1-1v-7h1.7c.46 0 .68-.57.33-.87L12.67 3.6c-.38-.34-.96-.34-1.34 0l-8.36 7.53c-.34.3-.13.87.33.87H5v7c0 .55.45 1 1 1h3c.55 0 1-.45 1-1z" fill=currentColor /></svg></a><li itemscope itemprop=itemListElement itemtype=https://schema.org/ListItem class=breadcrumbs__item><a class=breadcrumbs__link itemprop=item href=/fortran/category/coding-practice><span itemprop=name>Coding practice</span></a><meta itemprop=position content=1><li itemscope itemprop=itemListElement itemtype=https://schema.org/ListItem class="breadcrumbs__item breadcrumbs__item--active"><span class=breadcrumbs__link itemprop=name>Time</span><meta itemprop=position content=2></ul></nav><div class="theme-doc-markdown markdown"><header><h1>Time</h1></header><p>Following example uses <code>date_and_time</code> and <code>cup_time</code> to find current date and
 time, and determine program execution time.</p>
 <!-- -->
 <div class="language-fortran codeBlockContainer_Ckt0 theme-code-block" style=--prism-color:#393A34;--prism-background-color:#f6f8fa><div class=codeBlockTitle_Ktv7>src/25_time.f90</div><div class=codeBlockContent_biex><pre tabindex=0 class="prism-code language-fortran codeBlock_bY9V thin-scrollbar" style=color:#393A34;background-color:#f6f8fa><code class="codeBlockLines_e6Vv codeBlockLinesWithNumbering_o6Pm"><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token keyword" style=color:#00009f>PROGRAM</span><span class="token plain"> MAIN</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>IMPLICIT NONE</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>INTEGER</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> </span><span class="token keyword" style=color:#00009f>PARAMETER</span><span class="token plain"> </span><span class="token operator" style=color:#393A34>::</span><span class="token plain"> n </span><span class="token operator" style=color:#393A34>=</span><span class="token plain"> </span><span class="token number" style=color:#36acaa>10000000</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>CHARACTER</span><span class="token punctuation" style=color:#393A34>(</span><span class="token plain">LEN</span><span class="token operator" style=color:#393A34>=</span><span class="token number" style=color:#36acaa>8</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"> </span><span class="token operator" style=color:#393A34>::</span><span class="token plain"> date</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>REAL</span><span class="token plain"> start_time</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> end_time</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>REAL</span><span class="token punctuation" style=color:#393A34>(</span><span class="token keyword" style=color:#00009f>KIND</span><span class="token operator" style=color:#393A34>=</span><span class="token keyword" style=color:#00009f>KIND</span><span class="token punctuation" style=color:#393A34>(</span><span class="token number" style=color:#36acaa>1.0D0</span><span class="token punctuation" style=color:#393A34>)</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"> </span><span class="token operator" style=color:#393A34>::</span><span class="token plain"> test </span><span class="token operator" style=color:#393A34>=</span><span class="token plain"> </span><span class="token number" style=color:#36acaa>0.0D0</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>INTEGER</span><span class="token plain"> i</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>CALL</span><span class="token plain"> date_and_time</span><span class="token punctuation" style=color:#393A34>(</span><span class="token plain">date</span><span class="token operator" style=color:#393A34>=</span><span class="token plain">date</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>PRINT</span><span class="token plain"> </span><span class="token operator" style=color:#393A34>*</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> </span><span class="token string" style=color:#e3116c>"Timing report dated: "</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> date</span><span class="token punctuation" style=color:#393A34>(</span><span class="token number" style=color:#36acaa>1</span><span class="token punctuation" style=color:#393A34>:</span><span class="token number" style=color:#36acaa>4</span><span class="token punctuation" style=color:#393A34>)</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> </span><span class="token string" style=color:#e3116c>"-"</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> date</span><span class="token punctuation" style=color:#393A34>(</span><span class="token number" style=color:#36acaa>5</span><span class="token punctuation" style=color:#393A34>:</span><span class="token number" style=color:#36acaa>6</span><span class="token punctuation" style=color:#393A34>)</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> </span><span class="token string" style=color:#e3116c>"-"</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> date</span><span class="token punctuation" style=color:#393A34>(</span><span class="token number" style=color:#36acaa>7</span><span class="token punctuation" style=color:#393A34>:</span><span class="token number" style=color:#36acaa>8</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>CALL</span><span class="token plain"> cpu_time</span><span class="token punctuation" style=color:#393A34>(</span><span class="token plain">start_time</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token comment" style=color:#999988;font-style:italic>! savage benchmark</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>DO</span><span class="token plain"> i </span><span class="token operator" style=color:#393A34>=</span><span class="token plain"> </span><span class="token number" style=color:#36acaa>1</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> n</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">        test </span><span class="token operator" style=color:#393A34>=</span><span class="token plain"> tan</span><span class="token punctuation" style=color:#393A34>(</span><span class="token plain">atan</span><span class="token punctuation" style=color:#393A34>(</span><span class="token plain">exp</span><span class="token punctuation" style=color:#393A34>(</span><span class="token plain">log</span><span class="token punctuation" style=color:#393A34>(</span><span class="token plain">sqrt</span><span class="token punctuation" style=color:#393A34>(</span><span class="token plain">test </span><span class="token operator" style=color:#393A34>*</span><span class="token plain"> test</span><span class="token punctuation" style=color:#393A34>)</span><span class="token punctuation" style=color:#393A34>)</span><span class="token punctuation" style=color:#393A34>)</span><span class="token punctuation" style=color:#393A34>)</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"> </span><span class="token operator" style=color:#393A34>+</span><span class="token plain"> </span><span class="token number" style=color:#36acaa>1.0D0</span><span class="token punctuation" style=color:#393A34>;</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>END DO</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>CALL</span><span class="token plain"> cpu_time</span><span class="token punctuation" style=color:#393A34>(</span><span class="token plain">end_time</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>PRINT</span><span class="token plain"> </span><span class="token operator" style=color:#393A34>*</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> </span><span class="token string" style=color:#e3116c>"Time taken = "</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> end_time </span><span class="token operator" style=color:#393A34>-</span><span class="token plain"> start_time</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> </span><span class="token string" style=color:#e3116c>"sec."</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>PRINT</span><span class="token plain"> </span><span class="token operator" style=color:#393A34>*</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> </span><span class="token string" style=color:#e3116c>"Test = "</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> test</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>PRINT</span><span class="token plain"> </span><span class="token operator" style=color:#393A34>*</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> </span><span class="token string" style=color:#e3116c>"Relative accuracy = "</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> </span><span class="token punctuation" style=color:#393A34>(</span><span class="token plain">test </span><span class="token operator" style=color:#393A34>-</span><span class="token plain"> </span><span class="token punctuation" style=color:#393A34>(</span><span class="token plain">n </span><span class="token operator" style=color:#393A34>+</span><span class="token plain"> </span><span class="token number" style=color:#36acaa>1</span><span class="token punctuation" style=color:#393A34>)</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"> </span><span class="token operator" style=color:#393A34>/</span><span class="token plain"> </span><span class="token punctuation" style=color:#393A34>(</span><span class="token plain">n </span><span class="token operator" style=color:#393A34>+</span><span class="token plain"> </span><span class="token number" style=color:#36acaa>1</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain"></span><span class="token keyword" style=color:#00009f>END</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain"></span><span class="token comment" style=color:#999988;font-style:italic>! Sample output:</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain"></span><span class="token comment" style=color:#999988;font-style:italic>! Timing report dated: 2022-10-09</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain"></span><span class="token comment" style=color:#999988;font-style:italic>! Time taken =   0.939146996     sec.</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain"></span><span class="token comment" style=color:#999988;font-style:italic>! Test =    9999816.5167837571     </span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain"></span><span class="token comment" style=color:#999988;font-style:italic>! Relative accuracy =   -1.8448319779454493E-005</span></span><br></span></code></pre><div class=buttonGroup__atx><button type=button aria-label="Copy code to clipboard" title=Copy class=clean-btn><span class=copyButtonIcons_eSgA aria-hidden=true><svg viewBox="0 0 24 24" class=copyButtonIcon_y97N><path fill=currentColor d="M19,21H8V7H19M19,5H8A2,2 0 0,0 6,7V21A2,2 0 0,0 8,23H19A2,2 0 0,0 21,21V7A2,2 0 0,0 19,5M16,1H4A2,2 0 0,0 2,3V17H4V3H16V1Z"/></svg><svg viewBox="0 0 24 24" class=copyButtonSuccessIcon_LjdS><path fill=currentColor d=M21,7L9,19L3.5,13.5L4.91,12.09L9,16.17L19.59,5.59L21,7Z /></svg></span></button></div></div></div></div><footer class="theme-doc-footer docusaurus-mt-lg"><div class="row margin-top--sm theme-doc-footer-edit-meta-row"><div class=col><a href=https://github.com/pranabdas/fortran/blob/main/docs/time.mdx target=_blank rel="noopener noreferrer" class=theme-edit-this-page><svg fill=currentColor height=20 width=20 viewBox="0 0 40 40" class=iconEdit_Z9Sw aria-hidden=true><g><path d="m34.5 11.7l-3 3.1-6.3-6.3 3.1-3q0.5-0.5 1.2-0.5t1.1 0.5l3.9 3.9q0.5 0.4 0.5 1.1t-0.5 1.2z m-29.5 17.1l18.4-18.5 6.3 6.3-18.4 18.4h-6.3v-6.2z"/></g></svg>Edit this page</a></div><div class="col lastUpdated_JAkA"></div></div></footer></article><nav class="pagination-nav docusaurus-mt-lg" aria-label="Docs pages"><a class="pagination-nav__link pagination-nav__link--prev" href=/fortran/monte-carlo-integration><div class=pagination-nav__sublabel>Previous</div><div class=pagination-nav__label>Monte Carlo integration</div></a><a class="pagination-nav__link pagination-nav__link--next" href=/fortran/arg-parsing><div class=pagination-nav__sublabel>Next</div><div class=pagination-nav__label>Argument parsing</div></a></nav></div></div></div></div></main></div></div></div><footer class="footer footer--dark"><div class="container container-fluid"><div class="footer__bottom text--center"><div class=footer__copyright>Copyright © 2024 Pranab Das. All rights
diff --git a/types/index.html b/types/index.html
index 3d19cd6..89642d7 100644
--- a/types/index.html
+++ b/types/index.html
@@ -1,4 +1,4 @@
-<!doctype html><html lang=en dir=ltr class="docs-wrapper plugin-docs plugin-id-default docs-version-current docs-doc-page docs-doc-id-types" data-has-hydrated=false><meta charset=UTF-8><meta name=generator content="Docusaurus v3.6.1"><title data-rh=true>Custom types • Fortran Tutorial</title><meta data-rh=true name=viewport content="width=device-width,initial-scale=1.0"><meta data-rh=true name=twitter:card content=summary_large_image><meta data-rh=true property=og:url content=https://pranabdas.github.io/fortran/types><meta data-rh=true property=og:locale content=en><meta data-rh=true name=docusaurus_locale content=en><meta data-rh=true name=docsearch:language content=en><meta data-rh=true name=theme-color content=#06445c><meta data-rh=true name=docusaurus_version content=current><meta data-rh=true name=docusaurus_tag content=docs-default-current><meta data-rh=true name=docsearch:version content=current><meta data-rh=true name=docsearch:docusaurus_tag content=docs-default-current><meta data-rh=true property=og:title content="Custom types • Fortran Tutorial"><meta data-rh=true name=description content="Custom data types"><meta data-rh=true property=og:description content="Custom data types"><link data-rh=true rel=icon href=/fortran/img/favicon.png><link data-rh=true rel=canonical href=https://pranabdas.github.io/fortran/types><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/types hreflang=en><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/types hreflang=x-default><link rel=stylesheet href=https://pranabdas.github.io/drive/webfonts/katex/katex.min.css><link rel=stylesheet href=/fortran/assets/css/styles.4de1c8a8.css><script src=/fortran/assets/js/runtime~main.866c090c.js defer></script><script src=/fortran/assets/js/main.ec888ba8.js defer></script><body class=navigation-with-keyboard><script>!function(){var t,e=function(){try{return new URLSearchParams(window.location.search).get("docusaurus-theme")}catch(t){}}()||function(){try{return window.localStorage.getItem("theme")}catch(t){}}();t=null!==e?e:window.matchMedia("(prefers-color-scheme: dark)").matches?"dark":(window.matchMedia("(prefers-color-scheme: light)").matches,"light"),document.documentElement.setAttribute("data-theme",t)}(),function(){try{for(var[t,e]of new URLSearchParams(window.location.search).entries())if(t.startsWith("docusaurus-data-")){var a=t.replace("docusaurus-data-","data-");document.documentElement.setAttribute(a,e)}}catch(t){}}()</script><div id=__docusaurus><div role=region aria-label="Skip to main content"><a class=skipToContent_fXgn href=#__docusaurus_skipToContent_fallback>Skip to main content</a></div><nav aria-label=Main class="navbar navbar--fixed-top navbarHideable_m1mJ"><div class=navbar__inner><div class=navbar__items><button aria-label="Toggle navigation bar" aria-expanded=false class="navbar__toggle clean-btn" type=button><svg width=30 height=30 viewBox="0 0 30 30" aria-hidden=true><path stroke=currentColor stroke-linecap=round stroke-miterlimit=10 stroke-width=2 d="M4 7h22M4 15h22M4 23h22"/></svg></button><a class=navbar__brand href=/fortran/><div class=navbar__logo><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--light_NVdE"><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--dark_xIcU"></div><b class="navbar__title text--truncate">Fortran</b></a><div class="navbar__item dropdown dropdown--hoverable"><a aria-current=page class="navbar__link active" aria-haspopup=true aria-expanded=false role=button href=/fortran/>Docs</a><ul class=dropdown__menu><li><a aria-current=page class="dropdown__link dropdown__link--active" href=/fortran/>Fortran Programming</a><li><a href=https://pranabdas.github.io/docs/ rel="noopener noreferrer" class=dropdown__link>~ ~ ~ Other Docs ~ ~ ~</a><li><a href=https://pranabdas.github.io/arpespythontools/ rel="noopener noreferrer" class=dropdown__link>ARPES Python Tools</a><li><a href=https://pranabdas.github.io/c-cpp/ rel="noopener noreferrer" class=dropdown__link>C and C++ Programming</a><li><a href=https://pranabdas.github.io/condmat-notes/ rel="noopener noreferrer" class=dropdown__link>Condensed Matter Notes</a><li><a href=https://pranabdas.github.io/javascript/ rel="noopener noreferrer" class=dropdown__link>Javascript Tutorial</a><li><a href=https://pranabdas.github.io/linux/ rel="noopener noreferrer" class=dropdown__link>Linux Tutorial</a><li><a href=https://pranabdas.github.io/machine-learning/ rel="noopener noreferrer" class=dropdown__link>Machine Learning Notes</a><li><a href=https://pranabdas.github.io/openmx/ rel="noopener noreferrer" class=dropdown__link>OpenMX tutorial</a><li><a href=https://pranabdas.github.io/python-tutorial/ rel="noopener noreferrer" class=dropdown__link>Python Tutorial</a><li><a href=https://pranabdas.github.io/espresso/ rel="noopener noreferrer" class=dropdown__link>Quantum Espresso Tutorial</a><li><a href=https://pranabdas.github.io/rust/ rel="noopener noreferrer" class=dropdown__link>Rust Programming</a><li><a href=https://pranabdas.github.io/arpes-manual/ rel="noopener noreferrer" class=dropdown__link>SUV ARPES Manual</a><li><a href=https://pranabdas.github.io/suvtools/ rel="noopener noreferrer" class=dropdown__link>SUV Python Tools</a></ul></div></div><div class="navbar__items navbar__items--right"><a href=https://github.com/pranabdas/fortran rel="noopener noreferrer" class="navbar__item navbar__link header-github-link" aria-label="GitHub repository" title="Visit project repository in GitHub"></a><a href=https://pranabdas.github.io rel="noopener noreferrer" class="navbar__item navbar__link header-homepage-link" aria-label="About me" title="Go to Pranab's Homepage"></a><div class="toggle_vylO colorModeToggle_DEke"><button class="clean-btn toggleButton_gllP toggleButtonDisabled_aARS" type=button disabled title="Switch between dark and light mode (currently light mode)" aria-label="Switch between dark and light mode (currently light mode)" aria-live=polite aria-pressed=false><svg viewBox="0 0 24 24" width=24 height=24 class=lightToggleIcon_pyhR><path fill=currentColor d="M12,9c1.65,0,3,1.35,3,3s-1.35,3-3,3s-3-1.35-3-3S10.35,9,12,9 M12,7c-2.76,0-5,2.24-5,5s2.24,5,5,5s5-2.24,5-5 S14.76,7,12,7L12,7z M2,13l2,0c0.55,0,1-0.45,1-1s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S1.45,13,2,13z M20,13l2,0c0.55,0,1-0.45,1-1 s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S19.45,13,20,13z M11,2v2c0,0.55,0.45,1,1,1s1-0.45,1-1V2c0-0.55-0.45-1-1-1S11,1.45,11,2z M11,20v2c0,0.55,0.45,1,1,1s1-0.45,1-1v-2c0-0.55-0.45-1-1-1C11.45,19,11,19.45,11,20z M5.99,4.58c-0.39-0.39-1.03-0.39-1.41,0 c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0s0.39-1.03,0-1.41L5.99,4.58z M18.36,16.95 c-0.39-0.39-1.03-0.39-1.41,0c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0c0.39-0.39,0.39-1.03,0-1.41 L18.36,16.95z M19.42,5.99c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06c-0.39,0.39-0.39,1.03,0,1.41 s1.03,0.39,1.41,0L19.42,5.99z M7.05,18.36c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06 c-0.39,0.39-0.39,1.03,0,1.41s1.03,0.39,1.41,0L7.05,18.36z"/></svg><svg viewBox="0 0 24 24" width=24 height=24 class=darkToggleIcon_wfgR><path fill=currentColor d="M9.37,5.51C9.19,6.15,9.1,6.82,9.1,7.5c0,4.08,3.32,7.4,7.4,7.4c0.68,0,1.35-0.09,1.99-0.27C17.45,17.19,14.93,19,12,19 c-3.86,0-7-3.14-7-7C5,9.07,6.81,6.55,9.37,5.51z M12,3c-4.97,0-9,4.03-9,9s4.03,9,9,9s9-4.03,9-9c0-0.46-0.04-0.92-0.1-1.36 c-0.98,1.37-2.58,2.26-4.4,2.26c-2.98,0-5.4-2.42-5.4-5.4c0-1.81,0.89-3.42,2.26-4.4C12.92,3.04,12.46,3,12,3L12,3z"/></svg></button></div><div class=navbarSearchContainer_Bca1><div class="navbar__search searchBarContainer_NW3z" dir=ltr><input placeholder=Search aria-label=Search class=navbar__search-input value=""><div class="loadingRing_RJI3 searchBarLoadingRing_YnHq"><div></div><div></div><div></div><div></div></div></div></div></div></div><div role=presentation class=navbar-sidebar__backdrop></div></nav><div id=__docusaurus_skipToContent_fallback class="main-wrapper mainWrapper_z2l0"><div class=docsWrapper_hBAB><button aria-label="Scroll back to top" class="clean-btn theme-back-to-top-button backToTopButton_sjWU" type=button></button><div class=docRoot_UBD9><aside class="theme-doc-sidebar-container docSidebarContainer_YfHR"><div class=sidebarViewport_aRkj><div class="sidebar_njMd sidebarWithHideableNavbar_wUlq"><a tabindex=-1 class=sidebarLogo_isFc href=/fortran/><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--light_NVdE"><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--dark_xIcU"><b>Fortran</b></a><nav aria-label="Docs sidebar" class="menu thin-scrollbar menu_SIkG"><ul class="theme-doc-sidebar-menu menu__list"><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/>Setup</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/basics>Basics</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/array>Array and Matrix</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/control>Logical control</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/loop>Loop</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/modules>Modules</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/procedures>Procedures</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/complex>Complex number</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/recursion>Recursion</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class="menu__link menu__link--active" aria-current=page href=/fortran/types>Custom types</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/pointer>Pointer</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/file>File I/O</a><li class="theme-doc-sidebar-item-category theme-doc-sidebar-item-category-level-1 menu__list-item menu__list-item--collapsed"><div class=menu__list-item-collapsible><a class="menu__link menu__link--sublist" href=/fortran/category/coding-practice>Coding practice</a><button aria-label="Expand sidebar category 'Coding practice'" aria-expanded=false type=button class="clean-btn menu__caret"></button></div><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/resources>Resources</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/license>License</a></ul></nav><button type=button title="Collapse sidebar" aria-label="Collapse sidebar" class="button button--secondary button--outline collapseSidebarButton_PEFL"><svg width=20 height=20 aria-hidden=true class=collapseSidebarButtonIcon_kv0_><g fill=#7a7a7a><path d="M9.992 10.023c0 .2-.062.399-.172.547l-4.996 7.492a.982.982 0 01-.828.454H1c-.55 0-1-.453-1-1 0-.2.059-.403.168-.551l4.629-6.942L.168 3.078A.939.939 0 010 2.528c0-.548.45-.997 1-.997h2.996c.352 0 .649.18.828.45L9.82 9.472c.11.148.172.347.172.55zm0 0"/><path d="M19.98 10.023c0 .2-.058.399-.168.547l-4.996 7.492a.987.987 0 01-.828.454h-3c-.547 0-.996-.453-.996-1 0-.2.059-.403.168-.551l4.625-6.942-4.625-6.945a.939.939 0 01-.168-.55 1 1 0 01.996-.997h3c.348 0 .649.18.828.45l4.996 7.492c.11.148.168.347.168.55zm0 0"/></g></svg></button></div></div></aside><main class=docMainContainer_TBSr><div class="container padding-top--md padding-bottom--lg"><div class=row><div class="col docItemCol_VOVn"><div class=docItemContainer_Djhp><article><nav class="theme-doc-breadcrumbs breadcrumbsContainer_Z_bl" aria-label=Breadcrumbs><ul class=breadcrumbs itemscope itemtype=https://schema.org/BreadcrumbList><li class=breadcrumbs__item><a aria-label="Home page" class=breadcrumbs__link href=/fortran/><svg viewBox="0 0 24 24" class=breadcrumbHomeIcon_YNFT><path d="M10 19v-5h4v5c0 .55.45 1 1 1h3c.55 0 1-.45 1-1v-7h1.7c.46 0 .68-.57.33-.87L12.67 3.6c-.38-.34-.96-.34-1.34 0l-8.36 7.53c-.34.3-.13.87.33.87H5v7c0 .55.45 1 1 1h3c.55 0 1-.45 1-1z" fill=currentColor /></svg></a><li itemscope itemprop=itemListElement itemtype=https://schema.org/ListItem class="breadcrumbs__item breadcrumbs__item--active"><span class=breadcrumbs__link itemprop=name>Custom types</span><meta itemprop=position content=1></ul></nav><div class="tocCollapsible_ETCw theme-doc-toc-mobile tocMobile_ITEo"><button type=button class="clean-btn tocCollapsibleButton_TO0P">On this page</button></div><div class="theme-doc-markdown markdown"><header><h1>Custom types</h1></header><h2 class="anchor anchorWithHideOnScrollNavbar_WYt5" id=custom-data-types>Custom data types<a href=#custom-data-types class=hash-link aria-label="Direct link to Custom data types" title="Direct link to Custom data types">​</a></h2>
+<!doctype html><html lang=en dir=ltr class="docs-wrapper plugin-docs plugin-id-default docs-version-current docs-doc-page docs-doc-id-types" data-has-hydrated=false><meta charset=UTF-8><meta name=generator content="Docusaurus v3.6.1"><title data-rh=true>Custom types • Fortran Tutorial</title><meta data-rh=true name=viewport content="width=device-width,initial-scale=1.0"><meta data-rh=true name=twitter:card content=summary_large_image><meta data-rh=true property=og:url content=https://pranabdas.github.io/fortran/types><meta data-rh=true property=og:locale content=en><meta data-rh=true name=docusaurus_locale content=en><meta data-rh=true name=docsearch:language content=en><meta data-rh=true name=theme-color content=#06445c><meta data-rh=true name=docusaurus_version content=current><meta data-rh=true name=docusaurus_tag content=docs-default-current><meta data-rh=true name=docsearch:version content=current><meta data-rh=true name=docsearch:docusaurus_tag content=docs-default-current><meta data-rh=true property=og:title content="Custom types • Fortran Tutorial"><meta data-rh=true name=description content="Custom data types"><meta data-rh=true property=og:description content="Custom data types"><link data-rh=true rel=icon href=/fortran/img/favicon.png><link data-rh=true rel=canonical href=https://pranabdas.github.io/fortran/types><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/types hreflang=en><link data-rh=true rel=alternate href=https://pranabdas.github.io/fortran/types hreflang=x-default><link rel=stylesheet href=https://pranab.pages.dev/assets/fonts/katex/katex.min.css><link rel=stylesheet href=/fortran/assets/css/styles.4de1c8a8.css><script src=/fortran/assets/js/runtime~main.667e3c0f.js defer></script><script src=/fortran/assets/js/main.10795e8f.js defer></script><body class=navigation-with-keyboard><script>!function(){var t,e=function(){try{return new URLSearchParams(window.location.search).get("docusaurus-theme")}catch(t){}}()||function(){try{return window.localStorage.getItem("theme")}catch(t){}}();t=null!==e?e:window.matchMedia("(prefers-color-scheme: dark)").matches?"dark":(window.matchMedia("(prefers-color-scheme: light)").matches,"light"),document.documentElement.setAttribute("data-theme",t)}(),function(){try{for(var[t,e]of new URLSearchParams(window.location.search).entries())if(t.startsWith("docusaurus-data-")){var a=t.replace("docusaurus-data-","data-");document.documentElement.setAttribute(a,e)}}catch(t){}}()</script><div id=__docusaurus><div role=region aria-label="Skip to main content"><a class=skipToContent_fXgn href=#__docusaurus_skipToContent_fallback>Skip to main content</a></div><nav aria-label=Main class="navbar navbar--fixed-top navbarHideable_m1mJ"><div class=navbar__inner><div class=navbar__items><button aria-label="Toggle navigation bar" aria-expanded=false class="navbar__toggle clean-btn" type=button><svg width=30 height=30 viewBox="0 0 30 30" aria-hidden=true><path stroke=currentColor stroke-linecap=round stroke-miterlimit=10 stroke-width=2 d="M4 7h22M4 15h22M4 23h22"/></svg></button><a class=navbar__brand href=/fortran/><div class=navbar__logo><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--light_NVdE"><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--dark_xIcU"></div><b class="navbar__title text--truncate">Fortran</b></a><div class="navbar__item dropdown dropdown--hoverable"><a aria-current=page class="navbar__link active" aria-haspopup=true aria-expanded=false role=button href=/fortran/>Docs</a><ul class=dropdown__menu><li><a aria-current=page class="dropdown__link dropdown__link--active" href=/fortran/>Fortran Programming</a><li><a href=https://pranabdas.github.io/docs/ rel="noopener noreferrer" class=dropdown__link>~ ~ ~ Other Docs ~ ~ ~</a><li><a href=https://pranabdas.github.io/arpespythontools/ rel="noopener noreferrer" class=dropdown__link>ARPES Python Tools</a><li><a href=https://pranabdas.github.io/c-cpp/ rel="noopener noreferrer" class=dropdown__link>C and C++ Programming</a><li><a href=https://pranabdas.github.io/condmat-notes/ rel="noopener noreferrer" class=dropdown__link>Condensed Matter Notes</a><li><a href=https://pranabdas.github.io/javascript/ rel="noopener noreferrer" class=dropdown__link>Javascript Tutorial</a><li><a href=https://pranabdas.github.io/linux/ rel="noopener noreferrer" class=dropdown__link>Linux Tutorial</a><li><a href=https://pranabdas.github.io/machine-learning/ rel="noopener noreferrer" class=dropdown__link>Machine Learning Notes</a><li><a href=https://pranabdas.github.io/openmx/ rel="noopener noreferrer" class=dropdown__link>OpenMX tutorial</a><li><a href=https://pranabdas.github.io/python-tutorial/ rel="noopener noreferrer" class=dropdown__link>Python Tutorial</a><li><a href=https://pranabdas.github.io/espresso/ rel="noopener noreferrer" class=dropdown__link>Quantum Espresso Tutorial</a><li><a href=https://pranabdas.github.io/rust/ rel="noopener noreferrer" class=dropdown__link>Rust Programming</a><li><a href=https://pranabdas.github.io/arpes-manual/ rel="noopener noreferrer" class=dropdown__link>SUV ARPES Manual</a><li><a href=https://pranabdas.github.io/suvtools/ rel="noopener noreferrer" class=dropdown__link>SUV Python Tools</a></ul></div></div><div class="navbar__items navbar__items--right"><a href=https://github.com/pranabdas/fortran rel="noopener noreferrer" class="navbar__item navbar__link header-github-link" aria-label="GitHub repository" title="Visit project repository in GitHub"></a><a href=https://pranabdas.github.io rel="noopener noreferrer" class="navbar__item navbar__link header-homepage-link" aria-label="About me" title="Go to Pranab's Homepage"></a><div class="toggle_vylO colorModeToggle_DEke"><button class="clean-btn toggleButton_gllP toggleButtonDisabled_aARS" type=button disabled title="Switch between dark and light mode (currently light mode)" aria-label="Switch between dark and light mode (currently light mode)" aria-live=polite aria-pressed=false><svg viewBox="0 0 24 24" width=24 height=24 class=lightToggleIcon_pyhR><path fill=currentColor d="M12,9c1.65,0,3,1.35,3,3s-1.35,3-3,3s-3-1.35-3-3S10.35,9,12,9 M12,7c-2.76,0-5,2.24-5,5s2.24,5,5,5s5-2.24,5-5 S14.76,7,12,7L12,7z M2,13l2,0c0.55,0,1-0.45,1-1s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S1.45,13,2,13z M20,13l2,0c0.55,0,1-0.45,1-1 s-0.45-1-1-1l-2,0c-0.55,0-1,0.45-1,1S19.45,13,20,13z M11,2v2c0,0.55,0.45,1,1,1s1-0.45,1-1V2c0-0.55-0.45-1-1-1S11,1.45,11,2z M11,20v2c0,0.55,0.45,1,1,1s1-0.45,1-1v-2c0-0.55-0.45-1-1-1C11.45,19,11,19.45,11,20z M5.99,4.58c-0.39-0.39-1.03-0.39-1.41,0 c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0s0.39-1.03,0-1.41L5.99,4.58z M18.36,16.95 c-0.39-0.39-1.03-0.39-1.41,0c-0.39,0.39-0.39,1.03,0,1.41l1.06,1.06c0.39,0.39,1.03,0.39,1.41,0c0.39-0.39,0.39-1.03,0-1.41 L18.36,16.95z M19.42,5.99c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06c-0.39,0.39-0.39,1.03,0,1.41 s1.03,0.39,1.41,0L19.42,5.99z M7.05,18.36c0.39-0.39,0.39-1.03,0-1.41c-0.39-0.39-1.03-0.39-1.41,0l-1.06,1.06 c-0.39,0.39-0.39,1.03,0,1.41s1.03,0.39,1.41,0L7.05,18.36z"/></svg><svg viewBox="0 0 24 24" width=24 height=24 class=darkToggleIcon_wfgR><path fill=currentColor d="M9.37,5.51C9.19,6.15,9.1,6.82,9.1,7.5c0,4.08,3.32,7.4,7.4,7.4c0.68,0,1.35-0.09,1.99-0.27C17.45,17.19,14.93,19,12,19 c-3.86,0-7-3.14-7-7C5,9.07,6.81,6.55,9.37,5.51z M12,3c-4.97,0-9,4.03-9,9s4.03,9,9,9s9-4.03,9-9c0-0.46-0.04-0.92-0.1-1.36 c-0.98,1.37-2.58,2.26-4.4,2.26c-2.98,0-5.4-2.42-5.4-5.4c0-1.81,0.89-3.42,2.26-4.4C12.92,3.04,12.46,3,12,3L12,3z"/></svg></button></div><div class=navbarSearchContainer_Bca1><div class="navbar__search searchBarContainer_NW3z" dir=ltr><input placeholder=Search aria-label=Search class=navbar__search-input value=""><div class="loadingRing_RJI3 searchBarLoadingRing_YnHq"><div></div><div></div><div></div><div></div></div></div></div></div></div><div role=presentation class=navbar-sidebar__backdrop></div></nav><div id=__docusaurus_skipToContent_fallback class="main-wrapper mainWrapper_z2l0"><div class=docsWrapper_hBAB><button aria-label="Scroll back to top" class="clean-btn theme-back-to-top-button backToTopButton_sjWU" type=button></button><div class=docRoot_UBD9><aside class="theme-doc-sidebar-container docSidebarContainer_YfHR"><div class=sidebarViewport_aRkj><div class="sidebar_njMd sidebarWithHideableNavbar_wUlq"><a tabindex=-1 class=sidebarLogo_isFc href=/fortran/><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--light_NVdE"><img src=/fortran/img/favicon.png alt=Logo class="themedComponent_mlkZ themedComponent--dark_xIcU"><b>Fortran</b></a><nav aria-label="Docs sidebar" class="menu thin-scrollbar menu_SIkG"><ul class="theme-doc-sidebar-menu menu__list"><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/>Setup</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/basics>Basics</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/array>Array and Matrix</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/control>Logical control</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/loop>Loop</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/modules>Modules</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/procedures>Procedures</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/complex>Complex number</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/recursion>Recursion</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class="menu__link menu__link--active" aria-current=page href=/fortran/types>Custom types</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/pointer>Pointer</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/file>File I/O</a><li class="theme-doc-sidebar-item-category theme-doc-sidebar-item-category-level-1 menu__list-item menu__list-item--collapsed"><div class=menu__list-item-collapsible><a class="menu__link menu__link--sublist" href=/fortran/category/coding-practice>Coding practice</a><button aria-label="Expand sidebar category 'Coding practice'" aria-expanded=false type=button class="clean-btn menu__caret"></button></div><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/resources>Resources</a><li class="theme-doc-sidebar-item-link theme-doc-sidebar-item-link-level-1 menu__list-item"><a class=menu__link href=/fortran/license>License</a></ul></nav><button type=button title="Collapse sidebar" aria-label="Collapse sidebar" class="button button--secondary button--outline collapseSidebarButton_PEFL"><svg width=20 height=20 aria-hidden=true class=collapseSidebarButtonIcon_kv0_><g fill=#7a7a7a><path d="M9.992 10.023c0 .2-.062.399-.172.547l-4.996 7.492a.982.982 0 01-.828.454H1c-.55 0-1-.453-1-1 0-.2.059-.403.168-.551l4.629-6.942L.168 3.078A.939.939 0 010 2.528c0-.548.45-.997 1-.997h2.996c.352 0 .649.18.828.45L9.82 9.472c.11.148.172.347.172.55zm0 0"/><path d="M19.98 10.023c0 .2-.058.399-.168.547l-4.996 7.492a.987.987 0 01-.828.454h-3c-.547 0-.996-.453-.996-1 0-.2.059-.403.168-.551l4.625-6.942-4.625-6.945a.939.939 0 01-.168-.55 1 1 0 01.996-.997h3c.348 0 .649.18.828.45l4.996 7.492c.11.148.168.347.168.55zm0 0"/></g></svg></button></div></div></aside><main class=docMainContainer_TBSr><div class="container padding-top--md padding-bottom--lg"><div class=row><div class="col docItemCol_VOVn"><div class=docItemContainer_Djhp><article><nav class="theme-doc-breadcrumbs breadcrumbsContainer_Z_bl" aria-label=Breadcrumbs><ul class=breadcrumbs itemscope itemtype=https://schema.org/BreadcrumbList><li class=breadcrumbs__item><a aria-label="Home page" class=breadcrumbs__link href=/fortran/><svg viewBox="0 0 24 24" class=breadcrumbHomeIcon_YNFT><path d="M10 19v-5h4v5c0 .55.45 1 1 1h3c.55 0 1-.45 1-1v-7h1.7c.46 0 .68-.57.33-.87L12.67 3.6c-.38-.34-.96-.34-1.34 0l-8.36 7.53c-.34.3-.13.87.33.87H5v7c0 .55.45 1 1 1h3c.55 0 1-.45 1-1z" fill=currentColor /></svg></a><li itemscope itemprop=itemListElement itemtype=https://schema.org/ListItem class="breadcrumbs__item breadcrumbs__item--active"><span class=breadcrumbs__link itemprop=name>Custom types</span><meta itemprop=position content=1></ul></nav><div class="tocCollapsible_ETCw theme-doc-toc-mobile tocMobile_ITEo"><button type=button class="clean-btn tocCollapsibleButton_TO0P">On this page</button></div><div class="theme-doc-markdown markdown"><header><h1>Custom types</h1></header><h2 class="anchor anchorWithHideOnScrollNavbar_WYt5" id=custom-data-types>Custom data types<a href=#custom-data-types class=hash-link aria-label="Direct link to Custom data types" title="Direct link to Custom data types">​</a></h2>
 <!-- -->
 <div class="language-fortran codeBlockContainer_Ckt0 theme-code-block" style=--prism-color:#393A34;--prism-background-color:#f6f8fa><div class=codeBlockTitle_Ktv7>src/23_custom_type.f90</div><div class=codeBlockContent_biex><pre tabindex=0 class="prism-code language-fortran codeBlock_bY9V thin-scrollbar" style=color:#393A34;background-color:#f6f8fa><code class="codeBlockLines_e6Vv codeBlockLinesWithNumbering_o6Pm"><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token keyword" style=color:#00009f>PROGRAM</span><span class="token plain"> MAIN</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>IMPLICIT NONE</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>TYPE</span><span class="token plain"> user </span><span class="token comment" style=color:#999988;font-style:italic>! if defined in external MODULE, use PUBLIC: TYPE, PUBLIC :: user</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">        </span><span class="token keyword" style=color:#00009f>INTEGER</span><span class="token plain"> id </span><span class="token comment" style=color:#999988;font-style:italic>! parameters can be initialized</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">        </span><span class="token keyword" style=color:#00009f>CHARACTER</span><span class="token punctuation" style=color:#393A34>(</span><span class="token plain">LEN</span><span class="token operator" style=color:#393A34>=</span><span class="token number" style=color:#36acaa>64</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"> name</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">        </span><span class="token keyword" style=color:#00009f>REAL</span><span class="token plain"> age</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>END TYPE</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token comment" style=color:#999988;font-style:italic>! extending type</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>TYPE</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> EXTENDS</span><span class="token punctuation" style=color:#393A34>(</span><span class="token plain">user</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"> </span><span class="token operator" style=color:#393A34>::</span><span class="token plain"> user_extended</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">        </span><span class="token keyword" style=color:#00009f>real</span><span class="token plain"> </span><span class="token operator" style=color:#393A34>::</span><span class="token plain"> salary</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>END TYPE</span><span class="token plain"> user_extended</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>TYPE</span><span class="token punctuation" style=color:#393A34>(</span><span class="token plain">user</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"> new_user</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token comment" style=color:#999988;font-style:italic>! declare an array of user</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>TYPE</span><span class="token punctuation" style=color:#393A34>(</span><span class="token plain">user</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"> user_catalog</span><span class="token punctuation" style=color:#393A34>(</span><span class="token number" style=color:#36acaa>10</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>TYPE</span><span class="token punctuation" style=color:#393A34>(</span><span class="token plain">user_extended</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"> user_with_salary</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    new_user</span><span class="token operator" style=color:#393A34>%</span><span class="token plain">id </span><span class="token operator" style=color:#393A34>=</span><span class="token plain"> </span><span class="token number" style=color:#36acaa>1</span><span class="token punctuation" style=color:#393A34>;</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    new_user</span><span class="token operator" style=color:#393A34>%</span><span class="token plain">name </span><span class="token operator" style=color:#393A34>=</span><span class="token plain"> </span><span class="token string" style=color:#e3116c>"Albert Einstein"</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    new_user</span><span class="token operator" style=color:#393A34>%</span><span class="token plain">age </span><span class="token operator" style=color:#393A34>=</span><span class="token plain"> </span><span class="token number" style=color:#36acaa>76.0</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token comment" style=color:#999988;font-style:italic>! alternatively, new_user = user(1, "Albert Einstein", 76.0)</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    user_catalog</span><span class="token punctuation" style=color:#393A34>(</span><span class="token number" style=color:#36acaa>1</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"> </span><span class="token operator" style=color:#393A34>=</span><span class="token plain"> new_user</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>PRINT</span><span class="token plain"> </span><span class="token operator" style=color:#393A34>*</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> </span><span class="token string" style=color:#e3116c>"User ID: "</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> user_catalog</span><span class="token punctuation" style=color:#393A34>(</span><span class="token number" style=color:#36acaa>1</span><span class="token punctuation" style=color:#393A34>)</span><span class="token operator" style=color:#393A34>%</span><span class="token plain">id</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>PRINT</span><span class="token plain"> </span><span class="token operator" style=color:#393A34>*</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> </span><span class="token string" style=color:#e3116c>"User name: "</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> user_catalog</span><span class="token punctuation" style=color:#393A34>(</span><span class="token number" style=color:#36acaa>1</span><span class="token punctuation" style=color:#393A34>)</span><span class="token operator" style=color:#393A34>%</span><span class="token plain">name</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>PRINT</span><span class="token plain"> </span><span class="token operator" style=color:#393A34>*</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> </span><span class="token string" style=color:#e3116c>"Age: "</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> user_catalog</span><span class="token punctuation" style=color:#393A34>(</span><span class="token number" style=color:#36acaa>1</span><span class="token punctuation" style=color:#393A34>)</span><span class="token operator" style=color:#393A34>%</span><span class="token plain">age</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    user_with_salary </span><span class="token operator" style=color:#393A34>=</span><span class="token plain"> user_extended</span><span class="token punctuation" style=color:#393A34>(</span><span class="token number" style=color:#36acaa>1</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> </span><span class="token string" style=color:#e3116c>"Albert Einstein"</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> </span><span class="token number" style=color:#36acaa>76.0</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> </span><span class="token number" style=color:#36acaa>50000.0</span><span class="token punctuation" style=color:#393A34>)</span><span class="token plain"></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain">    </span><span class="token keyword" style=color:#00009f>PRINT</span><span class="token plain"> </span><span class="token operator" style=color:#393A34>*</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> </span><span class="token string" style=color:#e3116c>"Salary: "</span><span class="token punctuation" style=color:#393A34>,</span><span class="token plain"> user_with_salary</span><span class="token operator" style=color:#393A34>%</span><span class="token plain">salary</span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain" style=display:inline-block></span></span><br></span><span class="token-line codeLine_lJS_" style=color:#393A34><span class=codeLineNumber_Tfdd></span><span class=codeLineContent_feaV><span class="token plain"></span><span class="token keyword" style=color:#00009f>END</span></span><br></span></code></pre><div class=buttonGroup__atx><button type=button aria-label="Copy code to clipboard" title=Copy class=clean-btn><span class=copyButtonIcons_eSgA aria-hidden=true><svg viewBox="0 0 24 24" class=copyButtonIcon_y97N><path fill=currentColor d="M19,21H8V7H19M19,5H8A2,2 0 0,0 6,7V21A2,2 0 0,0 8,23H19A2,2 0 0,0 21,21V7A2,2 0 0,0 19,5M16,1H4A2,2 0 0,0 2,3V17H4V3H16V1Z"/></svg><svg viewBox="0 0 24 24" class=copyButtonSuccessIcon_LjdS><path fill=currentColor d=M21,7L9,19L3.5,13.5L4.91,12.09L9,16.17L19.59,5.59L21,7Z /></svg></span></button></div></div></div>
 <h2 class="anchor anchorWithHideOnScrollNavbar_WYt5" id=polymorphism>Polymorphism<a href=#polymorphism class=hash-link aria-label="Direct link to Polymorphism" title="Direct link to Polymorphism">​</a></h2>
