Cómo dividir un archivo .for en partes con condiciones

Cómo dividir un archivo .for en partes con condiciones

Si tenemos, por ejemplo, una matriz muy grande .para el archivo de 50 MB que se muestra a continuación. Tengo que dividirlo en 50 archivos separados para archivos que no superen 1 Mb. ¿Cómo hacerlos automáticamente, no copiar/pegar manualmente? Como tenemos la lista de ejemplos abajo, será bueno dividirla al final de algunos miembros de la matriz, no en algún lugar en el medio de los números, porque es más fácil de seguir.

 ...
 A(1,1)=608245.2842 + 0.344804658*X(65) - 10.10795816*X(66) + 7.65
 #7204197*X(67) - 0.471680875*X(68) + 3.555346388*X(69) - 0.94350445
 #25*w(70) - 1.887567575*w(71) - 0.5289184608*w(72) + 0.7835863517*w
 #(73) + 0.7797242472*w(74) - 0.06254543093*w(75)

 A(1,2)=6) - 0.3096263716*w(77) + 0.2442622122*w(78) + 0.39008*w(79) 
 #+ 0.05444760161*w(80) + 2.141140126e6*w(1)**2 - 9868.479006*w(1)*w
 #(2) + 187397.7897*w(2)**2 + 1.326258688e6*w(1)*w(3) - 162807.522*w
 #(2)*w(3) + 244696.3804*w(3)**2 + 495793.6949*w(1)*w(4) + 85100.066
 ...

información relacionada