C47 Program file export: Export format version 3, C47 program version 1. 
0000:  Prgm #2/2: 38 bytes / 21 steps  

0001:  LBL ‘Tri’
0002:    x≠ ? 0.
0003:      GTO l
0004:    +

0005:  LBL ‘Hyp’
0006:    x2
0007:    x⇄y

0008:  LBL h
0009:    x2
0010:    +
0011:    √Ϳ
0012:  RTN

0013:  LBL l
0014:    R↓
0015:    +
0016:    x2
0017:    CHS
0018:    R↑
0019:  GTO h
0020:  END