From c48a3f39642c3aa17764e2030209ca2f0fb71bb7 Mon Sep 17 00:00:00 2001
From: Kuoi <starsareintherose@outlook.com>
Date: Thu, 13 Apr 2023 02:46:26 +0800
Subject: [PATCH] add: use shell to replace generate .a

---
 src/staden/gen_a.sh | 19 +++++++++++++++++++
 1 file changed, 19 insertions(+)
 create mode 100644 src/staden/gen_a.sh

diff --git a/src/staden/gen_a.sh b/src/staden/gen_a.sh
new file mode 100644
index 0000000..1173ab8
--- /dev/null
+++ b/src/staden/gen_a.sh
@@ -0,0 +1,19 @@
+#!/bin/bash
+#
+for fortran in $(ls *.f)
+do 
+  mkdir -p ${fortran%??}
+  cp $fortran ${fortran%??}
+
+  cd ${fortran%??}
+  fsplit ${fortran}
+  rm ${fortran}
+
+  gfortran  -g -fdec -std=legacy -C -c *.f
+  ar rcv ${fortran%??}.a *.o
+  ranlib ${fortran%??}.a
+
+  cd ..
+  cp ${fortran%??}/*.a .
+  rm -rf ${fortran%??}
+done