code renewal..

포트란 사용하는 이유중 하나가 줄맞춰놓으면 이쁘다는거??
CWP 코드와 유사한 변수명을 사용하기 위해 max_tracr, ntracr 등을 쓰다가 오늘 큰맘 먹고 ‘a’를 빼고 이렇게 바꿨다.

      integer, public :: min_trcl          ! trace sequence number within line
      integer, public :: max_trcl
      integer, public :: ntrcl
      
      integer, public :: min_trcr          ! trace sequence number within SEG Y file
      integer, public :: max_trcr
      integer, public :: ntrcr
      
      integer, public :: min_fldr          ! original field record number
      integer, public :: max_fldr
      integer, public :: nfldr
      
      integer, public :: min_trcf          ! trace number within original field record
      integer, public :: max_trcf
      integer, public :: ntrcf
      
      integer, public :: min_cdpp          ! cdp number
      integer, public :: max_cdpp
      integer, public :: ncdpp

그런데 습관처럼 ntracl, ntracr을 호출하다보니 컴파일할때 장난아니게 에러뜬다. 쿨럭~

Leave a Reply

Fill in your details below or click an icon to log in:

WordPress.com Logo

You are commenting using your WordPress.com account. Log Out / Change )

Twitter picture

You are commenting using your Twitter account. Log Out / Change )

Facebook photo

You are commenting using your Facebook account. Log Out / Change )

Google+ photo

You are commenting using your Google+ account. Log Out / Change )

Connecting to %s