Form Follows Energy

2012/12/212012/12/27

[app]Wind Tunnel

유체의 유동을 시각적으로 보여주는 앱이다.
위치 : 앱스토어
제작사 홈페이지 : http://windtunnelapp.com/Wind_tunnel_app/HOME.html

추천 이유
1. 유체의 흐름을 시각적으로 보여줌
2. 속도, 압력 등의 분포를 보여줌
3. 사물을 손쉽게 그릴 수 있으며, 그에 따른 유동 변화를 실시간으로 보여줌.
4. 유체역학과 관련된 교과목 진행에 도움이 됨.
5. 손 안에 풍동을 하나 갖게 되는 것임.

2012/12/022018/05/28

Mac Lion에서 vhost와 rewrite를 수동으로 설정하기

<상황>

(개인적인 문제) 하나의 IP에 가상의 여러 웹서버(아파치에서는 이를 가상호스트Virtual host라고 함)를 설정해야 한다.
가상호스트에 워드프레스(wordpress)를 설치한다.
워드프레스는 rewrite가 가능해야 한다. 그래야 고유주소(permalink)를 사용할 수 있다.

즉, 가상호스트 기능과 rewrite 기능이 모두 만족해야 하는 상황이다.

서버의 하드웨어는 Mac Mini이고, 운영체제는 Mac Lion Server이다.

<문제발생>

Server.app을 통해 가상호스트를 설정하고, 수동으로 0000_any_80_www.solarview.net.conf를 수정했다.
server.app을 통해 웹서비스를 재시동하면, 모든 설정이 원점으로 돌아간다. 즉 rewrite가 가능하게 하는 Options FollowSymLinks, AllowOverride 설정이 원래대로 None이 된다.

<해결과정>

1) 사이트 검색

http://miconblog.com/tc/sohn/670

http://www.dummies.com/how-to/content/how-to-add-websites-to-lion-server.navId-810637.html

2) 찾은 답

Server.app에서 설정한 것은 자동으로 복원된다.

그래서, 사용자 설정 파일(my.solarview.conf)을 특정 위치(users)에 두고 수동으로 설정하는 것이 좋다.

출처 : https://discussions.apple.com/message/20402930#20402930

이 답을 준 사람의 사이트 http://osx.topicdesk.com/

<해결>

Server.app에서 설정한 파일들(가상호스트를 설정했던 파일들)을 /etc/apache2/users로 복사한다.
Server.app에서 가상호스트 설정을 지운다.
users폴더에 있는 파일을 수정한다.

Options FollowSymLinks와 AllowOverride FileInfo 설정한다.

<결론>

Mac Lion Server에서 미세하게 원하는 대로 설정하려면 server.app보다 수동으로 설정해야 한다.

2012/11/23

학습과 프로그래밍을 위한 인용구

학습과 프로그래밍을 위한 인용구를 정리한 웹페이지입니다.

Quotations for Learning and Programming

몇 가지를 발췌하면 다음과 같다.

Programs must be written for people to read, and only incidentally for machines to execute.
Any fool can write code that a computer can understand. Good programmers write code that humans can understand.

If you can’t explain it simply, you don’t understand it well enough.
Simplicity is the soul of efficiency.

The best way to get a good idea is to get a lot of ideas.

2012/11/162012/12/26

[추천앱]CEO들이 즐겨쓰는 앱

1. 한국경제

2012/11/152018/05/28

[app] iPad Apps for AEC

2012/10/282018/05/28

[app]UPAD

이 앱을 쓰기 전에는 Penultimate를 쓰고 있는데, 전환을 심각하게 고민하고 있다.

추천이유

1) 붓글씨를 쓰듯 하지 않고, 아이패드 위에 펜글씨를 쓸 수 있다. 즉, 글 쓰는 부분을 제한하여 손바닥을 아이패드에 대고 쓸 수 있다.
2) 펜글씨의 내용이 넘치면 자동으로 위치를 옮겨준다.
3) PDF 및 그림에 주석을 달 수 있다.
4) PDF로 출력할 수 있다.
5) 펜글씨 말고, 타이핑으로도 원하는 곳에 글을 입력할 수 있다.

추천 웹 페이지 : http://hslifestory.tistory.com/486

2012/10/28

고스트로 운영체제를 새로 설치하기

고스트를 이용해서 윈도우XP를 새로 설치하기

1. 고스트를 내려 받고 사용법 알기

파일 하나로 모든 것을 해결해 주는 한국형 고스트인 듯합니다.

http://snoopy-textcube.blogspot.kr/2008/06/snoopy-ghost-r3.html

2. 이미지를 가지고 설치하기

이미지는 설치할 파티션이 아닌 곳에 두어야 한다.

특히 외장 하드나 USB일 경우, 컴퓨터의 가장 빠른 포트에 연결해서 사용하도록 하자.

시작하기 전에 반드시 빠른 곳에 연결하고 해야 후회하지 않는다. (아, 아까운 내 시간!)

2012/10/252016/02/20

[VBA]내 코드에서 엑셀 함수를 불러 사용하는 방법

엑셀 함수(정확히는 워크시트 함수)에는 분야별로 많은 함수들이 내장되어 있다. 통계, 공학, 재무, 수학/삼각, 논리 등등 많이 있다. 이것을 내 VBA코드에서 활용할 방법은 없을까?

1) VBA 코드 안에서 풍부한 워크시트 함수를 호출하는 방법

Application.WorksheetFunction.워크시트함수명(범위)

1	Application.WorksheetFunction.워크시트함수명(범위)

2) A열 전체 중에서 가장 큰 값을 B1에 읽어오기

Range("B1")= Application.WorksheetFunction.Max(Range("A:A"))

1	Range("B1")= Application.WorksheetFunction.Max(Range("A:A"))

3) A열 전체 중에서 가장 큰 값을 가진 셀을 활성화하기

Range("A:A").Find(Application.WorksheetFunction.Max(Range("A:A"))).Activate

1	Range("A:A").Find(Application.WorksheetFunction.Max(Range("A:A"))).Activate

2012/10/252012/12/27

홈 버튼이 먹통일때

아이폰의 홈버튼이 잘 안 눌릴 때 참고하시라.
http://www.zdnet.co.kr/tv/tv_view.asp?artice_id=20121025102835&type=xml

이 중 몇은 꼭 아이폰의 홈버튼이 아니더라도 적용해 볼 가치가 있다.

2012/10/252021/11/11

[VBA]방정식을 반복법으로 풀기

$e^x - 5 sin x + 1.36 x =0$ 을 반복법으로 풀어라.

먼저, 주어진 식을 $x = g (x)$ 형식으로 변형시킨다.

즉, $x = e^x - 5 sin x + 2.36 x$ 으로 변형시킨다. 따라서 $g(x) = e^x - 5 sin x + 2.36 x$ 가 된다.

Option Explicit

'허용오차(allowable error)
Private Const EPS As Double = 0.00001 'epsilon의 약자. 매우 작은 값 그러나 0은 아니다.
'which stands for epsilon, mean very small but nonzero

Sub SolveEquation()
  Dim x0 As Double
  Dim x1 As Double
  '
  '
  '1) 초기값 x0를 적당히 정한다.
  x0 = Range("A3")
  '2) x1 = G(x0)를 계산한다.
  x1 = G(x0)
  '
  Do Until (Abs(x1 - x0) &lt; EPS) '수렴할 때까지 계산해라.
    x0 = x1 '//새로 계산한 값(x1)을 이전 값(x0)으로 대체한다.
    x1 = G(x0) '//다시 새로운 값(x1)을 계산한다.
  Loop
  '
  '
  Range("C3") = x1
End Sub

Option Explicit

'허용오차(allowable error)

Private Const EPS As Double = 0.00001 'epsilon의 약자. 매우 작은 값 그러나 0은 아니다.

'which stands for epsilon, mean very small but nonzero

Sub SolveEquation()

Dim x0 As Double

Dim x1 As Double

'1) 초기값 x0를 적당히 정한다.

x0 = Range("A3")

'2) x1 = G(x0)를 계산한다.

x1 = G(x0)

Do Until (Abs(x1 - x0) < EPS) '수렴할 때까지 계산해라.

x0 = x1 '//새로 계산한 값(x1)을 이전 값(x0)으로 대체한다.

x1 = G(x0) '//다시 새로운 값(x1)을 계산한다.

Loop

Range("C3") = x1

End Sub

풀어야 할 방정식은 다음과 같다.

Function G(x As Double) As Double
' 계산할 방정식 f(x) = 0 를 x = g(x) 형식으로 변환시킨 것
  G = Exp(x) - 5 * Sin(x) + 2.36 * x
End Function

Function G(x As Double) As Double

' 계산할 방정식 f(x) = 0 를 x = g(x) 형식으로 변환시킨 것

G = Exp(x) - 5 * Sin(x) + 2.36 * x

End Function