/*			    -*- Mode: C -*-
// File: make_u1_mat.c
// Created: Thu Apr  6 1995
// U(1) : [hetrick:19970218.1701CET]
// Author: J. E. Hetrick <hetrick@corelli.physics.Arizona.EDU>
//
// Description: something like a constructor for u1_matrix
// Usage: u1_matrix make_u1_matrix(float a0, float a1, float a2, float a3);
//        returns the u1_matrix made from a0..a3
*/
#include "complex.h"
#include "u1.h"

u1_matrix make_u1_matrix(float a0, float a1, float a2, float a3) {
   u1_matrix a;

   a.e[0] = a0;
   a.e[1] = a1;

   return a;
}