Capítulo 1 Métodos de residuos ponderados Funciones de prueba ...
Capítulo 1 Métodos de residuos ponderados Funciones de prueba ...
Capítulo 1 Métodos de residuos ponderados Funciones de prueba ...
Create successful ePaper yourself
Turn your PDF publications into a flip-book with our unique Google optimized e-Paper software.
Descripción global <strong>de</strong>l programa<br />
A continuación se <strong>de</strong>sarrolla una <strong>de</strong>scripción <strong>de</strong>l significado <strong>de</strong> cada rutina <strong>de</strong>l programa según<br />
el or<strong>de</strong>n en que van apareciendo. El flujo global <strong>de</strong>l programa se controla <strong>de</strong>s<strong>de</strong> el programa<br />
principal don<strong>de</strong> se <strong>de</strong>finen la variables indicadas en la sección anterior.<br />
Rutina OPENFI<br />
Esta rutina aglutina los comandos necesarios para abrir los archivos a ser usados. Los archivos<br />
son <strong>de</strong> tipo ASCII, es <strong>de</strong>cir que pue<strong>de</strong>n verse y editarse con cualquier editor. Lee interactivamente<br />
los nombres <strong>de</strong> los mismos, verifica su sintaxis y les asigna las características a<strong>de</strong>cuadas. Los<br />
archivos que abre son los siguientes<br />
unit 3 Archivo <strong>de</strong> salida, el nombre <strong>de</strong> este archivo es ingresado por el usuario. Allí van a parar<br />
el eco <strong>de</strong> la entrada <strong>de</strong> datos, valores generados y resultados <strong>de</strong> las variables nodales. Posteriormente<br />
también se escriben allí las reacciones nodales, el valor <strong>de</strong>l flujo en los puntos <strong>de</strong><br />
integración y los valores suavizados en los nodos.<br />
unit 4 Archivo <strong>de</strong> salida don<strong>de</strong> se escriben algunos mensajes <strong>de</strong> advertencia o para escribir valores<br />
auxiliares en la fase <strong>de</strong> <strong>de</strong>puración <strong>de</strong>l programa.<br />
unit 5 Archivo <strong>de</strong> datos (ingresado por el usuario) primero verifica su existencia y concatena<br />
(agrupa) los archivos en que pue<strong>de</strong>n estar separados los datos en un único archivo GAMMA.DAT,<br />
a estos fines llama a las rutinas GENFIL, RANDWR<br />
unit 7-9 Archivos ASCII <strong>de</strong> salida orientados a ser usados como interfaces con programas <strong>de</strong><br />
visualización (Tecplot, GiD).<br />
unit NN Archivo auxiliar<br />
Rutina MATPRO<br />
Lee <strong>de</strong> la unidad 5 las características <strong>de</strong> los materiales y las almacena en la variable PROPS(nprop,nmaty<br />
Esta rutina (como otras) se controla según el caracter que aparece en la primera columna:<br />
si ese carácter es una “e” o “E” entien<strong>de</strong> que se ha terminado con los datos <strong>de</strong> materiales.<br />
si ese carácter es una “m” o “M” entien<strong>de</strong> que se empezarán a leer datos <strong>de</strong> un nuevo material,<br />
y lee el número <strong>de</strong>l material correspondiente.<br />
cualquier otro caracter hace que lea el valor <strong>de</strong> una característica (en forma consecutiva) <strong>de</strong>l<br />
material a partir <strong>de</strong> la columna 31, sirviendo las 30 primeras columnas como un espacio para<br />
comentario.<br />
Una vez terminada la lectura la rutina verifica que se hayan leído valores para todos los materiales<br />
(arreglo EXIST(nmaty)) y si no imprime una advertencia.<br />
Rutina COORDG<br />
Lee <strong>de</strong> la unidad 5 las coor<strong>de</strong>nadas <strong>de</strong> los nudos y las almacena en la variable COORD(dimen,no<strong>de</strong>s).<br />
Esta rutina se controla según el caracter que aparece en la primera columna:<br />
si ese caracter es una “e” o “E” entien<strong>de</strong> que se ha terminado con los datos <strong>de</strong> coor<strong>de</strong>nadas<br />
nodales.<br />
si ese caracter es un espacio en blanco entien<strong>de</strong> que se leerán datos <strong>de</strong> un nodo, y lee el<br />
número <strong>de</strong>l nodo y su DIMEN coor<strong>de</strong>nadas correspondientes.<br />
si el caracter no es alguno <strong>de</strong> los anteriores asume que la línea es un comentario y pasa a la<br />
siguiente.<br />
167