lukasz.proszek.info

Powrót do listy plików

#include "lu.h"



main(int argc, char *argv[]){
  //Pliki otwarte do czytania
  FILE *skad_czytac_1; 
  FILE *skad_czytac_2;
  FILE *skad_L;
  //Pliki otwarte do pisania 
  FILE *wynikL;
  FILE *wynikU;
  if( (skad_czytac_1= fopen(argv[1], "r")) == NULL) {
    printf("\n Nie moglem otworzyc pliku do czytania ");  }
  if( (skad_czytac_2= fopen(argv[2], "r")) == NULL) {
    printf("\n Nie moglem otworzyc pliku do czytania ");  }
  if( (skad_L= fopen(argv[3], "r")) == NULL) {
    printf("\n Nie moglem otworzyc pliku do czytania ");  }
  if( (wynikL= fopen(argv[4], "w")) == NULL) {
    printf("\n Nie moglem otworzyc pliku do pisania ");  }
  if( (wynikU= fopen(argv[5], "w")) == NULL) {
    printf("\n Nie moglem otworzyc pliku do pisania ");  }

  
    
 //deklaracja zmiennych;
  int n_wierszy;
  int n_wierszy2;
  int n_kolumn;
  int n_kolumn2,n_w,n_k;
  int i, j;
  typ **wsk_macierz_1 = NULL ; //wskaźnik do macierzy - nazwa pierwszej wczytanej macierzy
  typ **wsk_macierz_2 = NULL ; //wskaźnik do macierzy - nazwa macierzy śledzenia permutacji wierszy
  typ **L = NULL;
  
  //wywolanie funkcji do wczytania ,macierzy;
  wczytaj_macierz( skad_czytac_1, &wsk_macierz_1, &n_wierszy, &n_kolumn);
  wczytaj_macierz( skad_czytac_2, &wsk_macierz_2, &n_wierszy2, &n_kolumn2);
  wczytaj_macierz( skad_L, &L, &n_w, &n_k);

  /*pivot*/
  for(i=0;i<n_kolumn;i++){
    for(j=0;j<80;j++) printf("=");
    printf("\n[iii] bedzie pivot\n");
    pivot(wsk_macierz_1, wsk_macierz_2, L, n_wierszy, n_kolumn, i);
    
    printf("\n[iii] bedzie crout\n");
    croutgauss(wsk_macierz_1,L,n_kolumn,i);
  }
  
  zapisz_macierz(wynikL,L,n_w,n_k);
  zapisz_macierz(wynikU,wsk_macierz_1,n_wierszy,n_kolumn);

 printf ("\n"); 
  return 0;
}


syntax highlighted by Code2HTML, v. 0.9.1
kod przerobiony z HTML na XHTML za pomocą HTML Tidy for Linux/x86