diff --git a/wrappers/Julia/0.3/CoolProp.jl b/wrappers/Julia/0.3/CoolProp.jl
new file mode 100644
index 00000000..376aea3f
--- /dev/null
+++ b/wrappers/Julia/0.3/CoolProp.jl
@@ -0,0 +1,23 @@
+module CoolProp
+
+export F2K, HAPropsSI, PropsSI, PhaseSI
+
+function F2K(TF::Float64)
+  return ccall( (:F2K, "CoolProp"), Cdouble, (Cdouble,), TF)
+end
+
+function HAPropsSI(Output::String, Name1::String, Value1::Float64, Name2::String, Value2::Float64, Name3::String, Value3::Float64)
+  return ccall( (:HAPropsSI, "CoolProp"), Cdouble, (Ptr{Uint8},Ptr{Uint8},Float64,Ptr{Uint8},Float64,Ptr{Uint8},Float64), Output,Name1,Value1,Name2,Value2,Name3,Value3)
+end
+
+function PropsSI(Output::String, Name1::String, Value1::Float64, Name2::String, Value2::Float64, Fluid::String)
+  return ccall( (:PropsSI, "CoolProp"), Cdouble, (Ptr{Uint8},Ptr{Uint8},Float64,Ptr{Uint8},Float64,Ptr{Uint8}), Output,Name1,Value1,Name2,Value2,Fluid)
+end
+
+function PhaseSI(Name1::String, Value1::Float64, Name2::String, Value2::Float64, Fluid::String)
+  outstring = Array(Uint8, 255)
+  val = ccall( (:PhaseSI, "CoolProp"), Int32, (Ptr{Uint8},Float64,Ptr{Uint8},Float64,Ptr{Uint8}, Ptr{Uint8}, Int), Name1,Value1,Name2,Value2,Fluid,outstring,length(outstring))
+  return bytestring(convert(Ptr{Uint8}, outstring))
+end
+
+end #module